|
在主图上右键点MACD的“修改当前指标公式” 然后拷如下列程序，名字自命名，我命名的是“MACD=背离” DIF:= EMA(CLOSE,12)-EMA(CLOSE,26);% W/ W2 l! I' H. a
DEA:= EMA(DIF,9);
/ L5 x" w. f* x2 W+ J( C' sMACD:= (DIF-DEA)*2;
( L% I+ q, s( k+ M8 S均值:= SUM(ABS(MACD), 100)/100;
9 c) K4 L$ i7 z" q起死回生:= REF(MACD, 2) > REF(MACD, 1) AND REF(MACD, 1) < 均值*0.1 AND
% H+ S8 T4 l, Z5 P' ^) ZREF(MACD, 1)>=0 AND REF(MACD, 1) < MACD; l6 A4 v: z# v2 N# G$ a
金叉失败:= REF(MACD, 2) < REF(MACD, 1) AND REF(MACD, 1) > 0-均值*0.1 AND
2 K8 J' R" u& T8 A9 V2 u, ZREF(MACD, 1)<=0 AND REF(MACD, 1) > MACD;. \8 N9 U. ^ z
AA1A:= BARSLAST(CROSS(DEA, DIF))+1;$ k2 f2 A3 f- B- F+ n
AA1B:= IF(起死回生 OR 金叉失败, BARSLAST(起死回生 OR 金叉失败)+3, 99999);
, w+ d; k, x5 U7 z- }( q. @4 QAA1:= IF(AA1B<AA1A, AA1B, AA1A);" g. r* W( @8 E& \, f
AA2A:= REF(BARSLAST(CROSS(DEA, DIF)), AA1)+1;
& a" W \/ F6 J" ^AA2B:= IF(REF(起死回生 OR 金叉失败, AA1), REF(BARSLAST(起死回生 OR 金叉失败), AA1), 99999)+3;# w; T- P k2 J4 h k6 O
AA2:= IF(AA2B<AA2A, AA2B, AA2A);3 `7 L. {' A" P! P: B$ O8 M) U
DIFZ~小值:= LLV(DIF, AA1+AA2);
, O5 y1 t- `6 \/ ]1 S7 ~% gDIFZ~小日:= LLVBARS(DIF, AA1+AA2);
4 \0 Q0 c. O/ ?+ Q3 Y, e+ |2 YDBL1:= IF(DIFZ~小日<=AA1, 0, 1);5 a/ h8 |; E: ]5 T1 l+ t: D
DBL2:= IF(DBL1=1 AND C<REF(C, DIFZ~小日) AND DIF>REF(DIF, DIFZ~小日), 1, 0);
! b" P7 y. q) z HDBL:= IF(DBL1=0, 0, DBL2);
7 [) j7 W1 D4 Q0 i' ~DBLJC: DBL AND (CROSS(DIF, DEA) OR 起死回生) AND DIF>REF(DIF, 1); 第一步 第二步 第三步 第四步 第五步 第六步
( l$ q: l, t% m. D. W
| 
[复制链接]
京公网安备 11010502042737号
发表于 2018-8-11 09:33:44
收藏
支持
反对
