通达信财务经典现金流报告副图公式源码
这是一个财务数据展示指标,功能是:
- 在K线图右侧固定位置显示多个财务指标数值
- 包括:销售商品收到的现金、购买商品支付的现金、购建固定资产支付的现金、投资支付的现金、取得借款收到的现金、货币资金、分配股利支付的现金、偿还债务支付的现金、负债合计
- 每个指标显示最近两年(M和M-1)的各季度数据(0331、0630、0930、1231)
- 不同季度用不同颜色区分:1季度紫色、2季度橙色、3季度红色、4季度绿色
- 数据单位是亿元
使用方法:
- 直接加载到K线图副图或主图均可
- 参数N=20、M=32控制显示的年期
- 仅当K线为最后一根时显示(ISLASTBAR)
- 适合查看个股现金流和负债状况
N:=20;
M:=32;
DRAWTEXT_FIX(ISLASTBAR,0.10,0.00,0,'■ 1季度:'),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.15,0.00,0,'■ 2季度:'),COLORFF8800;
DRAWTEXT_FIX(ISLASTBAR,0.20,0.00,0,'■ 3季度:'),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.25,0.00,0,'■ 4季度:'),COLORGREEN;
{-----------------98.--销售商品、提供劳务收到的现金(亿元)---------------------}
DRAWTEXT_FIX(ISLASTBAR,0.00,0.10,0,'98.-■收到--销售商品、提供劳务收到的现金(亿元):'),COLORRED;
DRAWNUMBER_FIX(ISLASTBAR,0.03,0.15,0,M-1),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.03,0.15,0,' 年'),COLOR007DFB;
DRAWNUMBER_FIX(ISLASTBAR,0.11,0.15,0,(FINONE(98,M-1,0331)/100000000)),COLORMAGENTA;
DRAWNUMBER_FIX(ISLASTBAR,0.16,0.15,0,((FINONE(98,M-1,0630))/100000000)),COLORFF8800;
DRAWNUMBER_FIX(ISLASTBAR,0.21,0.15,0,((FINONE(98,M-1,0930))/100000000)),COLORRED;
DRAWNUMBER_FIX(ISLASTBAR,0.26,0.15,0,((FINONE(98,M-1,1231))/100000000)),COLORGREEN;
DRAWNUMBER_FIX(ISLASTBAR,0.03,0.20,0,M),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.03,0.20,0,' 年'),COLOR007DFB;
DRAWNUMBER_FIX(ISLASTBAR,0.11,0.20,0,(FINONE(98,M,0331)/100000000)),COLORMAGENTA;
DRAWNUMBER_FIX(ISLASTBAR,0.16,0.20,0,((FINONE(98,M,0630))/100000000)),COLORFF8800;
DRAWNUMBER_FIX(ISLASTBAR,0.21,0.20,0,((FINONE(98,M,0930))/100000000)),COLORRED;
DRAWNUMBER_FIX(ISLASTBAR,0.26,0.20,0,((FINONE(98,M,1231))/100000000)),COLORGREEN;
{-------------------102.--购买商品、接受劳务支付的现金(亿元)--------------------------}
DRAWTEXT_FIX(ISLASTBAR,0.00,0.25,0,'102.-■支付--购买商品、接受劳务支付的现金(亿元):'),COLORLIRED;
DRAWNUMBER_FIX(ISLASTBAR,0.03,0.30,0,M-1),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.03,0.30,0,' 年'),COLOR007DFB;
DRAWNUMBER_FIX(ISLASTBAR,0.11,0.30,0,(FINONE(102,M-1,0331)/100000000)),COLORMAGENTA;
DRAWNUMBER_FIX(ISLASTBAR,0.16,0.30,0,(FINONE(102,M-1,0630)/100000000)),COLORFF8800;
DRAWNUMBER_FIX(ISLASTBAR,0.21,0.30,0,(FINONE(102,M-1,0930)/100000000)),COLORRED;
DRAWNUMBER_FIX(ISLASTBAR,0.26,0.30,0,(FINONE(102,M-1,1231)/100000000)),COLORGREEN;
DRAWNUMBER_FIX(ISLASTBAR,0.03,0.35,0,M),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.03,0.35,0,' 年'),COLOR007DFB;
DRAWNUMBER_FIX(ISLASTBAR,0.11,0.35,0,(FINONE(102,M,0331)/100000000)),COLORMAGENTA;
DRAWNUMBER_FIX(ISLASTBAR,0.16,0.35,0,(FINONE(102,M,0630)/100000000)),COLORFF8800;
DRAWNUMBER_FIX(ISLASTBAR,0.21,0.35,0,(FINONE(102,M,0930)/100000000)),COLORRED;
DRAWNUMBER_FIX(ISLASTBAR,0.26,0.35,0,(FINONE(102,M,1231)/100000000)),COLORGREEN;
{-----------------114.--购建固定资产、无形资产和其他长期资产支付的现金(亿元)--------------------------}
DRAWTEXT_FIX(ISLASTBAR,0.00,0.40,0,'114.■固定--购建固定资产、无形资产和其他长期资产支付的现金(亿元):'),COLORBROWN;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.03,0.45,0,M-1),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.03,0.45,0,' 年'),COLOR007DFB;
DRAWNUMBER_FIX(ISLASTBAR,0.11,0.45,0,(FINONE(114,M-1,0331)/100000000)),COLORMAGENTA;
DRAWNUMBER_FIX(ISLASTBAR,0.16,0.45,0,(FINONE(114,M-1,0630)/100000000)),COLORFF8800;
DRAWNUMBER_FIX(ISLASTBAR,0.21,0.45,0,(FINONE(114,M-1,0930)/100000000)),COLORRED;
DRAWNUMBER_FIX(ISLASTBAR,0.26,0.45,0,(FINONE(114,M-1,1231)/100000000)),COLORGREEN;
DRAWNUMBER_FIX(ISLASTBAR,0.03,0.50,0,M),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.03,0.50,0,' 年'),COLOR007DFB;
DRAWNUMBER_FIX(ISLASTBAR,0.11,0.50,0,(FINONE(114,M,0331)/100000000)),COLORMAGENTA;
DRAWNUMBER_FIX(ISLASTBAR,0.16,0.50,0,(FINONE(114,M,0630)/100000000)),COLORFF8800;
DRAWNUMBER_FIX(ISLASTBAR,0.21,0.50,0,(FINONE(114,M,0930)/100000000)),COLORRED;
DRAWNUMBER_FIX(ISLASTBAR,0.26,0.50,0,(FINONE(114,M,1231)/100000000)),COLORGREEN;
{----------------------115.--投资支付的现金(亿元)-----------------------}
DRAWTEXT_FIX(ISLASTBAR,0.00,0.55,0,'115.-■投资支付--投资支付的现金(亿元):'),COLORMAGENTA;
DRAWNUMBER_FIX(ISLASTBAR,0.03,0.60,0,M-1),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.03,0.60,0,' 年'),COLOR007DFB;
DRAWNUMBER_FIX(ISLASTBAR,0.11,0.60,0,(FINONE(115,M-1,0331)/100000000)),COLORMAGENTA;
DRAWNUMBER_FIX(ISLASTBAR,0.16,0.60,0,(FINONE(115,M-1,0630)/100000000)),COLORFF8800;
DRAWNUMBER_FIX(ISLASTBAR,0.21,0.60,0,(FINONE(115,M-1,0930)/100000000)),COLORRED;
DRAWNUMBER_FIX(ISLASTBAR,0.26,0.60,0,(FINONE(115,M-1,1231)/100000000)),COLORGREEN;
DRAWNUMBER_FIX(ISLASTBAR,0.03,0.65,0,M),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.03,0.65,0,' 年'),COLOR007DFB;
DRAWNUMBER_FIX(ISLASTBAR,0.11,0.65,0,(FINONE(115,M,0331)/100000000)),COLORMAGENTA;
DRAWNUMBER_FIX(ISLASTBAR,0.16,0.65,0,(FINONE(115,M,0630)/100000000)),COLORFF8800;
DRAWNUMBER_FIX(ISLASTBAR,0.21,0.65,0,(FINONE(115,M,0930)/100000000)),COLORRED;
DRAWNUMBER_FIX(ISLASTBAR,0.26,0.65,0,(FINONE(115,M,1231)/100000000)),COLORGREEN;
{----------------------121.--取得借款收到的现金(亿元)-----------------------}
DRAWTEXT_FIX(ISLASTBAR,0.00,0.70,0,'121.-■取得借款--取得借款收到的现金(亿元):'),COLORGREEN;
DRAWNUMBER_FIX(ISLASTBAR,0.03,0.75,0,M-1),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.03,0.75,0,' 年'),COLOR007DFB;
DRAWNUMBER_FIX(ISLASTBAR,0.11,0.75,0,(FINONE(121,M-1,0331)/100000000)),COLORMAGENTA;
DRAWNUMBER_FIX(ISLASTBAR,0.16,0.75,0,(FINONE(121,M-1,0630)/100000000)),COLORFF8800;
DRAWNUMBER_FIX(ISLASTBAR,0.21,0.75,0,(FINONE(121,M-1,0930)/100000000)),COLORRED;
DRAWNUMBER_FIX(ISLASTBAR,0.26,0.75,0,(FINONE(121,M-1,1231)/100000000)),COLORGREEN;
DRAWNUMBER_FIX(ISLASTBAR,0.03,0.80,0,M),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.03,0.80,0,' 年'),COLOR007DFB;
DRAWNUMBER_FIX(ISLASTBAR,0.11,0.80,0,(FINONE(121,M,0331)/100000000)),COLORMAGENTA;
DRAWNUMBER_FIX(ISLASTBAR,0.16,0.80,0,(FINONE(121,M,0630)/100000000)),COLORFF8800;
DRAWNUMBER_FIX(ISLASTBAR,0.21,0.80,0,(FINONE(121,M,0930)/100000000)),COLORRED;
DRAWNUMBER_FIX(ISLASTBAR,0.26,0.80,0,(FINONE(121,M,1231)/100000000)),COLORGREEN;
{----------------------资产负债表---8.--货币资金(亿元)-----------------------}
DRAWTEXT_FIX(ISLASTBAR,0.00,0.85,0,'008.-■资产负债表--货币资金(亿元):'),COLORMAGENTA;
DRAWNUMBER_FIX(ISLASTBAR,0.03,0.90,0,M-1),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.03,0.90,0,' 年'),COLOR007DFB;
DRAWNUMBER_FIX(ISLASTBAR,0.16,0.90,0,(FINONE(8,M-1,0630)/100000000)),COLORFF8800;
DRAWNUMBER_FIX(ISLASTBAR,0.26,0.90,0,(FINONE(8,M-1,1231)/100000000)),COLORGREEN;
DRAWNUMBER_FIX(ISLASTBAR,0.03,0.95,0,M),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.03,0.95,0,' 年'),COLOR007DFB;
DRAWNUMBER_FIX(ISLASTBAR,0.16,0.95,0,(FINONE(8,M,0630)/100000000)),COLORFF8800;
DRAWNUMBER_FIX(ISLASTBAR,0.26,0.95,0,(FINONE(8,M,1231)/100000000)),COLORGREEN;
{----------------------125.--分配股利、利润或偿付利息支付的现金-----------------------}
DRAWTEXT_FIX(ISLASTBAR,0.30,0.55,0,'125.-■分配股利--利润或偿付利息支付的现金(亿元)'),COLOR007DFB;
DRAWNUMBER_FIX(ISLASTBAR,0.32,0.60,0,M),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.32,0.60,0,' 年'),COLOR007DFB;
DRAWNUMBER_FIX(ISLASTBAR,0.32,0.65,0,(FINONE(125,M,0331)/100000000)),COLORMAGENTA;
DRAWNUMBER_FIX(ISLASTBAR,0.39,0.65,0,(FINONE(125,M,0630)/100000000)),COLORFF8800;
DRAWNUMBER_FIX(ISLASTBAR,0.46,0.65,0,(FINONE(125,M,0930)/100000000)),COLORRED;
DRAWNUMBER_FIX(ISLASTBAR,0.52,0.65,0,(FINONE(125,M,1231)/100000000)),COLORGREEN;
{----------------------124.--偿还--债务支付的现金----------------------}
DRAWTEXT_FIX(ISLASTBAR,0.30,0.70,0,'124.-■偿还--债务支付的现金(亿元)'),COLORLIGREEN;
DRAWNUMBER_FIX(ISLASTBAR,0.32,0.80,0,(FINONE(124,M,0331)/100000000)),COLORMAGENTA;
DRAWNUMBER_FIX(ISLASTBAR,0.39,0.80,0,(FINONE(124,M,0630)/100000000)),COLORFF8800;
DRAWNUMBER_FIX(ISLASTBAR,0.46,0.80,0,(FINONE(124,M,0930)/100000000)),COLORRED;
DRAWNUMBER_FIX(ISLASTBAR,0.52,0.80,0,(FINONE(124,M,1231)/100000000)),COLORGREEN;
{----------------------63.-负债-负债合计-----------------------}
DRAWTEXT_FIX(ISLASTBAR,0.30,0.85,0,' 63.-■负债--负债合计(亿元)'),COLOR007DFB;
DRAWNUMBER_FIX(ISLASTBAR,0.32,0.95,0,(FINONE(63,M,0331)/100000000)),COLORMAGENTA;
DRAWNUMBER_FIX(ISLASTBAR,0.39,0.95,0,(FINONE(63,M,0630)/100000000)),COLORFF8800;
DRAWNUMBER_FIX(ISLASTBAR,0.46,0.95,0,(FINONE(63,M,0930)/100000000)),COLORRED;
DRAWNUMBER_FIX(ISLASTBAR,0.52,0.95,0,(FINONE(63,M,1231)/100000000)),COLORGREEN;

