在主图上右键点MACD的“修改当前指标公式” 然后拷如下列程序,名字自命名,我命名的是“MACD=背离” DIF:= EMA(CLOSE,12)-EMA(CLOSE,26);4 }6 ~$ X" ]- Z# J7 n
DEA:= EMA(DIF,9);
$ {0 l5 Q2 ~' a+ z4 f3 uMACD:= (DIF-DEA)*2;
4 F# w" U# z! P7 l7 F& c' b均值:= SUM(ABS(MACD), 100)/100;
6 }5 Y! Z2 Q+ k2 B# U' o$ p起死回生:= REF(MACD, 2) > REF(MACD, 1) AND REF(MACD, 1) < 均值*0.1 AND
( z# P+ F- u3 g) u. r/ v$ {REF(MACD, 1)>=0 AND REF(MACD, 1) < MACD;% F9 t! l, x% B9 R
金叉失败:= REF(MACD, 2) < REF(MACD, 1) AND REF(MACD, 1) > 0-均值*0.1 AND 1 ^6 O" B7 L J4 w4 j
REF(MACD, 1)<=0 AND REF(MACD, 1) > MACD;
- E( M$ H+ {4 M' eAA1A:= BARSLAST(CROSS(DEA, DIF))+1;" w$ L) Q3 j) {3 N J% s
AA1B:= IF(起死回生 OR 金叉失败, BARSLAST(起死回生 OR 金叉失败)+3, 99999);! i8 @( }, W6 q- Y
AA1:= IF(AA1B<AA1A, AA1B, AA1A);# [& T3 U$ {9 D% J
AA2A:= REF(BARSLAST(CROSS(DEA, DIF)), AA1)+1;
0 H T; K$ S& e$ dAA2B:= IF(REF(起死回生 OR 金叉失败, AA1), REF(BARSLAST(起死回生 OR 金叉失败), AA1), 99999)+3;1 }9 H. j, t# m9 u5 n
AA2:= IF(AA2B<AA2A, AA2B, AA2A);
, P4 e# J; d( l6 o( L" w4 n- O6 fDIFZ~小值:= LLV(DIF, AA1+AA2);- A' v' ]9 v. |" B1 v- E
DIFZ~小日:= LLVBARS(DIF, AA1+AA2);
( j C" i& n5 \. r6 b8 oDBL1:= IF(DIFZ~小日<=AA1, 0, 1);
/ c+ Z' Q% r- P9 e- ? T% Z6 FDBL2:= IF(DBL1=1 AND C<REF(C, DIFZ~小日) AND DIF>REF(DIF, DIFZ~小日), 1, 0);
; A! S# J8 B7 J' aDBL:= IF(DBL1=0, 0, DBL2);. Z1 B/ ^% v1 ]6 K) {1 k7 D
DBLJC: DBL AND (CROSS(DIF, DEA) OR 起死回生) AND DIF>REF(DIF, 1); 第一步 file:///C:\Users\NINGHO~1\AppData\Local\Temp\ksohtml\wps8353.tmp.jpg 第二步: file:///C:\Users\NINGHO~1\AppData\Local\Temp\ksohtml\wps8363.tmp.jpg 第三步: file:///C:\Users\NINGHO~1\AppData\Local\Temp\ksohtml\wps8374.tmp.jpg 第四步: file:///C:\Users\NINGHO~1\AppData\Local\Temp\ksohtml\wps8394.tmp.jpg 第五步: file:///C:\Users\NINGHO~1\AppData\Local\Temp\ksohtml\wps83A5.tmp.jpg 第六步: file:///C:\Users\NINGHO~1\AppData\Local\Temp\ksohtml\wps83B6.tmp.jpg 完成。
6 y% {/ |! o( g% z$ X+ S |