苍狼MACD 源码

流行云

或许对某些同志会有帮助，继续贴上源码  
- N( h; M7 |4 v3 B

; p0 ^5 M/ ^0 B# H8 @) e{苍狼MACD}
INPUT:N1(3,1,100),N2(10,1,100),N3(10,1,100),N4(20,1,100),M(9,1,100);
4 i5 s- P: U) L  f- B" W4 C7 W/ _{短波}
短波EMA(C,N1)-EMA(C,N2))*1000,LINETHICK0,COLORRED;
% D" f# z6 G$ Y3 b; M短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
, @9 U, b( v, s0 P) t* X8 WMACD:=2*(短波-短均线);
0 d9 G: \+ \! B! h{中波}
中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
' s7 J# Y' n' `( i! A0 b3 h: h3 |: X! w中均线:EMA(中波,M),COLORBLUE;
: B; Q, O7 c: g% aMACD2:2*(中波-中均线),LINETHICK1;
STICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;
STICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;
6 B5 G, u& S  j{绘图}
FILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;
" _5 Q. x* F5 |+ s8 _, K3 M! G7 b8 vFILLRGN(中波<中均线,中波,中均线),COLORBLUE;
# @; P. N$ X$ a+ w( ^1 f2 ]( `{FILLRGN(短波>=短均线,短波,短均线),COLORRED;
FILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
. O$ q0 E: Q# u+ @7 c$ F短均线,LINETHICK2,COLORCYAN;
9 F. k6 J+ V% }5 t2 pPARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
: v# Q4 x! d' o6 S6 N0 O( f: tPARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
{周金叉,死叉}
AA:="MACD.DIFF#WEEK";
BB:="MACD.DEA#WEEK";
DRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
DRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;
{月金叉,死叉}
CC:="MACD.DIFF#MONTH";
6 \, @* [- B- x- A9 DDD:="MACD.DEA#MONTH";
; {& U/ _  S. ], _DRAWTEXT(CROSS(CC,DD),0,'●月金叉'),ALIGN5,COLORRED;
: B4 @' m) g& @3 |DRAWTEXT(CROSS(DD,CC),0,'○月死叉'),ALIGN4,COLORBLUE;
{选股}
4 J& _; \0 s' e* I" G- |2 @EE:=CROSS(中波,中均线) AND MACD2>REF(MACD2,1) AND 短波>=REF(短波,1) AND 中均线>=REF(中均线,1);
出来:FILTER(EE,10);
DRAWICON(出来,中均线,1);
# F4 [* v/ P# e$ I' E
$ N' e1 J- y6 k  C

axin302

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

流行云

+ t, a- e5 o8 ]* H0 D+ `

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

! d3 V9 t3 U8 H$ h1 m/ x, k* `
2 w' }3 g; r& ^$ k: V( P0 T

- x3 t7 v1 N  t  Q2 J( M8 c  先加上均线，对应着，背离指标再找找    30分钟级别。。  60分钟级别
- j2 \6 \- P, t) [, L' v

axin302

真高手！