苍狼MACD 源码

流行云

( [$ Y0 t+ T0 M, K! Y

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

+ d: X' U' ?6 i8 v! Q0 V
. i- i" J% D3 L{苍狼MACD}
INPUT:N1(3,1,100),N2(10,1,100),N3(10,1,100),N4(20,1,100),M(9,1,100);
& {- `# l8 e9 ^$ x5 R1 B. W{短波}
8 \" f; m: V0 y短波EMA(C,N1)-EMA(C,N2))*1000,LINETHICK0,COLORRED;
6 k' j7 q1 g% \! T" \短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
MACD:=2*(短波-短均线);
{中波}
中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
8 j% y+ }  ]" X( \/ ^# |" v3 U中均线:EMA(中波,M),COLORBLUE;
' v. ~! N( J7 a3 K# W% Q) iMACD2:2*(中波-中均线),LINETHICK1;
4 d9 o. X6 R1 H" {1 zSTICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;
STICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;
* I! w* p: O& ~{绘图}
FILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;
9 E2 j, d+ I# s6 zFILLRGN(中波<中均线,中波,中均线),COLORBLUE;
. z. `' t. U' }' u  n, T$ m{FILLRGN(短波>=短均线,短波,短均线),COLORRED;
& V+ r) e8 A) d2 N- @8 pFILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
短均线,LINETHICK2,COLORCYAN;
PARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
PARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
6 [5 T3 l" {  b  O: M1 J{周金叉,死叉}
AA:="MACD.DIFF#WEEK";
( c$ o! n) j) T! C0 dBB:="MACD.DEA#WEEK";
4 P3 z- ^3 W7 s; m/ P3 jDRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
DRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;
2 S" |# I/ W3 X0 ]5 s8 L' U{月金叉,死叉}
CC:="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);
出来:FILTER(EE,10);
: [) W* N& F; \& Q. SDRAWICON(出来,中均线,1);
) ^" b4 i! R/ d  V( x$ I
# m! J; U2 e$ ^, [/ z
8 W; I! h: ~- _, D; d% ^

axin302

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

流行云

' U9 S/ D/ i& L! r

axin302 发表于 2013-6-23 10:29
, s* l3 P" R9 F' z) T* A2 o, R3 V看起来不错，加上背离指标会更好

4 M5 e  u# D2 S& C- m$ Q6 y( a


  先加上均线，对应着，背离指标再找找    30分钟级别。。  60分钟级别
; `2 T( s; d1 l6 g2 d, Z

axin302

真高手！