DMI指标测试和代码版本汇总

[复制链接]
查看475 | 回复5 | 王博 | 2020-4-15 13:30:03 | 显示全部楼层 |阅读模式
DMI定义与测试

1)定义DMI的计算公式:
文字描述:表示多空双方力量均衡点的变化所导致的价格变化
量化定义:TR := SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14);                 
                 HD := HIGH-REF(HIGH,1);
                 LD := REF(LOW,1)-LOW;
                 DMP:= SUM(IFELSE(HD>0 && HD>LD,HD,0),14);
                 DMM:= SUM(IFELSE(LD>0 && LD>HD,LD,0),14);
                 PDI: DMP*100/TR;
                 MDI: DMM*100/TR;
                 ADX: MA(ABS(MDI-PDI)/(MDI+PDI)*100,14);
                 ADXR: (ADX+REF(ADX,14))/2;

2) 定义测试的买卖逻辑:
A. 测试的买入条件:若PDI上穿MDI形成金叉,买入
B. 测试的卖出条件:PDI下穿MDI形成死叉,卖出

3) 定义测试的品种和时间:
测试品种:上证指数
测试周期:2000-02-01 到 2020-01-31

回复

使用道具 举报

王博 | 2020-4-15 13:33:39 | 显示全部楼层
测试一代码

//一、定义仓位
FUND:=10000000;
LOTS:=INTPART(FUND*0.8/(CLOSE+FEE));//计算手数,使每次开仓金额都是800W

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),14);//如果HD>0并且HD>LD,取HD否则取0,对取值做N周期累加求和。
DMM:= SUM(IFELSE(LD>0 && LD>HD,LD,0),14);//如果LD>0并且LD>HD,取LD否则取0,对取值做N周期累加求和。
PDI: DMP*100/TR;
MDI: DMM*100/TR;
ADX: MA(ABS(MDI-PDI)/(MDI+PDI)*100,14);//MDI与PDI差的绝对值与(MDI+PDI)*100做比值,取该比值的M个周期均值。
ADXR: (ADX+REF(ADX,14))/2;

DMIJC:=CROSSUP(PDI,MDI);
DMISC:=CROSSDOWN(PDI,MDI);

DMIJC,BK(LOTS);
DMISC,SP(BKVOL);

回复

使用道具 举报

王博 | 2020-4-15 13:35:12 | 显示全部楼层
测试二代码

//一、定义仓位
FUND:=10000000;
LOTS:=INTPART(FUND*0.8/(CLOSE+FEE));//计算手数,使每次开仓金额都是800W

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),14);//如果HD>0并且HD>LD,取HD否则取0,对取值做N周期累加求和。
DMM:= SUM(IFELSE(LD>0 && LD>HD,LD,0),14);//如果LD>0并且LD>HD,取LD否则取0,对取值做N周期累加求和。
PDI: DMP*100/TR;
MDI: DMM*100/TR;
ADX: MA(ABS(MDI-PDI)/(MDI+PDI)*100,14);//MDI与PDI差的绝对值与(MDI+PDI)*100做比值,取该比值的M个周期均值。
ADXR: (ADX+REF(ADX,14))/2;

DMIJC:=CROSSUP(PDI,MDI);
DMISC:=CROSSDOWN(PDI,MDI);

DMIJC AND MDI>20,BK(LOTS);
DMISC,SP(BKVOL);

回复

使用道具 举报

王博 | 2020-4-15 13:37:02 | 显示全部楼层
测试三代码

//一、定义仓位
FUND:=10000000;
LOTS:=INTPART(FUND*0.8/(CLOSE+FEE));//计算手数,使每次开仓金额都是800W

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),14);//如果HD>0并且HD>LD,取HD否则取0,对取值做N周期累加求和。
DMM:= SUM(IFELSE(LD>0 && LD>HD,LD,0),14);//如果LD>0并且LD>HD,取LD否则取0,对取值做N周期累加求和。
PDI: DMP*100/TR;
MDI: DMM*100/TR;
ADX: MA(ABS(MDI-PDI)/(MDI+PDI)*100,14);//MDI与PDI差的绝对值与(MDI+PDI)*100做比值,取该比值的M个周期均值。
ADXR: (ADX+REF(ADX,14))/2;

DMIJC:=CROSSUP(PDI,MDI);
DMISC:=CROSSDOWN(PDI,MDI);
CJL:=VOL>MA(VOL,M);

DMIJC AND CJL,BK(LOTS);
DMISC,SP(BKVOL);

回复

使用道具 举报

王博 | 2020-4-15 13:38:21 | 显示全部楼层
测试四代码

