苍狼MACD 源码

流行云

% t/ y" W% Y8 d( P5 s

9 \7 p: h+ l0 v9 N0 Q" C" T或许对某些同志会有帮助，继续贴上源码  

" |( G- x9 a" k  Q: F% w- s2 o
{苍狼MACD}
+ l; q( ?2 p9 C' }+ S1 KINPUT:N1(3,1,100),N2(10,1,100),N3(10,1,100),N4(20,1,100),M(9,1,100);
9 O* N. d! g+ I: d6 A5 z% c4 t) ~{短波}
短波EMA(C,N1)-EMA(C,N2))*1000,LINETHICK0,COLORRED;
( ?: S* M  ?* W7 W9 {4 ^, j短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
MACD:=2*(短波-短均线);
0 G5 ~. l0 g8 q( _* J6 i' {{中波}
中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
% p/ M" E0 p1 |1 M: j. h中均线:EMA(中波,M),COLORBLUE;
% w+ v. p: ?( {% S" KMACD2:2*(中波-中均线),LINETHICK1;
STICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;
- Y! M; {6 A/ \& F# B+ hSTICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;
{绘图}
FILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;
/ j( o8 {/ {& C$ NFILLRGN(中波<中均线,中波,中均线),COLORBLUE;
{FILLRGN(短波>=短均线,短波,短均线),COLORRED;
FILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
( E  y) A7 H4 Y5 |( H/ g4 c短均线,LINETHICK2,COLORCYAN;
  `& }% A8 s$ Z& z5 P, v  |# wPARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
* [* l# f7 Y  y' T; sPARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
{周金叉,死叉}
/ V+ f* H3 @% V. k) c4 xAA:="MACD.DIFF#WEEK";
; M& A6 m$ l- o" T$ hBB:="MACD.DEA#WEEK";
DRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
# s8 K$ `1 @* q. E5 I2 ]' F/ VDRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;
. g- X, u4 c6 a{月金叉,死叉}
9 a' ^" S, r* l, ?, h6 UCC:="MACD.DIFF#MONTH";
0 y2 _& ^1 ~* i& ODD:="MACD.DEA#MONTH";
DRAWTEXT(CROSS(CC,DD),0,'●月金叉'),ALIGN5,COLORRED;
9 W+ R* k8 k; f6 m& d4 zDRAWTEXT(CROSS(DD,CC),0,'○月死叉'),ALIGN4,COLORBLUE;
6 b: W" ], q0 R  m{选股}
EE:=CROSS(中波,中均线) AND MACD2>REF(MACD2,1) AND 短波>=REF(短波,1) AND 中均线>=REF(中均线,1);
出来:FILTER(EE,10);
3 M! R( _$ {. g! ?1 mDRAWICON(出来,中均线,1);


6 m# j5 `# b. ^' q4 L8 ?7 E9 t2 m' r

axin302

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

流行云

- S, Y, i9 W6 I

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

8 c0 y/ e% X8 p+ b

: U" c8 U1 B! H0 X& Q
/ x( }9 T+ D  N5 y5 e# u, |, O" @  先加上均线，对应着，背离指标再找找    30分钟级别。。  60分钟级别
3 }, ?: |+ i( ]+ _% |6 b  s2 ?

axin302

真高手！