同花顺绝对短线副图源码

ma5:EMA(C,5),colorwhite;
工作线:EMA(C,14),colorf00ff0,linethick1;
二号线:EMA(C,25),color00ff00,linethick1;
九号线:EMA(CLOSE,99),linethick1;
 MA120:EMA(CLOSE,120),linethick1;
生命线:EMA(CLOSE,453),linethick1,colorred;
 DIFF:=( EMA(CLOSE,7) - EMA(CLOSE,19));
 DEA:=EMA(DIFF,9);
 MACD:=0.90*(DIFF-DEA);
 tj:=(diff>=dea);
 tj1:=(diff>=0);
 STICKLINE(tj,H,L,0.5,0),coloryellow;
 STICKLINE(tj,O,C,4,0),coloryellow;
 STICKLINE(tj1 AND tj,H,L,0.5,0),colorred;
 STICKLINE(tj1 AND tj,O,C,4,1),colorred;
 STICKLINE(diff<dea,H,L,0.5,0),colorf0f000;
 STICKLINE(diff<dea,O,C,4,0),colorf0f000;
 Var1:=(CLOSE*2+HIGH+LOW)/4;
 SK:= EMA(Var1,13)-EMA(Var1,73);
 SD:= EMA(SK,2);
 DRAWTEXT((CROSS(sk,sd) AND sk<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(sk,sd) AND sk<=-0.14 )
 OR (CROSS(sk,sd) AND sk<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035)) ,L*0.99,'短线'),colorf00ff0;
 STICKLINE((CROSS(sk,sd) AND sk<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(sk,sd) AND sk<=-0.14 )
 OR (CROSS(sk,sd) AND sk<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035)),H,L,0.5,0),colorred;
 STICKLINE((CROSS(sk,sd) AND sk<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(sk,sd) AND sk<=-0.14 )
 OR (CROSS(sk,sd) AND sk<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035)),O,C,8,1),linethick3,colorf00ff0;