在主图上右键点MACD的“修改当前指标公式” 然后拷如下列程序,名字自命名,我命名的是“MACD=背离” DIF:= EMA(CLOSE,12)-EMA(CLOSE,26);# P+ V2 s0 K0 x
DEA:= EMA(DIF,9);
3 e" l) G4 c& ]7 V+ w8 W O3 I! |6 Y$ RMACD:= (DIF-DEA)*2;0 a' d/ @- |/ Y; \
均值:= SUM(ABS(MACD), 100)/100;
! E' o4 g/ j& J' v' J1 X起死回生:= REF(MACD, 2) > REF(MACD, 1) AND REF(MACD, 1) < 均值*0.1 AND
' y& [) t7 G7 @# j8 n6 C- [6 _REF(MACD, 1)>=0 AND REF(MACD, 1) < MACD;
) G) F7 P# u+ c. r8 J6 l m金叉失败:= REF(MACD, 2) < REF(MACD, 1) AND REF(MACD, 1) > 0-均值*0.1 AND
2 Y7 W" }8 q" h1 E1 P* yREF(MACD, 1)<=0 AND REF(MACD, 1) > MACD;
1 m( @3 B$ W0 Y& b) K: EAA1A:= BARSLAST(CROSS(DEA, DIF))+1;8 b* @# e2 _- l. ]
AA1B:= IF(起死回生 OR 金叉失败, BARSLAST(起死回生 OR 金叉失败)+3, 99999);. X+ v! S3 F A3 j
AA1:= IF(AA1B<AA1A, AA1B, AA1A);
1 P+ P6 o/ @3 L0 n% x" rAA2A:= REF(BARSLAST(CROSS(DEA, DIF)), AA1)+1;
) c7 |* K% s6 ?; T8 L; VAA2B:= IF(REF(起死回生 OR 金叉失败, AA1), REF(BARSLAST(起死回生 OR 金叉失败), AA1), 99999)+3;
7 I2 B3 D, z' cAA2:= IF(AA2B<AA2A, AA2B, AA2A);% p" V2 `: W/ m0 B9 | q8 E- z
DIFZ~小值:= LLV(DIF, AA1+AA2);
; K" U) {* m! i! s3 R1 d- b/ fDIFZ~小日:= LLVBARS(DIF, AA1+AA2);
% D1 q/ }6 o4 d1 HDBL1:= IF(DIFZ~小日<=AA1, 0, 1);
4 {+ d& k3 e# Z) YDBL2:= IF(DBL1=1 AND C<REF(C, DIFZ~小日) AND DIF>REF(DIF, DIFZ~小日), 1, 0);2 N" m+ A& x8 f% }2 M
DBL:= IF(DBL1=0, 0, DBL2);0 \* V8 M- x6 B. d
DBLJC: 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 完成。
- E9 V/ j# o: q' h' ?* L
|