通达信慢牛主图+慢牛副图指标

{21位画线}
FLAG:=ABS(C-O)/IF((H-L) = 0,100,H-L);
ZHANGF:=ABS(C-O)/O;
WEI21:IF(CODELIKE('9999'),(H-L)*0.5+L,IF(C>O,(C-O)*0.5+O,(O-C)*0.5+C)),NODRAW;
STICKLINE(ZHANGF>=0.03 && FLAG >= 0.03,WEI21,WEI21,-1,0),COLORMAGENTA;
实21:(O+C)/2,NODRAW;
实31:O+(C-O)*2/3,NODRAW,COLOR99CC32;
虚21:H-(H-L)*0.5,NODRAW,COLORMAGENTA;
明日涨停10:IF(CODELIKE('00') OR CODELIKE('600') OR CODELIKE('601') OR CODELIKE('603') OR CODELIKE('605') ,C*1.1,0),COLORRED,NODRAW;
明日涨停20:IF(CODELIKE('300') OR CODELIKE('688'),C*1.2,0),COLORRED,NODRAW;
TK:=C>O AND O>=REF(MAX(C,O),1)+0.01 OR O>=REF(C,1)+0.01 ;
STICKLINE(TK, O,(C-O)*0.01+O,3,0),COLORYELLOW;
ZF:=H>=INTPART(REF(C,1)*1.1*100+0.5)/100 AND H>C;
ZF2:=H>=INTPART(REF(C,1)*1.2*100+0.5)/100 AND H>C;
DT:=L<=INTPART(REF(C,1)*0.9*100+0.5)/100 AND L<C;
上影线幅度:=((H-REF(C,1))/REF(C,1)-(MAX(O,C)-REF(C,1))/REF(C,1))*100;
下影线幅度:=((REF(C,1)-L)/REF(C,1)-(REF(C,1)-MIN(O,C))/REF(C,1))*100;
上影线长:=H-MAX(O,C);
下影线长:=MIN(O,C)-L;{}
长度比较:=上影线长/下影线长;{上下影线长度比}
A:=IF(CODELIKE('300') OR CODELIKE('688'),1,0);
A1:=IF(CODELIKE('00') OR CODELIKE('600') OR CODELIKE('601') OR CODELIKE('603') OR CODELIKE('605'),1,0);
STICKLINE((MIN(O,C)=L OR 长度比较>1) AND ZF AND A1,H-上影线长*1,H,0.01,0),COLORRED;
STICKLINE((MIN(O,C)=L OR 长度比较>1) AND ZF2 AND A,H-上影线长*1,H,0.01,0),COLORRED;
STICKLINE((MAX(O,C)=H OR 长度比较<1) AND DT,L+下影线长*1,L,0.01,0),COLORBLUE;
DRAWTEXT_FIX(ISLASTBAR,0,0,0,HYBLOCK),COLORYELLOW;{在屏幕左上角显示所属行业板块}
DRAWTEXT_FIX(ISLASTBAR,0.05,0,0,DYBLOCK),COLORYELLOW;{在屏幕左上角显示所属地域板块}
DRAWTEXT_FIX(ISLASTBAR,0.1,0,0,GNBLOCK),COLORYELLOW;{在屏幕左上角显示所属概念板块};