苍狼MACD 源码

流行云

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


{苍狼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;
; ^! n) `+ U6 c! p  R5 _2 c短均线:EMA(短波,M),LINETHICK0,COLORCYAN;
5 O2 R+ }9 ]. k4 {$ DMACD:=2*(短波-短均线);
{中波}
" i" d& k" n1 C  J# S4 D中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
; J2 k: o6 I$ X$ Q, {$ v5 d中均线:EMA(中波,M),COLORBLUE;
MACD2:2*(中波-中均线),LINETHICK1;
STICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;
/ X, k( n, y1 a0 O- G4 qSTICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;
- n, z" b  o+ S! U' Q$ H  C{绘图}
; L$ H" A# U2 |2 ^! EFILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;
% r* f6 b& N2 ?; }FILLRGN(中波<中均线,中波,中均线),COLORBLUE;
{FILLRGN(短波>=短均线,短波,短均线),COLORRED;
" J3 c7 m- w5 F: S! a3 G) |/ QFILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
6 y2 X) C- a' D3 n短均线,LINETHICK2,COLORCYAN;
PARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
PARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
9 x- B; W/ U; H( G6 e( w$ ~8 e{周金叉,死叉}
: {) {" x5 E; [5 P$ @# v1 z' \6 tAA:="MACD.DIFF#WEEK";
6 C) ?6 t/ b. a) HBB:="MACD.DEA#WEEK";
DRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
DRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;
{月金叉,死叉}
: a0 ^/ V* p: f+ cCC:="MACD.DIFF#MONTH";
- T, d! B- S" Q7 V3 }/ Y! I0 `) aDD:="MACD.DEA#MONTH";
DRAWTEXT(CROSS(CC,DD),0,'●月金叉'),ALIGN5,COLORRED;
0 r  R' z) p5 k8 J+ {DRAWTEXT(CROSS(DD,CC),0,'○月死叉'),ALIGN4,COLORBLUE;
" D! w( X- j+ q4 D! Z$ }{选股}
, \9 h, N3 j; }2 ]EE:=CROSS(中波,中均线) AND MACD2>REF(MACD2,1) AND 短波>=REF(短波,1) AND 中均线>=REF(中均线,1);
4 F) ]. t6 D* k: f: ?; e出来:FILTER(EE,10);
DRAWICON(出来,中均线,1);

4 b; {9 j; E8 C
, Q6 o7 D" n  v  O% A% v0 l

axin302

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

流行云

axin302 发表于 2013-6-23 10:29
0 R9 g, o. g  v  v看起来不错，加上背离指标会更好

- ?& |( o. ]  H" T) s/ K

* H$ l# ]3 ?. {  O3 Z
  先加上均线，对应着，背离指标再找找    30分钟级别。。  60分钟级别
: b) V3 T/ U5 o9 M. a0 I

axin302

真高手！