以下是通达信的黄金分割线源码(无源码的请下载附件导入)
通达信的黄金分割线,分享给喜欢的人!!
高J:IF(CURRBARSCOUNT<=20,REFDATE(HHV(H,30),DATE),DRAWNULL),COLORWHITE,DOTLINE;
低J:IF(CURRBARSCOUNT<=20,REFDATE(LLV(L,30),DATE),DRAWNULL),COLORWHITE;
分割点1:IF(CURRBARSCOUNT<=10,高J-(高J-低J)*0.382,DRAWNULL),COLORWHITE,DOTLINE;
分割点2:IF(CURRBARSCOUNT<=10,高J-(高J-低J)*0.618,DRAWNULL),COLORWHITE,DOTLINE;
P1:=IF(BARSLAST(CURRBARSCOUNT=2),1,0);
DRAWTEXT(P1,分割点1,' 0.382'),COLORYELLOW;
DRAWTEXT(P1,分割点2,' 0.618'),COLORYELLOW;
DRAWTEXT(P1,低J,' XO'),COLORYELLOW;
546288933.jpg
|