财务k线主图源码:(优化)
{均线}
ma5:ma(close,5);
ma10:ma(close,10);
ma20:ma(close,20);
ma60:ma(close,60);
ma120:ma(close,120),colorff972f;
金叉:=cross(ma5,ma10);
drawtext(金叉,ma10*0.99,'←金叉买'),coloryellow;
二金叉:=cross(ma10,ma20);
drawtext(二金叉,ma20*0.98,'←二金叉加仓'),color1880ff;
{无穷}
无穷:dma(close,(vol)/(capital));
xg:=cross(c,无穷) and v>ref(v,1)*1.618;
stickline(c/ref(c,1)>1.095,c,o,2,0),colormagenta;
stickline(c/ref(c,1)<0.95,c,o,2,0),colorgreen;
{支撑压力}
n:=(h+l+c)/3;
明1压:2*n-l,linethick0,nodraw;
明1支:2*n-h,linethick0,nodraw;
明2压:n+h-l,linethick0,nodraw;
明2支:n-h+l,linethick0,nodraw;
{乖离}
bias1:=(c-ma(c,6))/ma(c,6)*100;
bias2:=(c-ma(c,12))/ma(c,12)*100;
bias3:=(c-ma(c,24))/ma(c,24)*100;
bias:=(bias1+2*bias2+3*bias3)/6;
乖离:=ma(bias,3);
drawtext(cross(bias,乖离) and 乖离<-9.5,l*0.95,'↖红柱抄底'),colorred;
{kd}
k:=(c+h+l)/3; d:=ma(k,4);
drawtext(ref(c,1)>d and c<d and d>ref(d,1),h*1.02,'←卖'),coloryellow;
drawtext(ref(c,1)<d and c>d and d<ref(d,1) and c>ref(c,1)*1.045,l*0.98, '←买'),colormagenta;
hh:=const(hhv(h,160));
ll:=const(llv(l,160));{160可改成你习惯锁定的日k线数}
hl1:=const(if(const(ref(ma(c,10),10))>const((hh+ll)/2),0.76,0.04));
hl2:=const(if(const(ref(ma(c,10),10))>const((hh+ll)/2),0.80,0.08));
hl3:=const(if(const(ref(ma(c,10),10))>const((hh+ll)/2),0.84,0.12));
hl4:=const(if(const(ref(ma(c,10),10))>const((hh+ll)/2),0.88,0.16));
hl5:=const(if(const(ref(ma(c,10),10))>const((hh+ll)/2),0.92,0.20));
hl6:=const(if(const(ref(ma(c,10),10))>const((hh+ll)/2),0.96,0.24));
drawtext_fix(1,0.00,0,0,'所属行业:')color0080ff;
drawtext_fix(1,0.07,0,0,hyblock)color0080ff;
drawtext_fix(1,0.14,0,0,'所属地区:')color00ffff;
drawtext_fix(1,0.21,0,0,dyblock)color00ffff;
drawtext_fix(1,0.00,0.06,0,'主题投资:')color0000ff;
drawtext_fix(1,0.07,0.06,0,externstr(0,1))color0000ff;
drawtext_fix(1,0.00,0.12,0,'财务分折:')colormagenta;
drawtext_fix(1,0.07,0.06,0,externstr(0,1))color0000ff;
{股本市值}
总股本:=strcat(strcat('总股本: ',con2str(totalcapital/1000000,2)),'亿');
流通盘:=strcat(strcat(' 流通盘: ',con2str(capital/1000000,2)),'亿');
全流通:=strcat(' 全流通: ',con2str((capital/1000000)/(totalcapital/1000000),2));
市值:=strcat(strcat(' 流通市值: ',con2str((capital/1000000)*c,2)),'亿');
上市天数:=strcat(' 上市天数: ',con2str(finance(42),0));
{上市日期:=strcat(' 上市日期: ',con2str(hhv((barscount(c)=0)*(date+19000000),0),0));}
股本市值:=strcat('股本市值: ',strcat(strcat(strcat(strcat(总股本,流通盘),全流通),市值),上市天数));
{业绩综合}
市盈率:=strcat('市盈率: ',con2str(c/finance(33),2));
市销率:=strcat(' 市销率: ',con2str(c/(finance(20)/finance(1)),2));
市净率:=strcat(' 市净率: ',con2str(c/finance(34),2));
净资收益率:=strcat(' 净资收益率: ',con2str(finance(33)/finance(34)*100,2));
毛利率:=strcat(' 毛利率: ',con2str((finance(20)-finance(21))/finance(20)*100,2));
净利润率:=strcat(' 净利润率 ',con2str(finance(30)/finance(20)*100,2));
主营利润率:=strcat(' 主营利润率 ',con2str(finance(23)/finance(20)*100,2));
当前业绩:=strcat('当前业绩: ',strcat(strcat(strcat(strcat(strcat(strcat(市盈率,市销率),市净率),净资收益率),毛利率),净利润率),主营利润率));
{风险系数}
x1:=(finance(11)-finance(15))/finance(10)*1.2;
x2:=(finance(31)+finance(17))/finance(10)*1.4;{盈余公积用资本公积金代替};
x3:=finance(23)/finance(10)*3.3;
x4:=finance(19)/finance(15)*0.6;{缺长期负债或负债总额}
x5:=finance(20)/finance(15)*0.999;
z值:=x1+x2+x3+x4+x5;
预警:=if(z值<1.2,'重警',if(z值>=1.2 and z值<2.6,'轻警','无警'));
财务预警:=strcat('财务预警: ',strcat(预警,strcat('-z值: ',con2str(z值,3))));
优质资产率:=strcat(' 优质资产率: ',con2str((finance(19)-finance(22)-finance(27))/finance(19),2));{理论上越大越好但不同行业有不同标准};
现金负债比:=strcat(' 现金负债比: ',con2str(finance(25)/finance(15),3));{缺长期负债或负债总额,理论上越大越好但不同行业有不同标准};
财务系数:=strcat('风险系数: ',strcat(strcat(财务预警,优质资产率),现金负债比));
{财务分折}
drawtext_fix(1,0.05,0.12,0,'现金流:'),color00cccc;
drawnumber_fix(1,0.086,0.12,0,const(finance(25)/1000000000)),color00cccc;
drawtext_fix(1,0.125,0.12,0,'应收款:'),color00cccc;
drawnumber_fix(1,0.159,0.12,0,const(finance(22)/100000000)),color00cccc;
drawtext_fix(1,0.193,0.12,0,'存货:'),color00cccc;
drawnumber_fix(1,0.218,0.12,0,const(finance(27)/100000000)),color00cccc;
drawtext_fix(1,0.253,0.12,0,'流动比率:'),color00cccc;{流动比率值>1.5<2.5较为合理,低于1说明偿债能力欠佳。}
drawnumber_fix(1,0.299,0.12,0,const(finance(11)/finance(15))),color00cccc;
drawtext_fix(1,0.336,0.12,0,'速动比率:'),color00cccc;
drawnumber_fix(1,0.383,0.12,0,const(finance(11)-finance(27)/finance(15))),color00cccc;
drawtext_fix(1,0.47,0.12,0,'套牢盘%:'),color00cccc;
drawnumber_fix(1,0.507,0.12,0,const(100-winner(close)*100)),color00cccc;
drawtext_fix(1,0.348,0.30,0,'流动债:'),colorgreen;
drawnumber_fix(1,0.385,0.30,0,const(finance(15)/100000000)),colorgreen;
drawtext_fix(1,0.426,0.30,0,'长期债:'),colorgreen;
drawnumber_fix(1,0.463,0.30,0,const(finance(16)/100000000)),colorgreen;
{}
drawtext_fix(islastbar,0.00,0.18,0,股本市值),colorgreen;
drawtext_fix(islastbar,0.00,0.24,0,当前业绩),colorgreen;
drawtext_fix(islastbar,0.00,0.30,0,财务系数),colorgreen;
财务报表分析副图选股:
市盈率:=dynainfo(39);
市净率:=finance(34)/c;
每股收益:=finance(33);
资产报酬率:=finance(29)/finance(10)*100;
股本报酬率:=finance(29)/finance(1)*100;
净值报酬率:=finance(29)/finance(19)*100;
营业纯益率:=finance(29)/finance(20)*100;
主营业务利润率:=finance(21)/finance(20)*100;
负债比率:=(finance(15)+finance(16))/finance(10)*100;
存货周转率:=(finance(20)-finance(23))/finance(27);
固定资产周转率:=finance(20)/finance(12);
市盈率评分:=if(市盈率<20 and 市盈率>0,10,if(市盈率<40 and 市盈率>20,9,
if(市盈率<60 and 市盈率>40,8,if(市盈率<80 and 市盈率>60,7,
if(市盈率<100 and 市盈率>80,6,if(市盈率<130 and 市盈率>100,5,
if(市盈率<160 and 市盈率>130,4,if(市盈率<190 and 市盈率>160,3,
if(市盈率<220 and 市盈率>190,2,if(市盈率<250 and 市盈率>220,1,0))))))))));
市净率评分:=if(市净率>1,10,if(市净率<1 and 市净率>0.9,9,
if(市净率<0.9 and 市净率>0.8,8,if(市净率<0.8 and 市净率>0.7,7,
if(市净率<0.7 and 市净率>0.6,6,if(市净率<0.6 and 市净率>0.5,5,
if(市净率<0.5 and 市净率>0.4,4,if(市净率<0.4 and 市净率>0.3,3,
if(市净率<0.3 and 市净率>0.2,2,if(市净率<0.2 and 市净率>0,1,0))))))))));
每股收益评分:=if(每股收益>2.7,10,if(每股收益<2.7 and 每股收益>2.4,9,
if(每股收益<2.4 and 每股收益>2.1,8,if(每股收益<2.1 and 每股收益>1.8,7,
if(每股收益<1.8 and 每股收益>1.5,6,if(每股收益<1.5 and 每股收益>1.2,5,
if(每股收益<1.2 and 每股收益>0.9,4,if(每股收益<0.9 and 每股收益>0.6,3,
if(每股收益<0.6 and 每股收益>0.3,2,if(每股收益<0.3 and 每股收益>0,1,0))))))))));
资产报酬率评分:=if(资产报酬率>27,10,if(资产报酬率<27 and 资产报酬率>24,9,
if(资产报酬率<24 and 资产报酬率>21,8,if(资产报酬率<21 and 资产报酬率>18,7,
if(资产报酬率<18 and 资产报酬率>15,6,if(资产报酬率<15 and 资产报酬率>12,5,
if(资产报酬率<12 and 资产报酬率>9,4,if(资产报酬率<9 and 资产报酬率>6,3,
if(资产报酬率<6 and 资产报酬率>3,2,if(资产报酬率<3 and 资产报酬率>0,1,0))))))))));
股本报酬率评分:=if(股本报酬率>135,10,if(股本报酬率<135 and 股本报酬率>120,9,
if(股本报酬率<120 and 股本报酬率>105,8,if(股本报酬率<105 and 股本报酬率>90,7,
if(股本报酬率<90 and 股本报酬率>75,6,if(股本报酬率<75 and 股本报酬率>60,5,
if(股本报酬率<60 and 股本报酬率>45,4,if(股本报酬率<45 and 股本报酬率>30,3,
if(股本报酬率<30 and 股本报酬率>15,2,if(股本报酬率<15 and 股本报酬率>0,1,0))))))))));
净值报酬率评分:=if(净值报酬率>100,10,if(净值报酬率<100 and 净值报酬率>80,9,
if(净值报酬率<80 and 净值报酬率>70,8,if(净值报酬率<70 and 净值报酬率>60,7,
if(净值报酬率<60 and 净值报酬率>50,6,if(净值报酬率<50 and 净值报酬率>40,5,
if(净值报酬率<40 and 净值报酬率>30,4,if(净值报酬率<30 and 净值报酬率>20,3,
if(净值报酬率<20 and 净值报酬率>10,2,if(净值报酬率<10 and 净值报酬率>0,1,0))))))))));
营业纯益率评分:=if(营业纯益率>60,10,if(营业纯益率<60 and 营业纯益率>50,9,
if(营业纯益率<50 and 营业纯益率>40,8,if(营业纯益率<40 and 营业纯益率>30,7,
if(营业纯益率<30 and 营业纯益率>20,6,if(营业纯益率<20 and 营业纯益率>15,5,
if(营业纯益率<15 and 营业纯益率>10,4,if(营业纯益率<10 and 营业纯益率>5,3,
if(营业纯益率<5 and 营业纯益率>3,2,if(营业纯益率<3 and 营业纯益率>0,1,0))))))))));
主营利润率评分:=if(主营业务利润率>60,10,if(主营业务利润率<60 and 主营业务利润率>50,9,
if(主营业务利润率<50 and 主营业务利润率>45,8,if(主营业务利润率<45 and 主营业务利润率>40,7,
if(主营业务利润率<40 and 主营业务利润率>35,6,if(主营业务利润率<35 and 主营业务利润率>30,5,
if(主营业务利润率<30 and 主营业务利润率>25,4,if(主营业务利润率<25 and 主营业务利润率>20,3,
if(主营业务利润率<20 and 主营业务利润率>10,2,if(主营业务利润率<10 and 主营业务利润率>0,1,0))))))))));
负债比率评分:=if(负债比率<0,10,if(负债比率>0 and 负债比率<10,9,
if(负债比率>10 and 负债比率<20,8,if(负债比率>20 and 负债比率<30,7,
if(负债比率>30 and 负债比率<40,6,if(负债比率>40 and 负债比率<50,5,
if(负债比率>50 and 负债比率<60,4,if(负债比率>60 and 负债比率<70,3,
if(负债比率>70 and 负债比率<80,2,if(负债比率>80 and 负债比率<100,1,0))))))))));
存货周转率评分:=if(存货周转率>80,5,if(存货周转率<80 and 存货周转率>60,4,
if(存货周转率<60 and 存货周转率>40,3,if(存货周转率<40 and 存货周转率>20,2,
if(存货周转率<20 and 存货周转率>0,1,0)))));
资产周转率评分:=if(固定资产周转率>20,5,if(固定资产周转率<20 and 固定资产周转率>15,4,
if(固定资产周转率<15 and 固定资产周转率>10,3,if(固定资产周转率<10 and 固定资产周转率>5,2,
if(固定资产周转率<5 and 固定资产周转率>0,1,0)))));
财务优势:(市盈率评分+市净率评分+每股收益评分)+(资产报酬率评分+股本报酬率评分+
净值报酬率评分+营业纯益率评分+主营利润率评分)+负债比率评分+存货周转率评分+
资产周转率评分,color0000ff;
公式解释:
1、股东权益报酬率即净资产收益率,越高代表盈利能力越强。本人将财务良好设为8,优秀设为10。太低了说明公司资产质量很一般。此外,指标太高,也找不出几家优秀公司了,故有些指标降一降吧,有些公司还是有潜力的。
2、每股净资产:财务良好设为1.5,财务优秀设为2。每股净资产是公司历年发展逐步积累而成,1.5以下表明公司历年积累不理想。财务优秀设为2主要考虑优秀企业送股和转增以后净资产不会太高。没必要设为更高。
3、每股未分配利润:财务良好设为0.3,优秀设为0.5,太低说明公司盈利能力不好,太高没必要,好公司分配完后,未分配利润不会太高,当然不会把利润分干净,设0.5为好。
4、主营收入占比:太低说明公司不务正业,
5、每股经营现金流:表明公司收到的现金,经营现金流大于利润说明公司回款良好,甚至又预收款,股价与现金流比相当于市盈率概念,但更真实,故设在0和60之间。
注:
1、本公式在选择财务指标时主要用经营现金流而不是现金流,主要是企业分红或其它因素,现金流可以为负。
2、如果副图显示财务良好或财务优秀为1,则公司财务良好或财务优秀成立,否则显示0或-。
3、在条件选股时将财务良好设为1,可选出符合条件的股票。条件即使很宽,也不到400家。同理可选财务优秀,也不过300家。公式之所以没有加流动比率、速动比率,主要考虑上市公司偿债因素不是特别重要,因它可以融资,另外,财务指标太多,选不出几家公司了,没法买股票了。
4、财务选股适合中长期投资者选股,同时对短线投机者也是重要参考指标。
上一指标公式:量界加神奇数字主图TDX指标下载 通达信源码神奇
☉ 好公式网发布的指标公式主要用于软件技术面分析,仅供参考,勿用于实际操作,据此操作风险自负!
☉ 解压密码:www.goodgongshi.com 就是好公式网域名,希望大家看清楚,切勿输错。
☉ tnc和tni格式指标公式,仅可以用通达信软件引入使用,例如可以用通达信软件引入使用指标公式;
☉ tne格式指标公式,仅可以用通达信软件公式编辑器5.0版导入,高版本兼容低版本;
☉ fnc格式指标公式,可以用大智慧软件新一代高速行情分析系统股票软件使用,少部分可以用分析家软件引入使用;
☉ alg格式指标公式,仅仅可以用飞狐交易师软件引入使用;exp格式指标公式,仅可以用大智慧经典版软件引入使用;
☉ hxf格式指标公式,仅可以用同花顺软件引入使用。
☉ 如果您发现下载软件链接错误,请联系管理员报告错误。
☉ 好公式网欢迎各位网友帮忙宣传转发本站网址,有您的支持,我们会做得更好!
☉ 本文基本面操盘秘诀-财务主图优化-财务报表分折选股TDX主图选股解释指标下载 通达信基本面秘诀仅供学习研究。