优化黄金分割点主图指标

DRAWGBKLAST(v>1,STRIP(RGB(0,0,0),RGB(90,90,90),0));
 ah:hhvall(h); al:llvall(l);
 ahl:=ah-al;
 a191:al+ahl*0.191,LINETHICK1,POINTDOT,ColorC0C0C0;
 a236:al+ahl*0.236,LINETHICK1,POINTDOT,ColorC0C0C0;
 a382:al+ahl*0.382,LINETHICK1,POINTDOT,ColorC0C0C0;
 a5:al+ahl*0.500,LINETHICK1,POINTDOT,ColorC0C0C0;
 a618:al+ahl*0.618,LINETHICK1,POINTDOT,ColorC0C0C0;
 a764:al+ahl*0.764,LINETHICK1,POINTDOT,ColorC0C0C0;
 a809:al+ahl*0.809,LINETHICK1,POINTDOT,ColorC0C0C0;

 y:=1000;
 DRAWTEXTREL(0,0,'最高 '+ah),ColorC0C0C0;
 DRAWTEXTREL(0,y*0.191,'0.809 '+a809),ColorC0C0C0;
 DRAWTEXTREL(0,y*0.236,'0.764 '+a764),ColorC0C0C0;
 DRAWTEXTREL(0,y*0.382,'0.618 '+a618),ColorC0C0C0;
 DRAWTEXTREL(0,y*0.500,'0.50 '+a5),ColorC0C0C0;
 DRAWTEXTREL(0,y*0.618,'0.382 '+a382),ColorC0C0C0;