元旦主图元旦副图-一发千钧原作公式 飞狐元旦指标 源码

指标公式详细说明

喜迎2010年，祝所有会员新年快乐！明年都弄点钱玩玩

2010年元旦，我为大家准备了一套主副图指标，方便大家在2010年操作。
希望这套指标能帮上您的忙！同时也请大家注意并重视我下面这两句话：
指标是参考，决策在人脑！
主图是采用了我的多个选股指标做的，这里既有抄底的，也有逃顶的。
副图指标用财务数据做的，这样便于大家在选择股票时，及时了解这只个股的财务状况，免得踩上地雷。
时至年底，大家都为明年的利润空间做准备工作，那这个副图来的正是时候！
这套指标本来已经在‘千钧茶舍六’二楼发出，但许多会员也许不去那里，因此在主版区重发。



主图引用公式：
名称：千钧引用(飞狐)
源码：
zz:=(ref(hhv(h,3),1)+ref(llv(l,3),1))/2;
a:=if(c>zz,vol,0);
b:=if(c<zz,vol,0);
a1:=if(c>zz,indexa,0);
b1:=if(c<zz,indexa,0);
总0:if(stktype=0,(a1-b1),(a-b));


主图源码(飞狐)：
【要求，你手中要有‘千钧引用’就是bbd用的那个引用，没有的，把上面的引用源码首先导入。财务数据是康宝莱阳光飞狐最新的，<聚源资讯>f10】

