在主图上右键点MACD的“修改当前指标公式” 然后拷如下列程序,名字自命名,我命名的是“MACD=背离” DIF:= EMA(CLOSE,12)-EMA(CLOSE,26);
* c5 G2 |& H$ GDEA:= EMA(DIF,9);) L3 Q1 `/ A$ Z1 \: ~; @
MACD:= (DIF-DEA)*2;
J' s8 T; `5 `均值:= SUM(ABS(MACD), 100)/100;/ y+ y6 G8 c8 D
起死回生:= REF(MACD, 2) > REF(MACD, 1) AND REF(MACD, 1) < 均值*0.1 AND
. i5 i5 m/ i z& Z) wREF(MACD, 1)>=0 AND REF(MACD, 1) < MACD;
% `. F% x, Q J! h- C: ?( R4 u金叉失败:= REF(MACD, 2) < REF(MACD, 1) AND REF(MACD, 1) > 0-均值*0.1 AND 2 v: |* Z# h H7 N; d& {$ \' b( ^
REF(MACD, 1)<=0 AND REF(MACD, 1) > MACD;- _, G! V0 _% n
AA1A:= BARSLAST(CROSS(DEA, DIF))+1;4 ~5 z- `5 D o# c9 {8 R, f& A7 E
AA1B:= IF(起死回生 OR 金叉失败, BARSLAST(起死回生 OR 金叉失败)+3, 99999);) S1 m2 H; ^/ g& M2 b
AA1:= IF(AA1B<AA1A, AA1B, AA1A);
, F0 M5 }0 \8 b, o! ~* gAA2A:= REF(BARSLAST(CROSS(DEA, DIF)), AA1)+1;
- l. o1 D( m$ g3 w- Z1 zAA2B:= IF(REF(起死回生 OR 金叉失败, AA1), REF(BARSLAST(起死回生 OR 金叉失败), AA1), 99999)+3;; i# B' U: {" _4 q1 k% v
AA2:= IF(AA2B<AA2A, AA2B, AA2A); K0 c- w6 X8 O7 k5 ] T) H8 K7 O
DIFZ~小值:= LLV(DIF, AA1+AA2);% t* P! F. X4 ~+ N
DIFZ~小日:= LLVBARS(DIF, AA1+AA2);/ R# l% J1 t& {* k
DBL1:= IF(DIFZ~小日<=AA1, 0, 1);
/ d* @) r( A( g5 s0 r; mDBL2:= IF(DBL1=1 AND C<REF(C, DIFZ~小日) AND DIF>REF(DIF, DIFZ~小日), 1, 0);
' n4 X* l; Y% v. Z' F( E2 kDBL:= IF(DBL1=0, 0, DBL2);
3 b1 i! Q# P$ ]7 L0 ` IDBLJC: DBL AND (CROSS(DIF, DEA) OR 起死回生) AND DIF>REF(DIF, 1); 第一步 第二步 第三步 第四步 第五步 第六步 4 b+ ]; \1 J( I5 J' [
|