当前位置:分析家公式网 → 股票公式 → 通达信公式 → 一键转帖:价值选股副图(通达信公式 副图 源码 测试图)
软件名称:[B]价值选股副图(通达信公式 副图 源码 测试图)[/B]
软件类型:国产软件
运行环境:Win9X/Win2000/WinXP/Win2003/Win7/
软件语言:简体中文
授权方式:免费版
软件大小:4.00 KB
官方主页:Home Page
更新时间:2020-04-30 10:06:50
软件简介:
{价值选股副图}
{公式名称:熟年网采价值}
{显示小数固定2位}
{画个大框}
DRAWRECTREL(0,0,999,980,0);
{画第一、二个表格}
DRAWRECTREL(50,1,250,200,0);
DRAWRECTREL(50,1,250,980,0);
DRAWRECTREL(50,1,90,980,0);
DRAWRECTREL(0,1,450,980,0);
{画第三个格}
DRAWRECTREL(0,1,500,980,0);
DRAWRECTREL(0,1,700,980,0);
DRAWTEXT_FIX(1,0.015,0.2,0,'成'),COLORRED;
DRAWTEXT_FIX(1,0.015,0.4,0,'长'),COLORRED;
DRAWTEXT_FIX(1,0.015,0.6,0,'性'),COLORRED;
DRAWTEXT_FIX(1,0.465,0.15,0,'财'),COLORRED;
DRAWTEXT_FIX(1,0.465,0.35,0,'务'),COLORRED;
DRAWTEXT_FIX(1,0.465,0.55,0,'风'),COLORRED;
DRAWTEXT_FIX(1,0.465,0.75,0,'险'),COLORRED;
{营收}
YS20181231:=FINONE(74,2018,1231)/100000000;
YS20171231:=FINONE(74,2017,1231)/100000000;
YS20161231:=FINONE(74,2016,1231)/100000000;
YS20151231:=FINONE(74,2015,1231)/100000000;
DRAWTEXT_FIX(1,0.05+0,0.05,0,'年度'),COLOR00FF80;
DRAWTEXT_FIX(1,0.05+0,0.25,0,'2018'),COLOR00FF80;
DRAWTEXT_FIX(1,0.05+0,0.42,0,'2017'),COLOR00FF80;
DRAWTEXT_FIX(1,0.05+0,0.59,0,'2016'),COLOR00FF80;
DRAWTEXT_FIX(1,0.05+0,0.76,0,'2015'),COLOR00FF80;
DRAWTEXT_FIX(1,0.05+0.05,0.05,0,'营收(亿元):'),COLORWHITE;
DRAWNUMBER_FIX(1,0.05+0.09,0.25,1,YS20181231),COLORWHITE;
DRAWNUMBER_FIX(1,0.05+0.09,0.42,1,YS20171231),COLORWHITE;
DRAWNUMBER_FIX(1,0.05+0.09,0.59,1,YS20161231),COLORWHITE;
DRAWNUMBER_FIX(1,0.05+0.09,0.76,1,YS20151231),COLORWHITE;
{毛利率}
DRAWTEXT_FIX(1,0.05+0.14,0.05,0,'毛利率%:'),COLORYELLOW;
DRAWNUMBER_FIX(1,0.05+0.145,0.25,0,FINONE(202,2018,1231)),COLORYELLOW;
DRAWNUMBER_FIX(1,0.05+0.145,0.42,0,FINONE(202,2017,1231)),COLORYELLOW;
DRAWNUMBER_FIX(1,0.05+0.145,0.59,0,FINONE(202,2016,1231)),COLORYELLOW;
DRAWNUMBER_FIX(1,0.05+0.145,0.76,0,FINONE(202,2015,1231)),COLORYELLOW;
净资产收益率:=FINANCE(30)/FINANCE(19),NODRAW;
DRAWTEXT_FIX(1,-0.04+0.3,0.4,0,'净资产收益率:'),COLORFF00FF;
DRAWNUMBER_FIX(1,-0.04+0.47,0.4,1,净资产收益率),COLORYELLOW;
利润TTM:=FINVALUE(276);
市盈率TTM:IF(FINVALUE(238)*100*REF(C,1)/利润TTM>=0,FINVALUE(238)*100*REF(C,1)/利润TTM/100,0),NODRAW;
DRAWTEXT_FIX(1,-0.04+0.3,0.6,0,'今日市盈率TTM:'),COLORFF00FF;
DRAWNUMBER_FIX(1,-0.04+0.47,0.6,1,CONST(市盈率TTM)),COLORYELLOW;
今日市盈率:=CONST(市盈率TTM),NODRAW;
负债率:=FINANCE(9),NODRAW;
总现金流亿:=FINANCE(26)/100000000,NODRAW;
经营现金流亿:=FINANCE(25)/100000000,NODRAW;
现金流通市值比:=FINANCE(26)/FINANCE(40)*100,NODRAW;{现金流占流通市值的比率};
每股经营现金流:=FINANCE(25)/FINANCE(1),NODRAW;
商誉数值:=FINVALUE(35)/100000000;{亿}
净资产:=FINANCE(19)/100000000,NODRAW;{亿}
商誉雷区:商誉数值/净资产*100,COLORWHITE,NODRAW;{大于30为高风险,低于30为低风险}
AD1:=FINANCE(42);
AD2:=DATETODAY(CONST(DATE));
AD3:=AD2-AD1;
XDATE:=DAYTODATE(AD3)+19000000;
上市日期:=STRCAT('',CON2STR(XDATE,0));
DRAWTEXT_FIX(1,0.52,0.15,0,'负债率%:'),COLORFF00FF;
DRAWTEXT_FIX(1,0.52,0.35,0,'总现金流(亿):'),COLORFF00FF;
DRAWTEXT_FIX(1,0.52,0.55,0,'经营现金流(亿):'),COLORFF00FF;
DRAWTEXT_FIX(1,0.52,0.75,0,'商誉净资产比:'),COLORFF00FF;
DRAWNUMBER_FIX(1,0.67,0.15,1,负债率),COLORYELLOW;
DRAWNUMBER_FIX(1,0.67,0.35,1,总现金流亿),COLORYELLOW;
DRAWNUMBER_FIX(1,0.67,0.55,1,经营现金流亿),COLORYELLOW;
DRAWNUMBER_FIX(1,0.67,0.75,1,商誉雷区),COLORYELLOW;
DRAWTEXT_FIX(1,0.72,0.35,0,'上市日期:'),COLORFF00FF;
DRAWTEXT_FIX(ISLASTBAR,0.82,0.35,0,上市日期),COLORYELLOW;
最新财报:=CON2STR(FINONE(0,0,0),0),NODRAW;
DRAWTEXT_FIX(1,0.72,0.55,0,'最新财报:'),COLORFF00FF;
DRAWTEXT_FIX(ISLASTBAR,0.831,0.55,0,最新财报),COLORYELLOW;
[url=http://www.70822.com/soft/sort013/sort05/down-147282.html]价值选股副图(通达信公式 副图 源码 测试图)[/url]