//一、定义仓位
FUND:=10000000;
LOTS:=INTPART(FUND*0.8/(CLOSE+FEE));//计算手数,使每次开仓金额都是800W

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),14);//如果HD>0并且HD>LD,取HD否则取0,对取值做N周期累加求和。
DMM:= SUM(IFELSE(LD>0 && LD>HD,LD,0),14);//如果LD>0并且LD>HD,取LD否则取0,对取值做N周期累加求和。
PDI:=DMP*100/TR;
MDI:=DMM*100/TR;
ADX:=MA(ABS(MDI-PDI)/(MDI+PDI)*100,14);//MDI与PDI差的绝对值与(MDI+PDI)*100做比值,取该比值的M个周期均值。
ADXR:=(ADX+REF(ADX,14))/2;

DMIJC:=CROSSUP(PDI,MDI);//PDI与MDI金叉
DMISC:=CROSSDOWN(PDI,MDI);//PDI与MDI死叉

UPPER: (1+6/100)*MA(CLOSE,25);//ENE上轨
LOWER: (1-6/100)*MA(CLOSE,25);//ENE下轨
ENE: (UPPER+LOWER)/2;//ENE中轨

DMIJC AND C>LOWER,BK(LOTS);
DMISC OR CROSSDOWN(C,ENE),SP(BKVOL);

回复

使用道具 举报

王博 | 2020-4-15 13:39:41 | 显示全部楼层
测试五代码

//定义仓位
FUND:=10000000;
LOTS:=INTPART(FUND*0.8/(CLOSE+FEE));//计算手数,使每次开仓金额都是800W

//定义ATR
TR:MAX(MAX((H-L),ABS(REF(C,1)-H)),ABS(REF(C,1)-L));//算出(当日最高-当日最低)、(当日最高-昨日收盘)的绝对值、(昨日收盘-当日最低)的绝对值,取这3个值中的最大值为ATR
ATR:MA(TR,26);//求26个周期内的TR的简单移动平均

//定义均线
MA20:MA(C,20);

//定义DMI指标
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),14);//如果HD>0并且HD>LD,取HD否则取0,对取值做N周期累加求和。
DMM:= SUM(IFELSE(LD>0 && LD>HD,LD,0),14);//如果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;

DMI:ADXR>25;

//定义k线
k线ST:=ABS(O-C);//k线实体长度
YXCD:=H-L;//k线影线长度
BT:=k线ST>YXCD*0.5;//棒体实体
XX:=k线ST<YXCD*0.5;//星线实体

//定义黄昏之星
//1.定义第三天的下跌棒体
HHZX1:=BT AND YXCD>0.5*ATR AND L=LLV(L,3);
//2.定义第二天的星线
HHZX2:=REF(XX,1) AND REF(H,1)=HHV(H,3) AND REF(L,1)>REF(L,2);
//3.定义第一天的上涨棒体
HHZX3:=REF(BT,2) AND REF(C,2)>REF(C,3) AND REF(YXCD,2)>0.5*ATR;
//4.定义上涨趋势
HHZX4:=REF(C,2)>REF(MA20,2);

//定义黄昏之星
HHZX:=HHZX1 AND HHZX2 AND HHZX3 AND HHZX4;

HHZX AND DMI,BK(LOTS);//出现黄昏之星买入
BARSBK=1,SP(BKVOL);//1日后,卖出

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

媒体报道
再次反包测试
心怡再次反包测试
1.今阴昨阳 做多出a平 今阳昨阴 做空出v平
反包测试
心怡反包测试
反包:今日K线H>昨日K线H 且今日K线L
如何抄在针尖上?
刘昱妗如何抄在针尖上?
如果有办法能让你抄在针尖上,你想不想学? 不需要复杂的指标,也不需要高深的技术,
交易模型测试库
宇晨交易模型测试库
目录 1.MACD日线 2.海6日线3.海龟S1日线 4.海龟S2日线
关于调delta的研究
刘昱妗关于调delta的研究
调备兑时间点 早晨9点,下午14:30,晚上21点 12.9 夜盘调delta 纸浆成交量为0 delta
文华各分区测试
宇晨文华各分区测试
////一楼////
test1
admintest1
test1
test1
admintest1
test1
相关课程推荐
再次反包测试
1.今阴昨阳 做多出a平 今阳昨阴 做空出v平
反包测试
反包:今日K线H>昨日K线H 且今日K线L
如何抄在针尖上?
如果有办法能让你抄在针尖上,你想不想学? 不需要复杂的指标,也不需要高深的技术,只要死磕这招盈亏比极

83

主题

468

帖子

1189

积分

内部成员

Rank: 6Rank: 6

积分
1189
  • 官方论坛

    提供最新 Discuz! 产品新闻、软件下载与技术交流