软件名称：[B]参考大盘市盈率技术指标附源码（贴图、说明）[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：免费版
软件大小：5.00 KB
官方主页：Home Page
更新时间：2011-12-01 03:32:46
软件简介:

前两天看一位老师做的大盘市盈率源码根据媒体报道大盘市盈率数值输入一段不同的数据的指标得到启发，于是自己在原来基础上重新做了一个，究竟大盘的市盈率是多少没有真正的数值，个人觉得指标公式不会错：市盈率=股价/每股收益；所以自己做自定义数据：所有股票的平均股价和平均收益，做了大盘的市盈率附图。

源码如下：
DRAWGBKLAST(C>1,STRIP(RGB(255,150,200),RGB(255,255,255),0));
DRAWTEXTREL(400,50,'上证指数平均市盈率'),COLOR000000,LINETHICK2;
DRAWTEXTREL(350,200,'高风险区域'),COLOR2D4045;
DRAWTEXTREL(350,900,'低风险区域'),COLOR8EAD7A;
DRAWTEXTREL(0,130,'70'),COLOR2D4045;DRAWTEXTREL(0,270,'60'),COLOR2D4045;
DRAWTEXTREL(0,412,'50'),COLOR2D4045;DRAWTEXTREL(0,558,'40'),COLOR2D4045;
DRAWTEXTREL(0,700,'30'),COLOR2D4045;DRAWTEXTREL(0,840,'20'),COLOR2D4045;
DRAWTEXTREL(0,966,'10'),COLOR2D4045;DRAWTEXTREL(968,130,'6000'),COLOR2D4045;
DRAWTEXTREL(968,270,'5000'),COLOR2D4045;DRAWTEXTREL(968,412,'4000'),COLOR2D4045;
DRAWTEXTREL(968,558,'3000'),COLOR2D4045;DRAWTEXTREL(968,700,'2000'),COLOR2D4045;
DRAWTEXTREL(968,840,'1000'),COLOR2D4045;DRAWTEXTREL(968,966,'0'),COLOR2D4045;
POLYLINE(C,10),COLOR9BBECC;POLYLINE(C,20),COLOR8EAD7A,LINETHICK2;
POLYLINE(C,30),COLOR9BBECC;POLYLINE(C,40),COLOR9BBECC;
POLYLINE(C,50),COLOR798FC3,LINETHICK2;POLYLINE(C,60),COLOR9BBECC;
POLYLINE(C,70),COLOR9BBECC;
上证指数:INDEXC,COLOR8BA68C,LINETHICK0,PRECIS2;
POLYLINE(C,C/100+10),COLORff0000,LINETHICK2;
流通市值:selfdata('流通市值'),linethick0;
总市值:selfdata('总市值'),linethick0;
平均股价:selfdata('平均股价'),linethick0;
平均收益:selfdata('平均收益'),linethick0;
大盘市盈率:平均股价/平均收益,linethick1 ,color199633;
DRAWTEXTREL(50,70,'平均市盈率:   '+NUMTOSTRN(大盘市盈率,2)),COLOR199633;

 

[url=http://www.70822.com/soft/sort013/sort03/down-41554.html]参考大盘市盈率技术指标附源码（贴图、说明）[/url]