苍狼MACD 源码

流行云

4 ]; a3 v6 h' F
* U4 P: G( q, w! e+ s
或许对某些同志会有帮助，继续贴上源码  


1 X0 b1 P2 u" Z3 U{苍狼MACD}
; t: H; E6 z, ]! @INPUT:N1(3,1,100),N2(10,1,100),N3(10,1,100),N4(20,1,100),M(9,1,100);
{短波}
短波EMA(C,N1)-EMA(C,N2))*1000,LINETHICK0,COLORRED;
5 O# r8 Y8 N/ d8 G8 c短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
) a) C- z2 M) R+ aMACD:=2*(短波-短均线);
; L% s4 d& s  c* r6 x4 f{中波}
# t9 J& {1 l3 t* ]6 o1 ^" {中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
0 F  l2 b: Q! t& t中均线:EMA(中波,M),COLORBLUE;
9 l- |- [2 Z5 n, ]) D$ z" h4 [MACD2:2*(中波-中均线),LINETHICK1;
% P, a- p. V- N! _STICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;
. }2 O" }' p4 Q4 pSTICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;
1 }$ U$ R) \- ?0 v{绘图}
FILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;
FILLRGN(中波<中均线,中波,中均线),COLORBLUE;
2 x# X; p, X& F/ p5 i& M& [+ S{FILLRGN(短波>=短均线,短波,短均线),COLORRED;
FILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
短均线,LINETHICK2,COLORCYAN;
PARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
1 v/ L4 u9 y/ I* j: Z  ]8 J; d) fPARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
{周金叉,死叉}
AA:="MACD.DIFF#WEEK";
BB:="MACD.DEA#WEEK";
DRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
9 z# z6 J" e$ QDRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;
5 L8 A* U8 U8 B, W{月金叉,死叉}
- i0 n2 a2 x2 O6 _CC:="MACD.DIFF#MONTH";
) ^% {) c) _8 }DD:="MACD.DEA#MONTH";
0 f# R  n1 P' ~0 `; uDRAWTEXT(CROSS(CC,DD),0,'●月金叉'),ALIGN5,COLORRED;
7 L/ d. b' w$ {" J, Y5 n2 FDRAWTEXT(CROSS(DD,CC),0,'○月死叉'),ALIGN4,COLORBLUE;
" D" z% j4 p: b3 {3 p; p{选股}
EE:=CROSS(中波,中均线) AND MACD2>REF(MACD2,1) AND 短波>=REF(短波,1) AND 中均线>=REF(中均线,1);
' k! Z) S# b4 F' t8 k* I% M: i出来:FILTER(EE,10);
DRAWICON(出来,中均线,1);

* E# X% o: I% k9 c: N3 J
$ \2 i! {1 R. H! h" T9 Q" D8 ^

axin302

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

流行云

axin302 发表于 2013-6-23 10:29
3 ]9 H. r2 [# i! M看起来不错，加上背离指标会更好

  先加上均线，对应着，背离指标再找找    30分钟级别。。  60分钟级别
& p  @9 f+ m+ X4 ?* X2 z1 `

axin302

真高手！