苍狼MACD 源码

流行云

0 l! A) Z7 X7 _8 K: B+ z, D, h# J- _或许对某些同志会有帮助，继续贴上源码  
$ j: e6 D5 f1 n) T/ ?
4 o. i2 l3 D! }
{苍狼MACD}
' Y9 @6 c5 F  z" J7 tINPUT:N1(3,1,100),N2(10,1,100),N3(10,1,100),N4(20,1,100),M(9,1,100);
6 i; L8 `* }7 e9 H" P{短波}
短波EMA(C,N1)-EMA(C,N2))*1000,LINETHICK0,COLORRED;
短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
MACD:=2*(短波-短均线);
{中波}
中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
中均线:EMA(中波,M),COLORBLUE;
MACD2:2*(中波-中均线),LINETHICK1;
STICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;
8 ]" b  E7 J! a' [* o* a8 j! ^2 eSTICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;
{绘图}
FILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;
FILLRGN(中波<中均线,中波,中均线),COLORBLUE;
  }- e( }, j3 ^5 e5 k: O  O{FILLRGN(短波>=短均线,短波,短均线),COLORRED;
FILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
  _7 K& n6 F1 i" P" A3 x短均线,LINETHICK2,COLORCYAN;
) H& F8 ?, ?& {8 hPARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
9 \" @' {; y' R0 ?5 mPARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
+ Z) v9 i$ L1 }! T4 E3 A" k{周金叉,死叉}
AA:="MACD.DIFF#WEEK";
BB:="MACD.DEA#WEEK";
DRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
6 s# |. ^/ [$ s$ }! L: hDRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;
+ n  F# ?" L) L{月金叉,死叉}
" x2 H5 ^9 o* WCC:="MACD.DIFF#MONTH";
' d/ D( T5 d/ g2 \7 sDD:="MACD.DEA#MONTH";
7 O4 l9 W5 ?4 E/ P* x( E$ PDRAWTEXT(CROSS(CC,DD),0,'●月金叉'),ALIGN5,COLORRED;
DRAWTEXT(CROSS(DD,CC),0,'○月死叉'),ALIGN4,COLORBLUE;
0 L0 C# n- X) n: k5 u6 T{选股}
EE:=CROSS(中波,中均线) AND MACD2>REF(MACD2,1) AND 短波>=REF(短波,1) AND 中均线>=REF(中均线,1);
( d- T/ |( \- |, C出来:FILTER(EE,10);
DRAWICON(出来,中均线,1);

axin302

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

流行云

axin302 发表于 2013-6-23 10:29
' G' T* j5 ^) Z- I. u1 N! o4 R看起来不错，加上背离指标会更好

' i! k, @; t( ]7 f/ o; x
7 ]9 a1 o6 `' M0 a( }' ?  先加上均线，对应着，背离指标再找找    30分钟级别。。  60分钟级别
& X. Y( t: a! p8 A" b. u

axin302

真高手！