苍狼MACD 源码

流行云

$ ]1 l$ `" R. G, b
; G: u/ M7 U3 j
或许对某些同志会有帮助，继续贴上源码  
; N4 _3 q" x; Y0 o6 P4 X
0 S, V/ P2 i. W( X  \
9 H5 d1 r9 U- }{苍狼MACD}
# i; ~9 Q& E, i1 G" l; {: l) RINPUT:N1(3,1,100),N2(10,1,100),N3(10,1,100),N4(20,1,100),M(9,1,100);
{短波}
+ u$ i% Y* |0 L短波EMA(C,N1)-EMA(C,N2))*1000,LINETHICK0,COLORRED;
短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
2 Y, V3 @7 o( B- Z; uMACD:=2*(短波-短均线);
{中波}
中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
5 d# }: g$ p8 s0 W5 C2 u# r: k中均线:EMA(中波,M),COLORBLUE;
. \9 r& N  `6 a8 ~MACD2:2*(中波-中均线),LINETHICK1;
STICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;
STICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;
{绘图}
FILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;
: r! T* }3 m: J/ oFILLRGN(中波<中均线,中波,中均线),COLORBLUE;
{FILLRGN(短波>=短均线,短波,短均线),COLORRED;
FILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
短均线,LINETHICK2,COLORCYAN;
% p. k" A/ F0 \0 X- _5 M. d/ V9 z( KPARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
PARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
4 s8 b2 Q# c8 e{周金叉,死叉}
AA:="MACD.DIFF#WEEK";
5 k( D8 i3 D/ V+ v4 \. OBB:="MACD.DEA#WEEK";
DRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
* x0 f# F2 [: y, M) xDRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;
5 }; a4 p+ {3 m  n* {, g0 @5 Y% N{月金叉,死叉}
; z/ S( O$ c! t, u9 `( O$ zCC:="MACD.DIFF#MONTH";
' {' f0 u8 q0 G9 {# P( \DD:="MACD.DEA#MONTH";
  p" N2 i5 J; M  |9 x( W8 VDRAWTEXT(CROSS(CC,DD),0,'●月金叉'),ALIGN5,COLORRED;
% o  b# r3 [$ G# |+ x5 ODRAWTEXT(CROSS(DD,CC),0,'○月死叉'),ALIGN4,COLORBLUE;
{选股}
) `. `: n/ k. c* b1 Q0 w$ V7 bEE:=CROSS(中波,中均线) AND MACD2>REF(MACD2,1) AND 短波>=REF(短波,1) AND 中均线>=REF(中均线,1);
/ [" b8 J  d4 B9 O+ X3 q出来:FILTER(EE,10);
0 k$ {2 S' m3 N" ?" q! kDRAWICON(出来,中均线,1);

axin302

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

流行云

! `5 }6 `* R  M& K" o' ?) i

axin302 发表于 2013-6-23 10:29
. e# d# J* ?- B! ~# N看起来不错，加上背离指标会更好

9 I2 J9 g' e6 ^$ V- H2 B; @7 v
, I! {% I" T' x" A  先加上均线，对应着，背离指标再找找    30分钟级别。。  60分钟级别
* M/ I0 i/ ~2 n7 d/ X

axin302

真高手！