logo
搜索
我的图书馆

发文章

发文工具

其他工具

留言交流
搜索
分享

主动率直接影响涨跌【转帖及编辑

 梦之谷居士 2012-03-06
主动率直接影响涨跌【转帖及编辑--加FNC】----副图，源码，附图

本文来自：理想论坛 www. 作者：金昌九 浏览：15046次　填写您的邮件地址，订阅我们的精彩内容：
要想预知股价的将要涨还是将要跌，必看主动率，真假主动率我是转帖，加上我编的你会更清楚主动率的重要性，两个公式后边的用大括号括上的分笔公式的源码。【用于分笔时把大括号拿掉】
【1】
{主动买卖B------用于分时}
DRAWRECTREL(-1,0,1000,1000,RGB(0,0,10)),color0077FF,LINETHICK2,LAYER7;0,DOTLINE,LAYER0;
主动买:"分笔买卖.主动买#tick",colorred,linethick0,PRECIS0;
主动卖:"分笔买卖.主动卖#tick",coloryellow,linethick0,PRECIS0;
主动净量:主动买:-主动卖,colorstick,linethick0,PRECIS0;

主动率:主动买/(主动卖+主动买)*100,colorwhite,PRECIS2,linethick0;
DRAWTEXTABS(0,5,IFS((主动率 >= 50),'【FB主动率】▄ '+NUMTOSTRN(主动率,1)+'%,','')),linethick4,color00FFFF;
DRAWTEXTABS(0,5,IFS((主动率< 50),'【FB主动率】▄ '+NUMTOSTRN(主动率,1)+'%,','')),linethick4,color00FF00;

RSV:EMA(主动净量,3),LINETHICK0;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
Var1:3*K-2*D,LINETHICK1;
FILLRGN(Var1,Var1*0.95,Var1>REF(Var1,1),RGB(255,0,0),Var1<REF(Var1,1),RGB(0,255,0)),LINETHICK2,LAYER0;
if(Var1>=0,Var1*0.1,0),COLORCCCCFF,LAYER2;
if(Var1>=0,Var1*0.2,0),COLORBBBBFF,LAYER2;
if(Var1>=0,Var1*0.3,0),COLORAAAAFF,LAYER2;
if(Var1>=0,Var1*0.4,0),COLOR9999FF,LAYER2;
if(Var1>=0,Var1*0.5,0),COLOR8888FF,LAYER2;
if(Var1>=0,Var1*0.6,0),COLOR7777FF,LAYER2;
if(Var1>=0,Var1*0.7,0),COLOR6666FF,LAYER2;
if(Var1>=0,Var1*0.8,0),COLOR4444FF,LAYER2;
if(Var1>=0,Var1*0.9,0),COLOR2222FF,LAYER2;

if(Var1<0,Var1*0.1,0),COLORFFAAAA,LAYER2;
if(Var1<0,Var1*0.2,0),COLORFF9999,LAYER2;
if(Var1<0,Var1*0.3,0),COLORFF8888,LAYER2;
if(Var1<0,Var1*0.4,0),COLORFF7777,LAYER2;
if(Var1<0,Var1*0.5,0),COLORFF6666,LAYER2;
if(Var1<0,Var1*0.6,0),COLORFF5555,LAYER2;
if(Var1<0,Var1*0.7,0),COLORFF4444,LAYER2;
if(Var1<0,Var1*0.8,0),COLORFF2222,LAYER2;
if(Var1<0,Var1*0.9,0),COLORFF0000,LAYER2;
FILLRGN(Var1,0,Var1<0,RGB(80,0,60)),COLORFF9900,LINETHICK2,LAYER7;
FILLRGN(Var1,0,Var1>0,RGB(0,0,255)),COLOR00FF00,LINETHICK2,LAYER7;
A1:=DYNAINFO(23) /(DYNAINFO(23)+ DYNAINFO(22))*100;
A2:=DYNAINFO(17);
DRAWTEXTABS(0,30,IFS((A1 >= 50),'【FS主动率】▄ '+NUMTOSTRN(A1,1)+'%,','')),linethick4,color0000FF;
DRAWTEXTABS(0,30,IFS((A1 < 50),'【FS主动率】▄ '+NUMTOSTRN(A1,1)+'%,','')),linethick4,color00FF00;

{分笔买卖---用于-分笔}
{主动买:SUM(BUYVOL,0),Color0000ff,linethick2;
主动卖:SUM(SELLVOL,0),Color00ff00,linethick2;
主动净量:主动买-主动卖,colorstick,linethick0,PRECIS0;
主动率:主动买/(主动卖+主动买)*100,colorwhite,PRECIS2,linethick0;
DRAWTEXTABS(0,5,IFS((主动率 >= 50),'【主动买/(主买+主卖)*100】▄ '+NUMTOSTRN(主动率,1)+'%,','')),linethick4,color00FFFF;
DRAWTEXTABS(0,5,IFS((主动率< 50),'【主动买/(主买+主卖)*100】▄ '+NUMTOSTRN(主动率,1)+'%,','')),linethick4,color00FF00;
买卖次:BARSSINCE(v)+1,PRECIS0;
主买:SUM(BUYVOL,买卖次),PRECIS0;
主卖:SUM(SELLVOL,买卖次),PRECIS0;
成交笔数:SUM(TICKCOUNT,0),PRECIS0;
主买次:SUM(ISBUYORDER,0),PRECIS0;};

