通达信 牛股启动主图源码

以下是通达信 牛股启动主图源码（无源码的请下载附件导入）

 {牛股启动主图}

 

MA5:MA(CLOSE,5),COLORWHITE,LINETHICK2;

MA10:MA(CLOSE,10),COLORMAGENTA;

MA20:MA(CLOSE,20),COLORYELLOW,LINETHICK1;

MA30:MA(CLOSE,30),COLORRED;

MA60:MA(CLOSE,60),COLORGREEN,LINETHICK2;

MA120:MA(CLOSE,120),COLORGRAY,LINETHICK1;

MA250:MA(CLOSE,250),COLORBLUE,LINETHICK1;

MA610:MA(CLOSE,610),COLORCYAN,LINETHICK2;

VAR1:=EMA(CLOSE,2);

VAR2:=EMA(SLOPE(CLOSE,21)*20+CLOSE,42);

VAR3:=CROSS(VAR1,VAR2);

VAR4:=CROSS(VAR2,VAR1);

DRAWICON(VAR3,L-0.1,1);

DRAWICON(VAR4,H+0.1,2);

VAR5:=MA(CLOSE,10);

VAR6:=MA(CLOSE,54);

VAR7:=(CLOSE-VAR6)/VAR6<0.1;

VAR8:=(CLOSE-VAR5)/VAR5<0.3;

VAR9:=(VAR7=1 AND VAR8=1)*0.2;

VAR10:=(VAR9=0 AND REF(VAR9,1)=0.2 AND REF(COUNT(VAR9=0.2,10)=10,1)=1)*1;

DRAWICON(VAR10,L-0.2,9);

C2:=REF(C,1);

涨停:=IF((C-C2)*100/C2>=(10-0.01*100/C2),1,0);

STICKLINE(涨停,OPEN,CLOSE,2,0),COLORRED;

STICKLINE(涨停,H,L,0,0),COLORRED;

跌停:=IF((C2-C)*100/C2>=(10-0.01*100/C2),1,0);

STICKLINE(跌停,OPEN,CLOSE,2,0),COLORGREEN;

STICKLINE(跌停,H,L,0,1),COLORGREEN;

VX2:=H/REF(C,1);

STICKLINE(VX2>=1.0950 AND C<H,O,C,2,0),COLORMAGENTA;

DRAWTEXT_FIX(1,0,0,0,'地区：'),COLORRED;DRAWTEXT_FIX(1,0.03,0,0,DYBLOCK),COLORRED;

DRAWTEXT_FIX(1,0.1,0,0,'行业：'),COLORGREEN;DRAWTEXT_FIX(1,0.13,0,0,HYBLOCK),COLORGREEN;

DRAWTEXT_FIX(1,0.19,0,0,'概念:'),COLORFF00FF;DRAWTEXT_FIX(1,0.22,0,0,GNBLOCK),COLORFF00FF;

1715399341.jpg