软件名称：[B]市场全景[/B]
软件类型：国产软件
运行环境：Win9X/2000/XP/2003/
软件语言：简体中文
授权方式：解密版
软件大小：30.0 KB
官方主页：Home Page
更新时间：2008-10-09 05:48:27
软件简介:

》》 下载此文件

这个指标需要横向统计数据支持，把横向统计数据导入后，按下面的图进行设置：
 

指标源码：
QQ:=STKCOUNT('A股板块');
AA:=ESTDATA(15);A:=ESTDATA(16);
BB:=ESTDATA(20);B:=ESTDATA(17);
日涨跌:(C/REF(C,1)-1)*100,PRECISION2,LINETHICK0;
周涨跌:(C/ref(C,BARSLAST(WEEKDAY<ref(WEEKDAY,1))+1)-1)*100,PRECISION2,LINETHICK0;
月涨跌:(C/REF(C,COUNT(MONTH,DAY))-1)*100,PRECISION2,LINETHICK0;
STICKLINE(A,0,a,8,1),COLORRED;
STICKLINE(B,0,b,6,0),COLORAA8800;
E:=QQ-(A+B);
F:=A-B;差:ma(sum(F,5),5)/3,COLOR0088FF;
势:wma(差,5),COLOR00EE00;
DRAWTEXTEX(C,1,20,150,'上涨家数:'+NUMTOSTR(A,0)),COLOR00FFFF;
DRAWTEXTEX(C,1,160,150,' 家 '),COLOR00FFFF;
DRAWTEXTEX(C,1,200,150, ' 占A股总数:'+NUMTOSTR(A/QQ*100,2)+' %'),COLOR00FFFF;
DRAWTEXTEX(C,1,20,300,'下跌家数:'+NUMTOSTR(B,0)),COLOR00FF00;
DRAWTEXTEX(C,1,160,300,' 家 '),COLOR00FF00;
DRAWTEXTEX(C,1,200,300, ' 占A股总数:'+NUMTOSTR(B/QQ*100,2)+' %'),COLOR00FF00;
DRAWTEXTEX(C,1,20,450,'涨停家数:'+NUMTOSTR(AA,0)),COLOR00FFFF;
DRAWTEXTEX(C,1,160,450,' 家 '),COLOR00FFFF;
DRAWTEXTEX(C,1,200,450, ' 占A股总数:'+NUMTOSTR(AA/QQ*100,2)+' %'),COLOR00FFFF;
DRAWTEXTEX(C,1,20,600,'跌停家数:'+NUMTOSTR(BB,0)),COLORFFDD00;
DRAWTEXTEX(C,1,160,600,' 家 '),COLORFFDD00;
DRAWTEXTEX(C,1,200,600, ' 占A股总数:'+NUMTOSTR(BB/QQ*100,2)+' %'),COLORFFDD00;
DRAWTEXTEX(C,1,20,750,'平--停盘:'+NUMTOSTR(E,0)),COLORFFDDDD;
DRAWTEXTEX(C,1,160,750,' 家 '),COLORFFDDDD;
DRAWTEXTEX(C,1,200,750, ' 占A股总数:'+NUMTOSTR(E/QQ*100,2)+' %'),COLORFFDDDD;
DRAWTEXTEX(C,1,20,0,'A-股总数:'+NUMTOSTR(QQ,0)),COLORFFDDDD;
DRAWTEXTEX(C,1,160,0,' 家 '),COLORFFDDDD;

作者：一发千钧

[url=http://www.70822.com/soft/sort013/sort02/down-2479.html]市场全景[/url]