ND:=10;

PTD:=CONST(LLVBARS(V,ND));

TDPX:IF(CURRBARSCOUNT<=ND,CONST(IF(PTD=0,O,REF(O,PTD))),DRAWNULL),COLORFF0000;

IF(CURRBARSCOUNT=PTD+1,TDPX,DRAWNULL),CIRCLEDOT,COLORFF0000,LINETHICK2;

DRAWTEXT(ISLASTBAR,TDPX,'  【地平线】'),COLORFF0000;

N250:=250;

PT250:=CONST(HHVBARS(V,N250));

T250:IF(CURRBARSCOUNT<=N250,CONST(IF(PT250=0,C,REF(C,PT250))),DRAWNULL),COLOR990000;

IF(CURRBARSCOUNT=PT250+1,T250,DRAWNULL),CIRCLEDOT,COLORFF0000,LINETHICK2;

DRAWTEXT(CURRBARSCOUNT=N250,T250,'250'),COLOR990000;

N120:=120;

PT120:=CONST(HHVBARS(V,N120));

T120:IF(CURRBARSCOUNT<=N120,CONST(IF(PT120=0,C,REF(C,PT120))),DRAWNULL),COLORAAAA00;

IF(CURRBARSCOUNT=PT120+1,T120,DRAWNULL),CIRCLEDOT,COLORFFFF00,LINETHICK2;

DRAWTEXT(CURRBARSCOUNT=N120,T120,'120'),COLORAAAA00;

N60:=60;

PT60:=CONST(HHVBARS(V,N60));

T60:IF(CURRBARSCOUNT<=N60,CONST(IF(PT60=0,C,REF(C,PT60))),DRAWNULL),COLOR00BB00;

IF(CURRBARSCOUNT=PT60+1,T60,DRAWNULL),CIRCLEDOT,COLOR00FF00,LINETHICK2;

DRAWTEXT(CURRBARSCOUNT=N60,T60,'60'),COLOR00BB00;

N30:=30;

PT30:=CONST(HHVBARS(V,N30));

T30:IF(CURRBARSCOUNT<=N30,CONST(IF(PT30=0,C,REF(C,PT30))),DRAWNULL),COLOR0000CC;

IF(CURRBARSCOUNT=PT30+1,T30,DRAWNULL),CIRCLEDOT,COLOR0000FF,LINETHICK2;

DRAWTEXT(CURRBARSCOUNT=N30,T30,'30'),COLOR0000CC;

N20:=20;

PT20:=CONST(HHVBARS(V,N20));

T20:IF(CURRBARSCOUNT<=N20,CONST(IF(PT20=0,C,REF(C,PT20))),DRAWNULL),COLORDD00DD;

IF(CURRBARSCOUNT=PT20+1,T20,DRAWNULL),CIRCLEDOT,COLORFF00FF,LINETHICK2;

DRAWTEXT(CURRBARSCOUNT=N20,T20,'20'),COLORDD00DD;

N10:=10;

PT10:=CONST(HHVBARS(V,N10));

T10:IF(CURRBARSCOUNT<=N10,CONST(IF(PT10=0,C,REF(C,PT10))),DRAWNULL),COLOR00EEEE;

IF(CURRBARSCOUNT=PT10+1,T10,DRAWNULL),CIRCLEDOT,COLOR00FFFF,LINETHICK2;

DRAWTEXT(CURRBARSCOUNT=N10,T10,'10'),COLOR00EEEE;

N5:=5;

PT5:=CONST(HHVBARS(V,N5));

T5:IF(CURRBARSCOUNT<=N5,CONST(IF(PT5=0,C,REF(C,PT5))),DRAWNULL),COLORFFFFFF;

IF(CURRBARSCOUNT=PT5+1,T5,DRAWNULL),CIRCLEDOT,COLORFFFFFF,LINETHICK2;

DRAWTEXT(CURRBARSCOUNT=N5,T5,'5'),COLORFFFFFF;

{K线}

DRAWKLINE(H,O,L,C);

涨停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(C,1)),1,0);

跌停:=IF((REF(C,1)-C)*100/REF(C,1)>=(10-0.01*100/REF(C,1)),1,0);

STICKLINE(涨停,H,L,0,0),COLORFF00FF;

STICKLINE(涨停,O,C,3,0),COLORAA00AA;

STICKLINE(涨停,O,C,2.4,0),COLORBB00BB;

STICKLINE(涨停,O,C,1.8,0),COLORCC00CC;

STICKLINE(涨停,O,C,1.2,0),COLORDD00DD;

STICKLINE(涨停,O,C,0.6,0),COLOREE00EE;

STICKLINE(涨停,O,C,0.1,0),COLORFF00FF;

STICKLINE(跌停,H,L,0,0),COLORFF0000;

STICKLINE(跌停,O,C,3,0),COLORAA0000;

STICKLINE(跌停,O,C,2.4,0),COLORBB0000;

STICKLINE(跌停,O,C,1.8,0),COLORCC0000;

STICKLINE(跌停,O,C,1.2,0),COLORDD0000;

STICKLINE(跌停,O,C,0.6,0),COLOREE0000;

STICKLINE(跌停,O,C,0.1,0),COLORFF0000;

{立桩量}

V2:=IF(CURRBARSCOUNT=1,VOL*240/MINUTE/REF(VOL,1)-1,VOL/REF(VOL,1)-1);

STICKLINE(V2>=1,C,(O+C)/2,3.4,0),COLOR00AAAA;

STICKLINE(V2>=1,C,(O+C)/2,2.4,0),COLOR00BBBB;

STICKLINE(V2>=1,C,(O+C)/2,1.8,0),COLOR00CCCC;

STICKLINE(V2>=1,C,(O+C)/2,1.2,0),COLOR00DDDD;

STICKLINE(V2>=1,C,(O+C)/2,0.6,0),COLOR00EEEE;

STICKLINE(V2>=1,C,(O+C)/2,0.1,0),COLOR00FFFF;

海浪5:=REF(C,1)=T5 AND C>T5;

DRAWTEXT(海浪5,H,' ↙         【海浪】'),COLORFFFFFF;

海浪10:=(REF(C,1)=T10 AND C>T10);

DRAWTEXT(海浪10,H*1.02,' ↙         【海浪】'),COLOR00FFFF;