通达信『六大财务』副图公式，显示F10财务数据

{六大财务副图}

{参数对应年份，可按需调解。“年份”对应的是年报数据，若后台还没有数据则为空。最近一期就是当年最近一期报告期的数据，随着时间变化为一季报、半年报、三季报、年报。}

YEAR0:=2020;

DRAWTEXT_FIX(ISLASTBAR,0,0,0,CODE);

DRAWTEXT_FIX(ISLASTBAR,0.05,0,0,STKNAME);

A1:=FINANCE(42);

A2:=DATETODAY(CONST(DATE));

A3:=A2-A1;

DRAwrECTREL(51,150,380,910,0);

DRAWRECTREL(381,150,730,910,0);

DRAWRECTREL(729,150,970,910,0);

DRAWTEXT_FIX(1,0.2,0.05,0,'成长性指标'),COLORFF0000;

DRAWTEXT_FIX(1,0,0.15,0,'年份/科目');

DRAWTEXT_FIX(1,0.06,0.15,0,'营业收入(亿元)'),COLORFF0000;

DRAWTEXT_FIX(1,0.15,0.15,0,'营收增长率%'),COLORFF0000;

DRAWTEXT_FIX(1,0.23,0.15,0,'净利润(万元)'),COLORFF0000;

DRAWTEXT_FIX(1,0.30,0.15,0,'净利润增长率%'),COLORFF0000;

{DRAWRECTREL(51,150,380,910,0);}

