苍狼MACD 源码

流行云

' ?% i% {7 k6 L2 z" S5 f
或许对某些同志会有帮助，继续贴上源码  

. ]5 E% k! i2 z
1 o; Q4 Y- {6 z" p+ x{苍狼MACD}
7 K$ n5 w! d' M8 m' gINPUT:N1(3,1,100),N2(10,1,100),N3(10,1,100),N4(20,1,100),M(9,1,100);
2 x: F- j5 k3 \$ N) w# l5 B{短波}
短波EMA(C,N1)-EMA(C,N2))*1000,LINETHICK0,COLORRED;
4 `  N7 R$ M& ?7 J0 _/ N短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
MACD:=2*(短波-短均线);
{中波}
% W, t  K+ G2 b; Q0 Z/ a9 p中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
中均线:EMA(中波,M),COLORBLUE;
MACD2:2*(中波-中均线),LINETHICK1;
STICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;
- o. H' v/ \+ Q" _; e" j( x: hSTICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;
+ o) Q- i9 Z$ J( t) Z7 [6 Q+ }{绘图}
5 j' h7 c$ i1 b1 g$ JFILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;
FILLRGN(中波<中均线,中波,中均线),COLORBLUE;
{FILLRGN(短波>=短均线,短波,短均线),COLORRED;
) V% ?- t! {$ IFILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
0 l8 u. s& y6 c$ m" d短均线,LINETHICK2,COLORCYAN;
; L. ~4 B6 v- m9 H& ~PARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
PARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
{周金叉,死叉}
1 S) m* U4 m# I- s6 ^/ K+ c1 LAA:="MACD.DIFF#WEEK";
BB:="MACD.DEA#WEEK";
% X, |9 d. _& b4 D5 E  |( XDRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
7 O2 M7 |* r* d- B9 aDRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;
{月金叉,死叉}
CC:="MACD.DIFF#MONTH";
DD:="MACD.DEA#MONTH";
3 D& b0 ^. }( m" [1 V* ~' rDRAWTEXT(CROSS(CC,DD),0,'●月金叉'),ALIGN5,COLORRED;
8 W; _' p/ s; P! @# f8 F" s% I2 UDRAWTEXT(CROSS(DD,CC),0,'○月死叉'),ALIGN4,COLORBLUE;
{选股}
EE:=CROSS(中波,中均线) AND MACD2>REF(MACD2,1) AND 短波>=REF(短波,1) AND 中均线>=REF(中均线,1);
出来:FILTER(EE,10);
DRAWICON(出来,中均线,1);

' {! J3 ?* v: c

axin302

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

流行云

, j- o9 F) a0 u* o

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

; G' U0 W4 e9 \1 W* A
0 L& m4 o6 Q, C$ V# L8 _7 u  先加上均线，对应着，背离指标再找找    30分钟级别。。  60分钟级别
% k( |3 |! U/ N  E) n( V# L9 G

axin302

真高手！