在主图上右键点MACD的“修改当前指标公式” 然后拷如下列程序,名字自命名,我命名的是“MACD=背离” DIF:= EMA(CLOSE,12)-EMA(CLOSE,26);
; G! ?! H5 ~* r1 `# ~DEA:= EMA(DIF,9);
3 c& m9 y! ]$ e7 g+ k3 ?/ vMACD:= (DIF-DEA)*2;
' { N& X: r6 p& {% |, E均值:= SUM(ABS(MACD), 100)/100;
3 z5 k; T- Y- _ c起死回生:= REF(MACD, 2) > REF(MACD, 1) AND REF(MACD, 1) < 均值*0.1 AND * c# n, l p- `/ C# F; W" f* u r+ X
REF(MACD, 1)>=0 AND REF(MACD, 1) < MACD;
, \: a; N. I( k6 W3 H2 t$ M4 p& J5 m金叉失败:= REF(MACD, 2) < REF(MACD, 1) AND REF(MACD, 1) > 0-均值*0.1 AND
7 g. c' q/ C0 VREF(MACD, 1)<=0 AND REF(MACD, 1) > MACD;# _6 y# B, l5 ?6 b
AA1A:= BARSLAST(CROSS(DEA, DIF))+1;
/ }+ i7 J# k. w* F1 vAA1B:= IF(起死回生 OR 金叉失败, BARSLAST(起死回生 OR 金叉失败)+3, 99999);
4 @6 h# g9 f! u$ R: u4 s# sAA1:= IF(AA1B<AA1A, AA1B, AA1A);
2 [* U( U0 N5 _2 F' BAA2A:= REF(BARSLAST(CROSS(DEA, DIF)), AA1)+1;
4 ]+ x, g8 Y% A+ T5 v1 n3 ?' ^+ ]AA2B:= IF(REF(起死回生 OR 金叉失败, AA1), REF(BARSLAST(起死回生 OR 金叉失败), AA1), 99999)+3;" K: F& j0 ?* { y* q) X9 i j& j
AA2:= IF(AA2B<AA2A, AA2B, AA2A);
* a$ |$ W$ u# K4 E8 Q6 HDIFZ~小值:= LLV(DIF, AA1+AA2);
* e% `2 N: r3 k% oDIFZ~小日:= LLVBARS(DIF, AA1+AA2);9 x, O! `& G; B' [
DBL1:= IF(DIFZ~小日<=AA1, 0, 1);6 u. M# G8 p- Z3 W, Q
DBL2:= IF(DBL1=1 AND C<REF(C, DIFZ~小日) AND DIF>REF(DIF, DIFZ~小日), 1, 0);3 G! o6 Y6 F% j1 `) \/ B+ s
DBL:= IF(DBL1=0, 0, DBL2);7 b! S" a. _( 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 完成。 4 h% {% i& x- B% D3 I9 a5 Y# q3 l
|