黄金分割（加在主图上使用）

{黄金分割}
高:=REF(HHV(H,60),3);
低:=REF(LLV(L,60),3);
H19:=高-(高-低)*0.191;
H38:=高-(高-低)*0.382;
H50:=高-(高-低)*0.500;
H61:=高-(高-低)*0.618;
H80:=高-(高-低)*0.809;
TOP:REFDATE(高,DATE),POINTDOT,COLORWHITE,NODRAW;
%80.9:REFDATE(H19,DATE),POINTDOT,COLORYELLOW,NODRAW;
%61.8:REFDATE(H38,DATE),POINTDOT,COLORMAGENTA,NODRAW;
{%50.0:REFDATE(H50,DATE),POINTDOT,COLORGREEN,NODRAW;}
%38.2:REFDATE(H61,DATE),POINTDOT,COLORMAGENTA,NODRAW;
%19.8:REFDATE(H80,DATE),POINTDOT,COLORYELLOW,NODRAW;
BOTTOM:REFDATE(低,DATE),POINTDOT,COLORWHITE,NODRAW;
DRAWTEXT(ISLASTBAR,TOP,'   ←％顶点'),COLORWHITE;
DRAWTEXT(ISLASTBAR,%80.9,'   ←％80.9'),COLORYELLOW;
DRAWTEXT(ISLASTBAR,%61.8,'   ←％61.8'),COLORMAGENTA;
{DRAWTEXT(ISLASTBAR,%50.0,' ←％50.0'),COLORGREEN;}
DRAWTEXT(ISLASTBAR,%38.2,'   ←％38.2'),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,%19.8,'   ←％19.1'),COLORYELLOW;
DRAWTEXT(ISLASTBAR,BOTTOM,'   ←％低点'),COLORWHITE;