苍狼MACD 源码

流行云

# _+ S4 Y, X' U; b

. Q! W; d  i6 W! U% s& y- ]或许对某些同志会有帮助，继续贴上源码  
: d: S7 @% F3 n6 s
" }' D3 E* T( w3 }6 T" h5 I" j) u
, h1 r, x: {1 b- q, g{苍狼MACD}
INPUT:N1(3,1,100),N2(10,1,100),N3(10,1,100),N4(20,1,100),M(9,1,100);
, \& C- u. [9 S3 L, z{短波}
短波EMA(C,N1)-EMA(C,N2))*1000,LINETHICK0,COLORRED;
: p6 @* i- i4 [+ ^短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
MACD:=2*(短波-短均线);
{中波}
% l4 G, m$ n) m中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
中均线:EMA(中波,M),COLORBLUE;
MACD2:2*(中波-中均线),LINETHICK1;
STICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;
4 R# F3 z& Z- [! X) U2 f1 `STICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;
{绘图}
FILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;
4 W" O1 Y3 M/ y" N! v. R+ m% oFILLRGN(中波<中均线,中波,中均线),COLORBLUE;
{FILLRGN(短波>=短均线,短波,短均线),COLORRED;
1 N5 u( s6 b( R% V6 S! k; \FILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
短均线,LINETHICK2,COLORCYAN;
PARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
PARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
{周金叉,死叉}
. E- P7 z% b3 c+ s. W$ w% a: RAA:="MACD.DIFF#WEEK";
% e& y6 C* O7 [* E0 fBB:="MACD.DEA#WEEK";
& J$ ]' g7 }: {" x- N5 Q4 ]DRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
5 p, g5 w& r& I- KDRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;
; u0 b: t& X+ B: _( H% n{月金叉,死叉}
CC:="MACD.DIFF#MONTH";
7 D2 ^, Q8 I  Y! T9 {DD:="MACD.DEA#MONTH";
3 u7 F! p. M7 p& XDRAWTEXT(CROSS(CC,DD),0,'●月金叉'),ALIGN5,COLORRED;
7 B/ R$ k$ G/ L+ ZDRAWTEXT(CROSS(DD,CC),0,'○月死叉'),ALIGN4,COLORBLUE;
$ H4 U* Z2 R7 c; f{选股}
! U. b4 c/ x  C; BEE:=CROSS(中波,中均线) AND MACD2>REF(MACD2,1) AND 短波>=REF(短波,1) AND 中均线>=REF(中均线,1);
4 B- Q: G) `0 v! R5 s% @1 ^出来:FILTER(EE,10);
3 k: u* o+ W2 E7 [DRAWICON(出来,中均线,1);

& f) ]7 h6 x8 S8 `+ T

axin302

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

流行云

' q3 }% O8 r7 v# N

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

+ g4 z/ O( I" s* Q; Y) r) b

' B" K/ r1 K, N7 ~
! |: n) _5 j' |/ H3 T' q  先加上均线，对应着，背离指标再找找    30分钟级别。。  60分钟级别

axin302

真高手！