苍狼MACD 源码

流行云

  T: _+ L: n3 X2 q- q0 H

, f# @1 g2 e) q* ?. V5 L4 a或许对某些同志会有帮助，继续贴上源码  
) |- T9 G# e" r# H. q& g

0 l2 ^- q7 ]: L  f{苍狼MACD}
& P$ i8 P9 v: \1 z' e7 w  IINPUT:N1(3,1,100),N2(10,1,100),N3(10,1,100),N4(20,1,100),M(9,1,100);
: F6 e2 E2 u. a5 V{短波}
4 y0 A2 S" g/ p* |$ N" U短波EMA(C,N1)-EMA(C,N2))*1000,LINETHICK0,COLORRED;
短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
MACD:=2*(短波-短均线);
6 }/ s2 b+ V( \; N{中波}
中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
中均线:EMA(中波,M),COLORBLUE;
MACD2:2*(中波-中均线),LINETHICK1;
+ I, b7 a7 v" h9 l- {. l# USTICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;
+ h* v; h) J1 Y% }) f( A, P5 _STICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;
5 b# `! j$ X- g7 \" j; L{绘图}
FILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;
FILLRGN(中波<中均线,中波,中均线),COLORBLUE;
{FILLRGN(短波>=短均线,短波,短均线),COLORRED;
FILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
6 m) D. v, @" x2 T! y5 S短均线,LINETHICK2,COLORCYAN;
PARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
& D4 s/ l: q, ]1 M& L9 kPARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
% A. O) l* _8 j& t{周金叉,死叉}
AA:="MACD.DIFF#WEEK";
  @% q0 [$ q+ V: b5 KBB:="MACD.DEA#WEEK";
DRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
9 K7 L) a3 h+ S" J% [" P! fDRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;
{月金叉,死叉}
9 J4 X. [' X# v' B( d  VCC:="MACD.DIFF#MONTH";
7 i  l/ Y5 A! D- H' `' X2 b2 m5 jDD:="MACD.DEA#MONTH";
DRAWTEXT(CROSS(CC,DD),0,'●月金叉'),ALIGN5,COLORRED;
8 J! A* D% J$ M' G, jDRAWTEXT(CROSS(DD,CC),0,'○月死叉'),ALIGN4,COLORBLUE;
{选股}
- V6 n5 B: H* N1 k2 `EE:=CROSS(中波,中均线) AND MACD2>REF(MACD2,1) AND 短波>=REF(短波,1) AND 中均线>=REF(中均线,1);
出来:FILTER(EE,10);
DRAWICON(出来,中均线,1);
, I+ b/ t4 s, ^! Z1 B+ Q3 {: y

axin302

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

流行云

) {) Z8 v4 C& I

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

' D& J& D/ Q1 x
1 |0 ~. s9 [9 d& w( T: j+ p8 Y
  先加上均线，对应着，背离指标再找找    30分钟级别。。  60分钟级别

axin302

真高手！