好东西,不用说,上图片,送利器。
通达信公式 : 大小单分时
{大小单数据图表一体}
N:=5;
M:=10;
VAR1:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL);
VAR2:=SUM(IF(CLOSE=REF(CLOSE,1),0,VAR1),0);
VAR3:=EMA(VAR2,5);
VAR4:=EMA(VAR2,10);
VAR5:=EMA(VAR2,20);
STICKLINE(VAR3>REF(VAR3,1),0,VAR3,2,0),COLORRED;
STICKLINE(VAR3<REF(VAR3,1),0,VAR3,2,0),COLORGREEN;
STICKLINE(VAR4>REF(VAR4,1),0,VAR4,2,0),COLORRED;
STICKLINE(VAR4<REF(VAR4,1),0,VAR4,2,0),COLORGREEN;
STICKLINE(VAR5>REF(VAR5,1),0,VAR5,2,0),COLORRED;
STICKLINE(VAR5<REF(VAR5,1),0,VAR5,2,0),COLORGREEN;
DRAWTEXT(CROSS(VAR3,VAR4),VAR3*0.9,'↑'),COLORYELLOW;
DRAWTEXT(CROSS(VAR4,VAR3),VAR4*0.9,'↓'),COLORCYAN;
DRAWTEXT(CROSS(VAR3,VAR5),VAR3*0.8,'↑'),COLORYELLOW;
DRAWTEXT(CROSS(VAR5,VAR3),VAR5*0.8,'↓'),COLORCYAN;
DRAWTEXT(CROSS(VAR4,VAR5),VAR4*0.7,'↑'),COLORYELLOW;
DRAWTEXT(CROSS(VAR5,VAR4),VAR5*0.7,'↓'),COLORCYAN;
MA1:MA(VAR3,N),COLORWHITE;
MA2:MA(VAR4,M),COLORYELLOW;
DRAWICON(CROSS(MA1,MA2),MA1,1);
DRAWICON(CROSS(MA2,MA1),MA2,2);