未来函数检测结果如下:
该公式没有未来函数
定制指标公式、软件请联系QQ或微信同号:88652583
N赋值:20
M赋值:32
当满足条件是否最后一个周期时,在横轴0.10纵轴0.00位置书写文字,画洋红色
当满足条件是否最后一个周期时,在横轴0.15纵轴0.00位置书写文字,COLORFF8800
当满足条件是否最后一个周期时,在横轴0.20纵轴0.00位置书写文字,画红色
当满足条件是否最后一个周期时,在横轴0.25纵轴0.00位置书写文字,画绿色
当满足条件是否最后一个周期时,在横轴0.00纵轴0.10位置书写文字,画红色
当满足条件是否最后一个周期时,在横轴0.03纵轴0.15位置书写数字,画黄色
当满足条件是否最后一个周期时,在横轴0.03纵轴0.15位置书写文字,COLOR007DFB
当满足条件是否最后一个周期时,在横轴0.11纵轴0.15位置书写数字,画洋红色
当满足条件是否最后一个周期时,在横轴0.16纵轴0.15位置书写数字,COLORFF8800
当满足条件是否最后一个周期时,在横轴0.21纵轴0.15位置书写数字,画红色
当满足条件是否最后一个周期时,在横轴0.26纵轴0.15位置书写数字,画绿色
当满足条件是否最后一个周期时,在横轴0.03纵轴0.20位置书写数字,画黄色
当满足条件是否最后一个周期时,在横轴0.03纵轴0.20位置书写文字,COLOR007DFB
当满足条件是否最后一个周期时,在横轴0.11纵轴0.20位置书写数字,画洋红色
当满足条件是否最后一个周期时,在横轴0.16纵轴0.20位置书写数字,COLORFF8800
当满足条件是否最后一个周期时,在横轴0.21纵轴0.20位置书写数字,画红色
当满足条件是否最后一个周期时,在横轴0.26纵轴0.20位置书写数字,画绿色
当满足条件是否最后一个周期时,在横轴0.00纵轴0.25位置书写文字,画淡红色
当满足条件是否最后一个周期时,在横轴0.03纵轴0.30位置书写数字,画黄色
当满足条件是否最后一个周期时,在横轴0.03纵轴0.30位置书写文字,COLOR007DFB
当满足条件是否最后一个周期时,在横轴0.11纵轴0.30位置书写数字,画洋红色
当满足条件是否最后一个周期时,在横轴0.16纵轴0.30位置书写数字,COLORFF8800
当满足条件是否最后一个周期时,在横轴0.21纵轴0.30位置书写数字,画红色
当满足条件是否最后一个周期时,在横轴0.26纵轴0.30位置书写数字,画绿色
当满足条件是否最后一个周期时,在横轴0.03纵轴0.35位置书写数字,画黄色
当满足条件是否最后一个周期时,在横轴0.03纵轴0.35位置书写文字,COLOR007DFB
当满足条件是否最后一个周期时,在横轴0.11纵轴0.35位置书写数字,画洋红色
当满足条件是否最后一个周期时,在横轴0.16纵轴0.35位置书写数字,COLORFF8800
当满足条件是否最后一个周期时,在横轴0.21纵轴0.35位置书写数字,画红色
当满足条件是否最后一个周期时,在横轴0.26纵轴0.35位置书写数字,画绿色
当满足条件是否最后一个周期时,在横轴0.00纵轴0.40位置书写文字,画棕色
当满足条件到最后交易的周期=1时,在横轴0.03纵轴0.45位置书写数字,画黄色
当满足条件是否最后一个周期时,在横轴0.03纵轴0.45位置书写文字,COLOR007DFB
当满足条件是否最后一个周期时,在横轴0.11纵轴0.45位置书写数字,画洋红色
当满足条件是否最后一个周期时,在横轴0.16纵轴0.45位置书写数字,COLORFF8800
当满足条件是否最后一个周期时,在横轴0.21纵轴0.45位置书写数字,画红色
当满足条件是否最后一个周期时,在横轴0.26纵轴0.45位置书写数字,画绿色
当满足条件是否最后一个周期时,在横轴0.03纵轴0.50位置书写数字,画黄色
当满足条件是否最后一个周期时,在横轴0.03纵轴0.50位置书写文字,COLOR007DFB
当满足条件是否最后一个周期时,在横轴0.11纵轴0.50位置书写数字,画洋红色
当满足条件是否最后一个周期时,在横轴0.16纵轴0.50位置书写数字,COLORFF8800
当满足条件是否最后一个周期时,在横轴0.21纵轴0.50位置书写数字,画红色
当满足条件是否最后一个周期时,在横轴0.26纵轴0.50位置书写数字,画绿色
当满足条件是否最后一个周期时,在横轴0.00纵轴0.55位置书写文字
当满足条件是否最后一个周期时,在横轴0.03纵轴0.60位置书写数字,画黄色
当满足条件是否最后一个周期时,在横轴0.03纵轴0.60位置书写文字,COLOR007DFB
当满足条件是否最后一个周期时,在横轴0.11纵轴0.60位置书写数字,画洋红色
当满足条件是否最后一个周期时,在横轴0.16纵轴0.60位置书写数字,COLORFF8800
当满足条件是否最后一个周期时,在横轴0.21纵轴0.60位置书写数字,画红色
当满足条件是否最后一个周期时,在横轴0.26纵轴0.60位置书写数字,画绿色
当满足条件是否最后一个周期时,在横轴0.03纵轴0.65位置书写数字,画黄色
当满足条件是否最后一个周期时,在横轴0.03纵轴0.65位置书写文字,COLOR007DFB
当满足条件是否最后一个周期时,在横轴0.11纵轴0.65位置书写数字,画洋红色
当满足条件是否最后一个周期时,在横轴0.16纵轴0.65位置书写数字,COLORFF8800
当满足条件是否最后一个周期时,在横轴0.21纵轴0.65位置书写数字,画红色
当满足条件是否最后一个周期时,在横轴0.26纵轴0.65位置书写数字,画绿色
当满足条件是否最后一个周期时,在横轴0.00纵轴0.70位置书写文字
当满足条件是否最后一个周期时,在横轴0.03纵轴0.75位置书写数字,画黄色
当满足条件是否最后一个周期时,在横轴0.03纵轴0.75位置书写文字,COLOR007DFB
当满足条件是否最后一个周期时,在横轴0.11纵轴0.75位置书写数字,画洋红色
当满足条件是否最后一个周期时,在横轴0.16纵轴0.75位置书写数字,COLORFF8800
当满足条件是否最后一个周期时,在横轴0.21纵轴0.75位置书写数字,画红色
当满足条件是否最后一个周期时,在横轴0.26纵轴0.75位置书写数字,画绿色
当满足条件是否最后一个周期时,在横轴0.03纵轴0.80位置书写数字,画黄色
当满足条件是否最后一个周期时,在横轴0.03纵轴0.80位置书写文字,COLOR007DFB
当满足条件是否最后一个周期时,在横轴0.11纵轴0.80位置书写数字,画洋红色
当满足条件是否最后一个周期时,在横轴0.16纵轴0.80位置书写数字,COLORFF8800
当满足条件是否最后一个周期时,在横轴0.21纵轴0.80位置书写数字,画红色
当满足条件是否最后一个周期时,在横轴0.26纵轴0.80位置书写数字,画绿色
当满足条件是否最后一个周期时,在横轴0.00纵轴0.85位置书写文字
当满足条件是否最后一个周期时,在横轴0.03纵轴0.90位置书写数字,画黄色
当满足条件是否最后一个周期时,在横轴0.03纵轴0.90位置书写文字,COLOR007DFB
当满足条件是否最后一个周期时,在横轴0.16纵轴0.90位置书写数字,COLORFF8800
当满足条件是否最后一个周期时,在横轴0.26纵轴0.90位置书写数字,画绿色
当满足条件是否最后一个周期时,在横轴0.03纵轴0.95位置书写数字,画黄色
当满足条件是否最后一个周期时,在横轴0.03纵轴0.95位置书写文字,COLOR007DFB
当满足条件是否最后一个周期时,在横轴0.16纵轴0.95位置书写数字,COLORFF8800
当满足条件是否最后一个周期时,在横轴0.26纵轴0.95位置书写数字,画绿色
当满足条件是否最后一个周期时,在横轴0.30纵轴0.55位置书写文字,COLOR007DFB
当满足条件是否最后一个周期时,在横轴0.32纵轴0.60位置书写数字,画黄色
当满足条件是否最后一个周期时,在横轴0.32纵轴0.60位置书写文字,COLOR007DFB
当满足条件是否最后一个周期时,在横轴0.32纵轴0.65位置书写数字,画洋红色
当满足条件是否最后一个周期时,在横轴0.39纵轴0.65位置书写数字,COLORFF8800
当满足条件是否最后一个周期时,在横轴0.46纵轴0.65位置书写数字,画红色
当满足条件是否最后一个周期时,在横轴0.52纵轴0.65位置书写数字,画绿色
当满足条件是否最后一个周期时,在横轴0.30纵轴0.70位置书写文字,画淡绿色
当满足条件是否最后一个周期时,在横轴0.32纵轴0.80位置书写数字,画洋红色
当满足条件是否最后一个周期时,在横轴0.39纵轴0.80位置书写数字,COLORFF8800
当满足条件是否最后一个周期时,在横轴0.46纵轴0.80位置书写数字,画红色
当满足条件是否最后一个周期时,在横轴0.52纵轴0.80位置书写数字,画绿色
当满足条件是否最后一个周期时,在横轴0.30纵轴0.85位置书写文字,COLOR007DFB
当满足条件是否最后一个周期时,在横轴0.32纵轴0.95位置书写数字,画洋红色
当满足条件是否最后一个周期时,在横轴0.39纵轴0.95位置书写数字,COLORFF8800
当满足条件是否最后一个周期时,在横轴0.46纵轴0.95位置书写数字,画红色
当满足条件是否最后一个周期时,在横轴0.52纵轴0.95位置书写数字,画绿色