oo:=if(datatype=6,ma(o,22),if(datatype=7,ma(o,10),ma(o,6)));j:=stkindi('','kdj.j',0,6);
cc:=if(datatype=6,ma(c,22),if(datatype=7,ma(c,10),ma(c,6)));hs:=vol/capital*100;
jj:=(h+l+c)/3;qj0:=vol/if(h=l,4,h-l);
qj1:=if(capital=0,qj0*(jj-min(c,o)),qj0*(min(o,c)-l));
qj2:=if(capital=0,qj0*(min(o,c)-l),qj0*(jj-min(c,o)));
qj3:=qj0*(h-max(o,c));qj4:=qj0*(max(c,o)-jj);
qj5:=qj1+qj2;qj6:=qj3+qj4;dd:=(qj5-qj6)/(qj5+qj6)*100;
ddx:=((qj1+qj2)-(qj3+qj4))/sum(vol,10)*100;ddz:=dd*17;
ddy:=((qj2+qj4)-(qj1+qj3))/sum(vol,10)*100;
bb:=(cross(j,0)and ((ddx>0 and ddy>0) or ddz>400));
主:=qj1+qj2;散:=qj3+qj4;t0:=vol>ref(vol,1) and ma(vol,5)>ref(ma(vol,5),1);
bbd:=ema(stkindi('','千钧引用.总0',0,7),2)/sum(if(capital=0,ref(indexa,1),ref(vol,1)),5)*100;
xh1:=ref(bbd,1)<-15 and bbd>ref(bbd,1) and bbd>-10;
xh2:=ref(bbd,1)>=15 and bbd<ref(bbd,1) and bbd<10;p:=sysparam(1);
q6:=atan((ma(c,5)/ref(ma(c,5),1)-1)*100)*57.3;q2:=atan((ma(c,13)/ref(ma(c,13),1)-1)*100)*57.3;
q1:=atan((ma(c,23)/ref(ma(c,23),1)-1)*100)*57.3;q:=atan((ma(c,34)/ref(ma(c,34),1)-1)*100)*57.3;
q3:=atan((ma(c,68)/ref(ma(c,68),1)-1)*100)*57.3;q5:=atan((ma(c,250)/ref(ma(c,250),1)-1)*100)*57.3;
t1:=vol<ref(vol,1) and ma(vol,5)>ref(ma(vol,5),1);t2:=vol>ref(vol,1) and ma(vol,5)<ref(ma(vol,5),1);
t3:=vol<ref(vol,1) and ma(vol,5)<ref(ma(vol,5),1);t4:=主>ref(主,1) and 主>散 and if(capital=0,hs>1.3,hs>5);
t5:=主<ref(主,1) and 主>散 and if(capital=0,hs>0.5 and hs<1.3,hs>3 and hs<=5);
t6:=主>ref(主,1) and 主<散 and if(capital=0,hs<1.3 and hs>0.5,hs<5 and hs>3);
t7:=主<ref(主,1) and 主<散 and if(capital=0,hs<1.3,hs<3 and hs>=1);
stickline(c>=ref(c,1),h,l,0,0),color0000ff;
stickline(c>=ref(c,1),c,o,8,0),color0000bb;
stickline(c>=ref(c,1),c,o,5,0),color0000dd;
stickline(c>=ref(c,1),c,o,3,0),color0000ee;
stickline(c>=ref(c,1),c,o,1,0),color0000ff;
stickline(c<ref(c,1),h,l,0,0),colorffff00;
stickline(c<ref(c,1),c,o,8,0),color999900;
stickline(c<ref(c,1),c,o,5,0),colorbbbb00;
stickline(c<ref(c,1),c,o,3,0),colordddd00;
stickline(c<ref(c,1),c,o,1,0),colorffff00;
stickline(bbd>0,cc,oo,8,0),colorff00ff;
stickline(bbd<0,cc,oo,8,0),color00ff00;
drawtextex(close,1,0,100,'5 日线夹角: '+numtostr(q6[p],2)+' 度'),coloreeeeee;
drawtextex(close,1,220,100,'13日线夹角: '+numtostr(q2[p],2)+' 度'),color00ddee;
drawtextex(close,1,450,100,'22日线夹角: '+numtostr(q1[p],2)+' 度'),coloree00ee;
drawtextex(close,1,0,150,'34日线夹角: '+numtostr(q[p],2)+' 度'),color00ee00;
drawtextex(close,1,220,150,'68日线夹角: '+numtostr(q3[p],2)+' 度'),coloreedd00;
drawtextex(close,1,450,150,'250日线夹角: '+numtostr(q5[p],2)+' 度'),colorff8800;
drawicon(xh1,l*0.98,4);drawicon(xh2,h*1.02,5);
drawtext(bb,l*0.98,'弄\n点\n钱\n玩\n玩'),color00ffff;
drawtextex(close,1,20,0,'上涨家数:'+numtostr(indexadv,0)+' 家'),color0066ff;
drawtextex(close,1,180,0,'下跌家数:'+numtostr(indexdec,0)+' 家'),color99ff99;
drawtextex(close,1,340,0,'平盘家数:'+numtostr(pingpan,0)+' 家'),coloreeeeee;
drawtextex(t0,1,500,0,'成交大于昨日,有继续增大趋势'),color00ffff;
drawtextex(t1,1,500,0,'成交小于昨日,但有放大迹象'),color00ddff;
drawtextex(t2,1,500,0,'成交大于昨日,但有缩小迹象'),colorffff00;
drawtextex(t3,1,500,0,'成交小于昨日,且有缩小迹象'),colorffbb00;
drawtextex(t4,1,760,0,'资金比较活跃,大资金活动明显'),color00ffff;
drawtextex(t5,1,760,0,'资金开始积极,大资金温和进场'),color00ddff;
drawtextex(t6,1,760,0,'散乱资金积极,散户行为明显'),colorffdd00;
drawtextex(t7,1,760,0,'交易频率上升,散户相当积极'),colorffff00;
drawtextex(close,1,20,50,stklabel+' '+stkname+' '+strleft(blkname,40)),colorffb060;
f10:=if(f10find('万国测评制作',1)>0,1,if(f10find('wind资讯',1)>0,2,if(f10find('----<聚源资讯>----',1)>0,3,if(f10find('维赛特',1)>0,4,if(f10find('☆ ◇港澳资讯',1)>0,5,0)))));
if f10=0 then exit;
qsw:=if(f10=2,f10find('【1:主力运作】',100),if(f10=3,f10find('控盘情况:',1),if(f10=4,f10find('（三）历年人均持股情况',1),if(f10=5,f10find('【1.机构持股汇总】 ',1000),f10find('◆ 控盘情况 ◆',100)))));
qsw:=if(f10=5,f10find('【2.股东户数',qsw),qsw);
if qsw>0 then begin
wz1:=f10find('-',qsw)-4;
wz2:=f10find('-',wz1+if(f10=1,10,if(f10=4,60,20)))-4;
wz3:=if(f10=2,f10find('【2:机构持股】',wz1),if(f10=3,f10find('公司简况',wz1),if(f10=4,f10find('（四）qfii持股',wz1),if(f10=5,f10find('└--',wz1),f10find('◆ 概念题材',wz1)))));
t1:=f10text(wz1,10);
t2:=if(wz2<wz3,f10text(wz2,10),'');
ls:=if(f10=1,142,if(f10=4,29,if(f10=5,12,14)));//14;
hs1:=strtonum(f10text(wz1+ls,10));
hs2:=if(wz2<wz3,strtonum(f10text(wz2+ls,10)),0);
end;
drawtextex(c,1,660,880,' 报表日期:'+t1+' 账户总数:'+numtostr(hs1,0)+' 户');
drawtextex(c,1,660,980,' 报表日期:'+t2+' 账户总数:'+numtostr(hs2,0)+' 户');
drawtextex(hs1>hs2,1,760,930,'市场筹码较上期分散'),color00ff00;
drawtextex(hs1<hs2,1,760,930,'市场筹码较上期集中'),color0000ff;
//


