通达信抄死主力系列之二源码附图

[复制链接]
查看231 | 回复0 | 2021-8-20 04:55:38 | 显示全部楼层 |阅读模式

以下是通达信抄死主力系列之二源码附图(无源码的请下载附件导入)

N:=20;
 N1:=7;
 N2:=69;
 T1:=IF((DATE<=9990314),1,0);
 M3:=EMA(CLOSE,3);
 M8:EMA(CLOSE,8),COLOR008000;
 M13:EMA(M8,13),COLOR0000FF;
 M62:EMA(M8,55),COLORF0F000;
 VAR1:=EMA(M13,62);
 M81:EMA(M62,81),COLOR00FFFF;
 M144:EMA(VAR1,144),LINETHICK2,COLOR0000FF;
 M250:EMA(VAR1,250),POINTDOT,LINETHICK2,COLORF00FF0;
 VAR2:=(CLOSE+HIGH+LOW)/(3);
 VAR3:=(EMA(VAR2,10))*(T1);
 VAR4:=(REF(VAR3,1))*(T1);
 STICKLINE((VAR3>VAR4),VAR3,VAR4,4,0),COLOR00FFFF;
 STICKLINE((VAR3<VAR4),VAR3,VAR4,4,0),COLORFF0000;
 VAR5:=((REF(HIGH,1)+REF(LOW,1))/(2))*(T1);
 VAR6:=MA(CLOSE,N)+((2)*(STD(CLOSE,N)))*(T1);
 DRAWTEXT(CROSS(VAR3,VAR4),(VAR3)*(0.96),'抄死主力'),COLOR00FFFF;
 DRAWTEXT(CROSS(VAR5,VAR6),(HIGH)*(1.03),'↓卖'),COLOR008000;
 VAR7:=REF(CLOSE,1);
 VAR8:=((SMA(MAX(CLOSE-VAR7,0),N1,1))/(SMA(ABS(CLOSE-VAR7),N1,1)))*(100);
 VAR9:=CROSS(N2,VAR8);
 VARA:=(FILTER(VAR9,4))*(T1);
 DRAWTEXT(VARA,(HIGH)*(1.04),'↓卖'),COLORFFFFFF;
 VARB:=((2)*(CLOSE)+HIGH+LOW)/(4);
 VARC:=LLV(LOW,34);
 VARD:=HHV(HIGH,34);
 VARE:=(EMA(((VARB-VAR1)/(VAR5-VAR1))*(100),7))*(T1);
 VARF:=(EMA((0.667)*(REF(VARE,1))+(0.333)*(VARE),5))*(T1);
 DRAWTEXT(IF(((COUNT((CLOSE<REF(CLOSE,1)),8))/(8)>0.6) AND (VOL>=(1.5)*(MA(VOL,5))) AND COUNT((VARE>=VARF),3) AND (REF(LOW,1)=LLV(LOW,120)),1,0),LOW,'●买进'),COLORFF00FF;
 DRAWTEXT(IF(((COUNT((CLOSE<REF(CLOSE,1)),13))/(13)>0.6) AND COUNT((VARE>VARF),6) AND (REF(LOW,5)=LLV(LOW,120)) AND REF((CLOSE>=OPEN),4) AND REF((CLOSE>OPEN),3) AND REF((CLOSE>OPEN),2) AND REF((OPEN>CLOSE),1) AND (OPEN>REF(CLOSE,1)),1,0),LOW,'●买进'),COLOR00FFFF;
 VAR10:=(MA(CLOSE,80)-(MA(CLOSE,10))/(3))*(T1);
 DRAWTEXT(IF((CLOSE<VAR10) AND ((VOL)/(240)>(MA(VOL,5))/(240)) AND (CLOSE>(REF(CLOSE,1))*(1.08)) AND (CLOSE<(MA(CLOSE,13))*(1.3)),1,0),LOW,'●抄底'),COLOR0000FF;


 

79588081.png

79588081.png

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则