在主图上右键点MACD的“修改当前指标公式” 然后拷如下列程序,名字自命名,我命名的是“MACD=背离” DIF:= EMA(CLOSE,12)-EMA(CLOSE,26);
" g A' u `3 ^! ZDEA:= EMA(DIF,9);
/ `8 T- N* p+ R* l6 KMACD:= (DIF-DEA)*2;
0 s; s% `/ }2 d9 o5 ~7 p; V均值:= SUM(ABS(MACD), 100)/100;
: ^: s- g$ m$ K9 Q1 ]9 j6 L起死回生:= REF(MACD, 2) > REF(MACD, 1) AND REF(MACD, 1) < 均值*0.1 AND + T4 |7 C" b4 k9 z* w' c* v
REF(MACD, 1)>=0 AND REF(MACD, 1) < MACD;* j: f- }; D& H7 p9 Q a
金叉失败:= REF(MACD, 2) < REF(MACD, 1) AND REF(MACD, 1) > 0-均值*0.1 AND
: ~# z# U3 K* `" C: x% r3 JREF(MACD, 1)<=0 AND REF(MACD, 1) > MACD;: x' W$ o. d+ W" y1 R- k
AA1A:= BARSLAST(CROSS(DEA, DIF))+1;
8 |9 {) {, W. j* K$ Z+ }+ L/ [2 EAA1B:= IF(起死回生 OR 金叉失败, BARSLAST(起死回生 OR 金叉失败)+3, 99999);
/ D% @" g& g2 b. J4 Y! N8 F2 r& ?( gAA1:= IF(AA1B<AA1A, AA1B, AA1A);# P n6 J m0 W" I
AA2A:= REF(BARSLAST(CROSS(DEA, DIF)), AA1)+1;+ [9 m) ^) T/ d o" Q. p4 }4 {( \7 m2 T
AA2B:= IF(REF(起死回生 OR 金叉失败, AA1), REF(BARSLAST(起死回生 OR 金叉失败), AA1), 99999)+3;
2 T3 I" h0 B1 I6 @AA2:= IF(AA2B<AA2A, AA2B, AA2A);2 `9 V2 J' H- f
DIFZ~小值:= LLV(DIF, AA1+AA2);' h3 l2 p: ~3 R2 v- q2 g' q5 n
DIFZ~小日:= LLVBARS(DIF, AA1+AA2);
4 g. n( l5 d3 F/ B, aDBL1:= IF(DIFZ~小日<=AA1, 0, 1);
5 W2 c1 i4 q% r8 |5 b* C+ e/ c* WDBL2:= IF(DBL1=1 AND C<REF(C, DIFZ~小日) AND DIF>REF(DIF, DIFZ~小日), 1, 0);5 P n: X% m- U( V/ e
DBL:= IF(DBL1=0, 0, DBL2);
8 t; {' C( i' e% W8 ZDBLJC: 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 完成。 % `( }& T$ Q! V7 i( f
|