软件名称：[B]90后原创奉献：指标全线开花和上穿均线的有效性验证【选股源码 +图】[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：免费版
软件大小：2.00 KB
官方主页：Home Page
更新时间：2012-01-15 02:27:02
软件简介:

上面的是5日上穿20线的信号，下面是全线开花的信号，互相辅证，效果不用我说了吧
全线开花：即把macd，kdj，roc，dmi的各主要信号上升趋势进行叠加，其有效性需要均线上穿的辅证，也就是我发此贴的原因
 

MA5:=MA(C,5);
MA20:=MA(C,20);
A:CROSS(MA5,MA20);

{MACD部分}
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
MACD1:=(DIF-DEA)*2;
{KDJ部分}
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
{DMI部分}
MTR:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);
HD :=HIGH-REF(HIGH,1);
LD :=REF(LOW,1)-LOW;
DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),14);
DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),14);
PDI:=DMP*100/MTR;
MDI:=DMM*100/MTR;
ADX:=EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,6);
ADXR:=EXPMEMA(ADX,6);
{趋势部分}
ROC:=100*(CLOSE-REF(CLOSE,12))/REF(CLOSE,12);
MAROC:=MA(ROC,6);
开花:ROC>MAROC  AND PDI>ADXR AND PDI>ADX AND PDI>MDI AND K>D AND DIF>DEA  AND C>REF(C,1) AND REF(H,1)>REF(C,2);

[url=http://www.70822.com/soft/sort013/sort05/down-43220.html]90后原创奉献：指标全线开花和上穿均线的有效性验证【选股源码 +图】[/url]