股王超短

[通达信] 极品中的极品，股王超短，附图，无未来。。。
在别的论坛中找到的。。。识货的来拿。。。拿的都来顶一下

VAR1:=(2*CLOSE+HIGH+LOW)/4;
VAR2:=EMA(EMA(EMA(VAR1,4),4),4);
J: (VAR2-REF(VAR2,1))/REF(VAR2,1)*100,COLORSTICK;
STICKLINE(J>=0,J,0,0,0),COLORBROWN;
STICKLINE(J<0,J,0,0,0),COLORBROWN;
STICKLINE(J<REF(J,1)AND J>0,0,J,0,0 ),COLORCYAN;
STICKLINE(J<=REF(J,1)AND J<0,0,J,0,0 ),COLORCYAN;
D: MA(J,3);
K: MA(J,1);
买:IF( CROSS(K,D) AND K>D,1,0),LINETHICK0,COLORRED;
卖:IF( CROSS(D,K) AND D>K,1,0),LINETHICK0,COLORGREEN;
DRAWTEXT(买,-1,'买'),COLORRED,LINETHICK2;
DRAWTEXT(卖,1,'卖'),COLORGREEN,LINETHICK2;