软件名称：[B]无名 通达信 源码 副图 附图[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：3.00 KB
官方主页：Home Page
更新时间：2015-01-24 01:45:53
软件简介:

说明；阿朱999的求助贴，源码如下，如果你愿意自己改；就不下载了：
FILLRGN(动能B,动能A,动能B<动能A,rgb(180,50,0),动能B>动能A,rgb(0,50,180)),layer5;
改为：DRAWBAND(动能B<动能A,RGB(180,50,0),动能B>动能A,RGB(0,50,180));
老朽按自己的方式修改为通达信指标；如图、……嘻嘻、喜欢就下载。

原贴(请老师将大智慧的综合乖离指标修改为通达信指标)
指标原码：
DIFF:=EMA(CLOSE,3)-EMA(CLOSE,8);
DEA:=EMA(DIFF,5);
MACD:=2*(DIFF-DEA);
A1:=EMA(DIFF,5)*100;
A2:((EMA(CLOSE,3)-EMA(CLOSE,8)))*100,LINETHICK0;
A3:=IF(A2>0,A2,50);
A4:=IF(A2<0,A2,50);
动能A:=A2;
动能B:=A1;
FILLRGN(动能B,动能A,动能B<动能A,rgb(180,50,0),动能B>动能A,rgb(0,50,180)),layer5;
STICKLINE(A2>0 and A2>=REF(A2,1),A2,0,6,0),Color0000F2;
STICKLINE(A2>0 and A2<REF(A2,1),A2,0,6,1),Color0000F2;
STICKLINE(A2<0 and A2<REF(A2,1),A2,0,6,0),Color008000;
STICKLINE(A2<0 and A2>=REF(A2,1),A2,0,6,1),Color008000;
VAR2:=(CLOSE-LLV(LOW,26))/(HHV(HIGH,26)-LLV(LOW,26))*100;
VAR3:=SMA(SMA(VAR2,3,1),3,1);
VAR4:=EMA(VAR3,5);
AA:=VOL>=REF(V,1)*1.91 AND C>REF(C,1)*1.01;
BB:=EMA(100*(C-LLV(LOW,34))/(HHV(H,34)-LLV(LOW,34)),3);
AA1:=STICKLINE(动能A<动能B,0,-3,4,0);
BB1:=STICKLINE(动能A>动能B,0,3,4,0);
持币:AA1,ColorFF00FF;
持股:BB1,COLORRED;
底部:STICKLINE(CROSS(BB,9),0,10,4,0),ColorFF00FF;
STICKLINE(CROSS(BB,9),10,20,4,0),COLOR00FFFF;
STICKLINE(CROSS(BB,9),20,30,4,0),COLORRED;
DRAWTEXT(CROSS(BB,9),30,'底部'),COLOR00FFFF;
BIAS1:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
BIAS2:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;
BIAS3:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
BIAS:=(BIAS1+2*BIAS2+3*BIAS3)/6;
综合乖离:MA(BIAS,3),COLORFFFF00,LINETHICK0;
BIAS底A:IF(综合乖离<-18,12,0),ColorFF00FF,LINETHICK2;
BIAS底B:IF(综合乖离<-12,10,0), COLOR0000CC,LINETHICK2;
BIAS底C:IF(综合乖离<-6,8,0),COLORFFFF00,LINETHICK2;
BIAS底D:IF(综合乖离<0,6,0),COLOR00FFFF,LINETHICK2;
 

-----------------------------------------------------------------------------------------

DIFF:=EMA(CLOSE,3)-EMA(CLOSE,8);
DEA:=EMA(DIFF,5);
MACD:=2*(DIFF-DEA);
A1:=EMA(DIFF,5)*100;
A2:=((EMA(CLOSE,3)-EMA(CLOSE,8)))*100;
动能A:=A2;
动能B:=A1;
DRAWBAND(动能B<动能A,RGB(180,50,0),动能B>动能A,RGB(0,50,180));
STICKLINE(A2>0 AND A2>=REF(A2,1),A2,0,3,0),COLOR0000F2;
STICKLINE(A2>0 AND A2<REF(A2,1),A2,0,3,1),COLOR0000F2;
STICKLINE(A2<0 AND A2<REF(A2,1),A2,0,3,0),COLOR008000;
STICKLINE(A2<0 AND A2>=REF(A2,1),A2,0,3,1),COLOR008000;
持币:动能A<动能B,COLORFFFFFF;
持股:动能A>动能B,COLORRED;
底部:STICKLINE(CROSS(BB,9),0,10,3,0),COLORFF00FF;
STICKLINE(CROSS(BB,9),10,20,3,0),COLOR00FFFF;
STICKLINE(CROSS(BB,9),20,30,3,0),COLORRED;
DRAWICON(底部,1,28);
DRAWTEXT(底部,-20,'底部'),COLOR00FFFF;
 

UploadPic/2015-1/201512320233050324.png

[url=http://www.70822.com/soft/sort013/sort05/down-80700.html]无名 通达信 源码 副图 附图[/url]