【2】
{真假主差----用于分时}
DRAWRECTREL(-1,0,1000,1000,RGB(0,0,10)),color00FF00,LINETHICK2,LAYER7;0,DOTLINE,LAYER0;
真主动:"BSVOL.true#tick",color0000FF,linethick2,LAYER0;
假主动:"BSVOL.false#tick",color00FFFF,linethick2,LAYER0;
真假主差:"BSVOL.true#tick"-"BSVOL.false#tick",linethick0;
fillrgn(真主动,假主动,真假主差>0,RGB(200,0,100),真假主差<0,RGB(0,80,80));
真主动率:"BSVOL.真主动率#tick",color0000FF,linethick0,LAYER0;
假主动率:"BSVOL.假主动率#tick",color00FFFF,linethick0,LAYER0;
真主动净量:"BSVOL.真主动净量#tick",color00FF00,linethick0,LAYER0;
DRAWTEXTABS(0,5,'【真主动率】▄ '+NUMTOSTRN(真主动率,1)+'%,'),linethick4,color0000FF;
DRAWTEXTABS(0,25,'【假主动率】▄ '+NUMTOSTRN(假主动率,1)+'%,'),linethick4,color00ffFF;
【原编者原话---我是转帖】
{说“假主动率”确实有些用词不当，其实BUYVOL就是真的主动买量。我的思路是，
当一笔BUYVOL进行时会产生3个实体量，其一就是BUYVOL本身，其二是委托卖单量，
其三是同一时间的SELLVOL量，我将这3种量进行区分获取真正使股价上升或者下降的部分成交量，
并称之为真主动。通过判断到底买卖量是用在了原地上，还是拉升上，还是大多被对敲掉了，
来看出买卖方向的意愿。};
{BSVOL-----用于分笔}{n(0,0,270,30)}
{var1:=sum(if(bidprice(1)>ref(bidprice(1),1),(buyvol-sellvol),N),0);
var2:=sum(if(bidprice(1)=ref(bidprice(1),1),(buyvol-sellvol),N),0);
var3:=sum(if(bidprice(1)<ref(bidprice(1),1),(sellvol-buyvol),N),0);
True:(var1+var2-var3)/(var1+abs(var2)+var3)*sum(v,N)/capital*100,Color0000ff;
false:(sum(buyvol,N)-sum(sellvol,N))/(sum(buyvol,N)+sum(sellvol,N))*sum(v,N)/capital*100,Color00ff00;
var1a:=sum(if(bidprice(1)>ref(bidprice(1),1),(buyvol),N),0);
var2a:=sum(if(bidprice(1)=ref(bidprice(1),1),(buyvol),N),0);
var3a:=sum(if(bidprice(1)<ref(bidprice(1),1),(sellvol),N),0);
真主动率:(var1+var2)/(abs(var1)+abs(var2)+abs(var3))*100,Color0000ff,linethick0;
假主动率:(sum(buyvol,N))/(sum(buyvol,N)+sum(sellvol,N))*100,Color00ff00,linethick0;
真主动净量:(var1+var2-var3)*sum(v,N)/capital*100,linethick0;
主动买:SUM(BUYVOL,0),Color0000ff,linethick0;
主动卖:SUM(SELLVOL,0),Color00ff00,linethick0;
主动净量:主动买-主动卖,colorstick,linethick0,PRECIS0;};
主动买卖B.FNC (5.96 KB)
真假主差.FNC (3.35 KB)
分笔买卖.FNC (1.97 KB)
BSVOL.FNC (2.75 KB)


[ 本帖最后由 金昌九 于 2011-12-10 12:31 编辑 ]

查看本帖全部评分记录
  • 冰冰雨基金 理想币 +2 +++ 2012-1-28 23:39
  • 北兄 理想币 +2 非常不错，感谢你的无私奉献 2012-1-28 21:05
  • 日升35720 理想币 +2 感谢分享，周末快乐!!!! 2011-12-11 16:30
  • 投资有理88 理想币 +2 老师的帖子我坚决顶！ 2011-12-10 19:42
  • 翔羽168 理想币 +2 感谢分享，理想有您而更精彩！ 2011-12-10 17:08
  • 漆器77 理想币 +2 谢谢分享 2011-12-10 14:53
  • 三股发 理想币 +2 谢谢老师分享,请问指标只能用于分笔成交图分 ... 2011-12-10 13:40
  • 分压电阻 理想币 +10 感谢分享，周末快乐 2011-12-10 12:07
  • 田子晖 理想币 +2 谢谢 2011-12-10 11:57
  • 明轩08 理想币 +2 谢谢分享!!! 2011-12-10 10:35
