分享

价值选股副图指标 源码 通达信 贴图

 yzy666 2020-04-30
 {公式名称:熟年网采价值}

{显示小数固定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;


价值选股副图指标 源码 通达信 贴图

       

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约