通达信日线箱体源码

HH:=FINDHIGH(H,0,20,1);
LL:=FINDLOW(L,0,20,1);
HH1:=FINDHIGH(H,20,20,1);
LL1:=FINDLOW(L,20,20,1);
HH2:=FINDHIGH(H,40,20,1);
LL2:=FINDLOW(L,40,20,1);
HH3:=FINDHIGH(H,60,20,1);
LL3:=FINDLOW(L,60,20,1);
HH4:=FINDHIGH(H,80,20,1);
LL4:=FINDLOW(L,80,20,1);
HH5:=FINDHIGH(H,100,20,1);
LL5:=FINDLOW(L,100,20,1);
HH6:=FINDHIGH(H,120,20,1);
LL6:=FINDLOW(L,120,20,1);
HH7:=FINDHIGH(H,140,20,1);
LL7:=FINDLOW(L,140,20,1);
HH8:=FINDHIGH(H,160,20,1);
LL8:=FINDLOW(L,160,20,1);
HH9:=FINDHIGH(H,180,20,1);
LL9:=FINDLOW(L,180,20,1);

STICKLINE(CURRBARSCOUNT 20 AND CURRBARSCOUNT 1 ,CONST(HH),CONST(HH),8,0)COLOR0000FF;
STICKLINE(CURRBARSCOUNT 20 AND CURRBARSCOUNT 1 ,CONST(LL),CONST(LL),8,0)COLOR0000FF;
STICKLINE(CURRBARSCOUNT 20 AND CURRBARSCOUNT 1 ,(CONST(HH)+CONST(LL))/2,(CONST(HH)+CONST(LL))/2,8,-1)COLOR0000FF;
STICKLINE(CURRBARSCOUNT=20 OR CURRBARSCOUNT=1 ,CONST(HH),CONST(LL),0,0)COLOR0000FF;
STICKLINE(CURRBARSCOUNT 40 AND CURRBARSCOUNT 21 ,CONST(HH1),CONST(HH1),8,0)COLOR00FFFF;
STICKLINE(CURRBARSCOUNT 40 AND CURRBARSCOUNT 21,CONST(LL1),CONST(LL1),8,0)COLOR00FFFF;
STICKLINE(CURRBARSCOUNT 40 AND CURRBARSCOUNT 21 ,(CONST(HH1)+CONST(LL1))/2,(CONST(HH1)+CONST(LL1))/2,8,-1)COLOR00FFFF;
STICKLINE(CURRBARSCOUNT=40 OR CURRBARSCOUNT=21 ,CONST(HH1),CONST(LL1),0,0)COLOR00FFFF;
STICKLINE(CURRBARSCOUNT 60 AND CURRBARSCOUNT 41,CONST(HH2),CONST(HH2),8,0)COLOR00FF00;
STICKLINE(CURRBARSCOUNT 60 AND CURRBARSCOUNT 41,CONST(LL2),CONST(LL2),8,0)COLOR00FF00;
STICKLINE(CURRBARSCOUNT 60 AND CURRBARSCOUNT 41 ,(CONST(HH2)+CONST(LL2))/2,(CONST(HH2)+CONST(LL2))/2,8,-1)COLORFFFFFF;
STICKLINE(CURRBARSCOUNT=60 OR CURRBARSCOUNT=41,CONST(HH2),CONST(LL2),0,0)COLOR00FF00;
STICKLINE(CURRBARSCOUNT 80 AND CURRBARSCOUNT 61,CONST(HH3),CONST(HH3),8,0)COLOR0080FF;
STICKLINE(CURRBARSCOUNT 80 AND CURRBARSCOUNT 61,CONST(LL3),CONST(LL3),8,0)COLOR0080FF;
STICKLINE(CURRBARSCOUNT 80 AND CURRBARSCOUNT 61 ,(CONST(HH3)+CONST(LL3))/2,(CONST(HH3)+CONST(LL3))/2,8,-1)COLOR0080FF;
STICKLINE(CURRBARSCOUNT=80 OR CURRBARSCOUNT=61,CONST(HH3),CONST(LL3),0,0)COLOR0080FF;
STICKLINE(CURRBARSCOUNT 100 AND CURRBARSCOUNT 81,CONST(HH4),CONST(HH4),8,0)COLORFFFFFF;
STICKLINE(CURRBARSCOUNT 100 AND CURRBARSCOUNT 81,CONST(LL4),CONST(LL4),8,0)COLORFFFFFF;
STICKLINE(CURRBARSCOUNT 100 AND CURRBARSCOUNT 81 ,(CONST(HH4)+CONST(LL4))/2,(CONST(HH4)+CONST(LL4))/2,8,-1)COLORFFFFFF;
STICKLINE(CURRBARSCOUNT=100 OR CURRBARSCOUNT=81,CONST(HH4),CONST(LL4),0,0)COLORFFFFFF;
STICKLINE(CURRBARSCOUNT 120 AND CURRBARSCOUNT 101,CONST(HH5),CONST(HH5),8,0)COLORFF00FF;
STICKLINE(CURRBARSCOUNT 120 AND CURRBARSCOUNT 101,CONST(LL5),CONST(LL5),8,0)COLORFF00FF;
STICKLINE(CURRBARSCOUNT 120 AND CURRBARSCOUNT 101 ,(CONST(HH5)+CONST(LL5))/2,(CONST(HH5)+CONST(LL5))/2,8,-1)COLORFF00FF;
STICKLINE(CURRBARSCOUNT=120 OR CURRBARSCOUNT=101,CONST(HH5),CONST(LL5),0,0)COLORFF00FF;
STICKLINE(CURRBARSCOUNT 140 AND CURRBARSCOUNT 121,CONST(HH6),CONST(HH6),8,0)COLORFF00FF;
STICKLINE(CURRBARSCOUNT 140 AND CURRBARSCOUNT 121,CONST(LL6),CONST(LL6),8,0)COLORFF00FF;
STICKLINE(CURRBARSCOUNT 140 AND CURRBARSCOUNT 121 ,(CONST(HH6)+CONST(LL6))/2,(CONST(HH5)+CONST(LL6))/2,8,-1)COLORFF00FF;
STICKLINE(CURRBARSCOUNT=140 OR CURRBARSCOUNT=121,CONST(HH6),CONST(LL6),0,0)COLORFF00FF;
STICKLINE(CURRBARSCOUNT 160 AND CURRBARSCOUNT 141,CONST(HH7),CONST(HH7),8,0)COLORFF00FF;
STICKLINE(CURRBARSCOUNT 160 AND CURRBARSCOUNT 141,CONST(LL7),CONST(LL7),8,0)COLORFF00FF;
STICKLINE(CURRBARSCOUNT 160 AND CURRBARSCOUNT 141 ,(CONST(HH7)+CONST(LL7))/2,(CONST(HH7)+CONST(LL7))/2,8,-1)COLORFF00FF;
STICKLINE(CURRBARSCOUNT=160 OR CURRBARSCOUNT=141,CONST(HH7),CONST(LL7),0,0)COLORFF00FF;
STICKLINE(CURRBARSCOUNT 180 AND CURRBARSCOUNT 161,CONST(HH8),CONST(HH8),8,0)COLORFF00FF;
STICKLINE(CURRBARSCOUNT 180 AND CURRBARSCOUNT 161,CONST(LL8),CONST(LL8),8,0)COLORFF00FF;
STICKLINE(CURRBARSCOUNT 180 AND CURRBARSCOUNT 161 ,(CONST(HH8)+CONST(LL8))/2,(CONST(HH8)+CONST(LL8))/2,8,-1)COLORFF00FF;
STICKLINE(CURRBARSCOUNT=180 OR CURRBARSCOUNT=161,CONST(HH8),CONST(LL8),0,0)COLORFF00FF;
STICKLINE(CURRBARSCOUNT 200 AND CURRBARSCOUNT 181,CONST(HH9),CONST(HH9),8,0)COLORFF00FF;
STICKLINE(CURRBARSCOUNT 200 AND CURRBARSCOUNT 181,CONST(LL9),CONST(LL9),8,0)COLORFF00FF;
STICKLINE(CURRBARSCOUNT 200 AND CURRBARSCOUNT 181 ,(CONST(HH9)+CONST(LL9))/2,(CONST(HH9)+CONST(LL9))/2,8,-1)COLORFF00FF;
STICKLINE(CURRBARSCOUNT=200 OR CURRBARSCOUNT=181,CONST(HH9),CONST(LL9),0,0)COLORFF00FF;

MAA5:MA(C,5),COLORFFFFFF,LINETHICK1;
MAA10:=MA(C,10);
MAA30:MA(C,30),COLORRED,LINETHICK1;
KS:IF(MAA10 MAA30,MAA10,MAA30),COLOR00FFFF,LINETHICK1;
A3:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
A4:=SMA(A3,3,1);
A5:=SMA(A4,3,1);
A6:=3*A4-2*A5;
A7:=C-REF(C,1);
A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6);
买:=LLV(A8,2)=LLV(A8,7) AND COUNT(A8 0,2) AND CROSS(A8,MA(A8,2));
DRAWTEXT(FILTER(买=1,5),LOW-0.05,'↖跟庄'),COLORYELLOW;
STICKLINE(买,OPEN,CLOSE,2,0),COLORYELLOW;