DRAWTEXT_FIX(1,0,0.92,0,'注：*营收要稳定增长*营业毛利率选择20%以上 *营业利润率高于10%以上 *净资产收益率(ROE)每年都15%以上

*经营现金流量净额要为正数，且越高越好 *长短期负债比低于30%体制较安全'),COLORFF00FF;

DRAWTEXT_FIX(1,0.55,0.05,0,'获利性指标'),COLORFF00FF;

DRAWTEXT_FIX(1,0.41,0.15,0,'营业毛利率%'),COLORFF00FF;

DRAWTEXT_FIX(1,0.49,0.15,0,'净利率%'),COLORFF00FF;

DRAWTEXT_FIX(1,0.56,0.15,0,'营业利润率%'),COLORFF00FF;

DRAWTEXT_FIX(1,0.65,0.15,0,'净资产收益率%'),COLORFF00FF;

{DRAWRECTREL(390,150,740,910,0);}

DRAWTEXT_FIX(1,0.85,0.05,0,'安全性指标'),COLOR408000;

DRAWTEXT_FIX(1,0.75,0.15,0,'经营性现金流量净额(亿元)'),COLOR408000;

DRAWTEXT_FIX(1,0.90,0.15,0,'长短期负债比%'),COLOR408000;

{DRAWRECTREL(729,150,980,910,0);}

YEAR5:=YEAR0-5;

DRAWNUMBER_FIX(1,0,0.25,0,YEAR5);

DRAWTEXT_FIX(1,0.06,0.25,0,CON2STR(FINONE(74,YEAR5,1231)/100000000,3));

DRAWNUMBER_FIX(1,0.15,0.25,0,ROUND2(FINONE(183,YEAR5,1231),2));

DRAWTEXT_FIX(1,0.23,0.25,0,CON2STR(FINONE(95,YEAR5,1231)/100000000,3));

DRAWNUMBER_FIX(1,0.30,0.25,0,ROUND2(FINONE(184,YEAR5,1231),2));

DRAWNUMBER_FIX(1,0.41,0.25,0,ROUND2(FINONE(202,YEAR5,1231),2));

DRAWNUMBER_FIX(1,0.49,0.25,0,ROUND2(FINONE(199,YEAR5,1231),2));

DRAWNUMBER_FIX(1,0.56,0.25,0,ROUND2(FINONE(194,YEAR5,1231),2));

DRAWNUMBER_FIX(1,0.65,0.25,0,ROUND2(FINONE(197,YEAR5,1231),2));

DRAWTEXT_FIX(1,0.75,0.25,0,CON2STR(FINONE(107,YEAR5,1231)/100000000,3));

DRAWNUMBER_FIX(1,0.90,0.25,0,ROUND2(FINONE(62,YEAR5,1231)/FINONE(54,YEAR5,1231)*100,2));

YEAR4:=YEAR0-4;

DRAWNUMBER_FIX(1,0,0.35,0,YEAR4);

DRAWTEXT_FIX(1,0.06,0.35,0,CON2STR(FINONE(74,YEAR4,1231)/100000000,3));

DRAWNUMBER_FIX(1,0.15,0.35,0,ROUND2(FINONE(183,YEAR4,1231),2));

DRAWTEXT_FIX(1,0.23,0.35,0,CON2STR(FINONE(95,YEAR4,1231)/100000000,3));

DRAWNUMBER_FIX(1,0.30,0.35,0,ROUND2(FINONE(184,YEAR4,1231),2));

DRAWNUMBER_FIX(1,0.41,0.35,0,ROUND2(FINONE(202,YEAR4,1231),2));

DRAWNUMBER_FIX(1,0.49,0.35,0,ROUND2(FINONE(199,YEAR4,1231),2));

DRAWNUMBER_FIX(1,0.56,0.35,0,ROUND2(FINONE(194,YEAR4,1231),2));

DRAWNUMBER_FIX(1,0.65,0.35,0,ROUND2(FINONE(197,YEAR4,1231),2));

DRAWTEXT_FIX(1,0.75,0.35,0,CON2STR(FINONE(107,YEAR4,1231)/100000000,3));

DRAWNUMBER_FIX(1,0.90,0.35,0,ROUND2(FINONE(62,YEAR4,1231)/FINONE(54,YEAR4,1231)*100,2));

YEAR3:=YEAR0-3;

DRAWNUMBER_FIX(1,0,0.45,0,YEAR3);

DRAWTEXT_FIX(1,0.06,0.45,0,CON2STR(FINONE(74,YEAR3,1231)/100000000,3));

DRAWNUMBER_FIX(1,0.15,0.45,0,ROUND2(FINONE(183,YEAR3,1231),2));

DRAWTEXT_FIX(1,0.23,0.45,0,CON2STR(FINONE(95,YEAR3,1231)/100000000,3));

DRAWNUMBER_FIX(1,0.30,0.45,0,ROUND2(FINONE(184,YEAR3,1231),2));

DRAWNUMBER_FIX(1,0.41,0.45,0,ROUND2(FINONE(202,YEAR3,1231),2));

DRAWNUMBER_FIX(1,0.49,0.45,0,ROUND2(FINONE(199,YEAR3,1231),2)),;

DRAWNUMBER_FIX(1,0.56,0.45,0,ROUND2(FINONE(194,YEAR3,1231),2));

DRAWNUMBER_FIX(1,0.65,0.45,0,ROUND2(FINONE(197,YEAR3,1231),2));

DRAWTEXT_FIX(1,0.75,0.45,0,CON2STR(FINONE(107,YEAR3,1231)/10000,0));

DRAWNUMBER_FIX(1,0.90,0.45,0,ROUND2(FINONE(62,YEAR3,1231)/FINONE(54,YEAR3,1231)*100,2));

YEAR2:=YEAR0-2;

DRAWNUMBER_FIX(1,0,0.55,0,YEAR2);

DRAWTEXT_FIX(1,0.06,0.55,0,CON2STR(FINONE(74,YEAR2,1231)/100000000,3));

DRAWNUMBER_FIX(1,0.15,0.55,0,ROUND2(FINONE(183,YEAR2,1231),2));

DRAWTEXT_FIX(1,0.23,0.55,0,CON2STR(FINONE(95,YEAR2,1231)/100000000,3));

DRAWNUMBER_FIX(1,0.30,0.55,0,ROUND2(FINONE(184,YEAR2,1231),2));

DRAWNUMBER_FIX(1,0.41,0.55,0,ROUND2(FINONE(202,YEAR2,1231),2));

DRAWNUMBER_FIX(1,0.49,0.55,0,ROUND2(FINONE(199,YEAR2,1231),2));

DRAWNUMBER_FIX(1,0.56,0.55,0,ROUND2(FINONE(194,YEAR2,1231),2));

DRAWNUMBER_FIX(1,0.65,0.55,0,ROUND2(FINONE(197,YEAR2,1231),2));

DRAWTEXT_FIX(1,0.75,0.55,0,CON2STR(FINONE(107,YEAR2,1231)/100000000,3));

DRAWNUMBER_FIX(1,0.90,0.55,0,ROUND2(FINONE(62,YEAR2,1231)/FINONE(54,YEAR2,1231)*100,2));

DRAWTEXT_FIX(1,0.980,20,1,'公式平台，公式源码 http://www.gspt.com'),COLOR333333;

YEAR1:=YEAR0-1;

DRAWNUMBER_FIX(1,0,0.65,0,YEAR1);

DRAWTEXT_FIX(1,0.06,0.65,0,CON2STR(FINONE(74,YEAR1,1231)/100000000,3));

DRAWNUMBER_FIX(1,0.15,0.65,0,ROUND2(FINONE(183,YEAR1,1231),2));

DRAWTEXT_FIX(1,0.23,0.65,0,CON2STR(FINONE(95,YEAR1,1231)/100000000,3));

DRAWNUMBER_FIX(1,0.30,0.65,0,ROUND2(FINONE(184,YEAR1,1231),2));

DRAWNUMBER_FIX(1,0.41,0.65,0,ROUND2(FINONE(202,YEAR1,1231),2));

DRAWNUMBER_FIX(1,0.49,0.65,0,ROUND2(FINONE(199,YEAR1,1231),2));

DRAWNUMBER_FIX(1,0.56,0.65,0,ROUND2(FINONE(194,YEAR1,1231),2));

DRAWNUMBER_FIX(1,0.65,0.65,0,ROUND2(FINONE(197,YEAR1,1231),2));

DRAWTEXT_FIX(1,0.75,0.65,0,CON2STR(FINONE(107,YEAR1,1231)/100000000,3));

DRAWNUMBER_FIX(1,0.90,0.65,0,ROUND2(FINONE(62,YEAR1,1231)/FINONE(54,YEAR1,1231)*100,2));

DRAWNUMBER_FIX(1,0,0.75,0,YEAR0);

DRAWTEXT_FIX(1,0.06,0.75,0,CON2STR(FINONE(74,YEAR0,1231)/100000000,3));

DRAWNUMBER_FIX(1,0.15,0.75,0,ROUND2(FINONE(183,YEAR0,1231),2));

DRAWTEXT_FIX(1,0.23,0.75,0,CON2STR(FINONE(95,YEAR0,1231)/100000000,3));

DRAWNUMBER_FIX(1,0.30,0.75,0,ROUND2(FINONE(184,YEAR0,1231),2));

DRAWNUMBER_FIX(1,0.41,0.75,0,ROUND2(FINONE(202,YEAR0,1231),2));

DRAWNUMBER_FIX(1,0.49,0.75,0,ROUND2(FINONE(199,YEAR0,1231),2));

DRAWNUMBER_FIX(1,0.56,0.75,0,ROUND2(FINONE(194,YEAR0,1231),2));

DRAWNUMBER_FIX(1,0.65,0.75,0,ROUND2(FINONE(197,YEAR0,1231),2));

DRAWTEXT_FIX(1,0.75,0.75,0,CON2STR(FINONE(107,YEAR0,1231)/100000000,3));

DRAWNUMBER_FIX(1,0.90,0.75,0,ROUND2(FINONE(62,YEAR0,1231)/FINONE(54,YEAR0,1231)*100,2));

DRAWTEXT_FIX(1,0,0.85,0,'本年');

DRAWTEXT_FIX(1,0.06,0.85,0,CON2STR(FINONE(74,0,0)/100000000,3));

DRAWNUMBER_FIX(1,0.15,0.85,0,ROUND2(FINONE(183,0,0),2));

DRAWTEXT_FIX(1,0.23,0.85,0,CON2STR(FINONE(95,0,0)/100000000,3));

DRAWNUMBER_FIX(1,0.30,0.85,0,ROUND2(FINONE(184,0,0),2));

DRAWNUMBER_FIX(1,0.41,0.85,0,ROUND2(FINONE(202,0,0),2));

DRAWNUMBER_FIX(1,0.49,0.85,0,ROUND2(FINONE(199,0,0),2));

DRAWNUMBER_FIX(1,0.56,0.85,0,ROUND2(FINONE(194,0,0),2));

DRAWNUMBER_FIX(1,0.65,0.85,0,ROUND2(FINONE(197,0,0),2));

DRAWTEXT_FIX(1,0.75,0.85,0,CON2STR(FINONE(107,0,0)/100000000,3));

DRAWNUMBER_FIX(1,0.90,0.85,0,ROUND2(FINONE(62,0,0)/FINONE(54,0,0)*100,2));