以下是通达信重上五线源码(无源码的请下载附件导入)
HJX:=MAX(MA(C,5),MAX(MAX(MA(C,10),MA(C,20)),MAX(MA(C,60),MA(C,120))));
M20:=MA(HJX,20);
DRAWBAND(M20,RGB(0,0,0),HJX,120);
MA5:MA(HJX,5),COLORMAGENTA;
MA3:MA(HJX,3),COLORBROWN;
DRAWTEXT(CROSS(C,HJX) AND CROSS(C,MA5) AND CROSS(C,M20),L,'重上五线'),COLORYELLOW;
黄金线:IF(HJX>=MA5 AND HJX>REF(HJX,1),HJX,DRAWNULL),LINETHICK3,COLORYELLOW;
MA10:MA(HJX,10),COLORGREEN;
STICKLINE(C>=REF(C,1) AND C>HJX,H,L,0,0),COLORRED;
STICKLINE(C>=REF(C,1) AND C>HJX,C,O,3,1),COLORRED;
STICKLINE(C<REF(C,1) AND C>HJX,H,L,0,0),COLORCYAN;
STICKLINE(C<REF(C,1) AND C>HJX,C,O,3,0),COLORCYAN;
6822869.jpg
67466387.rar
(2.89 KB, 下载次数: 0, 售价: 4 金钱)
|