发短消息 加为好友 个人主页
理想币
2701 个 
彩币
0 个 
注册时间
2009-8-1 

引用 使用道具 举报 评分 回复 TOP

金昌九

Rank: 3Rank: 3Rank: 3

理想初二级同学
2楼 显示全部帖子 大 中 小 发表于 2011-12-10 09:58
我再说明一下：
【1】为什么第一个图里有FS主动率，还有FB主动率呢，FS主动率来自于分时是即时的数据（内盘，外盘）画不成线，而FB主动率来自于分笔周期可引到分时画线，我们才能看到主动率的走向过程，但是从分笔到分时有一个延缓，往往因开机或中断开机分笔经常出错，两个对比不一样时，你必须进入分笔周期，过一下，两个数据就接近了，这就是我费尽心机，把它们摆放到一起的原因，【记住不一样就得去分笔周期翻一遍】
【2】图面已清楚的看出主动率先一步下行，其后股价才跌下去，这就是说买方已不给力，再上涨就是假的！也是卖出的好机会，你从主动卖卖上研究会收获不小，
【3】第二张图，的真主动率，假主动率不是我能编出来的，我是转帖其设想相当好，当真主动率大于假主动率的时候。往往是庄家真要拉升的时候，今天涨的可能很大，其差越大越好，翻过来就是要跌的表向，
【4】主动率就是买方，卖方的力度对比结果，说明它在一天交易中相当主要，不看买卖力度----主动率，你就是盲目抄股，

发短消息 加为好友 个人主页
理想币
2701 个 
彩币
0 个 
注册时间
2009-8-1 

引用 使用道具 举报 评分 回复 TOP

金昌九

Rank: 3Rank: 3Rank: 3

理想初二级同学
3楼 显示全部帖子 大 中 小 发表于 2011-12-10 12:59
四个公式全发了，要全部引入，两个分时，两个分笔的

查看本帖全部评分记录
  • 三股发 理想币 +2 引人老师4个公式真假主差只能显示真主动率和 ... 2011-12-10 13:58
发短消息 加为好友 个人主页
理想币
2701 个 
彩币
0 个 
注册时间
2009-8-1 

引用 使用道具 举报 评分 回复 TOP

金昌九

Rank: 3Rank: 3Rank: 3

理想初二级同学
4楼 显示全部帖子 大 中 小 发表于 2011-12-10 13:51
四个公式全发了，要全部引入，两个分时，两个分笔的.
分笔的分笔周期里也可用，分时来源于分笔，用起来方便，可以其他分时主图配合使用，

发短消息 加为好友 个人主页
理想币
2701 个 
彩币
0 个 
注册时间
2009-8-1 

引用 使用道具 举报 评分 回复 TOP

金昌九

Rank: 3Rank: 3Rank: 3

理想初二级同学
5楼 显示全部帖子 大 中 小 发表于 2011-12-10 15:23
在公式里要么你不要动，要么你把下边不用的删掉，就好了
【分时不要分笔的】
{分笔买卖---用于-分笔}
{主动买:SUM(BUYVOL,0),Color0000ff,linethick2;
主动卖:SUM(SELLVOL,0),Color00ff00,linethick2;
主动净量:主动买-主动卖,colorstick,linethick0,PRECIS0;
主动率:主动买/(主动卖+主动买)*100,colorwhite,PRECIS2,linethick0;
DRAWTEXTABS(0,5,IFS((主动率 >= 50),'【主动买/(主买+主卖)*100】▄ '+NUMTOSTRN(主动率,1)+'%,','')),linethick4,color00FFFF;
DRAWTEXTABS(0,5,IFS((主动率< 50),'【主动买/(主买+主卖)*100】▄ '+NUMTOSTRN(主动率,1)+'%,','')),linethick4,color00FF00;
买卖次:BARSSINCE(v)+1,PRECIS0;
主买:SUM(BUYVOL,买卖次),PRECIS0;
主卖:SUM(SELLVOL,买卖次),PRECIS0;
成交笔数:SUM(TICKCOUNT,0),PRECIS0;
主买次:SUM(ISBUYORDER,0),PRECIS0;};

[ 本帖最后由 金昌九 于 2011-12-10 15:26 编辑 ]

发短消息 加为好友 个人主页
理想币
2701 个 
彩币
0 个 
注册时间
2009-8-1 

引用 使用道具 举报 评分 回复 TOP

金昌九

Rank: 3Rank: 3Rank: 3

理想初二级同学
6楼 显示全部帖子 大 中 小 发表于 2011-12-10 16:07
去【头一招】看看有同样的效果，我刚刚改过，谢谢各位！！

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

    来自： 梦之谷居士 > 《理想论坛》

    举报/认领

    0条评论

    发表

    请遵守用户 评论公约

    类似文章 更多