源码
N:=10;
MA5:=MA(CLOSE,5);
MA10:=MA(CLOSE,10);
MA20:=MA(CLOSE,20);
MA30:=MA(CLOSE,30);
MA60:=MA(CLOSE,60);
MA90:=MA(CLOSE,90);
MA120:=MA(CLOSE,120);
MA250:=MA(CLOSE,250);
DTPL:=MA10>MA30 AND MA30>REF(MA30,1);
DG:=MAX(MAX(MA5,MA10),MAX(MA20,MA30));
ZG:=MAX(MAX(DG,MA60),MAX(MA90,MA120));
DD:=MIN(MIN(MA5,MA10),MIN(MA20,MA30));
ZD:=MIN(MIN(DD,MA60),MIN(MA90,MA120));
粘合:=(ZG/ZD-1)*100<N,POINTDOT,LINETHICK0;
高粘:=(ZG/ZD-1)*100<N AND ZD>MA250,POINTDOT,LINETHICK0;
穿5:(粘合 AND CROSS(C,MA5))*0.5;
穿10:(粘合 AND CROSS(C,MA10))*1;
穿20:(粘合 AND CROSS(C,MA20))*2;
穿30:(粘合 AND CROSS(C,MA30))*3;
FLSZ:=(C/REF(C,1)-1)*100>=2 AND V>REF(V,1);
DXTP:=((穿5/0.5)+穿10+(穿20/2)+(穿30/3))>=2;
优选:(FLSZ AND DXTP AND MA30>REF(MA30,1))*3,COLOR00FFFF,LINETHICK2;
选优:(FLSZ AND DXTP AND MA30>REF(MA30,1) AND COUNT(高粘,20)>=15)*3,COLOR0000FF,LINETHICK2;
JXDT:=MA5>MA10 AND MA10>MA20 AND MA20>MA30;
发散:(JXDT AND NOT(REF(JXDT,1)))*1,COLOR00FF00,LINETHICK2;
起飞:(NOT(粘合) AND REF(粘合,1) AND COUNT(粘合,20)>=15 AND DTPL)*3,COLORFF00FF,LINETHICK2;
STICKLINE(粘合,-0.2,0,4,0),COLOR00FF00;
STICKLINE(高粘,0.2,0,4,0),COLORFF00FF;
DRAWTEXT(优选,3,'优●选'),COLOR00FFFF;
DRAWTEXT(发散,2,'发●散'),COLOR00FF00;
DRAWTEXT(起飞,3,'起●WWW.GSZB.COM飞'),COLOR00FFFF;
DRAWICON(选优,0.3,1);
DRAWICON(起飞,3,1);