本帖最后由 流行云 于 2013-6-17 01:00 编辑
- G& C' k9 |% q2 x& _$ L/ p b; t1 W$ ~/ m( {! l9 X
, Y3 G: x3 g9 {$ Y6 z3 w
或许对某些同志会有帮助，继续贴上源码 * E6 h# L r0 W% a$ T4 Q6 d
# K% @1 d' _0 K8 Y0 j9 \" u
* @0 u; X1 x' f x3 h6 e
{苍狼MACD}
$ k. q1 j% O* s; w/ m9 QINPUT:N1(3,1,100),N2(10,1,100),N3(10,1,100),N4(20,1,100),M(9,1,100);
, ~: K+ g) w, I2 R{短波}
- W; Z1 Y n- \ h短波 EMA(C,N1)-EMA(C,N2))*1000,LINETHICK0,COLORRED;
' r: n$ F+ c; E( n* d/ ^" {! \短均线:EMA(短波,M),LINETHICK0,COLORCYAN;- t: o) i1 J' w5 M% x
MACD:=2*(短波-短均线);
, r( ?. n5 ]" I& t- ]. G: b{中波}% A' `* L) m4 t: Y5 t5 q
中波EMA(C,N3)-EMA(C,N4))*1000,COLORYELLOW;
C, M8 l% X, h9 f2 V R. `% t5 Z中均线:EMA(中波,M),COLORBLUE;) v# w4 B+ u3 X, y$ a8 Q% N
MACD2:2*(中波-中均线),LINETHICK1;7 ~0 ?# d: H- B$ ^, T
STICKLINE(MACD2>=0,MACD2,0,2,1),COLORMAGENTA;: f V g: x" _8 w# L
STICKLINE(MACD2<0,MACD2,0,2,1),COLORWHITE;- c- O% Q1 ^4 ^2 d! F5 ~
{绘图}* @9 ?: w7 M. v3 p" e9 ^8 n1 P
FILLRGN(中波>=中均线,中波,中均线),COLORYELLOW;6 r& ^4 ?+ q$ I0 a$ ~* d5 k
FILLRGN(中波<中均线,中波,中均线),COLORBLUE;2 H- p- ~" A1 n, y$ `- `; W* d$ u
{FILLRGN(短波>=短均线,短波,短均线),COLORRED;! ]8 M( X, H0 H/ h1 D- s
FILLRGN(短波<短均线,短波,短均线),COLORGREEN;}
* Z) s9 ]$ K) {" y" x; c短均线,LINETHICK2,COLORCYAN;
- o& t; Q* Q8 QPARTLINE(短波>=短均线,短波),COLORRED,LINETHICK2;
! A1 J2 D5 D: w n5 H2 R& KPARTLINE(短波<短均线,短波),COLORGREEN,LINETHICK2;
1 ^, O( y! I0 k0 Z4 y5 n/ [{周金叉,死叉}
: A% L. C2 w$ W9 o! W7 ?AA:="MACD.DIFF#WEEK";
' T" T( @* L$ G; WBB:="MACD.DEA#WEEK";
P8 @' h$ g1 q- j LDRAWTEXT(CROSS(AA,BB),0,'▲周金叉'),ALIGN5,COLORRED;
: z" |+ |8 k0 s+ ~4 PDRAWTEXT(CROSS(BB,AA),0,'◆周死叉'),ALIGN4,COLORBLUE;1 P3 x {( p$ V: @& X x. o
{月金叉,死叉}
6 ^9 [3 R3 R8 I$ o% gCC:="MACD.DIFF#MONTH";1 M; G- f5 z8 e& a, k# F: k
DD:="MACD.DEA#MONTH";# l1 j: C5 z! A& M6 h) d: G' U
DRAWTEXT(CROSS(CC,DD),0,'●月金叉'),ALIGN5,COLORRED;2 z% O7 {0 \) V
DRAWTEXT(CROSS(DD,CC),0,'○月死叉'),ALIGN4,COLORBLUE;9 H% O8 t. Q+ m6 S4 [
{选股}0 Z' {; O! S" E7 m, h4 V. P- r
EE:=CROSS(中波,中均线) AND MACD2>REF(MACD2,1) AND 短波>=REF(短波,1) AND 中均线>=REF(中均线,1);
+ j9 W" I: y6 t! m M0 B( Z) L出来:FILTER(EE,10);5 h2 a) Y; M ^% W7 [2 X; B
DRAWICON(出来,中均线,1); t: A2 M2 J) _' D. q2 z3 E
) j6 X2 S5 H& M" E- q9 T
+ @" P' V6 @" C, M! q
|
|小黑屋|手机版|Archiver|步步汇盈
( 冀ICP备2020020207号 ) 
发表于 2013-6-17 00:57:56
收藏
真高手！
楼主