在主图上右键点MACD的“修改当前指标公式” 然后拷如下列程序,名字自命名,我命名的是“MACD=背离” DIF:= EMA(CLOSE,12)-EMA(CLOSE,26);/ r% Z5 a0 L$ T M0 j
DEA:= EMA(DIF,9); P8 F2 k* z: ^' ~" S8 g* Q4 v4 A
MACD:= (DIF-DEA)*2; `- L0 r- n. X7 L
均值:= SUM(ABS(MACD), 100)/100;
8 ^$ H, ~- H" i2 [起死回生:= REF(MACD, 2) > REF(MACD, 1) AND REF(MACD, 1) < 均值*0.1 AND . P/ X) R2 d- q/ w1 s4 z
REF(MACD, 1)>=0 AND REF(MACD, 1) < MACD;
! d' M0 A V8 X! P0 G. f6 l4 n金叉失败:= REF(MACD, 2) < REF(MACD, 1) AND REF(MACD, 1) > 0-均值*0.1 AND ; j0 W* W1 C+ W n5 M
REF(MACD, 1)<=0 AND REF(MACD, 1) > MACD;
/ A3 r# {" `+ ZAA1A:= BARSLAST(CROSS(DEA, DIF))+1;
: x; B' u0 a3 |, N$ E4 T" W+ Z. a( PAA1B:= IF(起死回生 OR 金叉失败, BARSLAST(起死回生 OR 金叉失败)+3, 99999);# t: h. O- G+ ]
AA1:= IF(AA1B<AA1A, AA1B, AA1A);" [: e& v( m; Z2 C( `/ t
AA2A:= REF(BARSLAST(CROSS(DEA, DIF)), AA1)+1;
1 a3 A# |* C& l, a: Z; vAA2B:= IF(REF(起死回生 OR 金叉失败, AA1), REF(BARSLAST(起死回生 OR 金叉失败), AA1), 99999)+3;, P5 U' n x- d2 j
AA2:= IF(AA2B<AA2A, AA2B, AA2A);$ @6 d+ {# e7 [2 S8 }0 n& k
DIFZ~小值:= LLV(DIF, AA1+AA2);3 A0 c- \3 m/ t5 B% K
DIFZ~小日:= LLVBARS(DIF, AA1+AA2);
" h7 D; P' C/ W. W$ _5 F7 ^4 uDBL1:= IF(DIFZ~小日<=AA1, 0, 1);
2 Z9 x$ m4 t; n, ]8 TDBL2:= IF(DBL1=1 AND C<REF(C, DIFZ~小日) AND DIF>REF(DIF, DIFZ~小日), 1, 0);) D8 A% a& y" F1 ]
DBL:= IF(DBL1=0, 0, DBL2);
3 B' X3 V( q9 _( HDBLJC: DBL AND (CROSS(DIF, DEA) OR 起死回生) AND DIF>REF(DIF, 1); 第一步 第二步 第三步 第四步 第五步 第六步
: E- O$ d5 ?3 q: N9 _$ _2 O
|