苍狼MACD 源码

流行云

& Q: J) J3 `1 W5 N$ f, i0 ~% |
或许对某些同志会有帮助，继续贴上源码  


7 \/ F3 }8 a; F+ @, r{苍狼MACD}
INPUT:N1(3,1,100),N2(10,1,100),N3(10,1,100),N4(20,1,100),M(9,1,100);
5 L$ c1 F1 a) ~0 g: C4 ~{短波}
. w( h( T. I. J! r1 x% L) K短波EMA(C,N1)-EMA(C,N2))*1000,LINETHICK0,COLORRED;
短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
6 P) B2 v; t6 AMACD:=2*(短波-短均线);
{中波}
# G, {; ?% c! ~  L! h( Z中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
中均线:EMA(中波,M),COLORBLUE;
MACD2:2*(中波-中均线),LINETHICK1;
STICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;
STICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;
+ R9 K& w; E) n6 M6 E2 A* ^{绘图}
FILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;
2 {& e1 b3 }! y- T+ ]FILLRGN(中波<中均线,中波,中均线),COLORBLUE;
2 X& R$ y! P  i( _+ I# g{FILLRGN(短波>=短均线,短波,短均线),COLORRED;
FILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
7 s# P' L* l& Q9 Z& C* v; s短均线,LINETHICK2,COLORCYAN;
2 w" C+ _8 u; m( r/ W% F$ p& ]PARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
PARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
8 i# v" i( \! o' u( o{周金叉,死叉}
AA:="MACD.DIFF#WEEK";
BB:="MACD.DEA#WEEK";
DRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
/ L! U: `9 B) Y0 e$ g  ]# `DRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;
9 |6 @. l. h0 Z( r( b6 R{月金叉,死叉}
CC:="MACD.DIFF#MONTH";
6 F1 O' \3 E9 \6 m' }; h& B- B$ \9 }DD:="MACD.DEA#MONTH";
* f6 j9 e- R, ]0 O6 B4 Q! XDRAWTEXT(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);
8 `0 [0 h7 v  b" H- D0 [# J7 R出来:FILTER(EE,10);
6 ^2 p5 K" M0 ^+ l9 M$ PDRAWICON(出来,中均线,1);


; x. n% |0 l% t

axin302

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

流行云

+ J+ m/ L( ^8 j  w4 R

axin302 发表于 2013-6-23 10:29
. a! \" v4 ]" M4 b) Q6 ^0 r0 ^8 f看起来不错，加上背离指标会更好

) f& f) ?% r/ _$ Q
" S6 U$ E6 \: Y# r) `- S
  先加上均线，对应着，背离指标再找找    30分钟级别。。  60分钟级别
3 v( |7 G  l% v

axin302

真高手！