在主图上右键点MACD的“修改当前指标公式” 然后拷如下列程序,名字自命名,我命名的是“MACD=背离” DIF:= EMA(CLOSE,12)-EMA(CLOSE,26);
1 m1 j3 e4 N' U8 A% hDEA:= EMA(DIF,9);3 d( Z% h, H& _. W7 A5 t. t( Z
MACD:= (DIF-DEA)*2;
: D* f# x) ~, [1 {/ r均值:= SUM(ABS(MACD), 100)/100;
; K5 t, d" ` _3 I3 ~# _' g6 P起死回生:= REF(MACD, 2) > REF(MACD, 1) AND REF(MACD, 1) < 均值*0.1 AND
- ?3 d9 C) s$ Y' FREF(MACD, 1)>=0 AND REF(MACD, 1) < MACD;/ a9 P( B6 H# j6 A1 w! V# V
金叉失败:= REF(MACD, 2) < REF(MACD, 1) AND REF(MACD, 1) > 0-均值*0.1 AND
1 M& q; f& o6 r' G8 W, c% |REF(MACD, 1)<=0 AND REF(MACD, 1) > MACD;8 K* W! x. c0 v% L& N+ F
AA1A:= BARSLAST(CROSS(DEA, DIF))+1;$ m; o/ X' _* [/ A4 Q
AA1B:= IF(起死回生 OR 金叉失败, BARSLAST(起死回生 OR 金叉失败)+3, 99999);% e: `2 V7 j; K- t# p
AA1:= IF(AA1B<AA1A, AA1B, AA1A);
9 R/ B H+ s8 p, R2 Z2 iAA2A:= REF(BARSLAST(CROSS(DEA, DIF)), AA1)+1;
% Y+ Y. J, Y4 V* |# |AA2B:= IF(REF(起死回生 OR 金叉失败, AA1), REF(BARSLAST(起死回生 OR 金叉失败), AA1), 99999)+3;3 O! I( e# H: h2 ^; F5 B- m
AA2:= IF(AA2B<AA2A, AA2B, AA2A);
8 P2 O& S8 V& u- y6 ]9 UDIFZ~小值:= LLV(DIF, AA1+AA2);
3 E9 u: r( b3 U) x1 N; zDIFZ~小日:= LLVBARS(DIF, AA1+AA2);! x' f* @' i! R& q: X
DBL1:= IF(DIFZ~小日<=AA1, 0, 1);
' p a9 y; B x- N: zDBL2:= IF(DBL1=1 AND C<REF(C, DIFZ~小日) AND DIF>REF(DIF, DIFZ~小日), 1, 0);& K3 t5 y6 v, |, o
DBL:= IF(DBL1=0, 0, DBL2);
' n- ]$ S3 \' @% }1 q! ?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 完成。
: [- ?2 c4 x4 V' W/ x+ t( Y
|