在主图上右键点MACD的“修改当前指标公式” 然后拷如下列程序,名字自命名,我命名的是“MACD=背离” DIF:= EMA(CLOSE,12)-EMA(CLOSE,26);2 w) Y, Z) e5 ]" y, M6 u
DEA:= EMA(DIF,9); T. S$ ]0 q j7 t% `" D% B
MACD:= (DIF-DEA)*2;
" K, Y6 \$ e4 b0 l均值:= SUM(ABS(MACD), 100)/100;6 q) B" v* K- W# m' q. W2 E
起死回生:= REF(MACD, 2) > REF(MACD, 1) AND REF(MACD, 1) < 均值*0.1 AND ( y9 m/ F/ N4 _3 M& P3 o- O
REF(MACD, 1)>=0 AND REF(MACD, 1) < MACD;
" Z5 u, e) a+ [7 q- {* p8 S金叉失败:= REF(MACD, 2) < REF(MACD, 1) AND REF(MACD, 1) > 0-均值*0.1 AND
1 ~$ r& B( Q, }% [: ~REF(MACD, 1)<=0 AND REF(MACD, 1) > MACD;
/ t; a& H" ~6 gAA1A:= BARSLAST(CROSS(DEA, DIF))+1;
* q* v- [, t& {4 q& P/ J8 FAA1B:= IF(起死回生 OR 金叉失败, BARSLAST(起死回生 OR 金叉失败)+3, 99999);; K/ a& j g8 d8 x# E# [% v. A" E
AA1:= IF(AA1B<AA1A, AA1B, AA1A);& ^2 A9 e" C' k9 E
AA2A:= REF(BARSLAST(CROSS(DEA, DIF)), AA1)+1;" l, w# @$ B. K9 g
AA2B:= IF(REF(起死回生 OR 金叉失败, AA1), REF(BARSLAST(起死回生 OR 金叉失败), AA1), 99999)+3;
4 V F, H+ D9 ^0 u6 f8 SAA2:= IF(AA2B<AA2A, AA2B, AA2A);. q Q, N1 e1 V/ h4 _+ d- A s& ?
DIFZ~小值:= LLV(DIF, AA1+AA2);
8 w1 ^/ F0 d4 j+ e! ZDIFZ~小日:= LLVBARS(DIF, AA1+AA2);$ S# A. G! M0 K# X7 {
DBL1:= IF(DIFZ~小日<=AA1, 0, 1);
: B5 m0 n" U( E/ \# hDBL2:= IF(DBL1=1 AND C<REF(C, DIFZ~小日) AND DIF>REF(DIF, DIFZ~小日), 1, 0);
0 ^8 _# L2 }+ P& IDBL:= IF(DBL1=0, 0, DBL2);
6 o# F$ m+ R( B8 b6 _4 c% Q: eDBLJC: DBL AND (CROSS(DIF, DEA) OR 起死回生) AND DIF>REF(DIF, 1); 第一步 第二步 第三步 第四步 第五步 第六步 ; g6 i! M$ d6 p
|