在主图上右键点MACD的“修改当前指标公式” 然后拷如下列程序,名字自命名,我命名的是“MACD=背离” DIF:= EMA(CLOSE,12)-EMA(CLOSE,26);8 @+ g" N5 H6 C, G
DEA:= EMA(DIF,9);# H. K( u; p5 C6 p
MACD:= (DIF-DEA)*2;
9 M: d; @& V* o" G均值:= SUM(ABS(MACD), 100)/100;% z: N+ m/ C% f
起死回生:= REF(MACD, 2) > REF(MACD, 1) AND REF(MACD, 1) < 均值*0.1 AND
; X4 ?2 \- C. G4 f# U& U$ f: [REF(MACD, 1)>=0 AND REF(MACD, 1) < MACD;
8 C0 Y6 R2 j- [3 _! ^, C X) V金叉失败:= REF(MACD, 2) < REF(MACD, 1) AND REF(MACD, 1) > 0-均值*0.1 AND
4 O Z/ _5 ?% y1 Q7 SREF(MACD, 1)<=0 AND REF(MACD, 1) > MACD;
% L5 V: D# t: N2 `AA1A:= BARSLAST(CROSS(DEA, DIF))+1;) ~$ K, q8 \9 C# x5 l: e e/ `; Q
AA1B:= IF(起死回生 OR 金叉失败, BARSLAST(起死回生 OR 金叉失败)+3, 99999);2 P/ u& M, s# s5 o" ^' w( y
AA1:= IF(AA1B<AA1A, AA1B, AA1A);
. r' e2 w+ F. q. ], t4 IAA2A:= REF(BARSLAST(CROSS(DEA, DIF)), AA1)+1;( W; }: f6 t, o0 {* G
AA2B:= IF(REF(起死回生 OR 金叉失败, AA1), REF(BARSLAST(起死回生 OR 金叉失败), AA1), 99999)+3;7 i; J9 k9 n, V1 s: b
AA2:= IF(AA2B<AA2A, AA2B, AA2A);
+ q/ H% E( Z( H6 B( k+ eDIFZ~小值:= LLV(DIF, AA1+AA2);
3 _: z" M5 h4 S- j) J* t9 p) `! }5 |DIFZ~小日:= LLVBARS(DIF, AA1+AA2);4 a* c4 R7 y6 R' \
DBL1:= IF(DIFZ~小日<=AA1, 0, 1);( v2 F% {: I' n& w1 _2 ?
DBL2:= IF(DBL1=1 AND C<REF(C, DIFZ~小日) AND DIF>REF(DIF, DIFZ~小日), 1, 0);' O5 D, i. F! Q6 }: S: `9 z
DBL:= IF(DBL1=0, 0, DBL2);
3 c$ N; J0 n* h* s* TDBLJC: DBL AND (CROSS(DIF, DEA) OR 起死回生) AND DIF>REF(DIF, 1); 第一步 第二步 第三步 第四步 第五步 第六步
: n* W; O/ M* ]& u
|