苍狼MACD 源码

流行云

: [7 t; ~' L3 u; F  d0 O# b
* `8 v' v0 _% L2 q! ?- y9 G
或许对某些同志会有帮助，继续贴上源码  


- L& X8 ]- Z# c. ?% q8 O+ P/ h{苍狼MACD}
INPUT:N1(3,1,100),N2(10,1,100),N3(10,1,100),N4(20,1,100),M(9,1,100);
/ k% h+ Z$ z$ T8 H9 S{短波}
, D2 q, A& ~6 A短波EMA(C,N1)-EMA(C,N2))*1000,LINETHICK0,COLORRED;
* g5 }1 i, V$ O  k' R短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
MACD:=2*(短波-短均线);
% z1 d1 l2 A+ `; y{中波}
中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
) t8 J4 r5 _, q8 E中均线:EMA(中波,M),COLORBLUE;
1 ~, E0 G2 |* `( n  U) S# gMACD2:2*(中波-中均线),LINETHICK1;
STICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;
STICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;
{绘图}
' R, N& U# u* SFILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;
6 E- ?' [' I: ~- s( n9 [2 eFILLRGN(中波<中均线,中波,中均线),COLORBLUE;
2 G' V5 S$ F/ b{FILLRGN(短波>=短均线,短波,短均线),COLORRED;
/ i( {/ t; \& c4 d' g* ?FILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
" ?0 m* v* [" _0 z% U短均线,LINETHICK2,COLORCYAN;
2 h8 J5 ?& m$ y0 p: w# tPARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
PARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
4 V% u) V0 ~$ o* h% W4 }- R' x{周金叉,死叉}
AA:="MACD.DIFF#WEEK";
, X( p. N: L6 Z, |2 h$ yBB:="MACD.DEA#WEEK";
DRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
DRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;
{月金叉,死叉}
CC:="MACD.DIFF#MONTH";
9 v  f; J  H0 C7 zDD:="MACD.DEA#MONTH";
/ y0 c' z; d! K" `DRAWTEXT(CROSS(CC,DD),0,'●月金叉'),ALIGN5,COLORRED;
+ @; M. z8 N; ^8 b: bDRAWTEXT(CROSS(DD,CC),0,'○月死叉'),ALIGN4,COLORBLUE;
; F3 p4 _; Q. U* x; X$ X; W4 }{选股}
- Y; i. R2 g2 V+ P4 V) z+ s4 ~  ~EE:=CROSS(中波,中均线) AND MACD2>REF(MACD2,1) AND 短波>=REF(短波,1) AND 中均线>=REF(中均线,1);
出来:FILTER(EE,10);
DRAWICON(出来,中均线,1);

" X- J4 f: F" Y3 D
- s" F3 z: g6 z5 {& C* c

axin302

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

流行云

) m* T# z  G, u% z" O5 u+ u

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

3 D% k$ |8 J/ G


/ F/ n' `% B' Y3 P  ]  先加上均线，对应着，背离指标再找找    30分钟级别。。  60分钟级别

axin302

真高手！