苍狼MACD 源码

流行云

5 s6 y, [0 ^- g% Z6 h

或许对某些同志会有帮助，继续贴上源码  

+ B8 @% [9 g! k4 J
- s' c3 q  Z. ~  r# m{苍狼MACD}
INPUT:N1(3,1,100),N2(10,1,100),N3(10,1,100),N4(20,1,100),M(9,1,100);
5 h# H$ S& u; m; u4 d6 M) [{短波}
短波EMA(C,N1)-EMA(C,N2))*1000,LINETHICK0,COLORRED;
( ]; s3 }; Y# D9 C' O* ?8 O& d7 z3 l短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
MACD:=2*(短波-短均线);
& Y5 i( q' M7 V" }/ P{中波}
中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
& D* w, G$ K# Q中均线:EMA(中波,M),COLORBLUE;
* G2 w2 r# Z9 KMACD2:2*(中波-中均线),LINETHICK1;
: b; P9 f9 v" f2 @8 P& YSTICKLINE(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;
' X* T% R3 ~8 UPARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
* n5 q& i7 C# X3 h  f2 L, A6 x$ b7 uPARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
{周金叉,死叉}
AA:="MACD.DIFF#WEEK";
BB:="MACD.DEA#WEEK";
( }1 L4 Q' D& F1 h$ MDRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
% s* V6 p0 [& b; p( v6 d5 w8 A3 tDRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;
, N5 f/ ?- p# o% M{月金叉,死叉}
CC:="MACD.DIFF#MONTH";
DD:="MACD.DEA#MONTH";
DRAWTEXT(CROSS(CC,DD),0,'●月金叉'),ALIGN5,COLORRED;
DRAWTEXT(CROSS(DD,CC),0,'○月死叉'),ALIGN4,COLORBLUE;
{选股}
EE:=CROSS(中波,中均线) AND MACD2>REF(MACD2,1) AND 短波>=REF(短波,1) AND 中均线>=REF(中均线,1);
2 ~, A/ Z3 [! {( I$ u4 R) u& i5 A出来:FILTER(EE,10);
, I6 E/ Z- {/ X2 A7 z: fDRAWICON(出来,中均线,1);

' A+ S9 M" U; d* h& Z7 N
/ a% u7 W* ~5 l+ H

axin302

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

流行云

$ u; o1 S2 |9 f3 C

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

5 [% z2 p( F8 L0 V

" I* [' D$ A. w
  先加上均线，对应着，背离指标再找找    30分钟级别。。  60分钟级别
' T, ?8 c: Q) r* _/ s. `0 x8 D2 w/ f+ r

axin302

真高手！