苍狼MACD 源码

流行云

! e6 H" _1 M$ N$ h& ^

! z$ x: c4 L( J7 f/ o8 H或许对某些同志会有帮助，继续贴上源码  

* c3 ]6 S: u% C$ C, M+ ?' l
{苍狼MACD}
1 x) |# b2 |/ W) q$ NINPUT:N1(3,1,100),N2(10,1,100),N3(10,1,100),N4(20,1,100),M(9,1,100);
' o) Z7 z+ v- B" C% K{短波}
短波EMA(C,N1)-EMA(C,N2))*1000,LINETHICK0,COLORRED;
短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
) i4 V' [8 X5 Q: LMACD:=2*(短波-短均线);
$ x0 k+ O% N# ?{中波}
1 i6 }! \% h: `2 e( O' w& s中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
# Z% v9 }# z( d中均线:EMA(中波,M),COLORBLUE;
* w: v4 B# L3 N0 P) LMACD2:2*(中波-中均线),LINETHICK1;
, e) ?0 V  Z6 w. NSTICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;
+ K( Z, ^$ T; Q+ cSTICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;
{绘图}
FILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;
FILLRGN(中波<中均线,中波,中均线),COLORBLUE;
+ d5 d7 D* R# h- Z; r$ a{FILLRGN(短波>=短均线,短波,短均线),COLORRED;
2 O( }! q6 z1 W1 Z$ ]5 v( ]) A% [FILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
; }0 J- h. l4 E" v! M, ~* _; l短均线,LINETHICK2,COLORCYAN;
5 ?2 w7 T- M% U9 U! T7 mPARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
7 j, i7 k# r4 `PARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
* Y1 }( J$ J. @* ~{周金叉,死叉}
AA:="MACD.DIFF#WEEK";
# G: c' C4 G  A* `  C& ABB:="MACD.DEA#WEEK";
4 `! `% a  T) a! x# z1 h  g; w: m+ tDRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
DRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;
{月金叉,死叉}
CC:="MACD.DIFF#MONTH";
% n8 N- s% e: L8 B( tDD:="MACD.DEA#MONTH";
0 l3 \! ?! V* E( SDRAWTEXT(CROSS(CC,DD),0,'●月金叉'),ALIGN5,COLORRED;
9 f6 E. E! V, s4 j+ {DRAWTEXT(CROSS(DD,CC),0,'○月死叉'),ALIGN4,COLORBLUE;
{选股}
4 ^/ q/ z2 o% K6 c9 GEE:=CROSS(中波,中均线) AND MACD2>REF(MACD2,1) AND 短波>=REF(短波,1) AND 中均线>=REF(中均线,1);
出来:FILTER(EE,10);
6 c) o  g& z" T+ V) G: nDRAWICON(出来,中均线,1);
  i# F; j6 Z: p+ R7 T( S9 `2 d( f

axin302

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

流行云

axin302 发表于 2013-6-23 10:29
1 H4 ?) L0 x2 _( f看起来不错，加上背离指标会更好

( B, J4 m. z5 C

  先加上均线，对应着，背离指标再找找    30分钟级别。。  60分钟级别
# R* y7 @2 X/ e, b! f

axin302

真高手！