苍狼MACD 源码

流行云

. ?6 q, r3 w7 L) z" X8 L" [. U或许对某些同志会有帮助，继续贴上源码  
1 z! |4 r6 M( f9 ~9 S

{苍狼MACD}
8 y3 ~  d0 `& B% YINPUT:N1(3,1,100),N2(10,1,100),N3(10,1,100),N4(20,1,100),M(9,1,100);
) q# H7 y. ^( E6 R3 A" P1 g{短波}
. R4 q8 c: ?; O' `0 p4 y% Q9 N0 M' N短波EMA(C,N1)-EMA(C,N2))*1000,LINETHICK0,COLORRED;
6 J; T( {/ w9 F$ J3 p3 c4 }0 [短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
MACD:=2*(短波-短均线);
& T! o8 J; _; a7 Z  m3 |! M{中波}
中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
2 d# ?. A; _9 C4 r8 U中均线:EMA(中波,M),COLORBLUE;
MACD2:2*(中波-中均线),LINETHICK1;
* D7 I- w* D) G# |9 _STICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;
STICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;
& }  x7 s2 t- E{绘图}
, j  e/ Y! B4 A! u9 |FILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;
FILLRGN(中波<中均线,中波,中均线),COLORBLUE;
. U7 {6 |7 F! R0 ?8 X" ]/ h1 H/ A) ?{FILLRGN(短波>=短均线,短波,短均线),COLORRED;
FILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
短均线,LINETHICK2,COLORCYAN;
PARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
3 U3 T$ o3 l' C; }7 B# k* ?4 iPARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
$ x: W: q, l$ q+ _9 N{周金叉,死叉}
7 H0 a' I# D/ Q9 R# k& z1 P/ kAA:="MACD.DIFF#WEEK";
: S* N! j7 s. i" y+ Z8 [2 x! @7 z7 RBB:="MACD.DEA#WEEK";
( O$ p5 e1 |% ^( gDRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
& e3 k  p; R! A' t. t& C$ HDRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;
{月金叉,死叉}
CC:="MACD.DIFF#MONTH";
; f; C, ^  Q2 j- ^% J8 NDD:="MACD.DEA#MONTH";
DRAWTEXT(CROSS(CC,DD),0,'●月金叉'),ALIGN5,COLORRED;
) ^+ l- K) C4 ^( n0 h& _5 V, HDRAWTEXT(CROSS(DD,CC),0,'○月死叉'),ALIGN4,COLORBLUE;
{选股}
8 ~. P8 {2 m$ _# y' H4 X$ y% A6 OEE:=CROSS(中波,中均线) AND MACD2>REF(MACD2,1) AND 短波>=REF(短波,1) AND 中均线>=REF(中均线,1);
' l/ A8 I& C5 D% }9 K4 a  V出来:FILTER(EE,10);
% C. G( Z; B) D- `8 e8 n( EDRAWICON(出来,中均线,1);

axin302

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

流行云

  Q# I8 I) e- A- J' y

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

0 o+ f$ A: U8 w' t6 {6 d$ U! T
2 F5 |: \: ^6 y: q+ H

  先加上均线，对应着，背离指标再找找    30分钟级别。。  60分钟级别

axin302

真高手！