通达信自编财务主图

本财务主图指标，只是辅助判断个股财务状况，至少能知道过往和当下的基本运营情况,但不是决定股票购买的唯一依据,需要综合去分析判断；对于长期自选股的筛选有一定的帮助！

其实决定公司的价值，就是取决于两个方面：宏观面和微观面！宏观面，包含国家经济政策与发展方向，以及整体行业潜力；微观面，则包含上市公司的基本运营情况，以及公司管理层的管理运营能力！不管怎么去分析，短期因素起不到决定性作用，市场的价值发现需要长期可持续性！

下面的源代码需要说明一下：此主图指标是通达信版本，最下面四个10年内的统计指标，需要通达信的收费行情：专业财务指标与数据！并且，我的整个指标配备的是浅绿色背景图案！各位可以根据自身需要，更改一下指标颜色代码就可以！通达信软件黑色背景图案无法显示！如下图示范：(有问题留言，有空回答)-----股票是死的，人是活的，关键看自己如何应用、思考和决定，至少不能去赌博！

MA5:MA(C,5),COLOR000000;

MA10:MA(C,10),COLORFF00FF;

MA21:MA(C,21),COLORFF8000;

MA34:MA(C,34),COLORFF0080;

MA55:MA(C,55),COLOR004080;

MA89:MA(C,89),COLOR8080FF;

MA144:MA(C,144)COLOR004000;

MA233:MA(C,233),COLOR0000FF;

TMP1:=IF(C>MA5,1,0);

TMP2:=IF(C>MA10,1,0);

TMP3:=IF(C>MA21,1,0);

TMP4:=IF(C>MA34,1,0);

TMP5:=IF(C>MA55,1,0);

TMP6:=IF(C>MA89,1,0);

TMP7:=IF(C>MA144,1,0);

TMP8:=IF(C>MA233,1,0);

DRAWTEXT(CURRBARSCOUNT=5+0,HIGH*1.006,'5'), COLOR937860;

DRAWTEXT(CURRBARSCOUNT=10+0,HIGH*1.006,'10'), COLOR937860;

DRAWTEXT(CURRBARSCOUNT=21+0,HIGH*1.006,'21'), COLOR937860;

DRAWTEXT(CURRBARSCOUNT=34+0,HIGH*1.006,'34'), COLOR937860;

DRAWTEXT(CURRBARSCOUNT=55+0,HIGH*1.006,'55'), COLOR937860;

DRAWTEXT(CURRBARSCOUNT=89+0,HIGH*1.006,'89'), COLOR937860;

DRAWTEXT(CURRBARSCOUNT=144+0,HIGH*1.006,'144'), COLOR937860;

DRAWTEXT(CURRBARSCOUNT=233+0,HIGH*1.006,'233'), COLOR937860;

DRAWTEXT_FIX(1,0.01,0.02,0,HYBLOCK)COLORFF8000;

DRAWTEXT_FIX(1,0.05,0.02,0,DYBLOCK)COLOR408000;

DRAWTEXT_FIX(1,0.09,0.02,0,GNBLOCK)COLORFF8000;

DRAWTEXT_FIX(1,0.01,0.05,0,FGBLOCK)COLOR0000FF;

{股本市值}

总股本:=STRCAT(STRCAT('总股本: ',CON2STR(TOTALCAPITAL/1000000,2)),'亿');

流通盘:=STRCAT(STRCAT(' 流通盘: ',CON2STR(CAPITAL/1000000,2)),'亿');

全流通:=STRCAT(' 全流通: ',CON2STR((CAPITAL/1000000)/(TOTALCAPITAL/1000000),2));

市值:=STRCAT(STRCAT(' 总市值: ',CON2STR((TOTALCAPITAL/1000000)*C,2)),'亿');

A股总市值:=STRCAT(STRCAT(' A股总市值: ',CON2STR((FINANCE(1)-FINANCE(5)-FINANCE(6))*C/100000000,2)),'亿');

A:=STRCAT('A: ',STRCAT(STRCAT(STRCAT(总股本,流通盘),市值),A股总市值));

{业绩综合}

市盈率:=STRCAT('市盈率: ',CON2STR(C/FINANCE(33),2));

净利润率:=STRCAT(' 净利润率: ',CON2STR(FINANCE(30)/FINANCE(20)*100,2));

毛利率:=STRCAT(' 毛利率: ',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2));

主营:=STRCAT(STRCAT(' 主营: ',CON2STR(FINANCE(20)/100000000,2)),'亿');

