苍狼MACD 源码

流行云

或许对某些同志会有帮助，继续贴上源码  


" F3 h# {5 c) [1 E# U{苍狼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;
短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
MACD:=2*(短波-短均线);
{中波}
& ^2 ^# q) [3 x2 b% s: D+ N' }4 E中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
. u$ \2 q6 J- _$ Z0 Q( g中均线:EMA(中波,M),COLORBLUE;
MACD2:2*(中波-中均线),LINETHICK1;
% ~! a2 \' K( v% V* hSTICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;
STICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;
{绘图}
9 }1 i, D8 `% a, TFILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;
FILLRGN(中波<中均线,中波,中均线),COLORBLUE;
{FILLRGN(短波>=短均线,短波,短均线),COLORRED;
  w. P8 U- \% H, G7 H+ VFILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
" I: q$ @/ Y- Q9 Q短均线,LINETHICK2,COLORCYAN;
( u4 Y7 ]2 @: t7 n6 ^) N$ T1 I; wPARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
% A( T7 x" c; \$ A, BPARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
/ T7 l! R4 _# q+ |- N: D{周金叉,死叉}
0 r" V  w8 X2 C# b: s7 t8 {AA:="MACD.DIFF#WEEK";
# p8 C: l$ Q: `! CBB:="MACD.DEA#WEEK";
" i) u6 ?! h7 }DRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
DRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;
& t, |5 k* G- x* u( }) b; q{月金叉,死叉}
CC:="MACD.DIFF#MONTH";
9 M5 V0 d8 x& P) f5 M9 n4 SDD:="MACD.DEA#MONTH";
DRAWTEXT(CROSS(CC,DD),0,'●月金叉'),ALIGN5,COLORRED;
' g+ ?1 z" F7 e, fDRAWTEXT(CROSS(DD,CC),0,'○月死叉'),ALIGN4,COLORBLUE;
{选股}
7 w' Z+ B( _, K7 OEE:=CROSS(中波,中均线) AND MACD2>REF(MACD2,1) AND 短波>=REF(短波,1) AND 中均线>=REF(中均线,1);
出来:FILTER(EE,10);
DRAWICON(出来,中均线,1);

% b6 l' q% e' `0 E: c: q
. C) X9 ^+ v8 c# m' B( W, z

axin302

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

流行云

axin302 发表于 2013-6-23 10:29
! x; b5 ^$ M# ^0 E$ y看起来不错，加上背离指标会更好

0 E" R  ]: L2 `7 j: |9 d" S! N


  先加上均线，对应着，背离指标再找找    30分钟级别。。  60分钟级别

axin302

真高手！