|
|

楼主 |
发表于 2011-10-22 11:41
|
显示全部楼层
CDL 通达信源码
买:C,COLORFFFFFF,NODRAW;
M5:MA(CLOSE,5),COLORBLUE,NODRAW;
M3:MA(CLOSE,3),COLORGREEN,LINETHICK2;
M3变色:IF(BACKSET(M3>REF(M3,1),2),M3,DRAWNULL),COLORRED,LINETHICK2;{变色}
E10:EMA(CLOSE,10),COLORFFFFFF,COLORBLUE,LINETHICK1;
M13:MA(C,13),LINETHICK1,COLOREE8888;
E20:EMA(CLOSE,20),COLORFFFFFF,NODRAW;
E40:EMA(CLOSE,40),COLORGREEN,LINETHICK2;
{出紫阳}
F:=100*(C-REF(C,1))/REF(C,1);
P1:=IF(C<REF(O,1) AND F<0,1,0);
P2:=IF(C<REF(O,2) AND F<0,1,0);
紫阳:=P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1 ;
紫阴:=P1=1 AND REF(P1,1)=0 AND P2=1 AND REF(P2,1)=0 ;
STICKLINE(紫阳,OPEN,CLOSE,1.5,0),COLORFF00FF;{画紫色}
STICKLINE(紫阴,OPEN,CLOSE,1.5,0),COLORGREEN;{画绿色};
{涨停板}
ZT:=C/REF(C,1)>1.097;
BH:=BARSLAST(ZT);
STICKLINE(ZT,REF(O,BH),REF(C,BH),1.5,0),COLORYELLOW; |
|
|