通达信顶底黄金分割主图指标

{黄金分割线}
顶1:=REFDATE(HHV(H,M),DATE);
底1:=REFDATE(LLV(L,M),DATE);
H0:底1,COLOR0000FF;
H809:顶1-(顶1-底1)*0.191,COLOR0080FF;
H618:顶1-(顶1-底1)*0.382,COLORFF0000;
H50:顶1-(顶1-底1)*0.5,COLORBLACK;
H382:顶1-(顶1-底1)*0.618,COLORFF0000;
H192:顶1-(顶1-底1)*0.809,COLOR0080FF;
H6:顶1,COLOR0000FF;{BBS.GSZB.TOP}
DRAWTEXT(ISLASTBAR,H809,'80.9%');
DRAWTEXT(ISLASTBAR,H618,'61.8%');
DRAWTEXT(ISLASTBAR,H50,'50.0%');
DRAWTEXT(ISLASTBAR,H382,'38.2%');
DRAWTEXT(ISLASTBAR,H192,'19.2%');