在主图上右键点MACD的“修改当前指标公式” 然后拷如下列程序,名字自命名,我命名的是“MACD=背离” DIF:= EMA(CLOSE,12)-EMA(CLOSE,26);% A4 ^# F8 }# j4 Y' c7 ?6 x+ @
DEA:= EMA(DIF,9);5 D! Q s8 I/ b1 T2 Z! p
MACD:= (DIF-DEA)*2;
7 e7 p/ M O, c$ ^' d: c均值:= SUM(ABS(MACD), 100)/100; p" a& j6 R N
起死回生:= REF(MACD, 2) > REF(MACD, 1) AND REF(MACD, 1) < 均值*0.1 AND
. r5 q M& o: c% S0 z- |, tREF(MACD, 1)>=0 AND REF(MACD, 1) < MACD;
+ C& k' v7 ~' {& M; ]8 ]/ j金叉失败:= REF(MACD, 2) < REF(MACD, 1) AND REF(MACD, 1) > 0-均值*0.1 AND
. d! ]9 [9 X( qREF(MACD, 1)<=0 AND REF(MACD, 1) > MACD;( X& P3 F; q' s9 V$ q. `7 Y
AA1A:= BARSLAST(CROSS(DEA, DIF))+1;+ \6 t1 F6 T# w3 a! l7 l
AA1B:= IF(起死回生 OR 金叉失败, BARSLAST(起死回生 OR 金叉失败)+3, 99999);
; T* m4 f) h. `( n3 e& l. gAA1:= IF(AA1B<AA1A, AA1B, AA1A);
3 O! P5 C2 `& q6 ~9 wAA2A:= REF(BARSLAST(CROSS(DEA, DIF)), AA1)+1;
# t2 g: j( |3 Y, o) ~$ Q2 V7 CAA2B:= IF(REF(起死回生 OR 金叉失败, AA1), REF(BARSLAST(起死回生 OR 金叉失败), AA1), 99999)+3;/ d' _$ ]) r x7 U3 E8 h& ]
AA2:= IF(AA2B<AA2A, AA2B, AA2A);
! i4 C7 r' ?+ Z$ C. q9 w8 IDIFZ~小值:= LLV(DIF, AA1+AA2);
9 B3 M6 C' [$ t: R& n6 |0 |DIFZ~小日:= LLVBARS(DIF, AA1+AA2);
' T( Q7 P) Z+ Q$ `, G0 _8 f' ZDBL1:= IF(DIFZ~小日<=AA1, 0, 1);' W5 ^, t1 x9 G$ _# N V
DBL2:= IF(DBL1=1 AND C<REF(C, DIFZ~小日) AND DIF>REF(DIF, DIFZ~小日), 1, 0);: x; U m/ _+ W+ @3 q7 |2 r) q
DBL:= IF(DBL1=0, 0, DBL2);: T3 T" Z, n5 T2 t9 P# [, Z+ s+ }
DBLJC: DBL AND (CROSS(DIF, DEA) OR 起死回生) AND DIF>REF(DIF, 1); 第一步 file:///C:\Users\NINGHO~1\AppData\Local\Temp\ksohtml\wps8353.tmp.jpg 第二步: file:///C:\Users\NINGHO~1\AppData\Local\Temp\ksohtml\wps8363.tmp.jpg 第三步: file:///C:\Users\NINGHO~1\AppData\Local\Temp\ksohtml\wps8374.tmp.jpg 第四步: file:///C:\Users\NINGHO~1\AppData\Local\Temp\ksohtml\wps8394.tmp.jpg 第五步: file:///C:\Users\NINGHO~1\AppData\Local\Temp\ksohtml\wps83A5.tmp.jpg 第六步: file:///C:\Users\NINGHO~1\AppData\Local\Temp\ksohtml\wps83B6.tmp.jpg 完成。
0 X& N+ Y7 F$ y! B# {1 l8 h2 f
|