通达信安全性分析指标公式源码

应付票据:=FINVALUE(43)/10000,COLORFF00FF,NODRAW;
应付帐款:=FINVALUE(44)/10000,COLORFF00FF,NODRAW;
预收帐款:=FINVALUE(45)/10000,COLORFF00FF,NODRAW;
应付预收_万:应付票据+应付帐款+预收帐款,COLORFF00FF,NODRAW;
应收票据:=FINVALUE(10)/10000,COLOR00FF00,NODRAW;
应收帐款:=FINVALUE(11)/10000,COLOR00FF00,NODRAW;
预付款项:=FINVALUE(12)/10000,COLOR00FF00,NODRAW;
应收预付_万:应收票据+应收帐款+预付款项,COLOR00FF00,NODRAW;
负债合计:=FINVALUE(63);
资产总计:=FINVALUE(40);
资产负债率:=负债合计/资产总计*100,COLORFFFF00,NODRAW;
竞争力分析:=应付预收_万-应收预付_万,NODRAW;
偿债风险较大:=资产负债率>70,COLOR0000FF,NODRAW;
偿债风险较小:=资产负债率< 40,COLOR00FF00,NODRAW;
股息率%:=FINANCE(45),COLORFF00FF,NODRAW;
股息率:=STRCAT(' 股息率 ',STRCAT(CON2STR(股息率%,2),' % '));
公司净收入:=FINANCE(30);
股东的股本:=FINANCE(1)*DYNAINFO(11);
股本收益率%:=公司净收入/股东的股本*100,COLOR00FF00,NODRAW;
每股收益:=FINVALUE(1);
市净率:=DYNAINFO(7)/FINANCE(34);
当期的净利润:=FINANCE(30);
净资产:=FINANCE(34)*FINANCE(1);
净益率:=当期的净利润/净资产*100;
净利润率:=FINANCE(30)/FINANCE(20)*100;
净利润率1:=STRCAT(' 净利润率 ',STRCAT(CON2STR(净利润率,2),' % '));
股本收益:=STRCAT(' 股本收益率 ',STRCAT(CON2STR(股本收益率%,2),' % '));
每股收益1:=STRCAT(' 每股收益 ',STRCAT(CON2STR(每股收益,3),' 元 '));
市净率1:=STRCAT(' 市净率 ',STRCAT(CON2STR(市净率,2),' 倍 '));
当期的净利润1:=STRCAT(' 当期的净利润 ',STRCAT(CON2STR(当期的净利润/10000,2),' 万元 '));
当期的净利润2:=STRCAT(' 当期的净利润 ',STRCAT(CON2STR(当期的净利润/100000000,2),' 亿元 '));
净益率1:=STRCAT(' 净益率 ',STRCAT(CON2STR(净益率,2),' % '));
资产负债率1:=STRCAT(' 资产负债率 ',STRCAT(CON2STR(FINVALUE(63)/FINVALUE(40)*100,3),' % '));
资产负债率2:=STRCAT(' 资产负债率 ',STRCAT(CON2STR(FINVALUE(63)/FINVALUE(40)*100,3),' %，危险！'));
资产负债率3:=STRCAT(' 资产负债率 ',STRCAT(CON2STR(FINVALUE(63)/FINVALUE(40)*100,3),' %，安全！'));
DRAWTEXT_FIX(1,0.07,0.10,0,资产负债率1),COLORFFFFFF;
DRAWTEXT_FIX(1 AND 资产负债率>70.000,0.07,0.10,0,资产负债率2),COLOR0000FF;
DRAWTEXT_FIX(1 AND 资产负债率< 40.000,0.07,0.10,0,资产负债率3),COLORGREEN;
DRAWTEXT_FIX(1,0.07,0.10,0,' 资产负债率 '),COLORFFFF00;
竞争力1:=STRCAT(' 市场盈利能力 ',STRCAT(CON2STR(竞争力分析,2) ,' 万元，良！ '));
竞争力2:=STRCAT(' 市场盈利能力 ',STRCAT(CON2STR(竞争力分析/10000,2),' 亿元，优！ '));
竞争力3:=STRCAT(' 市场盈利能力 ',STRCAT(CON2STR(竞争力分析,2) ,' 万元，无！ '));
竞争力4:=STRCAT(' 市场盈利能力 ',STRCAT(CON2STR(竞争力分析/10000,2),' 亿元，差！ '));
DRAWTEXT_FIX(1 AND 竞争力分析>0 AND 竞争力分析< 10000,0.33,0.10,0,竞争力1),COLOR0000FF;
DRAWTEXT_FIX(1 AND 竞争力分析>=10000,0.33,0.10,0,竞争力2),COLOR0000FF;
DRAWTEXT_FIX(1 AND 竞争力分析<=0 AND 竞争力分析> -10000,0.33,0.10,0,竞争力3),COLOR00FF00;
DRAWTEXT_FIX(1 AND 竞争力分析<= -10000,0.33,0.10,0,竞争力4),COLOR00FF00;
DRAWTEXT_FIX(1,0.33,0.10,0,' 市场盈利能力 '),COLOR00FFFF;
DRAWTEXT_FIX(1 AND 当期的净利润>0 AND 当期的净利润< 100000000,0.70,0.10,0,当期的净利润1),COLOR0000FF;
DRAWTEXT_FIX(1 AND 当期的净利润>=100000000,0.70,0.10,0,当期的净利润2),COLOR0000FF;
DRAWTEXT_FIX(1 AND 当期的净利润<= 0 AND 当期的净利润> -100000000,0.70,0.10,0,当期的净利润1),COLOR00FF00;
DRAWTEXT_FIX(1 AND 当期的净利润<= -100000000,0.70,0.10,0,当期的净利润2),COLOR00FF00;
DRAWTEXT_FIX(1,0.70,0.10,0,' 当期的净利润 '),COLORFFFF00;
目前套牢盘%:CONST(100-WINNER(CLOSE)*100),COLORFFFF00,NODRAW;
DRAWTEXT_FIX(1 AND 净利润率> 0,0.70,0.30,0,净利润率1),COLOR0000FF;
DRAWTEXT_FIX(1 AND 净利润率<=0,0.70,0.30,0,净利润率1),COLOR00FF00;
DRAWTEXT_FIX(1,0.70,0.30,0,' 净利润率 '),COLORFFFF00;
净利同比增长:=STRCAT(STRCAT(' 净利同比增长 ',CON2STR(FINANCE(43),2)),' %');
DRAWTEXT_FIX(1 AND FINANCE(43)> 0,0.70,0.50,0,净利同比增长),COLOR0000FF;
DRAWTEXT_FIX(1 AND FINANCE(43)<=0,0.70,0.50,0,净利同比增长),COLOR00FF00;
DRAWTEXT_FIX(1,0.70,0.50,0,' 净利同比增长 '),COLORFFFF00;
DRAWTEXT_FIX(1 AND 市净率> 0,0.07,0.50,0,市净率1),COLOR0000FF;
DRAWTEXT_FIX(1 AND 市净率<=0,0.07,0.50,0,市净率1),COLOR00FF00;
DRAWTEXT_FIX(1,0.07,0.50,0,' 市净率 '),COLORFFFF00;
DRAWTEXT_FIX(1 AND 净益率> 0,0.07,0.70,0,净益率1),COLOR0000FF;
DRAWTEXT_FIX(1 AND 净益率<=0,0.07,0.70,0,净益率1),COLOR00FF00;
DRAWTEXT_FIX(1,0.07,0.70,0,' 净益率 '),COLORFFFF00;
近一年净利润:=FINVALUE(276)/10000;
近一年营业收入:=FINVALUE(283);
近一年净利率%:近一年净利润/近一年营业收入*100,COLOR00FFFF,NODRAW;
DRAWTEXT_FIX(1,0.07,0.30,0,股息率),COLORFFFFFF;
DRAWTEXT_FIX(1,0.07,0.30,0,' 股息率 '),COLORFFFF00;
DRAWTEXT_FIX(1 AND 股本收益率%> 0,0.33,0.30,0,股本收益),COLOR0000FF;
DRAWTEXT_FIX(1 AND 股本收益率%<=0,0.33,0.30,0,股本收益),COLOR00FF00;
DRAWTEXT_FIX(1,0.33,0.30,0,' 股本收益率 '),COLOR00FFFF;
DRAWTEXT_FIX(1 AND 每股收益> 0,0.33,0.50,0,每股收益1),COLOR0000FF;
DRAWTEXT_FIX(1 AND 每股收益<=0,0.33,0.50,0,每股收益1),COLOR00FF00;
DRAWTEXT_FIX(1,0.33,0.50,0,' 每股收益 '),COLOR00FFFF;
主营利润率:=STRCAT(' 主体营业利润 ',STRCAT(CON2STR(FINANCE(23)/FINANCE(20)*100,2),' %　'));
利润增长率:=STRCAT(' 营业利润增长 ',STRCAT(CON2STR(FINVALUE(189),2),' %　'));
DRAWTEXT_FIX(1 AND (FINANCE(23)/FINANCE(20)*100) >0,0.33,0.70,0,主营利润率),COLOR0000FF;
DRAWTEXT_FIX(1 AND (FINANCE(23)/FINANCE(20)*100) < 0,0.33,0.70,0,主营利润率),COLOR00FF00;
DRAWTEXT_FIX(1,0.33,0.70,0,' 主体营业利润 '),COLORFF00FF;
DRAWTEXT_FIX(1 AND (FINVALUE(189))>0,0.70,0.70,0,利润增长率),COLOR0000FF;
DRAWTEXT_FIX(1 AND (FINVALUE(189))< 0,0.70,0.70,0,利润增长率),COLOR00FF00;
DRAWTEXT_FIX(1,0.70,0.70,0,' 营业利润增长 '),COLORFF00FF;
DRAWTEXT_FIX(资产负债率>70,0.18,0.90,0, '【安全分析】　 公司偿债风险较大，安全度较低，不用关注，没有操作机会！！ '),COLOR0000FF;
DRAWTEXT_FIX(资产负债率< 40,0.18,0.90,0, '【安全分析】　 公司没有偿债风险，安全度较高，有盈利能力，可以关注机会！ '),COLORGREEN;