分享

大智慧在主图上显示基本面公式

 ysy102 2011-09-20
REFLINE:0,10,12; 
MB1:=selfdata('中单买入')*100; 
BB1:=selfdata('大单买入')*100; 
SB:=selfdata('特大买入')*100; 
{p1:=(1-p2-p3-p4);} 
MS1:=selfdata('中单卖出')*100;
BS1:=selfdata('大单卖出')*100; 
SS:=selfdata('特大卖出')*100; 
{q1:=(1-q2-q3-q4);} 
BB:=SB+BB1; 
MB:=BB+MB1; 
BS:=SS+BS1; 
MS:=BS+MS1; 
{MB:=bigorder(1,1)*100; 
BB:=bigorder(1,2)*100; 
SB:=bigorder(1,3)*100; 
MS:=bigorder(2,1)*100; 
BS:=bigorder(2,2)*100; 
SS:=bigorder(2,3)*100;} 
DRAWRECTREL(250,MB*10,320 ,990,RGB(100,0,0)),COLOR000040; 
DRAWRECTREL(250,MB*10,320,BB*10,RGB(150,0,0)),COLOR000080; 
DRAWRECTREL(250,BB*10,320,SB*10,RGB(200,0,0)),COLOR0000C0; 
DRAWRECTREL(250,SB*10,320,0,RGB(255,0,0)),COLOR0000FF; 
DRAWRECTREL(180,MS*10,250,990,RGB(0,100,0)),COLOR004000; 
DRAWRECTREL(180,MS*10,250,BS*10,RGB(0,150,0)),COLOR008000; 
DRAWRECTREL(180,BS*10,250,SS*10,RGB(0,200,0)),COLOR00C000; 
DRAWRECTREL(180,SS*10,250,0,RGB(0,250,0)),COLOR00FF00; 
 DRAWTEXTREL(190,800,'龙虎看盘'),color888888; 
 强阻力:=(HIGH+LOW+OPEN+2*CLOSE)/5+H-L; 
阻力位:=(HIGH+LOW+OPEN+2*CLOSE)/5*2-L; 
平衡点:=(HIGH+LOW+OPEN+2*CLOSE)/5; 
支撑位:=(HIGH+LOW+OPEN+2*CLOSE)/5*2-H; 
强支撑:=(HIGH+LOW+OPEN+2*CLOSE)/5-H+L; 
DRAWRECTREL(330,200,660,980,RGB(0,0,0)),color008800; 
DRAWTEXTREL(470,600,NUMTOSTRN(平衡点,2)),LINETHICK2,color33ffff; 
DRAWTEXTREL(470,400,'平衡点'),color33ffff; 
DRAWTEXTREL(410,600,NUMTOSTRN(阻力位,2)),LINETHICK2,color00ff00; 
DRAWTEXTREL(410,400,'阻力位'),color00ff00; 
DRAWTEXTREL(340,600,NUMTOSTRN(强阻力,2)),LINETHICK2,color0000ff; 
DRAWTEXTREL(340,400,'强阻力'),color0000ff; 
DRAWTEXTREL(530,600,NUMTOSTRN(支撑位,2)),LINETHICK2,colorffff00; 
DRAWTEXTREL(530,400,'支撑位'),colorffff00; 
DRAWTEXTREL(600,600,NUMTOSTRN(强支撑,2)),LINETHICK2,color3366ff; 
DRAWTEXTREL(600,400,'强支撑'),color3366ff; 
DRAWTEXTREL(360,10,'财务数据日期:'+NUMTOSTRN(FINANCE2(1),0)),color999999; 
DRAWRECTREL(690,300,940,970,RGB(0,0,0)),colorff88ff; 
DRAWTEXTREL(20,20,'总股本:'+NUMTOSTRN(FINANCE2(35),0)),color999999; 
DRAWTEXTREL(20,180,'流通A股:'+NUMTOSTRN(FINANCE2(37),0)),color999999; 
DRAWTEXTREL(20,340,'市盈率:'+NUMTOSTRN(DYNAINFO(39),2)+'%'),color999999; 
DRAWTEXTREL(20,500,'每股收益:'+NUMTOSTRN(FINANCE2(3),3)+'元'),color999999; 
DRAWTEXTREL(20,660,'每股净资产:'+NUMTOSTRN(FINANCE2(4),2)+'元'),color999999;
DRAWTEXTREL(20,820,'每股公积金:'+NUMTOSTRN(FINANCE2(7),2)+'元'),color999999; 
DRAWTEXTREL(710,340,'分 类: A股'+' B股'+' 基金'+' 其它'),color00ffff; 
DRAWTEXTREL(700,20,'市净率:'+NUMTOSTRN(DYNAINFO(58),2)+'%'+' 净资产收益率:'+NUMTOSTRN(DYNAINFO(5),2)+'%'),color999999; DRAWTEXTREL(700,180,'毛利率:'+NUMTOSTRN(FINANCE2(12),2)+'%'+' 每股未分配:'+NUMTOSTRN(FINANCE2(8),2)+'元'),color999999; DRAWTEXTREL(700,500,'上涨家数: '+NUMTOSTRN(DYNAINFO(69),0)),colorred; 
DRAWTEXTREL(820,500,NUMTOSTRN(DYNAINFO(73),0)),colorred; 
DRAWTEXTREL(860,500,NUMTOSTRN(DYNAINFO(77),0)),colorred; 
DRAWTEXTREL(900,500,NUMTOSTRN(DYNAINFO(81),0)),colorred; 
DRAWTEXTREL(700,660,'下跌家数: '+NUMTOSTRN(DYNAINFO(70),0)),colorgreen; 
DRAWTEXTREL(820,660,NUMTOSTRN(DYNAINFO(74),0)),colorgreen; 
DRAWTEXTREL(860,660,NUMTOSTRN(DYNAINFO(78),0)),colorgreen; 
DRAWTEXTREL(900,660,NUMTOSTRN(DYNAINFO(82),0)),colorgreen; 
DRAWTEXTREL(700,820,'平盘家数: '+NUMTOSTRN(DYNAINFO(71),0)),colorffffff; DRAWTEXTREL(820,820,NUMTOSTRN(DYNAINFO(75),0)),colorffffff; 
DRAWTEXTREL(860,820,NUMTOSTRN(DYNAINFO(79),0)),colorffffff; 
DRAWTEXTREL(900,820,NUMTOSTRN(DYNAINFO(83),0)),colorffffff; 
C0:=INTPART(C*1000)/1000; 
B1:=REF(C0,1);B2:=REF(C0,2); 
HL:=IF(C0>B1 AND B1>=B2,1,IF(C0<B1 AND B1<=B2,-1,IF(C0>B2 AND B2>B1,2,IF(C0<B2 AND B2<B1,-2,0)))); 
AA:=IF(REF(HL,1)<>0,B2,IF(HL>0,MIN(B1,B2),MAX(B1,B2))); 
DRAWTEXTREL(430,800,'敏感价位:'+NUMTOSTRN(AA,2)),color0000ff; 
 {DRAWTEXTREL(20,100,'所属板块:'+BKNAME);};

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约