千钧资产负债公式 飞狐资产负债指标 源码

指标公式详细说明

指标源码
input: m(20,1,10000),m1(20,1,10000),m2(35,1,10000),m3(35,1,10000),m4(20,1,10000),m5(34,1,10000),起点(0,0,1341231),终点(0,0,1341231),n(1,1,100);
drawgbk(1, colorrgb(10,0,0),colorrgb(10,0,0),0);
流动资产:=strtonum(f10text(f10find('流动资产 ',1)+m,10)),linethick0;
流动负债:=strtonum(f10text(f10find('流动负债 ',1)+m1,10)),linethick0;
流动资产上:=strtonum(f10text(f10find('流动资产 ',1)+m2,10)),linethick0;
流动负债上:=strtonum(f10text(f10find('流动负债 ',1)+m3,10)),linethick0;
流动资金本:=流动资产-流动负债,linethick0,coloryellow;
流动资金上:=流动资产上-流动负债上,linethick0,coloryellow;
资产总额:=strtonum(f10text(f10find('总资产 ',1)+m4,10)),linethick0;
资产总额上:=strtonum(f10text(f10find('总资产 ',1)+m5,10)),linethick0;
x1k:=流动资金本/资产总额*100,linethick0;
x1上:=流动资金上/资产总额上*100,linethick0;
留存收益:=strtonum(f10text(f10find('未分配利润 ',1)+m,10)),linethick0;
留存收益上:=strtonum(f10text(f10find('未分配利润 ',1)+m2,10)),linethick0;
x2k:=留存收益/资产总额*100,linethick0;
x2上:=留存收益上/资产总额*100,linethick0;
营业利润:=strtonum(f10text(f10find('营业利润 ',1)+m,10)),linethick0;
营业利润上:=strtonum(f10text(f10find('营业利润 ',1)+m2,10)),linethick0;
x3k:=营业利润/资产总额*100,linethick0;
x3上:=营业利润上/资产总额*100,linethick0;
股东权益:=strtonum(f10text(f10find('股东权益 ',1)+m,10)),linethick0;
股东权益上:=strtonum(f10text(f10find('股东权益 ',1)+m2,10)),linethick0;
负债总额:=资产总额-股东权益,linethick0;
负债总额上:=资产总额上-股东权益上,linethick0;
x4k:=股东权益/负债总额*100,linethick0;
x4上:=股东权益上/负债总额上*100,linethick0;
销售收入:=strtonum(f10text(f10find('主营业务收入 ',1)+m,10)),linethick0;
销售收入上:=strtonum(f10text(f10find('主营业务收入 ',1)+m2,10)),linethick0;
x5k:=销售收入/资产总额*100,linethick0,colorgreen;
x5上:=销售收入上/资产总额上*100,linethick0;
zk:=(1.2*x1k/100)+1.4*x2k/100+3.3*x3k/100+0.6*x4k/100+0.995*x5k/100,linethick0,colorffef40;
z上:=(1.2*x1上/100)+1.4*x2上/100+3.3*x3上/100+0.6*x4上/100+0.995*x5上/100,linethick0,coloryellow;
//表格
s1:=sysparam(1);
s2:=sysparam(2);
s3:=sysparam(3);
ks:=sysparam(3)-sysparam(2);
t1:=ref(barpos,barssince(date>=起点));//以日期定义的区间起点位置
t2:=ref(barpos,barssince(date>=终点));//以日期定义的区间终点位置
d:=t2-t1;//以日期定义的区间
qj:=if(n=1,s3-s1+1,if(n=2,s3-s2,d[s3]));//区间:n＝1,光标.n＝2,可见k线.n＝3,日期
qd:=if(n=1,s1,if(n=2,s2,t1[s3]));//起点的数据位置
zd:=if(n<3,s3,t2[s3]);//终点的数据位置
{表格}
s2:=sysparam(2);
ks:=sysparam(3)-sysparam(2);
z:=ks/80;
x:=barpos=s2;
x1:=barpos=s2+round(z);
//横线
partline(1,100),colorwhite;partline(1,80),pointdot,colorgray;
partline(1,70),pointdot,colorgray; partline(1,50),pointdot,colorgray;
partline(1,60),pointdot,colorgray; partline(1,40),pointdot,colorgray;
partline(1,30),pointdot,colorgray;
partline(1,20),pointdot,colorgray; partline(1,0),colorwhite;
//竖线
z:=ks/80;
x:=barpos=s2;
stickline(x,100,0,0,0),colorwhite;
x1:=barpos=s2+round(z*10);
stickline(x1,100,20,0,0),linedot,colorgray;
x2:=barpos=s2+round(z*32);
stickline(x2,100,20,0,0),linedot,colorgray;
x3:=barpos=s2+round(z*50);
stickline(x3,100,20,0,0),linedot,colorgray;
x4:=barpos=s2+round(z*70);
stickline(x4,100,20,0,0),linedot,colorgray;
x5:=barpos=s2+round(z*80);
stickline(x5,100,0,0,0),colorwhite;
drawtext(x,90,'序号:'),coloryellow;
drawtext(x,76,' x1'),coloryellow;
drawtext(x,66,' x2'),coloryellow;
drawtext(x,56,' x3'),coloryellow;
drawtext(x,46,' x4'),coloryellow;
drawtext(x,36,' x5'),coloryellow;
drawtext(x,26,' z值'),coloryellow;
drawtext(x1,90,' 指标说明'),coloryellow;
drawtext(x1,76,' 营运资金/资产总额'),coloryellow;
drawtext(x1,66,' 留存收益/资产总额'),coloryellow;
drawtext(x1,56,' 息税前收益/资产总额'),coloryellow;
drawtext(x1,46,' 权益市价/负债总额'),coloryellow;
drawtext(x1,36,' 销售额/资产总额'),coloryellow;
drawtext(x2,90,' 上年数'),coloryellow;
drawtext(x2,76,' '+numtostr(x1上,3)),coloryellow;
drawtext(x2,66,' '+numtostr(x2上,3)),coloryellow;
drawtext(x2,56,' '+numtostr(x3上,3)),coloryellow;
drawtext(x2,46,' '+numtostr(x4上,3)),coloryellow;
drawtext(x2,36,' '+numtostr(x5上,3)),coloryellow;
drawtext(x2,26,' '+numtostr(z上,3)),coloryellow;
drawtext(x3,90,' 本年数'),coloryellow;
drawtext(x3,76,' '+numtostr(x1k,3)),coloryellow;
drawtext(x3,66,' '+numtostr(x2k,3)),coloryellow;
drawtext(x3,56,' '+numtostr(x3k,3)),coloryellow;
drawtext(x3,46,' '+numtostr(x4k,3)),coloryellow;
drawtext(x3,36,' '+numtostr(x5k,3)),coloryellow;
drawtext(x3,26,' '+numtostr(zk,3)),coloryellow;
drawtext(x4,90,' 结果'),coloryellow;//////////////////x8
drawtext(x4 and x1k>x1上,76,' 提高'),coloryellow;
drawtext(x4 and x2k>x2上,66,' 提高'),coloryellow;
drawtext(x4 and x3k>x3上,56,' 提高'),coloryellow;
drawtext(x4 and x4k>x4上,46,' 提高'),coloryellow;
drawtext(x4 and x5k>x5上,36,' 提高'),coloryellow;
drawtext(x4 and zk>z上,26,' 提高'),colorred;
drawtext(x4 and x1k<x1上,76,' 下降'),colorgreen;
drawtext(x4 and x2k<x2上,66,' 下降'),colorgreen;
drawtext(x4 and x3k<x3上,56,' 下降'),colorgreen;
drawtext(x4 and x4k<x4上,46,' 下降'),colorgreen;
drawtext(x4 and x5k<x5上,36,' 下降'),colorgreen;
drawtext(x4 and zk<z上,26,' 下降'),colorblue;
drawtext(x1 and zk>=0.6685,10,' 若z≥0.6685 则表明企业的财务状况良好，发生破产的可能性较小
'),colorccffcc;

drawtext(x1 and zk<=0.4525,10,' 若z≤0.4525 则企业存在很大的破产危险
'),colorccffcc;
drawtext(x1 and between(zk,0.6685,0.4525),10,'若z大于0.4525或者小于0.6685 则表明企业财务是极为不稳定的。
'),colorccffcc;
variable:sj[8]='str',sy[8]='str',tt=6;
jdg:=f10find('财务指标-增长能力',10000),linethick;
if jdg=-1 then exit;
sjt:=f10text(f10find('指标名称',jdg)+4,70);
sj[1]:=ltrim(strmid(sjt,14,10));
for i=1 to 4 do begin
tmp:=strfind(sjt,'│',1);
sj:=ltrim(strmid(sjt,tmp+4,10));
sjt:=ltrim(strmid(sjt,tmp+2,0));
end;
wt:=if(strlen(rtrim(sj[4]))>4,1,0);
//drawtext(x8,5,' 报表日期：'+sj[1]),colorgreen;

指标公式下载地址

上一指标公式：千钧老师财务主图■阻力支撑源碼公式 飞狐支撑千钧指标 源码

下一指标公式：千钧看长做短公式 飞狐千钧指标 源码

相关飞狐公式推荐

指标公式下载注意

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

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

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

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

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

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

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

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

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

☉ 本文千钧资产负债公式 飞狐资产负债指标 源码仅供学习研究。