a1:=hhvall(h);
a2:=llvall(l);
x50:=(a1+a2)/2;
x191:=a2+(a1-a2)*0.191;
x382:=a2+(a1-a2)*0.382;
x618:=a2+(a1-a2)*0.618;
x809:=a2+(a1-a2)*0.809;
x125:=a2+(a1-a2)*0.125;
x25:=a2+(a1-a2)*0.25;
x333:=a2+(a1-a2)*0.333;
x375:=a2+(a1-a2)*0.375;
x625:=a2+(a1-a2)*0.625;
x667:a2+(a1-a2)*0.667;
x75:=a2+(a1-a2)*0.75;
x875:=a2+(a1-a2)*0.875;
aa00:a1,LINETHICK1,Color0000FF,DOTLINE;
aa50:x50,LINETHICK1,Color00FFFF,DASHLINE;
aa100:a2,LINETHICK1,ColorFF0000,DOTLINE;
aa382:x382,LINETHICK1,ColorFF00FF;
aa618:x618,LINETHICK1,ColorFFFF00;
aa809:x809,LINETHICK1,Color00FF00;
aa191:x191,LINETHICK1,ColorFFFFFF;
bb125:x125,LINETHICK1,DOTLINE,Color00FFFF;
bb25:x25,LINETHICK1,DOTLINE,ColorFFFFFF;
BB333:X333,LINETHICK1,DOTLINE,ColorFFFF00;
BB375:X375,LINETHICK1,DOTLINE,Color00FF00;
BB625:X625,LINETHICK1,DOTLINE,Color808040;
BB667:X667,LINETHICK1,DOTLINE,Color0080FF;
BB75:X75,LINETHICK1,DOTLINE,ColorFF00FF;
BB875:X875,LINETHICK1,DOTLINE,Color404080;
DRAWTEXT(BARSTATUS=2,aa618,'61.8%：'+NUMTOSTRN(aa618,2)+''),ALIGN2,color00FFff,LINETHICK1;
DRAWTEXT(BARSTATUS=2,aa809,'80.9%：'+NUMTOSTRN(aa809,2)+''),ALIGN2,color00FFff,LINETHICK1;
DRAWTEXT(BARSTATUS=2,aa50,'50%：'+NUMTOSTRN(aa50,2)+''),ALIGN2,color00FFff,LINETHICK1;
DRAWTEXT(BARSTATUS=2,aa382,'38.2%：'+NUMTOSTRN(aa382,2)+''),ALIGN2,VALIGN2,color00FFff,LINETHICK1;
DRAWTEXT(BARSTATUS=2,aa191,'19.1%：'+NUMTOSTRN(aa191,2)+''),ALIGN2,color00FFff,LINETHICK1;
DRAWTEXT(DISPSTATUS=1,bb125,'1/8：'+NUMTOSTRN(bb125,2)+''),ALIGN0,color00FFff,LINETHICK1;
DRAWTEXT(DISPSTATUS=1,bb25,'1/4：'+NUMTOSTRN(bb25,2)+''),ALIGN0,color00FFff,LINETHICK1;
DRAWTEXT(DISPSTATUS=1,bb333,'1/3：'+NUMTOSTRN(bb333,2)+''),ALIGN0,color00FFff,LINETHICK1;
DRAWTEXT(DISPSTATUS=1,bb375,'3/8：'+NUMTOSTRN(bb375,2)+''),ALIGN0,color00FFff,LINETHICK1;
DRAWTEXT(DISPSTATUS=1,bb625,'5/8：'+NUMTOSTRN(bb625,2)+''),ALIGN0,color00FFff,LINETHICK1;
DRAWTEXT(DISPSTATUS=1,bb667,'2/3：'+NUMTOSTRN(bb667,2)+''),ALIGN0,color00FFff,LINETHICK1;
DRAWTEXT(DISPSTATUS=1,bb75,'3/4：'+NUMTOSTRN(bb75,2)+''),ALIGN0,color00FFff,LINETHICK1;
DRAWTEXT(DISPSTATUS=1,bb875,'7/8：'+NUMTOSTRN(bb875,2)+''),ALIGN0,color00FFff,LINETHICK1;{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
