在主图上右键点MACD的“修改当前指标公式” 然后拷如下列程序,名字自命名,我命名的是“MACD=背离” DIF:= EMA(CLOSE,12)-EMA(CLOSE,26);
- q( b9 {6 T9 [( c- P! qDEA:= EMA(DIF,9);# f! D3 }% E% B% o
MACD:= (DIF-DEA)*2;
6 T! \$ o& j. w4 p4 M0 d. g均值:= SUM(ABS(MACD), 100)/100;& D0 y6 n! J+ F: f6 x
起死回生:= REF(MACD, 2) > REF(MACD, 1) AND REF(MACD, 1) < 均值*0.1 AND # n q3 l3 i" g- s
REF(MACD, 1)>=0 AND REF(MACD, 1) < MACD;* E- M* K. ]- b
金叉失败:= REF(MACD, 2) < REF(MACD, 1) AND REF(MACD, 1) > 0-均值*0.1 AND
3 G1 }. h& q9 ^2 |% B" _REF(MACD, 1)<=0 AND REF(MACD, 1) > MACD;7 ?; z0 O/ S5 {6 s# t
AA1A:= BARSLAST(CROSS(DEA, DIF))+1;
M; b @% t( K' E# SAA1B:= IF(起死回生 OR 金叉失败, BARSLAST(起死回生 OR 金叉失败)+3, 99999);
% B9 g; c: n, b. j5 AAA1:= IF(AA1B<AA1A, AA1B, AA1A);
& E8 h4 M; q8 U& aAA2A:= REF(BARSLAST(CROSS(DEA, DIF)), AA1)+1;
3 b$ V1 P& w6 }+ ]: r& yAA2B:= IF(REF(起死回生 OR 金叉失败, AA1), REF(BARSLAST(起死回生 OR 金叉失败), AA1), 99999)+3;
8 Z( P9 N4 O$ Y& | G: `AA2:= IF(AA2B<AA2A, AA2B, AA2A);
' C" d" C0 A' b* tDIFZ~小值:= LLV(DIF, AA1+AA2);! y$ ?" L ?1 U4 n9 u
DIFZ~小日:= LLVBARS(DIF, AA1+AA2);- l4 o9 g( ^; o0 N4 A: d
DBL1:= IF(DIFZ~小日<=AA1, 0, 1);
6 i) f! E! I+ a4 |! D0 vDBL2:= IF(DBL1=1 AND C<REF(C, DIFZ~小日) AND DIF>REF(DIF, DIFZ~小日), 1, 0);. f. e" j2 H% l- C+ F9 b3 e
DBL:= IF(DBL1=0, 0, DBL2);
7 M8 C' p" }3 b3 k0 tDBLJC: DBL AND (CROSS(DIF, DEA) OR 起死回生) AND DIF>REF(DIF, 1); 第一步 第二步 第三步 第四步 第五步 第六步 ' e: y) U6 ?- `+ K: b" I/ D
|