苍狼MACD 源码

流行云

或许对某些同志会有帮助，继续贴上源码  
# {/ W3 C9 e2 @0 p4 f6 U
0 z) B8 i4 Z; R
+ c6 U2 d' \9 x( x{苍狼MACD}
INPUT:N1(3,1,100),N2(10,1,100),N3(10,1,100),N4(20,1,100),M(9,1,100);
{短波}
7 G( p6 {+ B7 ^短波EMA(C,N1)-EMA(C,N2))*1000,LINETHICK0,COLORRED;
短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
1 c; ~. G1 T+ Z4 ]: K- PMACD:=2*(短波-短均线);
{中波}
中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
中均线:EMA(中波,M),COLORBLUE;
MACD2:2*(中波-中均线),LINETHICK1;
STICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;
STICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;
{绘图}
FILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;
FILLRGN(中波<中均线,中波,中均线),COLORBLUE;
{FILLRGN(短波>=短均线,短波,短均线),COLORRED;
FILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
短均线,LINETHICK2,COLORCYAN;
4 R2 s2 t7 ~: j/ R7 @/ Q  XPARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
PARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
$ k0 D: a+ t/ h9 f" ]0 p{周金叉,死叉}
AA:="MACD.DIFF#WEEK";
BB:="MACD.DEA#WEEK";
DRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
DRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;
{月金叉,死叉}
  B  ?6 R2 u% s( ^* k7 w3 `% K- q- ]+ pCC:="MACD.DIFF#MONTH";
9 ]) g( `4 g, L' h6 _9 qDD:="MACD.DEA#MONTH";
DRAWTEXT(CROSS(CC,DD),0,'●月金叉'),ALIGN5,COLORRED;
, c, Y# Z. Z: W4 C, C: V% E" nDRAWTEXT(CROSS(DD,CC),0,'○月死叉'),ALIGN4,COLORBLUE;
( I7 m8 f! I: Y8 _8 D{选股}
EE:=CROSS(中波,中均线) AND MACD2>REF(MACD2,1) AND 短波>=REF(短波,1) AND 中均线>=REF(中均线,1);
8 F* I, y4 u) h) {  x+ G出来:FILTER(EE,10);
DRAWICON(出来,中均线,1);
7 [. U# S/ v% v5 R2 u
5 e7 u  D7 i5 A8 J' K

axin302

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

流行云

0 X5 g* }! p. y( p2 P; Y% w5 y8 {, I+ J

axin302 发表于 2013-6-23 10:29
- @+ Z2 d2 Q) [看起来不错，加上背离指标会更好

- f& }" u$ v3 i' t7 |7 q6 l; N
- S2 B, l% y: l9 i
0 ~: w8 V- `) U# {5 K% b' }  先加上均线，对应着，背离指标再找找    30分钟级别。。  60分钟级别
1 D* ~3 j" J6 I0 C7 I: w) G

axin302

真高手！