在主图上右键点MACD的“修改当前指标公式” 然后拷如下列程序,名字自命名,我命名的是“MACD=背离” DIF:= EMA(CLOSE,12)-EMA(CLOSE,26);
/ E& A! K2 ]' x9 a% JDEA:= EMA(DIF,9);
9 \8 @. o: o3 Z& p3 j1 |) F" hMACD:= (DIF-DEA)*2;
1 }; U( Y' K3 m/ j均值:= SUM(ABS(MACD), 100)/100;$ W8 }- V+ y0 |) j+ S9 z
起死回生:= REF(MACD, 2) > REF(MACD, 1) AND REF(MACD, 1) < 均值*0.1 AND 2 E" V( z, Q7 k# {
REF(MACD, 1)>=0 AND REF(MACD, 1) < MACD;0 O7 z/ Q y5 Z: [$ E
金叉失败:= REF(MACD, 2) < REF(MACD, 1) AND REF(MACD, 1) > 0-均值*0.1 AND - g! I; a h5 K) F" D) T
REF(MACD, 1)<=0 AND REF(MACD, 1) > MACD;
. e0 c" B: n3 ^AA1A:= BARSLAST(CROSS(DEA, DIF))+1;
$ D3 p' H! `! y4 ]AA1B:= IF(起死回生 OR 金叉失败, BARSLAST(起死回生 OR 金叉失败)+3, 99999);! I5 s2 h# q* D; Z3 R) @
AA1:= IF(AA1B<AA1A, AA1B, AA1A);+ r$ ~ t; R' f1 Q: J1 }/ L
AA2A:= REF(BARSLAST(CROSS(DEA, DIF)), AA1)+1;9 v. [# Y4 u5 B- g$ ?6 E8 L$ Y+ |+ D1 x
AA2B:= IF(REF(起死回生 OR 金叉失败, AA1), REF(BARSLAST(起死回生 OR 金叉失败), AA1), 99999)+3;
! j% k: ~" |& `* m: S; _0 vAA2:= IF(AA2B<AA2A, AA2B, AA2A);
* g% j2 J/ b! u- j1 `1 WDIFZ~小值:= LLV(DIF, AA1+AA2);
# f3 [# a2 |) D. B) aDIFZ~小日:= LLVBARS(DIF, AA1+AA2);
+ u' x6 v" v8 k2 RDBL1:= IF(DIFZ~小日<=AA1, 0, 1);* X" {' @/ i0 H! E$ m
DBL2:= IF(DBL1=1 AND C<REF(C, DIFZ~小日) AND DIF>REF(DIF, DIFZ~小日), 1, 0);" Y& r& N) [3 A& l+ G: d
DBL:= IF(DBL1=0, 0, DBL2);
7 G' l( Q$ P c: n0 \' R: tDBLJC: DBL AND (CROSS(DIF, DEA) OR 起死回生) AND DIF>REF(DIF, 1); 第一步 第二步 第三步 第四步 第五步 第六步 ' n. U; H# h; O8 h3 G) B
|