软件名称：[B]自动百分箱体－－一个很好的指标[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：免费版
软件大小：3.00 KB
官方主页：Home Page
更新时间：2009-10-02 19:58:43
软件简介:

input:k(1,1,3,1);
hh:= SYSPARAM(4);
ll:= SYSPARAM(5);
HL:=hh-ll;
wH := BARSlast(H=hh);
wL :=BARSlast(L=ll);
KK := wH-wL;
a1 :=if(kk<0,hh- HL*0.25,ll+HL*0.25);
a2 :=if(kk<0,hh- HL*0.75,ll+HL*0.75);
a3 :=if(kk<0,hh- HL*0.3125,ll+HL*0.3125);
mHL:= hh-HL*0.5;b1:=if(kk<0,hh- HL*0.125,ll+HL*0.125);b2:=if(kk<0,hh- HL*0.0625,ll+HL*0.0625);b3:=if(kk<0,hh- HL*0.375,ll+HL*0.375);b4:=if(kk<0,hh- HL*0.625,ll+HL*0.625);
b5:=if(kk<0,hh- HL*0.1875,ll+HL*0.1875);b6:=if(kk<0,hh- HL*0.875,ll+HL*0.875);b7:=if(kk<0,hh- HL*0.4375,ll+HL*0.4375);b8:=if(kk<0,hh- HL*0.5625,ll+HL*0.5625);
b9:=if(kk<0,hh- HL*0.6875,ll+HL*0.6875);b10:=if(kk<0,hh- HL*0.9375,ll+HL*0.9375);b11:=if(kk<0,hh- HL*0.8125,ll+HL*0.8125);A := islastbar;
DRAWTEXT(A and K<>3,HH, '  最高价：'+NUMTOSTR(HH,2)),ALIGN2,colorred;DRAWTEXT(A and K<>3,LL, '  最低价：'+NUMTOSTR(ll,2)),ALIGN2,,COLORCYAN;
DRAWTEXT(A and K<>3,mHL,'  50%：'+NUMTOSTR(mHL,2)),ALIGN2,coloryellow;DRAWTEXT(A and K=1, a1, '  25%：'+NUMTOSTR(a1,2)),ALIGN2,coloryellow;
DRAWTEXT(A and K=1, a2, '  75%：'+NUMTOSTR(a2,2)),ALIGN2,colorgreen;DRAWTEXT(A and K=1, a3, '  31.25%：'+NUMTOSTR(a3,3)),ALIGN2,COLORGRAY;
DRAWTEXT(A and K=1, b1, '  12.5%：'+NUMTOSTR(b1,2)),ALIGN2,COLORGRAY;DRAWTEXT(A and K=1, b2, '  6.25%：'+NUMTOSTR(b2,2)),ALIGN0,COLORGRAY;
DRAWTEXT(A and K=1, b3, '  37.5%：'+NUMTOSTR(b3,2)),ALIGN2,COLORGRAY;DRAWTEXT(A and K=1, b4, '  62.5%：'+NUMTOSTR(b4,2)),ALIGN2,COLORGRAY;
DRAWTEXT(A and K=1, b5, '  18.75%：'+NUMTOSTR(b5,3)),ALIGN2,COLORGRAY;DRAWTEXT(A and K=1, b6, '  87.5%：'+NUMTOSTR(b6,2)),ALIGN2,COLORGRAY;
DRAWTEXT(A and K=1, b7, '  43.75%：'+NUMTOSTR(b7,2)),ALIGN2,COLORGRAY;DRAWTEXT(A and K=1, b8, '  56.25%：'+NUMTOSTR(b8,2)),ALIGN2,COLORGRAY;
DRAWTEXT(A and K=1, b9, '  68.75%：'+NUMTOSTR(b9,2)),ALIGN2,COLORGRAY;DRAWTEXT(A and K=1, b10, ' 93.75%：'+NUMTOSTR(b10,2)),ALIGN2,COLORGRAY;
DRAWTEXT(A and K=1, b11, ' 81.25：'+NUMTOSTR(b11,2)),ALIGN2,COLORGRAY;
DRAWTEXT(A and K=1, b7, '- - - - - - - - - - - - - - - - - -'),ALIGN2,COLORGRAY,linethick7;
DRAWTEXT(A and K=1, b8, '- - - - - - - - - - - - - - - - - -'),ALIGN2,COLORGRAY,linethick7;
DRAWTEXT(A and K=1, b9, '- - - - - - - - - - - - - - - - - -'),ALIGN2,COLORGRAY,linethick7;
DRAWTEXT(A and K=1, b10, '- - - - - - - - - - - - - - - - - -'),ALIGN2,COLORGRAY,linethick7;
DRAWTEXT(A and K=1, b11, '- - - - - - - - - - - - - - - - - -'),ALIGN2,COLORGRAY,linethick7;
DRAWTEXT(A and K<>3,HH, '￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,colorred,linethick7;
DRAWTEXT(A and K<>3,LL, '--------------------------------------------------------------------------------------------------------------------------------------------------'),ALIGN2,COLORCYAN,linethick7;
DRAWTEXT(A and K<>3,mHL,'-------------------------------------------------------------------------------------------------------------'),ALIGN2,coloryellow,linethick7;
DRAWTEXT(A and K=1, a1, '--------------------------------------------------------------------------------------------------------------'),ALIGN2,COLORMAGENTA,linethick7;
DRAWTEXT(A and K=1, a2, '--------------------------------------------------------------------------------------------------------------'),ALIGN2,colorgreen,linethick7;
DRAWTEXT(A and K=1, a3, '- - - - - - - - - - - - - - - - - -'),ALIGN2,COLORGRAY,linethick7;
DRAWTEXT(A and K=1, b1, '-------------------------------------------------------------------'),ALIGN2,COLORGRAY,linethick7;
DRAWTEXT(A and K=1, b2, '- - - - - - - - - - - - - - - - - -'),ALIGN2,COLORGRAY,linethick7;
DRAWTEXT(A and K=1, b3, '-----------------------------------------------------------------------------------'),ALIGN2,COLORGRAY,linethick7;
DRAWTEXT(A and K=1, b4, '-----------------------------------------------------------------------------------'),ALIGN2,COLORGRAY,linethick7;
DRAWTEXT(A and K=1, b5, '- - - - - - - - - - - - - - - - - -'),ALIGN2,COLORGRAY,linethick7;
DRAWTEXT(A and K=1, b6, '----------------------------------------------------------------------------------'),ALIGN2,COLORGRAY,linethick7;

 

http://www.70822.com/soft/UploadPic/2009-10/20091022014450088.gif

[url=http://www.70822.com/soft/sort013/sort02/down-13101.html]自动百分箱体－－一个很好的指标[/url]