苍狼MACD 源码

流行云

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


9 e3 A1 K8 y+ |& R{苍狼MACD}
) x1 Q$ R4 j. k% p) n# d  W6 LINPUT:N1(3,1,100),N2(10,1,100),N3(10,1,100),N4(20,1,100),M(9,1,100);
{短波}
短波EMA(C,N1)-EMA(C,N2))*1000,LINETHICK0,COLORRED;
短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
3 H6 L5 ~* `. Z6 ZMACD:=2*(短波-短均线);
{中波}
  x$ p% m- ?+ p- u: r2 @中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
中均线:EMA(中波,M),COLORBLUE;
5 t' @4 |1 O+ ]( Q. M4 a1 \$ A5 o( GMACD2:2*(中波-中均线),LINETHICK1;
& t. q$ x" ^% i7 iSTICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;
8 Q5 f0 x- W; M, s% dSTICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;
{绘图}
* s" ?( _' ^  n- r/ E( i9 K8 K: V: I( gFILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;
: ?& p% t( f4 f! v% NFILLRGN(中波<中均线,中波,中均线),COLORBLUE;
; R! L# T& I9 v; {3 j) {, ^1 K{FILLRGN(短波>=短均线,短波,短均线),COLORRED;
FILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
& m) V& m* p! ^) x9 q. M4 J+ v短均线,LINETHICK2,COLORCYAN;
PARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
# |/ Q" C, j6 X& A- X3 K  L  W8 bPARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
# Q6 ]6 K5 |1 T* f4 z{周金叉,死叉}
AA:="MACD.DIFF#WEEK";
- Y! J. U& k' x. B) O0 _0 u+ ~$ YBB:="MACD.DEA#WEEK";
4 A( V& Q* y' K  P' L) c! `( \DRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
2 S" r9 C* u$ z. p; L. l$ K0 tDRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;
{月金叉,死叉}
CC:="MACD.DIFF#MONTH";
0 [, u/ x7 p8 tDD:="MACD.DEA#MONTH";
DRAWTEXT(CROSS(CC,DD),0,'●月金叉'),ALIGN5,COLORRED;
DRAWTEXT(CROSS(DD,CC),0,'○月死叉'),ALIGN4,COLORBLUE;
{选股}
, h, i% q  Y4 ~3 M( g0 R6 _- W- vEE:=CROSS(中波,中均线) AND MACD2>REF(MACD2,1) AND 短波>=REF(短波,1) AND 中均线>=REF(中均线,1);
3 }2 K5 e- }/ E* B8 J" ^6 U8 ?出来:FILTER(EE,10);
DRAWICON(出来,中均线,1);


( l. `7 e6 B3 ~% X' @6 {/ C8 N

axin302

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

流行云

+ N7 Y. ~+ b. N9 y  f

axin302 发表于 2013-6-23 10:29
, X) t; `- H$ q' t看起来不错，加上背离指标会更好

# H( h* J  q8 v) t
% O* K! U4 {0 Y# Q# g4 m. k5 c  先加上均线，对应着，背离指标再找找    30分钟级别。。  60分钟级别
! M6 V4 ^' h" x" \$ y2 T

axin302

真高手！