苍狼MACD 源码

流行云

! _4 k/ f" u5 w) d
% u$ M" t/ R: m9 `1 I4 S
或许对某些同志会有帮助，继续贴上源码  
4 v/ u  p* A3 A

8 i* K4 Y/ T$ j$ m" f& `/ m{苍狼MACD}
) g4 j" Y$ ^' d: P' D/ R3 OINPUT:N1(3,1,100),N2(10,1,100),N3(10,1,100),N4(20,1,100),M(9,1,100);
# E* B% W, Q+ ?' s{短波}
短波EMA(C,N1)-EMA(C,N2))*1000,LINETHICK0,COLORRED;
6 j2 U+ P6 }# |% f1 s. ]4 o短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
MACD:=2*(短波-短均线);
+ A3 P/ O) U: i3 p{中波}
& l5 i. M0 a! {" u* E中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
中均线:EMA(中波,M),COLORBLUE;
MACD2:2*(中波-中均线),LINETHICK1;
; @3 C* M- e& y* h2 z6 QSTICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;
STICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;
7 Y5 e8 s' {: p+ l{绘图}
FILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;
: ~/ e: X# y- A: @FILLRGN(中波<中均线,中波,中均线),COLORBLUE;
6 }7 Z$ [, |% N7 w6 F% F{FILLRGN(短波>=短均线,短波,短均线),COLORRED;
/ ]' x. W5 x# `FILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
+ X2 Y( @( k: x( b3 ]" W短均线,LINETHICK2,COLORCYAN;
PARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
+ n$ p4 ^2 c6 f) j+ BPARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
{周金叉,死叉}
' z; J  l) `- q6 h  S& DAA:="MACD.DIFF#WEEK";
BB:="MACD.DEA#WEEK";
DRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
) J; J( j: |9 K, i8 \# aDRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;
/ G4 \+ A  o$ c/ j{月金叉,死叉}
* G2 Q& M+ g; q& S/ O7 q4 K/ gCC:="MACD.DIFF#MONTH";
DD:="MACD.DEA#MONTH";
DRAWTEXT(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);
; C- {* A  x4 A2 o0 t出来:FILTER(EE,10);
9 R; P1 f! w4 m4 j" P# `2 iDRAWICON(出来,中均线,1);
+ y( |% `& k" \) M4 Q+ E

3 C% I$ N1 M; }0 q2 e; g

axin302

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

流行云

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

& @' T9 H5 P6 b/ }$ h) k" E9 L
' J- w8 F" _# U: L- [9 {+ Q
% o" S$ ^/ y$ {/ h
  h, a) B! e. ]8 y  |, n. [+ U  先加上均线，对应着，背离指标再找找    30分钟级别。。  60分钟级别

axin302

真高手！