在主图上右键点MACD的“修改当前指标公式” 然后拷如下列程序,名字自命名,我命名的是“MACD=背离” DIF:= EMA(CLOSE,12)-EMA(CLOSE,26);' J) Z* b6 A/ G/ ?
DEA:= EMA(DIF,9);
/ I G$ j- m7 |+ X8 D f# ?- BMACD:= (DIF-DEA)*2;3 f% O* W3 L) x, \' u$ \
均值:= SUM(ABS(MACD), 100)/100;
/ L, h, a5 u' ^6 [起死回生:= REF(MACD, 2) > REF(MACD, 1) AND REF(MACD, 1) < 均值*0.1 AND
7 e7 y2 a. b1 k3 l+ oREF(MACD, 1)>=0 AND REF(MACD, 1) < MACD;% i* u& X2 _1 O7 J
金叉失败:= REF(MACD, 2) < REF(MACD, 1) AND REF(MACD, 1) > 0-均值*0.1 AND ; g. R+ U: W" o- W) e2 W" R( \
REF(MACD, 1)<=0 AND REF(MACD, 1) > MACD;" {$ F3 _( y& V. K- D
AA1A:= BARSLAST(CROSS(DEA, DIF))+1; F( Z' ~4 m* _$ q3 Z- H( G1 D
AA1B:= IF(起死回生 OR 金叉失败, BARSLAST(起死回生 OR 金叉失败)+3, 99999);, u0 e: V2 Z/ m. Y# b) G
AA1:= IF(AA1B<AA1A, AA1B, AA1A);0 _: a7 ~# p& p7 w
AA2A:= REF(BARSLAST(CROSS(DEA, DIF)), AA1)+1;% S8 Q, \ Q: U+ h# x. K; i
AA2B:= IF(REF(起死回生 OR 金叉失败, AA1), REF(BARSLAST(起死回生 OR 金叉失败), AA1), 99999)+3;
3 k" {, F x9 uAA2:= IF(AA2B<AA2A, AA2B, AA2A);
$ u/ c, C. o# a* d3 WDIFZ~小值:= LLV(DIF, AA1+AA2); ~1 |& i9 n- Y8 W9 E
DIFZ~小日:= LLVBARS(DIF, AA1+AA2);
4 r! C% Z- F" F8 M: }0 \DBL1:= IF(DIFZ~小日<=AA1, 0, 1);
/ ^# }& `9 l# Q# D0 |$ ?+ w3 @DBL2:= IF(DBL1=1 AND C<REF(C, DIFZ~小日) AND DIF>REF(DIF, DIFZ~小日), 1, 0);
. O0 e# A8 \* I3 S- t" [( W6 yDBL:= IF(DBL1=0, 0, DBL2);
; u2 M) s, f+ A% xDBLJC: DBL AND (CROSS(DIF, DEA) OR 起死回生) AND DIF>REF(DIF, 1); 第一步 第二步 第三步 第四步 第五步 第六步
: m' D8 A+ p8 D0 P, E4 F$ D
|