苍狼MACD 源码

流行云

$ q' J' g( }: A
& J+ q( H1 U1 O7 b或许对某些同志会有帮助，继续贴上源码  
' ]% y1 Z. G- L" c9 p

0 w7 I) k' k! Y{苍狼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;
  @0 w& c! g8 _3 {/ Y9 O短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
9 n, [$ O% h4 W) F2 [9 _- }MACD:=2*(短波-短均线);
{中波}
4 A( j8 T& \, D6 L6 R/ i中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
0 X# `& d+ F1 R. r2 z) d中均线:EMA(中波,M),COLORBLUE;
- `+ I3 P& A# o1 G; p7 b: pMACD2:2*(中波-中均线),LINETHICK1;
( R0 g/ q7 j8 {, Y8 p5 d" B- ESTICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;
STICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;
- C6 P3 U% S4 [, C1 T9 U: z{绘图}
FILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;
2 G$ V7 `! ?. w; _FILLRGN(中波<中均线,中波,中均线),COLORBLUE;
+ p8 w! Y9 m2 L{FILLRGN(短波>=短均线,短波,短均线),COLORRED;
+ C' V% j, g8 p9 K& sFILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
9 ?3 k) C) V4 Q8 E( }短均线,LINETHICK2,COLORCYAN;
) t4 w  s/ T- Y& {+ B& l& `PARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
PARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
{周金叉,死叉}
AA:="MACD.DIFF#WEEK";
* X4 q& |" C. W  b! S2 I3 l$ ]" P4 x3 \+ z0 kBB:="MACD.DEA#WEEK";
3 A+ z" y+ F4 T+ w, D, E. GDRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
& i/ j( i! u5 x: b2 T0 |DRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;
{月金叉,死叉}
CC:="MACD.DIFF#MONTH";
DD:="MACD.DEA#MONTH";
DRAWTEXT(CROSS(CC,DD),0,'●月金叉'),ALIGN5,COLORRED;
! s6 S! `& c' r6 k4 B8 }DRAWTEXT(CROSS(DD,CC),0,'○月死叉'),ALIGN4,COLORBLUE;
6 D. U% I5 L5 J4 h9 o( q{选股}
  A. I' \+ D9 S6 d# i( `2 [* ^EE:=CROSS(中波,中均线) AND MACD2>REF(MACD2,1) AND 短波>=REF(短波,1) AND 中均线>=REF(中均线,1);
出来:FILTER(EE,10);
* d( a6 A( D; L7 ^; qDRAWICON(出来,中均线,1);
: \+ x- j" J2 y$ m. Q

8 w* O8 w9 z1 F8 f

axin302

真高手！

流行云

axin302 发表于 2013-6-23 10:29
7 s2 Z/ _: D0 S3 c! k6 i5 v& i看起来不错，加上背离指标会更好

. F; D4 k5 q4 G  `. m8 B
1 ?8 K# ?/ r% f9 m0 j4 K# q# v

  s; K. W! W) [$ `2 ~  P+ X6 v4 g  先加上均线，对应着，背离指标再找找    30分钟级别。。  60分钟级别
3 O8 y; f* Z' j

axin302

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