红旗suv车型:编制一个分时图下的个股诊断指标

编制一个分时图下的个股诊断指标 [保存]
2011-09-16 14:00-15:00
仇一鸣大智慧软件研究员
朱晓鸣大智慧软件研究员
吴　程大智慧产品设计师
李　超大智慧产品设计师
编号发言者类型发言内容
→主持人说本期路演直播时间：14:00-15:00
→仇一鸣说大家好，今天我们一遍编制一个非常实用的分时特色综合指标，一遍学习公式，该指标不但有直观的诊断评分功能，还结合许多特有的指标参考，以及盘中买入点和根据level2数据计算的更为精准的主动性成交量4大特色于一体。
→仇一鸣说我给指标取名为分时诊断，开门见山，先发布指标截图和代码，然后慢慢解释
→仇一鸣说源码：
主动性买入:sum(transactvol(1,0),0),colorred,LINETHICK2;
主动性卖出:sum(transactvol(2,0),0),colorgreen,LINETHICK2;
主动性买入大单:sum(transactvol(1,2),0),colorcc99ff,LINETHICK2;
主动性卖出大单:sum(transactvol(2,2),0),colorffff33,LINETHICK2;
drawtextabs(10,10,'机构吃货次数'+DYNAINFO(102)),color99ffcc;
drawtextabs(10,30,'机构吐货次数'+DYNAINFO(103)),color99ffcc;
drawtextabs(120,10,'机构买单次数'+DYNAINFO(99)),color99ffcc;
drawtextabs(120,30,'机构卖单次数'+DYNAINFO(100)),color99ffcc;
drawtextabs(220,10,'单数差'+(sum(ORDERNUM(2,0)-ORDERNUM(1,0),0))),color99ffcc;
drawtextabs(220,30,'笔数差'+(sum(TRANSACTNUM(1,0)-TRANSACTNUM(2,0),0))),color99ffcc;
drawtextabs(310,10,'主动性成交差'+(sum(transactvol(1,0)-transactvol(2,0),0))),color99ffcc;
drawtextabs(310,30,'主动性大单差'+(sum(transactvol(1,2)-transactvol(2,2),0))),color99ffcc;
drawtextabs(450,10,'大单比例'+(if(count(c,0)<=1,0,sum((ordervol(1,2)-ordervol(2,2)),0)/sum(ordervol(1,0),0)*100)-if(count(c,0)<=1,0,sum((ordervol(1,3)-ordervol(2,3)),0)/sum(ordervol(1,0),0)*100))),color99ffcc;
drawtextabs(450,30,'特大比例'+(if(count(c,0)<=1,0,sum((ordervol(1,3)-ordervol(2,3)),0)/sum(ordervol(1,0),0)*100))),color99ffcc;
drawtextabs(550,10,'量比'+(sum(vol,0)*240/dynainfo(38)/barscount(c))),color99ffcc;
drawtextabs(550,30,'委比'+(if(allaskvol=0,100,if(allbidvol=0,-100,(allbidvol-allaskvol)/(allbidvol+allaskvol)*100)))),color99ffcc;
drawtextabs(650,10,'撤单差'+(sum(WIDTHDRAWORDER(2),0)-sum(WIDTHDRAWORDER(1),0))),color99ffcc;
drawtextabs(650,30,'振幅'+(DYNAINFO(13))),color99ffcc;
drawtextabs(730,10,'每股收益'+(FINANCE2(3))),color99ffcc;
drawtextabs(730,30,'市盈率'+(DYNAINFO(39))),color99ffcc;
drawicon(cross(sum(transactvol(1,0),0),sum(transactvol(2,0),0)),sum(transactvol(1,0),0),1);{主动性买入上穿主动性卖出，笑脸标记}
drawicon(cross(sum(transactvol(2,0),0),sum(transactvol(1,0),0)),sum(transactvol(1,0),0),2);{主动性卖出上穿主动性买入，哭脸标记}
drawicon(cross(sum(transactvol(1,2),0),sum(transactvol(2,0),0)),sum(transactvol(1,2),0),14);{机构主动性买入超过所有主动性卖出，小房子标记}
stella:=if(DYNAINFO(102)-DYNAINFO(103)>0,10,0){机构吃货次数多于机构吐货次数}
+if(DYNAINFO(99)>DYNAINFO(100),10,0){机构买单次数多于机构卖单次数}
+if(sum(ORDERNUM(2,0)-ORDERNUM(1,0),0)>0,10,0){单数差为正}
+if(sum(TRANSACTNUM(1,0)-TRANSACTNUM(2,0),0)>0,10,0){笔数差为正}
+if(sum(transactvol(1,0),0)>sum(transactvol(2,0),0),10,0){主动性成交差为正}
+if(sum(transactvol(1,2),0)>sum(transactvol(2,2),0),10,0){主动性大单成交差为正}
+if(if(count(c,0)<=1,0,sum((ordervol(1,2)-ordervol(2,2)),0)/sum(ordervol(1,0),0)*100)-if(count(c,0)<=1,0,sum((ordervol(1,3)-ordervol(2,3)),0)/sum(ordervol(1,0),0)*100)>0,10,0){大单净流入}
+if(if(count(c,0)<=1,0,sum((ordervol(1,3)-ordervol(2,3)),0)/sum(ordervol(1,0),0)*100)>0,10,0){特大单净流入}
+if(if(allaskvol=0,100,if(allbidvol=0,-100,(allbidvol-allaskvol)/(allbidvol+allaskvol)*100))>0,10,0){委比为正}
+if(sum(WIDTHDRAWORDER(1),0)-sum(WIDTHDRAWORDER(2),0)<0,10,0){撤单差为正}
+if(DYNAINFO(13)<0.03,10,0){振幅小}
+if(FINANCE2(3)>0,10,0){每股收益为正}
+if(DYNAINFO(39)<30,10,0){低市盈率}
+if(DYNAINFO(14)<0.05,10,0){股价尚未拉升}
+if(PFFIN(1601,0)>PFFIN(1601,1),10,0);{主营业务收入增长率同比增长}
eric:=ifs(between(stella,151,119),' 买入',ifs(between(stella,119,89),' 增持',ifs(between(stella,89,59),' 中性',ifs(between(stella,59,29),' 减持',ifs(between(stella,29,-1),' 卖出',' 1')))));
drawtextabs(15,55,'诊断：'+eric),colorccccff,linethick5;
→仇一鸣说以上是代码，比较长
→仇一鸣说普通内外盘通过分时成交数据计算，而该指标的主动性成交量或称精准内外盘通过level2数据计算，数据更为准确，且在分时图下通过线表示内外盘以及大单主动成交量一天走势，而普通内外盘只能看目前的值；
→仇一鸣说房子图标表示机构建仓,大单主动买入量金叉所有主动卖出量；笑脸表示精准外盘金叉精准内盘，哭脸表示精准外盘死叉精准内盘；
→仇一鸣说另外指标自带机构吃货，机构吐货，单数差，笔数差等数值，然后通过15项指标作出综合评分诊断
→仇一鸣说使用方法一：综合评分诊断
诊断评分从高到低依次是：买入-增持-中性-减持-卖出
→仇一鸣说使用方法二：小房子标记盘中买入点
→仇一鸣说使用方法三：十六个特色分时指标参考
分时诊断下附带以下特有的指标或常用的指标同时显示在指标栏内：
机构吃货次数，机构吐货次数，机构买单次数，机构卖单次数，单数差，笔数差，主动性成交差，主动性大单差，大单比例，特大比例，量比，委比，撤单差，振幅，每股收益，市盈率
→仇一鸣说使用方法四：level2数据的主动性成交量和大单主动性成交量，比分时成交计算出的内外盘更为精准。
→仇一鸣说不光根据逐笔成交计算出所有主动性成交量，且结合逐单计算的跟踪原委托单大小的原理计算出大单的主动性成交量。
→仇一鸣说注意：
该指标只适用于分时图下调用；
由于部分数据为请求数据，所以无法用来选股；
→仇一鸣说为了方便大家修改公式，用自己喜欢的指标组合出自己的综合诊断指标，
最后，我来简单讲解下公式编写原理，告诉大家怎么编写或修改条件。
→仇一鸣说第一部分4行是4根指标线，未添加等号所以用来输出，transactvol函数是分时图下主动性成交量，LINETHICKX表示线的粗细。
→仇一鸣说第二部分是用drawtextabs输出语句编写的十六个特色指标，以及用drawicon函数标记出大单大量买入的买卖点，如需要换自己需要的条件，只需修改‘’里的文字，以及+号后面的指标，这里举个例子，将机构吃货次数换成换手率。
原来： drawtextabs(10,10,'机构吃货次数'+DYNAINFO(102)),color99ffcc;
现在： drawtextabs(10,10,'换手率'+DYNAINFO(37)),color99ffcc;
→仇一鸣说第三部分一直到最后都是综合诊断，主要用if函数完成，原理是每个条件满足条件记10分，15个条件满分150，0-150分中分为买入（120-150分）-增持（90-110分）-中性（60-80分）-减持（30-50分）-卖出（0-20分）5个档次。
→仇一鸣说如需修改条件，要诊断也做相应该更，那诊断部分也要替换，if函数内第一个逗号前得就是条件，将条件替换成自己需要的条件
→仇一鸣说今天的主题就到这里，下面开始回答问题环节，谢谢。
85lpz问你好老师...我要个KDJ和MACD同时符合金叉的要求...用来预警的 谢谢。
朱晓鸣答a1:cross("kdj.j","kdj.k");
a2:cross("macd.diff","macd.dea");
A: a1 and a2;
63mgbrxj问分时均线出现横盘走势（波动非常非常小），持续一个小时
朱晓鸣答input:n(1);
(hhv(sum(c*v,0)/sum(v,0),60)
-llv(sum(c*v,0)/sum(v,0),60))/ref(sum(c*v,0)/sum(v,0),60)*100{分析周期分时，N为均线横盘时振幅}
47春伢仔问老师股价向上突破BOLL中轨的选股公式怎么写，谢谢很急
朱晓鸣答cross(close,"boll.mid");
107清源问帮忙编10日乖离率大于-10的公式股票池用谢谢
李　超答(CLOSE-MA(CLOSE,10))/MA(CLOSE,10)*100)>-10;
119mgbrxj问为什么count(c/ref(c,1)>=1.05,300)>=1,选不出上市小于300日的股票期间于某日涨幅大于5%
李　超答count(c/ref(c,1)>=1.05,min(300,barscount(c)))>=1;
66缘来是你问仇老师好， 8月17号路演中你们讲的“大盘资金” 指标，为什么每天的数值都是 -16.7，怎么不变，我每天都手动做了收盘作业，是怎么回事？该怎样操作？
仇一鸣答请仔细完全根据路演步骤操作，问题可能有很多，比如收盘有没收分笔成交，是否在大盘K线图调用，扩展数据有无刷新，公式是否调用正确，扩展数据的周期是否选了分笔等等等等
121缘来是你问老师好， 8月17号路演中你们讲的“大盘资金” 指标，为什么每天的数值都是 -16.7，怎么不变，我每天都手动做了收盘作业，是怎么回事？该怎样操作？
李　超答再次对照一下制作步骤，确定每一步都正确。 然后收盘的时候注意收分笔成交数据
39123问老师您好;KDJ日线周线金叉的公式
吴　程答cross("kdj.k","kdj.d") and cross("kdj.k#week","kdj.d#week");{用于日线周期}
50叶银问老师，为什么第一个板块股票池（板块资金流入前3）的成分股筛选进入第二个股票池（资金N日统计）没动静。单独条件选股可以的。急！！
朱晓鸣答把转移条件右下角输出成份股这里打勾试一下。
111方问请帮我编一个在最近3个月内，有连续2天一字涨停，出公告的，谢谢
吴　程答count(last(c/ref(c,1)>1.0975 and open=close)>=2,60);
95=问专家好！请帮我写个类似DDX连红天数这样的指标，使我能在股票列表状态下能查看操盘线指标中B点发出的信号天数。
朱晓鸣答cross(h,sar(3,1,20));
→仇一鸣说当天没统计好不能发出来，在f3大盘分时图下，每天9点35分在大盘信息地雷会出昨天所有的成交回报
27输惨了问老师您好。个股龙虎榜为什么不能看当天实时的。盼答，谢谢。
仇一鸣答当天没统计好不能发出来，在f3大盘分时图下，每天9点35分在大盘信息地雷会出昨天所有的成交回报
175三公问李老师好，帮忙编一个价张量增的公式。
李　超答close>ref(c,1) and "量比">2;
102猫哥哥问个股能看见 但看不见大盘的资金情况
仇一鸣答分析家以上版本输入svfl回车，点列表显示，第一行全部股票就是大盘资金情况
18黄金凤问求最近一个涨停板前一天收盘价公式，急！急！急！
仇一鸣答ref(c,barslast((c-ref(c,1))/ref(c,1)>0.095)-1);
177888问老师编写一个5日vol上穿40日vol的公式用来选股谢谢
吴　程答cross(ma(vol,5),ma(vol,40));
35输惨了问老师您好。个股龙虎榜为什么不能看当天实时的。盼答，谢谢。
吴　程答龙虎榜是交易所每天收盘后公布的，不是实时的。
42墨者问吴老师您好，我一直在用专业版，想求一个超跌选股公式，思路是股价远离五日线超过10%，大智慧自带公式里没有。
吴　程答close/ma(c,5)<0.9;
171翔宇问请老师帮我编一个股价连跌三日,今日收阳选股公式 。万分感谢
朱晓鸣答last(c=3 and isup;
178徒弟问老师好，麻烦编一个5日RSI的最低位置高于前天的最低值，就是底部比前天高，谢老师
李　超答k1:=barslast("rsi.rsi1"=llv("rsi.rs11",5));
llv("rsi.rs11",5)>ref("rsi.rsi1",k1+2);
173大黑牛问选的是9月13日，为什么？我每天9点全部下载数据，14点40分又下载日线数据的呀.
仇一鸣答查看-选项-系统参数，往下托，把自动下载数据关了
68999问老师好！求请条件选股---大于5天不补缺口，且涨幅(不含缺口涨幅)小于10%？
朱晓鸣答barslast(l>ref(h,1))>5 and llv(l,barslast(l>ref(h,1)))>ref(h,barslast(l>ref(h,1))) or
barslast(h5 and hhv(h,barslast(h220缘来是你问我完全是根据路演步骤一步一步操作的，是要每天在什么地方刷新数据吗
李　超答你可能收盘没有收分笔成交数据。
132mgbrxj问为什么count(c/ref(c,1)>=1.05,300)>=1,选不出上市小于300日的股票期间于某日涨幅大于5%
李　超答已经修改过，看上面回答
165bade问求用expma金叉选股公式 （可调数据）
李　超答cross(ema(c,5),ema(c,10)); {5,10表示5日上穿10日，可调}
137初学者问老师好，昨天讲的分时博弈指标如何调出来？谢谢
朱晓鸣答分时图-指标模板-分时博弈
139bade问求用expma金叉选股公式 （可调数据）
朱晓鸣答CROSS(EMA(CLOSE,5),EMA(CLOSE,10));
829999问老师好！请给一个股价突破下降压力线的选股公式。谢谢！
吴　程答input: N(5,1,100);
A1:=ref(h,N)=hhv(h,2*N+1);
B1:=filter(A1,N);
C1:=backset(B1,N+1);
D1:=filter(C1,n);{高点}
A2:=ref(l,N)=llv(l,2*N+1);
B2:=filter(A2,N);
C2:=backset(B2,N+1);
D2:=filter(C2,N);{低点}
E1:=(ref(llv(l,2*N),1)+ref(hhv(h,2*N),1))/2; E2:=(h+l)/2;{高低点出现在同一K线上时可作取舍}
H1:=(D1 AND not(D2 AND E1>=E2)) OR barstatus=2 OR barscount(c)=1;
L1:=(D2 AND not(D1 AND E1=E2);
X1:=ref(barslast(H1),1)+1; F1:=backset(H1 AND count(L1,X1)>0,llvbars
(if(L1,l,10000),X1));
G1:=F1>ref(F1,1); I1:=backset(G1,2); LD:=I1>ref(I1,1);{过滤后低点}
L2:=LD OR barstatus=2 OR barscount(c)=1;
X2:=ref(barslast(L2),1)+1; F2:=backset(L2 AND count(H2,X2)>0,hhvbars
(if(H2,h,0),X2));
G2:=F2>ref(F2,1); I2:=backset(G2,2); HD:=I2>ref(I2,1);{过滤后高点}
R1:=backset(barstatus=2,barslast(HD)+1);
S1:=R1>ref(R1,1); {前一高}
T1:=backset(barstatus=2,barslast(LD)+1);
U1:=T1>ref(T1,1); {前一低}
R2:=backset(S1,ref(barslast(HD),1)+2);
S2:=R2>ref(R2,1); {前二高}
T2:=backset(U1,ref(barslast(LD),1)+2);
U2:=T2>ref(T2,1); {前二低}
Tperiod1:=barslast(s1);
Tperiod2:=barslast(s2);
Xhigh:=ref(high,Tperiod1);
XXhigh:=ref(high,Tperiod2);
cross(c,(xhigh-xxhigh)/(tperiod2-tperiod1)*tperiod1+xhigh);
160翔宇问请老师帮我编一个股价连跌三日,今日收阳选股公式 。万分感谢
仇一鸣答c>o and last(ref(c,1)=3;
234mgbrxj问测试过了还是不可以
李　超答没有问题，如果还那里还是不对，请举个例子说明。
238缘来是你问收盘后作业后，它的数据是自动生成吗
李　超答是的
242草原问吴老师！前天编的两小阳后一中阴接着一探底回升阳线公式，怎么选不出股票？
吴　程答可能是没有符合条件的股票，或者你把参数调宽一点
200新学员问老师好，请编个公式把近5日内 出现过凤凰线红箭头的个股选出来，谢谢
朱晓鸣答input:n(1);
xopen:=(ref(o,N)+ref(c,N))/2;
xclose:=close;
xhigh:=max(high,xopen);
xlow:=min(low,xopen);
volality:=ma(xhigh-xlow,8);
凰线:=ma(xclose,5)+volality/2;
凤线:=ma(xclose,5)-volality/2;
bu:=cross(xclose,凰线);
sel:=cross(凤线,xclose);
var1:=barslast(bu);
var2:=barslast(sel);
a:=ref(var1,1)>var2 and var1=0;
count(a,5)=1;
170你写的好好好问李老师你好..最近10天内涨停的.在又缩量下跌回调到43日均线支撑.成交量VOL.5日线大于60日线.换手率小于涨停那天2.3倍以下.选股.最好能预警.剔除.ST.停牌的.很急啊..
李　超答count(close/ref(c,1)>1.096,5)=1 and close/ma(c,43)<1.02 and vol1.096))*2.3 and strfind(stkname,'S',1)=0 and dynainfo(8)>0 and
ma(v,5)>ma(v,60) and hhv(c/ma(c,43),10)>1.02;
252缘来是你问请问这个问题可以到你们大智慧的 智慧之家 咨询吗
李　超答可以
243毛毛问老师给一个今日最低价低于5日线收盘价等于或高于10日线 成交量大于昨日的公式 谢谢
仇一鸣答l=ma(c,10)
and v>ref(v,1);
286mgbrxj问捷顺科技002609，上市24日，小于300日，但是期间却有一次涨停，涨幅大于5%，没选出来，请老师看下
李　超答count(c/ref(c,1)>1.05,min(300,barscount(c)-1));
284缘来是你问请问它的数值是随时都变吗
李　超答不是 ，收盘后才会变
→李　超说？ 【mgbrxj】(对李　超说) 捷顺科技002609，上市24日，小于300日，但是期间却有一次涨停，涨幅大于5%，没选出来，请老师看下 (编号286) 114.241.25.225
【李　超】count(c/ref(c,1)>1.05,min(300,barscount(c)-1))>=1;
290阿Q问公式；今天和日前五天内出现一天以上（自编指标名称是“主升浪）中的”主力进场“指标线。And …….谢谢急！
吴　程答and count("主升浪.主力进场",6)>0;
→主持人说今天非常感谢几位老师的精彩解答，本期路演直播节目到此结束。
大智慧路演中心