筹码轨道－精品通达信指标公式源码分享

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);