苍狼MACD 源码

流行云

" A# S# Q5 M5 u+ r
或许对某些同志会有帮助，继续贴上源码  

# ?; z/ x0 B4 X4 q7 f
{苍狼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;
" T# V* z7 [0 w$ X短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
$ Z& p# n3 Z4 `MACD:=2*(短波-短均线);
5 o( k" [! o9 {5 d{中波}
' I' P* u" X; k0 J2 y- ^9 N$ |中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
中均线:EMA(中波,M),COLORBLUE;
MACD2:2*(中波-中均线),LINETHICK1;
+ m5 L) F7 o. x: V* R2 ASTICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;
: A$ i0 e" [; L8 C; k8 Y; h& \STICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;
{绘图}
FILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;
FILLRGN(中波<中均线,中波,中均线),COLORBLUE;
* i) H5 y: }" W- i8 P{FILLRGN(短波>=短均线,短波,短均线),COLORRED;
  H' `2 x8 F, y: pFILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
短均线,LINETHICK2,COLORCYAN;
PARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
1 f# n2 |% u5 ]& ~" Z" SPARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
{周金叉,死叉}
AA:="MACD.DIFF#WEEK";
BB:="MACD.DEA#WEEK";
" @) {# C" u% h  ^* @# [DRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
4 S$ p: ~7 ~+ O, `% F+ t/ D- sDRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;
& U' X$ `# j& T1 i3 u+ Q: K{月金叉,死叉}
4 v( Y5 O: q# r+ N# U/ {0 m- eCC:="MACD.DIFF#MONTH";
DD:="MACD.DEA#MONTH";
# B8 Z! @$ o, D2 l0 dDRAWTEXT(CROSS(CC,DD),0,'●月金叉'),ALIGN5,COLORRED;
) y  b/ B3 ]* n* E+ vDRAWTEXT(CROSS(DD,CC),0,'○月死叉'),ALIGN4,COLORBLUE;
{选股}
EE:=CROSS(中波,中均线) AND MACD2>REF(MACD2,1) AND 短波>=REF(短波,1) AND 中均线>=REF(中均线,1);
, P" c) C: Y9 Y+ t4 |9 B7 A; l2 i出来:FILTER(EE,10);
0 W+ R2 j* x  K) K' i% YDRAWICON(出来,中均线,1);
7 Z+ m/ P- Y9 {$ N2 A3 q
+ B0 ^. n1 A; v+ B

axin302

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

流行云

$ o& D* H! T. J1 r

axin302 发表于 2013-6-23 10:29
& D7 V4 }7 L% ], V9 Q  c& F+ J看起来不错，加上背离指标会更好

, a' ]' z& h) N

' C& H4 X. ?: C2 h9 G0 m  先加上均线，对应着，背离指标再找找    30分钟级别。。  60分钟级别
+ i& q8 h! a4 I7 z0 W! e# f0 q

axin302

真高手！