网上找了一段代码,东拼西凑做了个均线指标,被坛友看中了。
没有含金量的指标,看看就好。
{均线}
EMA10:EMA(CLOSE,10),DOTLINE,COLORMAGENTA;
EMA20:EMA(CLOSE,20),DOTLINE,COLORCYAN;
EMA60:EMA(CLOSE,60),DOTLINE,COLORFF0080;
{均线上升时变粗}
IF(EMA10 =REF(EMA10,1),EMA10,DRAWNULL),LINETHICK2,COLORGREEN;
IF(EMA20 =REF(EMA20,1),EMA20,DRAWNULL),LINETHICK2,COLORRED;
IF(EMA60 =REF(EMA60,1),EMA60,DRAWNULL),LINETHICK1,COLORFF00FF;
{均线尾部标记}
DRAWTEXT(CURRBARSCOUNT=1,EMA10,' EMA10'),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,EMA20,' EMA20'),COLORRED;
DRAWTEXT(CURRBARSCOUNT=1,EMA60,' EMA60'),COLORCYAN;
{隐藏的均线}
A1:=EMA(CLOSE,13)-EMA(CLOSE,55);
A2:=EMA((0.618*REF(A1,1)+0.382*A1),3);
{变色的K线,不需要变色K线克隐藏此部分}
STICKLINE(A1 =A2,H,L,0,0),COLOR00FFFF;
STICKLINE(A1 =A2,O,C,-1,0),COLOR0099DD;
STICKLINE(A1 =A2,O,C,2,0),COLOR00ABEE;
STICKLINE(A1 =A2,O,C,1,0),COLOR00DDFF;
STICKLINE(A1 =A2,O,C,0.1,0),COLOR00FFFF;
STICKLINE(A1 A2,H,L,0,0),COLOR00FF00;
STICKLINE(A1 A2,O,C,-1,0),COLOR009900;
STICKLINE(A1 A2,O,C,2,0),COLOR00AB00;
STICKLINE(A1 A2,O,C,1,0),COLOR00DD00;
STICKLINE(A1 A2,O,C,0.1,0),COLOR00FF00;