副图源码（飞狐）：

a:=f10find('主要指标:',1);c0:=f10find('各家评论',a);aa:=f10text(c0,6600);e1:=f10find('每股现金净流量(元)',a);
y1:=f10find('指标名称',a);a2:=f10find('每股收益(元)',a);c1:=f10find('每股净资产(元)',a);
d1:=f10find('净资产收益率(％)',a);f1:=f10find('每股资本公积金(元)',a);i1:=f10find('净利润增长率(%)',a);
explain(c,''+aa+''),color00dddd;b1:=f10find('主营业务利润率(%)',a);
drawtextex(c,1,70,0,stklabel+' '+stkname+''),colorffee00;
n1:=f10text(y1+15,2);nn1:=f10text(y1+18,2);nn2:=f10text(y1+21,2);n2:=f10text(y1+35,2);
n3:=f10text(y1+45,2);n4:=f10text(y1+55,2);aa1:=strtonum(f10text(a2+20,10));
a01:=strtonum(f10text(a2+30,10));aa2:=strtonum(f10text(a2+40,10));
aa3:=strtonum(f10text(a2+50,10));aa4:=strtonum(f10text(a2+60,10));
bb1:=strtonum(f10text(b1+20,10));bb2:=strtonum(f10text(b1+40,10));
bb3:=strtonum(f10text(b1+50,10));bb4:=strtonum(f10text(b1+60,10));
cc1:=strtonum(f10text(c1+20,10));cc2:=strtonum(f10text(c1+40,10));
cc3:=strtonum(f10text(c1+50,10));cc4:=strtonum(f10text(c1+60,10));
dd1:=strtonum(f10text(d1+20,10));dd2:=strtonum(f10text(d1+40,10));
dd3:=strtonum(f10text(d1+50,10));dd4:=strtonum(f10text(d1+60,10));
ee1:=strtonum(f10text(e1+20,10));ee2:=strtonum(f10text(e1+40,10));
ee3:=strtonum(f10text(e1+50,10));ee4:=strtonum(f10text(e1+60,10));
ff1:=strtonum(f10text(f1+20,10));ff2:=strtonum(f10text(f1+40,10));
ff3:=strtonum(f10text(f1+50,10));ff4:=strtonum(f10text(f1+60,10));
ii1:=strtonum(f10text(i1+20,10));ii2:=strtonum(f10text(i1+628,10));
ii3:=strtonum(f10text(i1+642,10));ii4:=strtonum(f10text(i1+656,10));
stickline(barpos=datacount-45,0,aa1,80,0),color0099ff;
stickline(barpos=datacount-35,0,a01,80,0),color009900;
stickline(barpos=datacount-25,0,aa2,80,0),color000099;
stickline(barpos=datacount-15,0,aa3,80,0),colorbb00bb;
stickline(barpos=datacount-5,0,aa4,80,0),colorbb0000;
drawtextex(c,1,10,120,'报告时间: '),coloryellow;
drawtextex(c,1,90,120,''+n1+'-'+nn1+'-'+nn2+'季报'),coloryellow;
drawtextex(c,1,220,120,'20'+n2+'年报'),coloryellow;
drawtextex(c,1,320,120,'20'+n3+'年报'),coloryellow;
drawtextex(c,1,420,120,'20'+n4+'年报'),coloryellow;
drawtextex(c,1,10,240,'每股收益: '),colorred;
drawtextex(c,1,90,240,numtostr(aa1,3)),colorred;
drawtextex(c,1,220,240,numtostr(aa2,3)),colorred;
drawtextex(c,1,320,240,numtostr(aa3,3)),colorred;
drawtextex(c,1,420,240,numtostr(aa4,3)),colorred;
drawtextex(c,1,10,360,'主营利润: '),color80ddff;
drawtextex(c,1,90,360,numtostr(bb1,3)),color80ddff;
drawtextex(c,1,220,360,numtostr(bb2,3)),color80ddff;
drawtextex(c,1,320,360,numtostr(bb3,3)),color80ddff;
drawtextex(c,1,420,360,numtostr(bb4,3)),color80ddff;
drawtextex(c,1,10,480,'每股净资: '),colorffff80;
drawtextex(c,1,90,480,numtostr(cc1,2)),colorffff80;
drawtextex(c,1,220,480,numtostr(cc2,2)),colorffff80;
drawtextex(c,1,320,480,numtostr(cc3,2)),colorffff80;
drawtextex(c,1,420,480,numtostr(cc4,2)),colorffff80;
drawtextex(c,1,10,600,'净资收益: '),colorcccccc;
drawtextex(c,1,90,600,numtostr(dd1,2)+'%'),colorcccccc;
drawtextex(c,1,220,600,numtostr(dd2,2)+'%'),colorcccccc;
drawtextex(c,1,320,600,numtostr(dd3,2)+'%'),colorcccccc;
drawtextex(c,1,420,600,numtostr(dd4,2)+'%'),colorcccccc;
drawtextex(c,1,10,720,'每股现金: '),colorff80ff;
drawtextex(c,1,90,720,if(ee1=0,'',numtostr(ee1,3))),colorff80ff;
drawtextex(c,1,220,720,if(ee2=0,'',numtostr(ee2,3))),colorff80ff;
drawtextex(c,1,320,720,if(ee3=0,'',numtostr(ee3,3))),colorff80ff;
drawtextex(c,1,420,720,if(ee4=0,'',numtostr(ee4,3))),colorff80ff;
drawtextex(c,1,10,840,'每股公积: '),color4080ff;
drawtextex(c,1,90,840,numtostr(ff1,4)),color4080ff;
drawtextex(c,1,220,840,numtostr(ff2,4)),color4080ff;
drawtextex(c,1,320,840,numtostr(ff3,4)),color4080ff;
drawtextex(c,1,420,840,numtostr(ff4,4)),color4080ff;
drawtextex(c,1,10,960,'净利润率: '),coloreeeeff;
drawtextex(c,1,90,960,numtostr(ii1,2)+'%'),coloreeeeff;
drawtextex(c,1,220,960,numtostr(ii2,2)+'%'),coloreeeeff;
drawtextex(c,1,320,960,numtostr(ii3,2)+'%'),coloreeeeff;
drawtextex(c,1,420,960,numtostr(ii4,2)+'%'),coloreeeeff;
动态收益:(sum(aa1,4)-aa2)/3,precision2,colorffffff,linethick;
静态收益:aa2,color00ffff,precision2,linethick;
市净率:c/cc1,colorff00ff,precision2,linethick;
动态市盈率:c/动态收益,precision2,colorffffff,linethick;
静态市盈率:c/静态收益,precision2,color00ffff,linethick;
drawtextex(aa1>a01,1,180,0,'业绩较同期增长'),color0000ff;
drawtextex(aa1<a01,1,180,0,'业绩较同期下滑'),color00ff00;
drawtext(barpos=datacount-48,0,' 季报\n'+numtostr(aa1,3)),pxup60,colorffffff;
drawtext(barpos=datacount-38,0,' 同期\n'+numtostr(a01,3)),pxup60,colorffffff;
drawtext(barpos=datacount-28,0,' 年报\n'+numtostr(aa2,3)),pxup60,colorffffff;
drawtext(barpos=datacount-18,0,' 上年\n'+numtostr(aa3,3)),pxup60,colorffffff;
drawtext(barpos=datacount-8,0,' 前年\n'+numtostr(aa4,3)),pxup60,colorfffff;
点击下载此文件