主营利润率:=STRCAT(' 主营利润率: ',CON2STR(FINANCE(23)/FINANCE(20)*100,2));

主营收入同比:=STRCAT(' 主营收入同比: ',CON2STR(FINANCE(44),2));

净利润同比:=STRCAT(' 净利润同比: ',CON2STR(FINANCE(43),2));

每股净资产:=STRCAT(STRCAT(' 每股净资产: ',CON2STR(FINANCE(34),2)),'元');

净资产收益率:=STRCAT(STRCAT(' 净资产收益率: ',CON2STR(FINVALUE(197),2)),'%');

B:=STRCAT('B: ',STRCAT(STRCAT(STRCAT(市盈率,毛利率),净利润率),主营));

D:=STRCAT('D: ',STRCAT(STRCAT(STRCAT(主营收入同比,净利润同比),每股净资产),净资产收益率));

{资产倍数}

AA:=TOTALCAPITAL/1000000*C;

BB:=FINANCE(10);

CC:=FINANCE(9);

净资产率:=1-CC/100;

净资产:=BB*净资产率/1000000;

负债率:=STRCAT(STRCAT(' 负债率: ',CON2STR(FINANCE(9),2)),'%');

经营现金流量:=STRCAT(STRCAT(' 经营现金流量: ',CON2STR(FINANCE(25)/100000000,2)),'亿元');

固定资产占比:=STRCAT(STRCAT('固定资产占比: ',CON2STR(FINANCE(12)/FINANCE(10)*100,2)),'%');

资产倍数:=STRCAT(STRCAT('资产倍数: ',CON2STR(AA/净资产*100,2)),'倍');

E:=STRCAT('E: ',STRCAT(STRCAT(STRCAT(资产倍数,负债率),经营现金流量),固定资产占比));

{}

DRAWTEXT_FIX(ISLASTBAR,0.00,0.08,0,A),COLOR000000;

DRAWTEXT_FIX(ISLASTBAR,0.00,0.13,0,B),COLOR000000;

DRAWTEXT_FIX(ISLASTBAR,0.00,0.18,0,D),COLOR000000;

DRAWTEXT_FIX(ISLASTBAR,0.00,0.23,0,E),COLOR000000;

ROE2007:=STRCAT(STRCAT('ROE2007: ',CON2STR(FINONE(6,2007,1231),2)),'%');

ROE2008:=STRCAT(STRCAT('ROE2008: ',CON2STR(FINONE(6,2008,1231),2)),'%');

ROE2009:=STRCAT(STRCAT('ROE2009: ',CON2STR(FINONE(6,2009,1231),2)),'%');

ROE2010:=STRCAT(STRCAT('ROE2010: ',CON2STR(FINONE(6,2010,1231),2)),'%');

ROE2011:=STRCAT(STRCAT('ROE2011: ',CON2STR(FINONE(6,2011,1231),2)),'%');

ROE2012:=STRCAT(STRCAT('ROE2012: ',CON2STR(FINONE(6,2012,1231),2)),'%');

ROE2013:=STRCAT(STRCAT('ROE2013: ',CON2STR(FINONE(6,2013,1231),2)),'%');

ROE2014:=STRCAT(STRCAT('ROE2014: ',CON2STR(FINONE(6,2014,1231),2)),'%');

ROE2015:=STRCAT(STRCAT('ROE2015: ',CON2STR(FINONE(6,2015,1231),2)),'%');

ROE2016:=STRCAT(STRCAT('ROE2016: ',CON2STR(FINONE(6,2016,1231),2)),'%');

ROE2017:=STRCAT(STRCAT('ROE2017: ',CON2STR(FINONE(6,2017,1231),2)),'%');

W3:=(FINONE(6,2017,1231)+FINONE(6,2016,1231)+FINONE(6,2015,1231))/3;

W5:=(FINONE(6,2017,1231)+FINONE(6,2016,1231)+FINONE(6,2015,1231)+FINONE(6,2014,1231)+FINONE(6,2013,1231))/5;

W10:=(FINONE(6,2017,1231)+FINONE(6,2016,1231)+FINONE(6,2015,1231)+FINONE(6,2014,1231)+FINONE(6,2013,1231)+FINONE(6,2012,1231)+FINONE(6,2011,1231)+FINONE(6,2010,1231)+FINONE(6,2009,1231)+FINONE(6,2008,1231))/10;

近3年平均:=STRCAT(STRCAT(' 近3年平均: ',CON2STR(W3,2)),'%');

