现金流量指标公式详解 飞狐现金流量

指标公式详细说明

现金流量》 for wind

适用于wind f10资料。

{现金流量--wind}
input: 项目(1,1,4);
m1:=ma(c,20);
drawgbk(c>m1, colorrgb(90,60,0), colorrgb(120,40,30),0); {收阳变红}
drawgbk(c<m1, colorrgb(0,110,100), colorrgb(0,0,0),0); {收阴变绿}
polyline(1,0),color9000ee;
//确定f10种类
f10:=if(f10find('wind资讯就是',1)>0,2,0);
if f10<>2 then begin
drawtext(barpos=sysparam(2),10,'*** 本公式调用wind资讯f10 ***'),color96fe33,align4;
exit;
end;
//f10数据查找
qsw:=f10find('【6:现金流量】',1000);//起
if qsw<0 then exit;//没找到退出

sjt:=f10find('财务指标(单位)',qsw+30);//取日期位置1
//hz:=0;//汇总变量
//查时间
rqz:=ltrim(rtrim(f10text(sjt+22,10)));//时间
最新日期:strtonum('1'+strright(strleft(rqz,4),2)+strright('0'+numtostr(strtonum(strmid(rqz,6,2)),0),2)+strmid(rqz,strfind(rqz,'-',6)+1,2)),linethick;

ls:=10;//列取值调整
sja:=ltrim(f10text(f10find('｜',sjt+ls),0));//取时间行
jyt:=ltrim(f10text(f10find('｜',f10find('经营活动现金净流量',sjt+30)+ls),0));//取时间行
jxt:=ltrim(f10text(f10find('｜',f10find('现金净流量(万元)',sjt+30)+ls),0));//取时间行
tzt:=ltrim(f10text(f10find('｜',f10find('投资活动的现金净流量',sjt+30)+ls),0));//取时间行
czt:=ltrim(f10text(f10find('｜',f10find('筹资活动的现金净流量',sjt+30)+ls),0));//取时间行

//drawtext(barpos=sysparam(2),10,czt),color96fe33,align5;//调试用语句

variable:sj[4]='str',jyl[4]='str',jxl[4]='str',tzl[4]='str',czl[4]='str';
for j=1 to 4 do begin
sj[j]:=strmid(sja,12*(j-1)+3,10);
jyl[j]:=ltrim(strmid(jyt,12*(j-1)+3,10));
jxl[j]:=ltrim(strmid(jxt,12*(j-1)+3,10));
tzl[j]:=ltrim(strmid(tzt,12*(j-1)+3,10));
czl[j]:=ltrim(strmid(czt,12*(j-1)+3,10));
end;
//drawtext(sysparam(2)+20=barpos,15,czl[1]);//调试用语句

txts:=if(项目=1,'现金净流量',if(项目=2,'经营现金流',if(项目=3,'投资现金流','筹资现金流')));
zbs1:=strtonum(if(项目=1,jxl[1],if(项目=2,jyl[1],if(项目=3,tzl[1],czl[1]))));
zbs2:=strtonum(if(项目=1,jxl[2],if(项目=2,jyl[2],if(项目=3,tzl[2],czl[2]))));
zbs3:=strtonum(if(项目=1,jxl[3],if(项目=2,jyl[3],if(项目=3,tzl[3],czl[3]))));
zbs4:=strtonum(if(项目=1,jxl[4],if(项目=2,jyl[4],if(项目=3,tzl[4],czl[4]))));

最新:zbs1,colorff,precision2,linethick;
上年:zbs2,coloreeff,precision2,linethick;
前年:zbs3,colorffee00,precision2,linethick;
前三:zbs4,colorff00,precision2,linethick;
本期增减:(最新-上年),colorafff,linethick;

//画柱线
a2:=sysparam(2);as:=(sysparam(3)-sysparam(2)),linethick;
ag:=if(as<20,1,intpart(as/if(as>120,20,if(as>50,18,15))));
stickline(barpos=a2+ag,0,zbs1,ag*4,1),colorff,linethick2;
stickline(barpos=a2+ag*2,0,zbs2,ag*4,1),colorffff,linethick2;
stickline(barpos=a2+ag*3,0,zbs3,ag*4,1),colorffff00,linethick2;
stickline(barpos=a2+ag*4,0,zbs4,ag*4,1),colorff00,linethick2;
drawtext(barpos=sysparam(2),10,txts),color96fe33,align4;

//stickline(sysparam(2)+60=barpos,0,strtonum(jyl[1]),8,0),colorff;
kg:=' ';
bt:=f10text(f10find('┌',qsw),0);
bt1:=f10text(f10find('├',qsw),0);
bw:=f10text(f10find('└',qsw),0);
xss:=kg+bt+' \n'+kg+'｜'+' 财务指标(单位) '+sja
+' \n'+kg+'｜'+' 现金净流量(万元) '+jxt
+' \n'+kg+'｜'+' 经营现金净流量 '+jyt
+' \n'+kg+'｜'+' 投资现金净流量 '+tzt
+' \n'+kg+'｜'+' 筹资现金净流量 '+czt
+' \n'+kg+bw;
drawtext(sysparam(2)=barpos,20,xss),colordd00,align4;
{
参数精灵
显示项目选择：
1 - 现金净流量2 - 经营现金流
3 - 投资现金流4 - 筹资现金流

指标公式下载地址

上一指标公式：券商持股指标公式详解 飞狐持股

下一指标公式：盈利能力F10指标公式详解 飞狐F10

相关飞狐公式推荐

指标公式下载注意

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

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

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

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

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

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

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

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

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

☉ 本文现金流量指标公式详解 飞狐现金流量仅供学习研究。