通达信筹码轨道主图指标(源码)

M01:=COST(01);M10:=COST(10);M20:=COST(20);M30:=COST(30);M40:=COST(40);
M50:=COST(50);M60:=COST(60);M70:=COST(70);M80:=COST(80);M90:=COST(90);M99:=COST(99);
D01:=M10-M01;D02:=M20-M10;D03:=M30-M20;D04:=M40-M30;D05:=M50-M40;
D06:=M60-M50;D07:=M70-M60;D08:=M80-M70;D09:=M90-M80;D10:=M99-M90;
MN1:=MIN(MIN(D01,D02),D03);
MN2:=MIN(MIN(MIN(D04,D05),D06),D07);
MN3:=MIN(MIN(D08,D09),D10);
Q01:=IF(D01=MN1,D01,IF(D02=MN1,D02,D03));
Q02:=IF(D04=MN2,D04,IF(D05=MN2,D05,IF(D06=MN2,D06,D07)));
Q03:=IF(D08=MN3,D08,IF(D09=MN3,D09,D10));
X01:=IF(Q01=D01,M01,IF(Q01=D02,M10,M20));
X02:=IF(Q02=D04,M30,IF(Q02=D05,M40,IF(Q02=D06,M50,M60)));
X03:=IF(Q03=D08,M70,IF(Q03=D09,M80,M90));
S01:=IF(Q01=D01,M10,IF(Q01=D02,M20,M30));
S02:=IF(Q02=D04,M40,IF(Q02=D05,M50,IF(Q02=D06,M60,M70)));
S03:=IF(Q03=D08,M80,IF(Q03=D09,M90,M99));
DRAWBAND(S01,RGB(0,100,0),X01,0);
DRAWBAND(S02,RGB(100,100,100),X02,0);
DRAWBAND(S03,RGB(100,0,0),X03,0);
DRAWKLINE(H,O,L,C);