ah:hhvall(h);al:llvall(l);ahl:=ah-al;a19:al+ahl*0.191,coloraaaaaa; a38:al+ahl*0.382,color00aaaa;a50:al+ahl*0.500,LINETHICK1,POINTDOT,COLORGREEN;a61:al+ahl*0.618,color00aaaa;a80:al+ahl*0.809,coloraaaaaa;{标注数字}y:=999;DRAWTEXTREL(0,0,'100% '+ah),coloraaaaaa;DRAWTEXTREL(0,y*0.191,'0.809% '+a80),coloraaaaaa;DRAWTEXTREL(0,y*0.382,'0.618% '+a61),color00aaaa;DRAWTEXTREL(0,y*0.500,'0.50% '+a50),color00aaaa;DRAWTEXTREL(0,y*0.618,'0.382% '+a38),color00aaaa;DRAWTEXTREL(0,y*0.809,'0.191% '+a19),coloraa