指标公式下载地址

上一指标公式：超跌购买副图公式 飞狐公式购买指标 源码

下一指标公式：四区主图与一品理念－精美主图公式 飞狐四区理念指标 源码

相关飞狐公式推荐

指标公式下载注意

☉ 好公式网发布的指标公式主要用于软件技术面分析，仅供参考，勿用于实际操作，据此操作风险自负！

☉ 解压密码：www.goodgongshi.com 就是好公式网域名，希望大家看清楚，切勿输错。

☉ tnc和tni格式指标公式，仅可以用通达信软件引入使用，例如可以用通达信软件引入使用指标公式；

☉ tne格式指标公式，仅可以用通达信软件公式编辑器5.0版导入，高版本兼容低版本；

☉ fnc格式指标公式，可以用大智慧软件新一代高速行情分析系统股票软件使用，少部分可以用分析家软件引入使用；

☉ alg格式指标公式，仅仅可以用飞狐交易师软件引入使用；exp格式指标公式，仅可以用大智慧经典版软件引入使用；

☉ hxf格式指标公式，仅可以用同花顺软件引入使用。

☉ 如果您发现下载软件链接错误，请联系管理员报告错误。

☉ 好公式网欢迎各位网友帮忙宣传转发本站网址，有您的支持，我们会做得更好！

☉ 本文元旦主图元旦副图-一发千钧原作公式 飞狐元旦指标 源码仅供学习研究。