软件名称:[B]自用叠加在主图的基本面公式,(源码,通达信,贴图)[/B]
软件类型:国产软件
运行环境:Win9X/Win2000/WinXP/Win2003/Win7/
软件语言:简体中文
授权方式:免费版
软件大小:5.00 KB
官方主页:Home Page
更新时间:2016-05-05 02:00:23
软件简介:
说明,
第一句增加NOFRAME函数可以变成无框,DRAWRECTREL(0,0,378,348,RGB(28,26,28))NOFRAME;
删除第一句可以去除背景框,
修改RGB参数可以改变背景框颜色,
以下源码
{-----------------------------------------------------------------------------------------------------}
{-------------------------------------------------基本面----------------------------------------------}
{距形}
DRAWRECTREL(0,0,378,348,RGB(0,32,64));
{基本资料}
品种类型:=FINANCE(3);
所属板块:=HYBLOCK;
上市天数:=FINANCE(42);
股总市值:=ROUND(FINANCE(41)/100000000);
流通市值:=ROUND(FINANCE(40)/100000000);
股东人数:=FINANCE(8);
人均持股:=ROUND(FINANCE(7)/FINANCE(8));
{}
DRAWTEXT_FIX(1,0.008,0.01,0,'基本资料:'),COLORLIBLUE;
DRAWTEXT_FIX(1,0.008,0.05,0,'品种类型:'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.008,0.09,0,'行业板块:'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.008,0.13,0,'上市天数:'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.008,0.17,0,'股东人数:'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.008,0.21,0,'人均持股:'),COLORLIGREEN;
{}
DRAWTEXT_FIX(品种类型=1,0.055,0.05,0,'沪 深 A 股'),COLORYELLOW;
DRAWTEXT_FIX(品种类型=2,0.055,0.05,0,' 中 小 板'),COLORYELLOW;
DRAWTEXT_FIX(品种类型=3,0.055,0.05,0,' 创 业 板'),COLORYELLOW;
DRAWTEXT_FIX(1,0.055,0.09,0,HYBLOCK),COLORYELLOW;{行业板块}
{数值}
DRAWNUMBER_FIX(1,0.050,0.13,0,上市天数),COLORCYAN;
DRAWNUMBER_FIX(1,0.050,0.17,0,股东人数),COLORCYAN;
DRAWNUMBER_FIX(1,0.050,0.21,0,人均持股),COLORCYAN;
{单位}
DRAWTEXT_FIX(1,0.08,0.13,0,'天'),COLORWHITE;
DRAWTEXT_FIX(1,0.08,0.17,0,'人'),COLORWHITE;
DRAWTEXT_FIX(1,0.08,0.21,0,'股'),COLORWHITE;
{所属板块}
DRAWTEXT_FIX(1,0.008,0.25,0,'地区板块:')COLORLIGREEN;
DRAWTEXT_FIX(1,0.048,0.25,0,DYBLOCK)COLORCYAN;
DRAWTEXT_FIX(1,0.095,0.25,0,'概念板块:')COLORLIGREEN;
DRAWTEXT_FIX(1,0.135,0.25,0,GNBLOCK)COLORCYAN;
DRAWTEXT_FIX(1,0.008,0.29,0,'风格板块:')COLORLIGREEN;
DRAWTEXT_FIX(1,0.048,0.29,0,FGBLOCK)COLORCYAN;
{财务(1)}
净资收益率:=(FINANCE(33)/FINANCE(34)*100);
主营利润率:=(FINANCE(23)/FINANCE(20)*100);
现金负债比:=(FINANCE(25)/FINANCE(15));
主营收入同比%:=FINANCE(44);{主营收入同比增长率}
净利润同比%:=FINANCE(43);{净利润同比增长率}
{}
DRAWTEXT_FIX(1,0.105,0.01,0,'财务资料(1):'),COLORLIBLUE;
DRAWTEXT_FIX(1,0.105,0.05,0,'净资产收益率:'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.105,0.09,0,'主营业务利润率:'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.105,0.13,0,'现金流动负债比:'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.105,0.17,0,'主营收入同比%:'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.105,0.21,0,'净利润同比%:'),COLORLIGREEN;
{}
DRAWNUMBER_FIX(1,0.171,0.05,0,净资收益率),COLORCYAN;
DRAWNUMBER_FIX(1,0.171,0.09,0,主营利润率),COLORCYAN;
DRAWNUMBER_FIX(1,0.171,0.13,0,现金负债比),COLORCYAN;
DRAWNUMBER_FIX(1,0.171,0.17,0,主营收入同比%),COLORCYAN;
DRAWNUMBER_FIX(1,0.171,0.21,0,净利润同比%),COLORCYAN;
{财务(2)}
每股收益:=CONST(FINANCE(38));{近期}{每股税后利润}
每股收益年:=CONST(FINANCE(33));
每股净资产:=CONST(FINANCE(34));
每股现金流:=CONST((FINANCE(25)/FINANCE(1)));
每股未分配:=CONST(FINANCE(32));
每股公积金:=CONST(FINANCE(18));
{}
DRAWTEXT_FIX(1,0.210,0.01,0,'财务资料(2):'),COLORLIBLUE;
DRAWTEXT_FIX(1,0.210,0.05,0,'每股收益(近):'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.210,0.09,0,'每股收益年:'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.210,0.13,0,'每股净资产:'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.210,0.17,0,'每股未分配:'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.210,0.21,0,'每股公积金:'),COLORLIGREEN;
{}
DRAWNUMBER_FIX(1,0.281,0.05,1,每股收益),COLORCYAN;
DRAWNUMBER_FIX(1,0.281,0.09,1,每股收益年),COLORCYAN;
DRAWNUMBER_FIX(1,0.281,0.13,1,每股净资产),COLORCYAN;
DRAWNUMBER_FIX(1,0.281,0.17,1,每股未分配),COLORCYAN;
DRAWNUMBER_FIX(1,0.281,0.21,1,每股公积金),COLORCYAN;
{}
{财务(3)}
市盈率:=DYNAINFO(39);
市销率:=CONST(FINANCE(1)*DYNAINFO(7)/FINANCE(20));
市净率:=CONST(DYNAINFO(7) / FINANCE(34));
毛利率:=((FINANCE(20)-FINANCE(21))/FINANCE(20)*100);
净利润率:=CONST(FINANCE(30)/FINANCE(20));
{}
DRAWTEXT_FIX(1,0.300,0.01,0,'财务资料(3):'),COLORLIBLUE;
DRAWTEXT_FIX(1,0.300,0.05,0,'市盈率:'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.300,0.09,0,'市销率:'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.300,0.13,0,'市净率:'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.300,0.17,0,'毛利率:'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.300,0.21,0,'净利润率:'),COLORLIGREEN;
{}
DRAWNUMBER_FIX(1,0.361,0.05,1,市盈率),COLORCYAN;
DRAWNUMBER_FIX(1,0.361,0.09,1,市销率),COLORCYAN;
DRAWNUMBER_FIX(1,0.361,0.13,1,市净率),COLORCYAN;
DRAWNUMBER_FIX(1,0.361,0.17,1,毛利率),COLORCYAN;
DRAWNUMBER_FIX(1,0.361,0.21,1,净利润率),COLORCYAN;
{-----------------------------------------------------------------------------------------------------}
{-----------------------------------------------------------------------------------------------------};
[url=http://www.70822.com/soft/sort013/sort05/down-97801.html]自用叠加在主图的基本面公式,(源码,通达信,贴图)[/url]