优秀看盘主图源码（大智慧2主图）

阅读作者：公式网时间 2009-10-19 08:03:31 大智慧公式

C/C++ Code复制内容到剪贴板

m1:=5;
m2:=10;m3:=20;m4:=30;m5:=60;m6:=90;m7:=120;m8:=250;
PMA:=(o+H+L+c)/4;
P1:ma(PMA,1),COLORMAGENTA;
P5:MA(PMA,M1),COLORwhite;
P10:MA(PMA,M2),COLORred;
P20:MA(PMA,M3),COLORYELLOW;
P30:MA(PMA,M4),COLORBLUE;
P60:MA(PMA,M5),COLORGREEN;
P90:MA(PMA,M6),COLORGRAY;
P120:MA(PMA,M7),COLORBROWN;
P250:MA(PMA,M8),COLORBLUE,linethick2;
A:=DATE<1091130;
JPma4:((P1+P5+P10+P20+P30-5*P30)/5+P30)*A,linethick2;
股币线:(MA(PMA,30)+MA(PMA,72))/2*A,LINETHICK2;
drawtextabs(0,8,' P1,P5,P10,P20,P30,P60,P90,P120,P250,JPma4,立阳线……共11条均线'),colorred;
x:=BARPOS-hhv(if(DISPSTATUS=1,BARPOS,0),0)+1;
hh:=hhv(h,x); ll:=llv(l,x); hl:=hh-ll;
a80:=.809*hl+ll;a61:=.618*hl+ll;a38:=.382*hl+ll;
a19:=.191*hl+ll; a5:=.5*hl+ll;
DRAWTEXTREL(0,0,'最高￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣' ),COLORYELLOW;
DRAWTEXTREL(0,900+76,'最低.................................................................................................................................'),color00ff00;
DRAWTEXTREL(0,0.50*(900+76),'0.5..................................................................................................................................'),color0099ff;
DRAWTEXTREL(0,0.191*(900+76),'0.809................................................................................................................................'),colorred;
DRAWTEXTREL(0,0.382*(900+76),'0.618................................................................................................................................'),colorred;
DRAWTEXTREL(0,0.618*(900+76),'0.382................................................................................................................................'),colorred;
DRAWTEXTREL(0,0.809*(900+76),'0.191................................................................................................................................'),colorred;
DRAWTEXTREL(999,0.809*(900+76),'19.1%:'+NUMTOSTR(a19)),VALIGN2,ALIGN2,colorwhite;
DRAWTEXTREL(999,0.618*(900+76),'38.2%:'+NUMTOSTR(a38)),VALIGN2,ALIGN2,colorwhite;
DRAWTEXTREL(999,0.5*(900+76),'50%:'+NUMTOSTR(a5)),VALIGN2,ALIGN2,color0099ff;
DRAWTEXTREL(999,0.382*(900+76),'61.8%:'+NUMTOSTR(a61)),VALIGN2,ALIGN2,colorwhite;
DRAWTEXTREL(999,0.191*(900+76),'80.9%:'+NUMTOSTR(a80)),VALIGN2,ALIGN2,colorwhite;
DRAWTEXTABS(20,20,'当前盘面提示：'),ColorFFFFFC,LINETHICK1;
DRAWTEXTABS(108,20,STKLABEL+' '+STKNAME),LINETHICK1,ColorFFFFFC;
流通盘大小:=FINANCE2(37)/1000000*100;
金叉:=barslast(FILTER(CROSS("KD.K","KD.D") and "KD.D"<30,13));
主力吸筹区:=if(金叉>0 and 金叉<61,金叉,0);
DRAWTEXTABS(215,20,'流通盘大小：'+NUMTOSTRN(流通盘大小,2)+'亿'),LINETHICK1,ColorFFFFFC;
DRAWTEXTABS(350,20,'主力建仓天数：'+NUMTOSTRN(主力吸筹区,0)+'天'),ColorFFFFFC,LINETHICK1;
每股收益:=FINANCE2(3);
每股市盈率:=DYNAINFO(39);
每股净资产:=FINANCE2(4);
销售毛利率:=FINANCE2(12);
主营收入同比:=FINANCE2(11);
净利润同比增长:=FINANCE2(10);
DRAWTEXTABS(20,35,'基本面提示:'),ColorFFFFFF,LINETHICK1;
DRAWTEXTABS(108,35,'每股收益:'+NUMTOSTRN(每股收益,2)+'元'),ColorFFFFFF;
DRAWTEXTABS(215,35,'每股市盈率:'+NUMTOSTRN(每股市盈率,1)+'倍'),ColorFFFFFF;
DRAWTEXTABS(350,35,'每股净资产:'+NUMTOSTRN(每股净资产,2)+'元'),ColorFFFFFF;
DRAWTEXTABS(108,50,'销售毛利率:'+NUMTOSTRN(销售毛利率,2)+'%'),LINETHICK1,ColorFFFFFF;
DRAWTEXTABS(215,50,'主营收入同比增:'+NUMTOSTRN(主营收入同比,2)+'%'),LINETHICK1,ColorFFFFFF;
DRAWTEXTABS(350,50,'净利润同比增:'+NUMTOSTRN(净利润同比增长,2)+'%'),LINETHICK1,ColorFFFFFF;
DRAWTEXTABS(20,65,'换手率提示:'),ColorFFFFFC,LINETHICK1;
当日换手率:=sum(100*v/capital,1);
DRAWTEXTABS(108,65,'当日换手率:'+NUMTOSTRN(当日换手率,2)+'%'),ColorFFFFFC,LINETHICK1;
五日换手率:=sum(100*v/capital,5);
DRAWTEXTABS(215,65,'5日换手率:'+NUMTOSTRN(五日换手率,2)+'%'),ColorFFFFFC,LINETHICK1;
十日换手率:=SUM(VOL,10)*100/CAPITAL;
DRAWTEXTABS(350,65,'10日换手率:'+NUMTOSTRN(十日换手率,2)+'%'),ColorFFFFFC,LINETHICK1;
DRAWTEXTABS(20,85,'■所属板块: '+BKNAME),Color00FF00;