软件名称：[B]控盘指标(副图及选股源码)[/B]
软件类型：国产软件
运行环境：Win2000/WinXP/Win2003/WinVista
软件语言：简体中文
授权方式：共享软件
软件大小：4.00 KB
官方主页：Home Page
更新时间：2010-06-27 09:29:17
软件简介:

控盘指标----(副图及选股源码)

vv:=XMA(XMA((CLOSE*2+LOW-OPEN-HIGH)/4,2),2);
AA:=EMA(vv,11)-EMA(vv,22);
CC:=EMA(AA,5);
S: (-100)*(AA-CC)*100,COLOR00FF00,LINETHICK5;
X: 100*(AA-CC)*100,COLOR0000FF,LINETHICK5;
0;
IF(X<=REF(X,1),X,DRAWNULL),COLOR00FFFF,LINETHICK5;
DRAWTEXT(CROSS(X,REF(X,1)),X,'买'),COLOR00FFFF;
DRAWTEXT(CROSS(REF(X,1),X),X,'卖'),COLOR00FF00;
{主力控盘A}
VAR2:=(((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100);
VAR3:=(((CLOSE - MA(CLOSE,12)) / MA(CLOSE,12)) * 100);
VAR4:=(((CLOSE - MA(CLOSE,24)) / MA(CLOSE,24)) * 100);
VAR5:=(((VAR2 + (2 * VAR3)) + (3 * VAR4)) / 6);
VAR6:=MA(VAR5,3);
开始控盘:=STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),3.5,0),COLOR00AAFF;
STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),3.5,0),COLOR0044FF;
STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),2.5,0),COLOR0088FF;
STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),3,0),COLOR00AAFF;
VAR1:=EMA(EMA(CLOSE,3),1);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
STICKLINE(控盘<0,控盘,0,3.5,0),COLORFFAA00;
STICKLINE(控盘<0,控盘,0,3.5.2,0),COLORFF4400;
STICKLINE(控盘<0,控盘,0,2.5,0),COLORFF8800;
STICKLINE(控盘<0,控盘,0,0,0),COLORFFAA00;
主力出货:0,COLORFFAA00;
STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,3.5,0),COLOR000088;
STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,2.5,0),COLOR0000AA;
STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,1.5,0),COLOR0000CC;
STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,1,0),COLOR0000EE;
主力吸货:0,COLOR0000FF;
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,3.5,0),COLOR008800;
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,2.5,0),COLOR00AA00;
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,1.5,0),COLOR00CC00;
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,1,0),COLOR00EE00;
STICKLINE(DDX<0,0,DDX,3.5,0),COLOR008800;
STICKLINE(DDX<0,0,DDX,2.5,0),COLOR00AA00;
STICKLINE(DDX<0,0,DDX,1.5,0),COLOR00CC00;
STICKLINE(DDX<0,0,DDX,1,0),COLOR00EE00;
洗盘:0,COLOR00FF00;
吸货:0,COLORYELLOW;
DRAWTEXT(CROSS(控盘,0),0-3,'追'),COLORFF00FF;
DRAWTEXT(CROSS(0,控盘),0-0,'卖'),COLORGREEN;


{选股指标}
A:=XMA(XMA((CLOSE*2+LOW-OPEN-HIGH)/4,2),2);
B:=EMA(A,11)-EMA(A,22);
D:=EMA(B,5);
W:=100*(B-D)*100;
VAR1:=EMA(EMA(CLOSE,3),1);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
AAA:=CROSS(控盘,0);
XG:CROSS(W,REF(W,1)) AND CROSS(控盘,0);

 

[url=http://www.70822.com/soft/sort013/sort05/down-21990.html]控盘指标(副图及选股源码)[/url]