苍狼MACD 源码

流行云

" e0 O3 |8 h3 a4 h- m8 E2 {3 Q6 M8 J
) c- b; d' c8 X# N8 ~
" b  }/ B* G. o% g4 s. V0 }0 d" R或许对某些同志会有帮助，继续贴上源码  

+ d5 Z7 ~) b; h9 d4 j* o
{苍狼MACD}
INPUT:N1(3,1,100),N2(10,1,100),N3(10,1,100),N4(20,1,100),M(9,1,100);
{短波}
短波EMA(C,N1)-EMA(C,N2))*1000,LINETHICK0,COLORRED;
短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
MACD:=2*(短波-短均线);
{中波}
中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
: W$ d. D  c, h5 a4 A中均线:EMA(中波,M),COLORBLUE;
MACD2:2*(中波-中均线),LINETHICK1;
STICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;
, j' w$ U2 B' `7 uSTICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;
{绘图}
+ y6 G8 L' L0 s# M, g# B1 ~FILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;
# u1 e+ R2 b5 R4 WFILLRGN(中波<中均线,中波,中均线),COLORBLUE;
{FILLRGN(短波>=短均线,短波,短均线),COLORRED;
FILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
  b; ]; |' e% p3 t& X2 k短均线,LINETHICK2,COLORCYAN;
8 q0 i. q1 \* Y* Y& }' ^4 ^' bPARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
& j; n; s  f7 C5 R/ EPARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
/ K$ y9 Y) [& B5 p# G/ b{周金叉,死叉}
AA:="MACD.DIFF#WEEK";
BB:="MACD.DEA#WEEK";
" _' q0 V9 n0 `4 L9 IDRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
( U4 N0 r/ Q2 x; n2 R& M& TDRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;
{月金叉,死叉}
CC:="MACD.DIFF#MONTH";
3 ?! @! _! s2 K# L1 FDD:="MACD.DEA#MONTH";
# {; W# f3 w; l* ^% _- R; R: w9 ^# IDRAWTEXT(CROSS(CC,DD),0,'●月金叉'),ALIGN5,COLORRED;
DRAWTEXT(CROSS(DD,CC),0,'○月死叉'),ALIGN4,COLORBLUE;
{选股}
7 w& }  t! Y  W- J1 ?  Z0 t2 yEE:=CROSS(中波,中均线) AND MACD2>REF(MACD2,1) AND 短波>=REF(短波,1) AND 中均线>=REF(中均线,1);
出来:FILTER(EE,10);
DRAWICON(出来,中均线,1);

; t) l- g7 u: D7 N) f  ^
& B' a$ J8 t3 y. S% I

axin302

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

流行云

5 l* p9 A, ]) f8 A7 w3 X9 _

axin302 发表于 2013-6-23 10:29
& j8 F& K5 Z/ q看起来不错，加上背离指标会更好

: K5 I8 f0 Q: w& J


& [# y' A/ g- X' z( Q% B6 z( F9 ~* V  先加上均线，对应着，背离指标再找找    30分钟级别。。  60分钟级别
* X9 i0 G+ K7 z' Y0 j

axin302

真高手！