背离准确率100

大家可以用原版对照下,看看优化效果之余,再瞄瞄是否有升级空间!
     TIPS: 找背离不是这么简单回事,要动动脑筋,包括背弛!
 
 N:=9;
DIF:=MA(CLOSE,9)-MA(CLOSE,7);
DEA:=MA(DIF,4);
MACD1:=(DIF-DEA)*2;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=MA(RSV,4);
D:=MA(K,4);
J:=3*K-2*D;
LC:=REF(CLOSE,1);
RSI1:=MA(MAX(CLOSE-LC,0),9)/MA(ABS(CLOSE-LC),4)*100;
TYP1:=(HIGH+LOW+CLOSE)/3;
CCI1:=(TYP1-MA(TYP1,4))/(0.015*AVEDEV(TYP1,9));

DD:=C=LLV(C,N);{60日最低点}
DDSJ:=BARSLAST(REF(DD,1));{上一低点时间}
DDGJ:=REF(CLOSE,DDSJ+1)>CLOSE;{股价趋势}
KDZB:=REF(J,DDSJ+1);
K底背离:=DDGJ AND KDZB;
GD:=C=HHV(C,N);{60日最高点}
GDSJ:=BARSLAST(REF(GD,1));{上一高点时间}
GDGJ:=REF(CLOSE,GDSJ+1);
KGZB:=REF(J,GDSJ+1)>J;
K顶背离:=GDGJ AND KGZB;
MDZB:=REF(MACD1,DDSJ+1);
M底背离:=DDGJ AND MDZB;
MGZB:=REF(MACD1,GDSJ+1)>MACD1;
M顶背离:=GDGJ AND MGZB;
RDZB:=REF(RSI1,DDSJ+1);
R底背离:=DDGJ AND RDZB;
RGZB:=REF(RSI1,GDSJ+1)>RSI1;
R顶背离:=GDGJ AND RGZB;
TYP:=(HIGH + LOW + CLOSE)/3;
CDZB:=REF(CCI1,DDSJ+1);
C底背离:=DDGJ AND CDZB;
CGZB:=REF(CCI1,GDSJ+1)>CCI1;
C顶背离:=GDGJ AND CGZB;
DRAWTEXT(K顶背离,IF(ISLASTBAR,27.5,25),'←'),LINETHICK2 ;
DRAWTEXT(M顶背离,(ISLASTBAR,24.5,20),'←'),LINETHICK2 ;
DRAWTEXT(R顶背离,(ISLASTBAR,20.5,15