苍狼MACD 源码

流行云

( o  h- ?7 X6 c! I9 X9 k0 Z
$ l) P, q' \3 f3 N
或许对某些同志会有帮助，继续贴上源码  
7 H0 Y8 d8 X$ K# ]3 l
6 j/ c, ?; w1 f/ c3 a
! B5 \- @; O4 W& S5 C# W' l" H{苍狼MACD}
INPUT:N1(3,1,100),N2(10,1,100),N3(10,1,100),N4(20,1,100),M(9,1,100);
' B4 o. z2 Q1 Q5 R{短波}
短波EMA(C,N1)-EMA(C,N2))*1000,LINETHICK0,COLORRED;
' U" Z; G$ h9 b9 @3 ^短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
MACD:=2*(短波-短均线);
; t3 B2 g9 c6 T# K: }8 x% {{中波}
中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
* q2 }4 F& o; N7 y中均线:EMA(中波,M),COLORBLUE;
MACD2:2*(中波-中均线),LINETHICK1;
STICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;
STICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;
2 {7 I& K  U) S0 n/ q# ^6 E{绘图}
3 f, @+ K) S# u9 E% T0 H/ x1 jFILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;
- B' x- z5 D: D$ [5 P1 O1 P* a; eFILLRGN(中波<中均线,中波,中均线),COLORBLUE;
{FILLRGN(短波>=短均线,短波,短均线),COLORRED;
FILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
短均线,LINETHICK2,COLORCYAN;
+ V# y$ ^) s; gPARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
- a3 a7 s6 _3 B# b" a& hPARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
{周金叉,死叉}
- B6 d$ s, W$ p5 r5 w& f: WAA:="MACD.DIFF#WEEK";
) T. h4 V7 b5 g! m. E, }3 e$ XBB:="MACD.DEA#WEEK";
% {4 }2 L% p% Y& X/ vDRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
9 r0 t# P7 f+ a& a* M  vDRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;
{月金叉,死叉}
CC:="MACD.DIFF#MONTH";
" Y$ k5 b+ Y7 C! t; z9 SDD:="MACD.DEA#MONTH";
, n: s. }. B7 i. zDRAWTEXT(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);
$ O" i, X; G8 ]% ^8 I; h出来:FILTER(EE,10);
DRAWICON(出来,中均线,1);
* @9 f1 o  Q( E1 z
' }5 m. U8 K( G) |' I$ @

axin302

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

流行云

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

" T8 @$ j( Z( t) ?- B% G
  先加上均线，对应着，背离指标再找找    30分钟级别。。  60分钟级别
$ j5 i8 {* b& F+ k

axin302

真高手！