通达信涨停阴阳绝杀主图源码[查股公式]

DRAWGBK(C>0, RGB(20,10,60),RGB(350,60,150),0,'1',0);
DRAWKLINE(H,O,L,C);
涨停:=IF((C-REF(C,1))/REF(C,1)>0.097,1,0);
STICKLINE(涨停,OPEN,CLOSE,3,0),COLORMAGENTA;
BL:=MA(CLOSE,10);
UB:=BL+2*STD(CLOSE,10);
LB:=BL-2*STD(CLOSE,10);
上穿A:=crOSS(C,UB);
上穿:=CROSS(LB,C);
ZDT:=BArslAST(上穿A);
DRAWLINE(上穿,O,REF(上穿,1),REF(O,1),1),COLOR00FF00;
DRAWLINE(上穿A,C,REF(上穿A,1),REF(C,1),1),COLOR00FFFF;
T:=BARSLAST(上穿A);
上穿2A:=CROSS(C,REF(O,T)) ;
DRAWICON(上穿2A=1 AND C>REF(C,1)*1.05,L*0.98,26);
DD:=C=LLV(C,20) AND WMA(C,21);
DDTJ:=BARSLAST(FILTER(CROSS(0.8,DD),2))+1;
低点:REF(C,DDTJ),COLOR00FF00,POINTDOT;
STICKLINE(DDTJ<=6,低点,低点,3,0),COLOR00FF00;
ZT:=ZTPRICE(REF(C,1),0.1)=C;
YX:=REF(BARSLAST(ZT)<=10,1) AND REF(C<O,1) AND CROSS(C,REF(C,T));
DRAWTEXT((YX),LOW*0.99,'↖东方'),COLOR0000FF;
DRAWTEXT((REF(YX,1) AND C>O) ,L*0.99,'↖不败'),COLOR00FFFF;
DRAWTEXT((上穿),LOW*0.99,'↖阴绝'),COLOR00FF00;
DRAWTEXT((上穿A),LOW*0.99,'↖阳绝'),COLOR00FFFF;
STICKLINE(上穿A,O,C,2,0),COLORRED;
STICKLINE(上穿A,O,C,1,0),COLORYELLOW;
STICKLINE(上穿,O,C,3,0),COLORGREEN;
STICKLINE(上穿,O,C,1,0),COLORBLUE;
X1:=(C+L+H)/3;
X2:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;
X3:=EMA(C,8);
DRAWTEXT(FILTER(X2>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10),X3,'∠45角度'),COLORWHITE;