苍狼MACD 源码

流行云

0 Q" t& V, S& @! S
或许对某些同志会有帮助，继续贴上源码  

0 e8 @  z8 t( ~- B4 V$ L) o
5 m# u5 p! K) r5 d6 ?{苍狼MACD}
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;
短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
MACD:=2*(短波-短均线);
7 Q, A: [: \% O{中波}
- l$ N* E  k' {中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
9 U" p6 g# o. F$ h) m/ [( y0 K中均线:EMA(中波,M),COLORBLUE;
0 H1 Q6 x5 ~8 W, C+ J( P% [3 lMACD2:2*(中波-中均线),LINETHICK1;
STICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;
STICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;
1 D7 h9 ]$ J, {3 n& S7 O$ i{绘图}
FILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;
FILLRGN(中波<中均线,中波,中均线),COLORBLUE;
9 ^. k6 W+ w+ h6 P8 p{FILLRGN(短波>=短均线,短波,短均线),COLORRED;
% e- k1 ^% c4 H0 S: ?, yFILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
6 I3 F2 v1 ]! M* |短均线,LINETHICK2,COLORCYAN;
PARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
PARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
7 y0 Q. `, g) h+ ?5 N  Z; a{周金叉,死叉}
% j; ]' l- Y5 oAA:="MACD.DIFF#WEEK";
: w& A* @) @* C2 d  u+ j; ~- v% ]BB:="MACD.DEA#WEEK";
DRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
DRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;
{月金叉,死叉}
; G+ j- D) o9 gCC:="MACD.DIFF#MONTH";
DD:="MACD.DEA#MONTH";
DRAWTEXT(CROSS(CC,DD),0,'●月金叉'),ALIGN5,COLORRED;
$ f1 V! J1 U! S: G) UDRAWTEXT(CROSS(DD,CC),0,'○月死叉'),ALIGN4,COLORBLUE;
{选股}
EE:=CROSS(中波,中均线) AND MACD2>REF(MACD2,1) AND 短波>=REF(短波,1) AND 中均线>=REF(中均线,1);
! M( q% u+ {: o' w2 P+ h( a出来:FILTER(EE,10);
! }% l) _& u5 _, }DRAWICON(出来,中均线,1);
$ e# m- P; b6 Q

5 h. W7 i( `$ D/ S

axin302

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

流行云

axin302 发表于 2013-6-23 10:29
; B' B9 p  b4 n9 B. o7 A% ]看起来不错，加上背离指标会更好

  先加上均线，对应着，背离指标再找找    30分钟级别。。  60分钟级别
0 N- i% V5 s$ E* H2 Y; x

axin302

真高手！