高低射线’改成飞狐公式

{高低射线}
{1.射线}
x:=BARSLAST(DISPSTATUS=1)+1;  
ah:=hhvall(hhv(h,x));     
al:=llvall(llv(l,x));
nnl:=DISPSTATUS=2;

DRAWLINE(h>=ah,ah,AH,ah,1),color0000ff,LINETHICK2;
DRAWLINE(h>=ah,ah,AL>=L,al,1),color9999ff,LINETHICK2;
DRAWLINE(h>=ah,ah,aH,ah*0.999,1);
DRAWLINE(h>=ah,ah,aH,ah*0.997,1);
DRAWLINE(h>=ah,ah,aH,ah*0.995,1);
DRAWLINE(h>=ah,ah,aH,ah*0.993,1);
DRAWLINE(h>=ah,ah,aH,ah*0.991,1);
DRAWLINE(h>=ah,ah,aH,ah*0.989,1);
DRAWLINE(h>=ah,ah,aH,ah*0.987,1);
DRAWLINE(h>=ah,ah,aH,ah*0.984,1);
DRAWLINE(h>=ah,ah,aH,ah*0.981,1);
DRAWLINE(h>=ah,ah,aH,ah*0.976,1);

DRAWLINE( al>=l,al,al , al,1),color00ff00,LINETHICK2;
DRAWLINE(al>=l,al,nnl ,ah,1),color00ffff,LINETHICK2;
DRAWLINE( al>=l,al,al ,al*1.15,1);
DRAWLINE( al>=l,al,al ,al*1.09,1);
DRAWLINE( al>=l,al,al ,al*1.06,1);
DRAWLINE( al>=l,al,al ,al*1.04,1);
DRAWLINE( al>=l,al,al ,al*1.03,1);
DRAWLINE( al>=l,al,al ,al*1.025,1);
DRAWLINE( al>=l,al,al ,al*1.02,1);
DRAWLINE( al>=l,al,al ,al*1.015,1);
DRAWLINE( al>=l,al,al ,al*1.011,1);
DRAWLINE( al>=l,al,al ,al*1.007,1);
DRAWLINE( al>=l,al,al ,al*1.003,1);
{2.黄金比}
ahl:=ah-al;
q191:=al+ahl*0.191;
q382:=al+ahl*0.382;
q500:=al+ahl*0.500;
q618:=al+ahl*0.618;
q809:=al+ahl*0.809;

DRAWTEXT(nnl,ah,'￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN1,COLOR0000ff;
DRAWTEXT(nnl,q809,'￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN1,COLORddaa00;
DRAWTEXT(nnl,q618,'￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN1,COLORddaa00;
DRAWTEXT(nnl,q500,'￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN1,COLORff00ff;
DRAWTEXT(nnl,q382,'￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN1,COLORddaa00;
DRAWTEXT(nnl,q191,'￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN1,COLORddaa00;
DRAWTEXT(nnl,al,'￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN1,COLOR00ff00;

DRAWTEXT(nnl,ah*0.998,'最高价：'+ah+'元'),ALIGN0,Color0047FF,LINETHICK2;
DRAWTEXT(nnl,q809,'80.9%：' +q809+'元'),ALIGN0,Color00FFff,LINETHICK2;
DRAWTEXT(nnl,q618,'61.8%：'+q618+'元'),ALIGN0,Color0047FF,LINETHICK2;
DRAWTEXT(nnl,q500,'50%：'+q500+'元'),ALIGN0,Color00FFff,LINETHICK2;
DRAWTEXT(nnl,q382,'38.2%：'+q382+'元'),ALIGN0,Color0047FF,LINETHICK2;
DRAWTEXT(nnl,q191,'19.1%：'+q191+'元'),ALIGN0,Color00FFff,LINETHICK2;
DRAWTEXT(nnl,al*1.01,'最低价：'+al+'元'),ALIGN0,VALIGN2,Color0047FF,LINETHICK2;

{4.注解}
获利盘:WINNER(CLOSE)*100,LINETHICK0;
DRAWTEXTREL(5,700,'■获利比例: '+获利盘+'%'),Color00FFff,LINETHICK3;
涨幅:(C-Al)/Al*100,LINETHICK0;
DRAWTEXTREL(5,750,'■最低点至今天涨幅为: '+NUMTOSTRN(涨幅,1)+' %.'),Color00ff00,LINETHICK3;
涨:(C-AL)/(AH-AL)*100,LINETHICK0;
DRAWTEXTREL(5,800,'■黄金比(最高,最低)为: '+NUMTOSTRN(涨,1)+' %.'),Color00ffFF,LINETHICK3;
HH:=HHV(h,5)*0.95;
DRAWTEXTREL(5,850,'■止损=买入价*0.95；'),Color00FF00,LINETHICK3;;
DRAWTEXTREL(5,950,'■止盈(五日内最高价*0.95)='+NUMTOSTRN(HH,2)+'元'),Color0000FF,LINETHICK3;
DRAWTEXTREL(5,900,'■(五日内最高价='+NUMTOSTRN(HHV(h,5),2)+'元'),Color0099FF,LINETHICK3;
{5.K线}
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,0,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLOR009900;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLOR00BB00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLOR00DD00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLOR00FF00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0,0) ,COLORFFBBFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLORFF22FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLORFF66FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLORFF99FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLORFFBBFF;

[ 本帖最后由 harvey668 于 2008-11-6 23:57 编辑 ]