以下是通达信背离王源码副图(无源码的请下载附件导入)
背离王源码副图
VAR1:=FORCAST(EMA(CLOSE,5),6);
VAR2:=FORCAST(EMA(CLOSE,8),6);
VAR3:=FORCAST(EMA(CLOSE,11),6);
VAR4:=FORCAST(EMA(CLOSE,14),6);
VAR5:=FORCAST(EMA(CLOSE,17),6);
VAR6:=VAR1+VAR2+VAR3+VAR4-4*VAR5;
VAR7:=EMA(VAR6,2);
FORCAST(EMA(VAR6,3),6),POINTDOT,COLORGREEN;
FORCAST(EMA(VAR6,4),6),POINTDOT,COLORGREEN;
FORCAST(EMA(VAR6,5),6),POINTDOT,COLORGREEN;
FORCAST(EMA(VAR6,6),6),POINTDOT,COLORGREEN;
FORCAST(EMA(VAR6,7),6),POINTDOT,COLORGREEN;
FORCAST(EMA(VAR6,8),6),POINTDOT,COLORGREEN;
FORCAST(EMA(VAR6,9),6),POINTDOT,COLORGREEN;
FORCAST(EMA(VAR6,10),6),POINTDOT,COLORGREEN;
FORCAST(EMA(VAR6,11),6),POINTDOT,COLORGREEN;
FORCAST(EMA(VAR6,12),6),POINTDOT,COLORGREEN;
FORCAST(EMA(VAR6,13),6),POINTDOT,COLORGREEN;
FORCAST(EMA(VAR6,14),6),POINTDOT,COLORGREEN;
FORCAST(EMA(VAR6,15),6),POINTDOT,COLORGREEN;
FORCAST(EMA(VAR6,16),6),POINTDOT,COLORGREEN;
FORCAST(EMA(VAR6,17),6),POINTDOT,COLORGREEN;
STICKLINE(VAR7>=REF(VAR7,1),VAR7,REF(VAR7,1),4,0),COLORRED;
STICKLINE(VAR7<REF(VAR7,1),VAR7,REF(VAR7,1),4,0),COLORGREEN;
STICKLINE(VAR7>=REF(VAR7,1),VAR7,REF(VAR7,1),3,0),COLORRED;
STICKLINE(VAR7>=REF(VAR7,1),VAR7,REF(VAR7,1),2,0),COLORRED;
STICKLINE(VAR7>=REF(VAR7,1),VAR7,REF(VAR7,1),1,0),COLORRED;
STICKLINE(VAR7<REF(VAR7,1),VAR7,REF(VAR7,1),4,0),COLORGREEN;
STICKLINE(VAR7<REF(VAR7,1),VAR7,REF(VAR7,1),3,0),COLORGREEN;
STICKLINE(VAR7<REF(VAR7,1),VAR7,REF(VAR7,1),2,0),COLORGREEN;
STICKLINE(VAR7<REF(VAR7,1),VAR7,REF(VAR7,1),1,0),COLORGREEN;
615577561.jpg
|