分析家公式网,免费股票公式,股票软件下载站 用户登录  |  用户 注册
日期:2009-07-21 20:31:28  来源:转载

求在老师修改成正确的分笔看盘,里面计算错误,谢谢!

{a1:10 a2:20 a3:50}

现价:=c;
Var2:=REF(ASKPRICE(1),1);
Var3:=REF(BIDPRICE(1),1);
Var4:=(Var2-Var3)*0.35;
{
Var5:=IF(现价>=Var2-Var4,VOL,IF(现价<Var2-Var4 AND 现价>Var3+Var4,BUYVOL,0));
Var6:=IF(现价<=Var3+Var4,VOL,IF(现价<Var2-Var4 AND 现价>Var3+Var4,SELLVOL,0));
}
var5:=buyvol;
var6:=sellvol;
x1:=a1*10000;
x2:=a2*10000;
x3:=a3*10000;
tdb:=IF(AMOUNT>=x3,Var5,0);
特大买量:=sum(tdb,0);
tds:=IF(AMOUNT>=x3,Var6,0);
特大卖量:=sum(tds,0);
db:=IF(AMOUNT>=x1 and amount<x2,Var5,0);
ds:=IF(AMOUNT>=x1 and amount<x2,Var6,0);
中买量:=SUM(db,0);
中卖量:=SUM(ds,0);
db1:=IF(AMOUNT>=x2 and amount<x3,Var5,0);
ds1:=IF(AMOUNT>=x2 and amount<x3,Var6,0);
大买量:=SUM(db1,0);
大卖量:=SUM(ds1,0);

小买量:=SUM(IF(AMOUNT<x1,Var5,0),0);
小卖量:=SUM(IF(AMOUNT<x1,Var6,0),0);

小量差:小买量-小卖量,linethick0;
中量差:中买量-中卖量,linethick0;
大量差:大买量-大卖量,linethick0;
特大量差:特大买量-特大卖量,linethick0;
主力量差:大量差+特大量差,COLORred,linethick0,colorstick;
小量差,linethick0,colorgreen;
大量差,linethick0,colorwhite;
特大量差,linethick0,coloryellow;
主力差额:主力量差*c/100,PRECIS0,linethick0;
主力增仓:主力量差/capital*100,linethick0;
总量:=sum(vol,0);
强度:主力量差/总量*40,linethick0;
0,colorwhite,dotline;
sb1:=小买量/总量*100;
ss1:=小卖量/总量*100;

sb:=中买量/总量*100;
ss:=中卖量/总量*100;
bb:=大买量/总量*100;
bs:=大卖量/总量*100;
lb:=特大买量/总量*100;
ls:=特大卖量/总量*100;
DRAWTEXTABS(10 ,10 ,'主力量差 :  '+主力量差),COLORMAGENTA,linethick3;
DRAWTEXTABS(10 ,30 ,'主力增仓 :  '+主力增仓+'%'),COLORMAGENTA,linethick3;

DRAWTEXTABS(10 ,120 ,'小买% '+sb1),colorred;
DRAWTEXTABS(10 ,135 ,'小卖% '+ss1),colorgreen;
DRAWTEXTABS(90 ,120 ,'中买% '+sb),colorred;
DRAWTEXTABS(90 ,135 ,'中卖% '+ss),colorgreen;
DRAWTEXTABS(170 ,120 ,'大买% '+bb),colorred;
DRAWTEXTABS(170 ,135 ,'大卖% '+bs),colorgreen;
DRAWTEXTABS(250 ,120 ,'特买% '+lb),colorred;
DRAWTEXTABS(250 ,135 ,'特卖% '+ls),colorgreen;

DRAWRECTABS(40 ,118-sb1 , 50 ,118 ,RGB(255,0,0));
DRAWRECTABS(60 ,118-ss1, 70 ,118 ,RGB(0,255,0));

DRAWRECTABS(120 ,118-sb , 130 ,118 ,RGB(255,0,0));
DRAWRECTABS(140 ,118-ss, 150 ,118 ,RGB(0,255,0));

DRAWRECTABS(190 ,118-bb , 200 ,118 ,RGB(255,0,0));
DRAWRECTABS(210 ,118-bs , 220 ,118 ,RGB(0,255,0));

DRAWRECTABS(270 ,118-lb , 280 ,118 ,RGB(255,0,0));
DRAWRECTABS(290 ,118-ls , 300 ,118 ,RGB(0,255,0));

{-------------看各价位上的成交累计------------}
DRAWTEXTABS(250+200 ,130 ,'-10-9-8-7-6-5-4-3-2-1  0+1+2+3+4+5+6+7+8+9+10'),COLORwhite,linethick1;

昨收:=DYNAINFO(3);
涨幅:=(c/昨收-1)*100;
n9:sum(if(涨幅<=-9,vol,0),0)/总量,linethick0;
n8:sum(if(涨幅<=-8 and 涨幅>-9,vol,0),0)/总量,linethick0;
n7:sum(if(涨幅<=-7 and 涨幅>-8,vol,0),0)/总量,linethick0;
n6:sum(if(涨幅<=-6 and 涨幅>-7,vol,0),0)/总量,linethick0;
n5:sum(if(涨幅<=-5 and 涨幅>-6,vol,0),0)/总量,linethick0;
n4:sum(if(涨幅<=-4 and 涨幅>-5,vol,0),0)/总量,linethick0;
n3:sum(if(涨幅<=-3 and 涨幅>-4,vol,0),0)/总量,linethick0;

[1] [2]  下一页

Tags:

作者:预见
  • 好的评价 如果您觉得此文章好,就请您
      100%(2)
  • 差的评价 如果您觉得此文章差,就请您
      0%(0)

文章评论评论内容只代表网友观点,与本站立场无关!

   评论摘要(共 0 条,得分 0 分,平均 0 分) 查看完整评论
关于本站 | 网站帮助 | 广告合作 | 下载声明 | 友情连接 | 网站地图 |

声明:本站所有软件和信息均免费。站内所有广告,如有收费行为,均与本站无任何关系!请广大网友小心谨慎。
Copyright © 2003-2008 88GS.Com. All Rights Reserved .
页面执行时间:2,296.87500 毫秒