KD系统使用ADX过滤提高成功率源代码

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;//收盘价与N周期最低值做差，N周期最高值与N周期最低值做差，两差之间做比值定义为RSV

K:SMA(RSV,3,1);//RSV的移动平均

D:SMA(K,3,1);//K值的移动平均

//以上是KD

MA1:MA((O+C+H+L)/4,79);//最高价与最低价的平均值

MA2:MA((O+C+H+L)/4,88);// N个周期开盘价与收盘价,最高价与最低价的平均值

//以上是MA

TR := SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14);//收盘价与最低价做差，最高价与前一周期收盘价做差，最低价与前一周期收盘价作差，在上述三个数据中取绝对值最大者，对该最大值做N周期累加求和。。

HD := HIGH-REF(HIGH,1);//最高价与前一周期最高价做差

LD := REF(LOW,1)-LOW;//前一周期最低价与最低价做差

DMP:= SUM(IFELSE(HD>0 && HD>LD,HD,0),18);//如果HD>0并且HD>LD,取HD否则取0,对取值做N周期累加求和。

DMM:= SUM(IFELSE(LD>0 && LD>HD,LD,0),18);//如果LD>0并且LD>HD,取LD否则取0,对取值做N周期累加求和。

PDI: DMP*100/TR;

MDI: DMM*100/TR;

ADX: MA(ABS(MDI-PDI)/(MDI+PDI)*100,6);//MDI与PDI差的绝对值与(MDI+PDI)*100做比值，取该比值的M个周期均值。

ADXR:(ADX+REF(ADX,6))/2;

BACKGROUNDSTYLE(1);

//以上是DMI//ADX>M&&ADX<M1&&

TYP := (HIGH + LOW + CLOSE)/3;//当根K线的最高值最低值收盘价3者之间取简单均值。

MR:=SUM(IFELSE(TYP>REF(TYP,1),TYP*VOL,0),14)/SUM(IFELSE(TYP<REF(TYP,1),TYP*VOL,0),14);//如果TYP大于前一周期TYP时取TYP乘以成交量，否则取0，对该值做N周期累加求和。如果TYP小于前一周期TYP取TYP乘以成交量，否则取0，对该值做N周期累加求和。两求和值之间进行比值计算。

MFI:100-(100/(1+MR));

//MFI指标是成交量的RSI指标。//MFI>M&&MFI<M1&&

PSY:COUNT(CLOSE>REF(CLOSE,1),12)/12*100;//N个周期内满足收盘价大于一个周期前的收盘价的周期数，比N*100；

PSYMA:MA(PSY,6);//PSY在M个周期内的简单移动平均；

//心理线 //PSYMA>M&&PSYMA<M1&&

YD:=REF(C,1)-REF(C,10);//移动速度=昨天的收盘价-10天前的收盘价

BD:=SUM(ABS(C-REF(C,1)),10);//波动幅度=过去10天的（今天的收盘价-昨天的收盘价）的绝对值的和

BL:=YD/BD*100;//效率比率=移动速度/波动幅度

//效率比率(-100至100)//BL>M&&BL<M1&&

BL>-60&&BL<50&&PSYMA>21&&PSYMA<61&&MFI>11&&MFI<91&&ADX>37&&ADX<81&&K>D&&C>MA1&&C>=REF(C,1)+1&&V<REF(V,1)*0.9&&ISUP,BK;

BL>-80&&BL<33&&PSYMA>29&&PSYMA<70&&MFI>11&&MFI<91&&ADX>13&&ADX<68&&K<D&&C<MA2&&C<=REF(C,1)-1&&V<REF(V,1)*0.9&&ISDOWN,SK;

K<D,SP;