在主图上右键点MACD的“修改当前指标公式” 然后拷如下列程序,名字自命名,我命名的是“MACD=背离” DIF:= EMA(CLOSE,12)-EMA(CLOSE,26);5 t- D; A! F1 K# D5 p
DEA:= EMA(DIF,9);
, C/ J- i' c' V7 p8 U* |8 ]MACD:= (DIF-DEA)*2;
. H' U/ h* \; k8 ]- \) L4 t均值:= SUM(ABS(MACD), 100)/100;
" j' F5 Z+ i/ y7 }. N. q" L" x起死回生:= REF(MACD, 2) > REF(MACD, 1) AND REF(MACD, 1) < 均值*0.1 AND W( V4 m' ?0 Z1 q8 O' a! s: W5 D
REF(MACD, 1)>=0 AND REF(MACD, 1) < MACD;
' s& p$ m; [$ I" {金叉失败:= REF(MACD, 2) < REF(MACD, 1) AND REF(MACD, 1) > 0-均值*0.1 AND
4 V- W' e5 W- T$ |% XREF(MACD, 1)<=0 AND REF(MACD, 1) > MACD;
4 s: m8 ]# O1 N% YAA1A:= BARSLAST(CROSS(DEA, DIF))+1;
8 A, o* ^; t# U4 t9 x/ e4 bAA1B:= IF(起死回生 OR 金叉失败, BARSLAST(起死回生 OR 金叉失败)+3, 99999);5 D. b7 q. X9 u* D2 w, k1 c+ i) Y/ ^4 D
AA1:= IF(AA1B<AA1A, AA1B, AA1A);+ q6 j. L7 W0 A0 n8 ]& L
AA2A:= REF(BARSLAST(CROSS(DEA, DIF)), AA1)+1;/ k4 S+ r6 h. o% \* n% _! E
AA2B:= IF(REF(起死回生 OR 金叉失败, AA1), REF(BARSLAST(起死回生 OR 金叉失败), AA1), 99999)+3;
1 `% j% D0 e, _; cAA2:= IF(AA2B<AA2A, AA2B, AA2A);
# S; K8 z8 E* p& h; `9 ~- O SDIFZ~小值:= LLV(DIF, AA1+AA2);3 Z6 G" n3 E0 d
DIFZ~小日:= LLVBARS(DIF, AA1+AA2);
& C6 _; C( a. Z3 r) }% C6 nDBL1:= IF(DIFZ~小日<=AA1, 0, 1);& R, v5 m8 U+ P/ q( G# i& L
DBL2:= IF(DBL1=1 AND C<REF(C, DIFZ~小日) AND DIF>REF(DIF, DIFZ~小日), 1, 0);
% X, Q3 w4 ~* H/ ]! nDBL:= IF(DBL1=0, 0, DBL2);$ n' ~! I& H$ L; m' F
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 完成。 # P7 o, z! c; t9 b
|