通达信的黄金分割线源码

通达信的黄金分割线，分享给喜欢的人！！

高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;