- 金币:
-
- 奖励:
-
- 热心:
-
- 注册时间:
- 2007-2-3
|
|
睡前最后一版 加入了深市收盘判断 还没来得及算个股的资金流
lc:="k线信息.lc#day";
涨幅:=c/lc;
ask1:=ASKVOL(1);
ask2:=askvol(2);
ask3:=askvol(3);
bid1:=bidvol(1);
bid2:=bidvol(2);
bid3:=bidvol(3);
st:=STRFIND(stkname,'ST',1)>0 or STRFIND(stkname,'S',1)>0;
szmarket:=if(STRCMP(marketname,'深圳证券交易所')=0,1,0);
cellc:=if(st=1,1.049,1.099);
botmc:=if(st=1,0.951,0.901);
top:if(涨幅>cellc and (ask1+ask2+ask3)=0 and ref(ask1,1)=0,1,0);
bottom:if(涨幅<botmc and (bid1+bid2+bid3)=0 and ref(bid1,1)=0,1,0);
bv:buyvol;
sv:sellvol;
流通市值:=capital*c/1000000;{亿}
base:=0.1;{亿}
rate:=流通市值/2/base;
rate3:=rate*rate*rate;
lognrate3:=LN(rate3);
biglimit:=lognrate3*10000;
均额:=AMOUNT/tickcount;
盘中总均额:=sum(amount,0)/sum(tickcount,0);
逃逸均额门限:=盘中总均额*1.618;
正常均额门限:=均额>盘中总均额;
esplimit:=amount>=biglimit*4 and 逃逸均额门限; {这里换成了4, 以10.21海通证券的封停板资金出入为参考}
深圳收盘力度:=if(均额>=逃逸均额门限,0.8,if(均额>=盘中总均额,0.6,0.4));
szsp:=szmarket=1 and time>145800;
alimit1:=amount>=biglimit;
{BARSLAST(ref(ask1,1)>0);}
竞价前价:=ref(c,BARSLAST(ref(ask1,1)>0)+1);
lastb:if(c>竞价前价,1,if(c<竞价前价,0,ISBUYORDER));
b1:=if(buyvol and top=0 and szsp=0 and bottom=0 and alimit1=1,buyvol,0);
b2:=if(top=1 and buyvol and alimit1=1 and esplimit=0,buyvol,0);
b3:=if(bottom=1 and sellvol and esplimit=1,sellvol,0);
b4:=if(szsp=1 and top=0 and bottom=0 and lastb=1,vol*深圳收盘力度,0);
s1:=if(sellvol and bottom=0 and szsp=0 and top=0 and alimit1=1,vol,0);
s2:=if(top=1 and buyvol and esplimit=1,buyvol,0);
s3:=if(bottom=1 and sellvol and alimit1=1 and esplimit=0,sellvol,0);
s4:=if(szsp=1 and top=0 and bottom=0 and lastb=0,vol*深圳收盘力度,0);
var5:b1+b2+b3+b4;
var6:s1+s2+s3+s4;
主力买:=SUM(Var5,0);
主力卖:=SUM(Var6,0);
主力买额:=SUM(IF(AMOUNT>=biglimit and var5,amount,0),0);
主力卖额:=SUM(IF(AMOUNT>=biglimit and var6,amount,0),0);
flow:=capital/100;
主力差:主力买-主力卖,colorstick,PRECIS0;
主力差额:(主力买额-主力卖额)/10000,PRECIS0,linethick0;
差流比:主力差/flow,PRECIS2;
差日比:主力差/sum(vol,0),PRECIS2;
小买:=SUM(IF(AMOUNT<biglimit,Var5,0),0);
小卖:=SUM(IF(AMOUNT<biglimit,Var6,0),0);
小差:小买-小卖,PRECIS0;
小差额:小差*c/100,PRECIS0;
DRAWTEXTABS(10 ,10 ,'主力量差 : '+主力差),COLORMAGENTA,linethick2;
DRAWTEXTABS(10 ,25 ,'主力额差 : '+主力差额),COLORMAGENTA,linethick2;
DRAWTEXTABS(10 ,40 ,'主力增仓 : '+差流比+'%'),COLORMAGENTA,linethick2;
DRAWTEXTABS(10 ,55 ,'主力比重 : '+差日比+'%'),COLORMAGENTA,linethick2; |
-
| 参与人数 1 | 奖励 +50 |
热心 +3 |
时间 |
理由
|
lymanqun
| + 50 |
+ 3 |
2008-10-21 07:28 |
帖子很棒,加分鼓励,期待您更多优秀帖 ... |
查看全部评分
|
|