苍狼MACD 源码

流行云

6 E7 F4 S3 R' W( n6 ~& W或许对某些同志会有帮助，继续贴上源码  

9 F0 H) z! c, K; t+ D3 G7 C
{苍狼MACD}
, P- e( L9 r9 \6 ?& HINPUT:N1(3,1,100),N2(10,1,100),N3(10,1,100),N4(20,1,100),M(9,1,100);
% Z: h3 Z5 ?- e; ], [& G8 [8 X0 D{短波}
* G' U  Y: M8 ^1 [, Y5 D5 i短波EMA(C,N1)-EMA(C,N2))*1000,LINETHICK0,COLORRED;
短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
2 Z) a  ^1 Z3 W! ]2 uMACD:=2*(短波-短均线);
' H; d: Z- j7 L  V  P{中波}
中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
$ Y( ?/ k8 z: F2 ^3 G8 V" D中均线:EMA(中波,M),COLORBLUE;
. j& P, F( e, o" s0 t6 ?( R: P5 wMACD2:2*(中波-中均线),LINETHICK1;
7 n# h3 i: k) t+ n- i' oSTICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;
STICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;
{绘图}
7 x$ Q' h* a& D, X. m# V7 z, v' DFILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;
& o5 q1 h' J* z1 L1 VFILLRGN(中波<中均线,中波,中均线),COLORBLUE;
{FILLRGN(短波>=短均线,短波,短均线),COLORRED;
FILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
短均线,LINETHICK2,COLORCYAN;
  Z* r1 N/ U& s' h  _PARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
PARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
; l9 m! _- ~7 \6 D5 G) P{周金叉,死叉}
AA:="MACD.DIFF#WEEK";
3 I6 Q8 t& u+ f" ?; T* A$ sBB:="MACD.DEA#WEEK";
DRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
  ]$ P6 r, c& S" R4 dDRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;
- c7 X/ X# D9 j/ ]/ `. D{月金叉,死叉}
CC:="MACD.DIFF#MONTH";
DD:="MACD.DEA#MONTH";
DRAWTEXT(CROSS(CC,DD),0,'●月金叉'),ALIGN5,COLORRED;
DRAWTEXT(CROSS(DD,CC),0,'○月死叉'),ALIGN4,COLORBLUE;
{选股}
8 R# _0 Y5 W- k+ `4 _EE:=CROSS(中波,中均线) AND MACD2>REF(MACD2,1) AND 短波>=REF(短波,1) AND 中均线>=REF(中均线,1);
: O; F4 ]; h$ v1 i6 L) k+ z4 f  r, g出来:FILTER(EE,10);
DRAWICON(出来,中均线,1);
2 w! P6 v" U! M' ^4 I, ?
" N/ n4 Z5 b- X

axin302

看起来不错，加上背离指标会更好

流行云

axin302 发表于 2013-6-23 10:29
看起来不错，加上背离指标会更好

1 V1 }: k! M, i( f, d

" ^* |" q# j, ^3 Y! F2 Z
  先加上均线，对应着，背离指标再找找    30分钟级别。。  60分钟级别

axin302

真高手！