在主图上右键点MACD的“修改当前指标公式” 然后拷如下列程序,名字自命名,我命名的是“MACD=背离” DIF:= EMA(CLOSE,12)-EMA(CLOSE,26);6 O- V3 N: k, W' M* A; s
DEA:= EMA(DIF,9);
6 `) c& M( X) r: n3 SMACD:= (DIF-DEA)*2;
1 X1 b5 }5 Z( w1 c* K2 I均值:= SUM(ABS(MACD), 100)/100;6 `) t% k/ Q U0 E4 k- H3 `' M
起死回生:= REF(MACD, 2) > REF(MACD, 1) AND REF(MACD, 1) < 均值*0.1 AND ' b2 i" P% Y8 J
REF(MACD, 1)>=0 AND REF(MACD, 1) < MACD;
8 s3 }% w. o+ @2 n金叉失败:= REF(MACD, 2) < REF(MACD, 1) AND REF(MACD, 1) > 0-均值*0.1 AND
: t1 z: j6 a. FREF(MACD, 1)<=0 AND REF(MACD, 1) > MACD;
`8 d4 E( x% m+ }/ }% cAA1A:= BARSLAST(CROSS(DEA, DIF))+1;! b1 V) y, `; e
AA1B:= IF(起死回生 OR 金叉失败, BARSLAST(起死回生 OR 金叉失败)+3, 99999);
% _) E5 l* j) u5 vAA1:= IF(AA1B<AA1A, AA1B, AA1A);5 R" r e6 s8 J# Q
AA2A:= REF(BARSLAST(CROSS(DEA, DIF)), AA1)+1;
6 Y+ Z9 J* F) f! y0 dAA2B:= IF(REF(起死回生 OR 金叉失败, AA1), REF(BARSLAST(起死回生 OR 金叉失败), AA1), 99999)+3;
7 r0 @+ d) T2 B! v& ?0 u, F" q: SAA2:= IF(AA2B<AA2A, AA2B, AA2A);- Z3 q: s4 t; l
DIFZ~小值:= LLV(DIF, AA1+AA2);
( c' g& y4 K( u5 `9 c# r9 ZDIFZ~小日:= LLVBARS(DIF, AA1+AA2);1 p( L& _2 `/ g* T2 f, W9 b7 X
DBL1:= IF(DIFZ~小日<=AA1, 0, 1);; P6 H% `1 ^7 I7 u% T8 F
DBL2:= IF(DBL1=1 AND C<REF(C, DIFZ~小日) AND DIF>REF(DIF, DIFZ~小日), 1, 0);
8 _) s' i7 x/ g) N/ L' q+ VDBL:= IF(DBL1=0, 0, DBL2);( t* {' X1 l/ V; N3 k3 K
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 完成。 * I, S" O6 e8 I' T* g# @
|