在主图上右键点MACD的“修改当前指标公式” 然后拷如下列程序,名字自命名,我命名的是“MACD=背离” DIF:= EMA(CLOSE,12)-EMA(CLOSE,26);3 f1 [1 O1 g- v7 Z6 l
DEA:= EMA(DIF,9);: _2 n+ D B# U- j1 k. x4 q4 ^) ~
MACD:= (DIF-DEA)*2;
5 [$ P( B k, ?- A均值:= SUM(ABS(MACD), 100)/100;
+ S6 @$ U8 N: c% g起死回生:= REF(MACD, 2) > REF(MACD, 1) AND REF(MACD, 1) < 均值*0.1 AND : m: D6 G {7 i1 Y `7 F
REF(MACD, 1)>=0 AND REF(MACD, 1) < MACD;
) e2 }' h; {) h* Y9 _$ Q7 E; N金叉失败:= REF(MACD, 2) < REF(MACD, 1) AND REF(MACD, 1) > 0-均值*0.1 AND
0 c4 ~6 ?9 q! vREF(MACD, 1)<=0 AND REF(MACD, 1) > MACD;( u% ]) y8 l2 x( A- n# x1 W
AA1A:= BARSLAST(CROSS(DEA, DIF))+1;
9 I" r. r5 c/ W( D, q& w5 tAA1B:= IF(起死回生 OR 金叉失败, BARSLAST(起死回生 OR 金叉失败)+3, 99999);
7 U2 Y; J4 D9 {AA1:= IF(AA1B<AA1A, AA1B, AA1A);) R% M H# }& A$ x
AA2A:= REF(BARSLAST(CROSS(DEA, DIF)), AA1)+1;
7 v7 \# P' r, g( @1 L/ e! p9 g% o( G5 cAA2B:= IF(REF(起死回生 OR 金叉失败, AA1), REF(BARSLAST(起死回生 OR 金叉失败), AA1), 99999)+3;
' V9 h* S; q3 ~- E0 XAA2:= IF(AA2B<AA2A, AA2B, AA2A);
: e* K4 K' X4 H% l" [DIFZ~小值:= LLV(DIF, AA1+AA2);
' x6 W( I/ D) o$ u) j1 l- a" jDIFZ~小日:= LLVBARS(DIF, AA1+AA2);
3 J! X, K' t6 J+ l) L& o+ O9 C4 YDBL1:= IF(DIFZ~小日<=AA1, 0, 1);
" v5 p* G1 e5 A! A. XDBL2:= IF(DBL1=1 AND C<REF(C, DIFZ~小日) AND DIF>REF(DIF, DIFZ~小日), 1, 0);! B" F& p. Y: o2 A3 y0 L5 {9 U$ I
DBL:= IF(DBL1=0, 0, DBL2);
% G1 _$ K/ t/ r& J! yDBLJC: 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 完成。
r6 i' g7 ?6 @ r. I" ^ R
|