在主图上右键点MACD的“修改当前指标公式” 然后拷如下列程序,名字自命名,我命名的是“MACD=背离” DIF:= EMA(CLOSE,12)-EMA(CLOSE,26);+ w5 T. a7 o. L1 G
DEA:= EMA(DIF,9);4 g9 H) V) W, r/ H0 h4 z( Q
MACD:= (DIF-DEA)*2;
$ H/ G: p, C# K均值:= SUM(ABS(MACD), 100)/100;
2 \ K9 N1 Y1 G. c; U起死回生:= REF(MACD, 2) > REF(MACD, 1) AND REF(MACD, 1) < 均值*0.1 AND - N. C7 N; L( V- J. s' q
REF(MACD, 1)>=0 AND REF(MACD, 1) < MACD;
0 G- r# [# K ~金叉失败:= REF(MACD, 2) < REF(MACD, 1) AND REF(MACD, 1) > 0-均值*0.1 AND * ~0 z! k8 \; k# l2 b
REF(MACD, 1)<=0 AND REF(MACD, 1) > MACD;* l* k) q* y' R) V& O8 h
AA1A:= BARSLAST(CROSS(DEA, DIF))+1;2 o3 a" a; `4 [* P
AA1B:= IF(起死回生 OR 金叉失败, BARSLAST(起死回生 OR 金叉失败)+3, 99999);! F3 @+ v' _9 k- J- K9 g C5 C. s) y
AA1:= IF(AA1B<AA1A, AA1B, AA1A);3 v! y" D4 a. p6 I; X' ~7 G
AA2A:= REF(BARSLAST(CROSS(DEA, DIF)), AA1)+1;
# v5 ]' ^. w/ n$ M% OAA2B:= IF(REF(起死回生 OR 金叉失败, AA1), REF(BARSLAST(起死回生 OR 金叉失败), AA1), 99999)+3; V' S: X4 q: Y/ y* r* s
AA2:= IF(AA2B<AA2A, AA2B, AA2A);) X4 R/ ^" D2 S1 N
DIFZ~小值:= LLV(DIF, AA1+AA2); e3 K9 u2 w9 n( v' v& p# ^7 A: T
DIFZ~小日:= LLVBARS(DIF, AA1+AA2);! [! J5 i, u1 _% b7 X$ u( L- [
DBL1:= IF(DIFZ~小日<=AA1, 0, 1);
5 f s; L; K4 E" P1 E+ m9 I6 ADBL2:= IF(DBL1=1 AND C<REF(C, DIFZ~小日) AND DIF>REF(DIF, DIFZ~小日), 1, 0);/ ]1 ^. W! f3 s& h4 b
DBL:= IF(DBL1=0, 0, DBL2);
' Q- N+ c8 A( N9 Y& |( TDBLJC: 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 完成。 ) p8 {6 v* F3 R% X) m! E
|