近5年平均:=STRCAT(STRCAT(' 近5年平均: ',CON2STR(W5,2)),'%');

近10年平均:=STRCAT(STRCAT(' 近10年平均: ',CON2STR(W10,2)),'%');

摊薄年度净资产:=STRCAT('摊薄年度净资产: ',STRCAT(STRCAT(STRCAT(ROE2017,近3年平均),近5年平均),近10年平均));

DRAWTEXT_FIX(ISLASTBAR,0.00,0.28,0,摊薄年度净资产),COLOR0000FF;

{营业收入增长率}

R2007:=STRCAT(STRCAT('R2007: ',CON2STR(FINONE(183,2007,1231),2)),'%');

R2008:=STRCAT(STRCAT('R2008: ',CON2STR(FINONE(183,2008,1231),2)),'%');

R2009:=STRCAT(STRCAT('R2009: ',CON2STR(FINONE(183,2009,1231),2)),'%');

R2010:=STRCAT(STRCAT('R2010: ',CON2STR(FINONE(183,2010,1231),2)),'%');

R2011:=STRCAT(STRCAT('R2011: ',CON2STR(FINONE(183,2011,1231),2)),'%');

R2012:=STRCAT(STRCAT('R2012: ',CON2STR(FINONE(183,2012,1231),2)),'%');

R2013:=STRCAT(STRCAT('R2013: ',CON2STR(FINONE(183,2013,1231),2)),'%');

R2014:=STRCAT(STRCAT('R2014: ',CON2STR(FINONE(183,2014,1231),2)),'%');

R2015:=STRCAT(STRCAT('R2015: ',CON2STR(FINONE(183,2015,1231),2)),'%');

R2016:=STRCAT(STRCAT('R2016: ',CON2STR(FINONE(183,2016,1231),2)),'%');

R2017:=STRCAT(STRCAT('R2017: ',CON2STR(FINONE(183,2017,1231),2)),'%');

W32:=(FINONE(183,2017,1231)+FINONE(183,2016,1231)+FINONE(183,2015,1231))/3;

W52:=(FINONE(183,2017,1231)+FINONE(183,2016,1231)+FINONE(183,2015,1231)+FINONE(183,2014,1231)+FINONE(183,2013,1231))/5;

W102:=(FINONE(183,2017,1231)+FINONE(183,2016,1231)+FINONE(183,2015,1231)+FINONE(183,2014,1231)+FINONE(183,2013,1231)+FINONE(183,2012,1231)+FINONE(183,2011,1231)+FINONE(183,2010,1231)+FINONE(183,2009,1231)+FINONE(183,2008,1231))/10;

近3年平均2:=STRCAT(STRCAT(' 近3年平均2: ',CON2STR(W32,2)),'%');

近5年平均2:=STRCAT(STRCAT(' 近5年平均2: ',CON2STR(W52,2)),'%');

近10年平均2:=STRCAT(STRCAT(' 近10年平均2: ',CON2STR(W102,2)),'%');

营业收入增长率:=STRCAT('营业收入增长率: ',STRCAT(STRCAT(STRCAT(R2017,近3年平均2),近5年平均2),近10年平均2));

DRAWTEXT_FIX(ISLASTBAR,0.00,0.32,0,营业收入增长率),COLOR0000FF;

{净资产增长率}

ROEA2007:=STRCAT(STRCAT('ROEA2007: ',CON2STR(FINONE(185,2007,1231),2)),'%');

ROEA2008:=STRCAT(STRCAT('ROEA2008: ',CON2STR(FINONE(185,2008,1231),2)),'%');

ROEA2009:=STRCAT(STRCAT('ROEA2009: ',CON2STR(FINONE(185,2009,1231),2)),'%');

ROEA2010:=STRCAT(STRCAT('ROEA2010: ',CON2STR(FINONE(185,2010,1231),2)),'%');

ROEA2011:=STRCAT(STRCAT('ROEA2011: ',CON2STR(FINONE(185,2011,1231),2)),'%');

ROEA2012:=STRCAT(STRCAT('ROEA2012: ',CON2STR(FINONE(185,2012,1231),2)),'%');

ROEA2013:=STRCAT(STRCAT('ROEA2013: ',CON2STR(FINONE(185,2013,1231),2)),'%');

ROEA2014:=STRCAT(STRCAT('ROEA2014: ',CON2STR(FINONE(185,2014,1231),2)),'%');

