苍狼MACD 源码

流行云

6 v. c2 B1 r1 X

或许对某些同志会有帮助，继续贴上源码  
3 x. L& s9 m' G8 c; N) j  T

{苍狼MACD}
6 }  B$ y+ r8 g1 C" F& b5 ^) B7 TINPUT: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;
5 E- @# ]9 O9 G, k3 ~短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
MACD:=2*(短波-短均线);
{中波}
中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
- U' T1 c3 D, i5 o  o, v4 Q/ {  g中均线:EMA(中波,M),COLORBLUE;
MACD2:2*(中波-中均线),LINETHICK1;
STICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;
STICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;
{绘图}
  |+ e. @7 U* W8 D$ \4 q  uFILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;
, a: x1 A# H+ m# t9 g1 vFILLRGN(中波<中均线,中波,中均线),COLORBLUE;
9 U% J7 A, D% p6 p{FILLRGN(短波>=短均线,短波,短均线),COLORRED;
" L; h5 j" Q- Z( g, uFILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
短均线,LINETHICK2,COLORCYAN;
5 s# k; \! W9 P" ]PARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
PARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
{周金叉,死叉}
AA:="MACD.DIFF#WEEK";
BB:="MACD.DEA#WEEK";
DRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
DRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;
{月金叉,死叉}
# }) ?) A; A- z; UCC:="MACD.DIFF#MONTH";
DD:="MACD.DEA#MONTH";
DRAWTEXT(CROSS(CC,DD),0,'●月金叉'),ALIGN5,COLORRED;
* }" q; L; F- R  VDRAWTEXT(CROSS(DD,CC),0,'○月死叉'),ALIGN4,COLORBLUE;
  N" X/ P. J. @{选股}
0 ]4 n) w+ x  }* e# M: c& gEE:=CROSS(中波,中均线) AND MACD2>REF(MACD2,1) AND 短波>=REF(短波,1) AND 中均线>=REF(中均线,1);
  Z' x/ g8 l5 Z  x! Z1 l" Y出来:FILTER(EE,10);
DRAWICON(出来,中均线,1);
/ z) p: ^3 f* t% d, G8 Z

axin302

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

流行云

2 j9 X6 y! [3 {# M) v! P

axin302 发表于 2013-6-23 10:29
5 E1 w/ {" \/ }6 Q! \! i$ H看起来不错，加上背离指标会更好

: u0 C7 p5 Y# U( Q% P/ E6 `8 S

7 B  g3 X' X, r
  先加上均线，对应着，背离指标再找找    30分钟级别。。  60分钟级别

axin302

真高手！