ROEA2015:=STRCAT(STRCAT('ROEA2015: ',CON2STR(FINONE(185,2015,1231),2)),'%');

ROEA2016:=STRCAT(STRCAT('ROEA2016: ',CON2STR(FINONE(185,2016,1231),2)),'%');

ROEA2017:=STRCAT(STRCAT('ROEA2017: ',CON2STR(FINONE(185,2017,1231),2)),'%');

W33:=(FINONE(185,2017,1231)+FINONE(185,2016,1231)+FINONE(185,2015,1231))/3;

W53:=(FINONE(185,2017,1231)+FINONE(185,2016,1231)+FINONE(185,2015,1231)+FINONE(185,2014,1231)+FINONE(185,2013,1231))/5;

W103:=(FINONE(185,2017,1231)+FINONE(185,2016,1231)+FINONE(185,2015,1231)+FINONE(185,2014,1231)+FINONE(185,2013,1231)+FINONE(185,2012,1231)+FINONE(185,2011,1231)+FINONE(185,2010,1231)+FINONE(185,2009,1231)+FINONE(185,2008,1231))/10;

近3年平均3:=STRCAT(STRCAT(' 近3年平均3: ',CON2STR(W33,2)),'%');

近5年平均3:=STRCAT(STRCAT(' 近5年平均3: ',CON2STR(W53,2)),'%');

近10年平均3:=STRCAT(STRCAT(' 近10年平均3: ',CON2STR(W103,2)),'%');

净资产增长率:=STRCAT('净资产增长率: ',STRCAT(STRCAT(STRCAT(ROEA2017,近3年平均3),近5年平均3),近10年平均3));

DRAWTEXT_FIX(ISLASTBAR,0.00,0.36,0,净资产增长率),COLOR0000FF;

{净利润增长率}

RO2007:=STRCAT(STRCAT('RO2007: ',CON2STR(FINONE(184,2007,1231),2)),'%');

RO2008:=STRCAT(STRCAT('RO2008: ',CON2STR(FINONE(184,2008,1231),2)),'%');

RO2009:=STRCAT(STRCAT('RO2009: ',CON2STR(FINONE(184,2009,1231),2)),'%');

RO2010:=STRCAT(STRCAT('RO2010: ',CON2STR(FINONE(184,2010,1231),2)),'%');

RO2011:=STRCAT(STRCAT('RO2011: ',CON2STR(FINONE(184,2011,1231),2)),'%');

RO2012:=STRCAT(STRCAT('RO2012: ',CON2STR(FINONE(184,2012,1231),2)),'%');

RO2013:=STRCAT(STRCAT('RO2013: ',CON2STR(FINONE(184,2013,1231),2)),'%');

RO2014:=STRCAT(STRCAT('RO2014: ',CON2STR(FINONE(184,2014,1231),2)),'%');

RO2015:=STRCAT(STRCAT('RO2015: ',CON2STR(FINONE(184,2015,1231),2)),'%');

RO2016:=STRCAT(STRCAT('RO2016: ',CON2STR(FINONE(184,2016,1231),2)),'%');

RO2017:=STRCAT(STRCAT('RO2017: ',CON2STR(FINONE(184,2017,1231),2)),'%');

W31:=(FINONE(184,2017,1231)+FINONE(184,2016,1231)+FINONE(184,2015,1231))/3;

W51:=(FINONE(184,2017,1231)+FINONE(184,2016,1231)+FINONE(184,2015,1231)+FINONE(184,2014,1231)+FINONE(184,2013,1231))/5;

W101:=(FINONE(184,2017,1231)+FINONE(184,2016,1231)+FINONE(184,2015,1231)+FINONE(184,2014,1231)+FINONE(184,2013,1231)+FINONE(184,2012,1231)+FINONE(184,2011,1231)+FINONE(184,2010,1231)+FINONE(184,2009,1231)+FINONE(184,2008,1231))/10;

近3年平均1:=STRCAT(STRCAT(' 近3年平均1: ',CON2STR(W31,2)),'%');

近5年平均1:=STRCAT(STRCAT(' 近5年平均1: ',CON2STR(W51,2)),'%');

近10年平均1:=STRCAT(STRCAT(' 近10年平均1: ',CON2STR(W101,2)),'%');

净利润增长率:=STRCAT('净利润增长率: ',STRCAT(STRCAT(STRCAT(RO2017,近3年平均1),近5年平均1),近10年平均1));

DRAWTEXT_FIX(ISLASTBAR,0.00,0.40,0,净利润增长率),COLOR0000FF;