以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://222.73.7.161/bbs/index.asp)
--  公式模型编写问题提交  (http://222.73.7.161/bbs/list.asp?boardid=4)
----  [求助]请老师帮忙把文化的MDI程序化交易指标修改成金字塔  (http://222.73.7.161/bbs/dispbbs.asp?boardid=4&id=2261)

--  作者:sun418856620
--  发布时间:2010/7/28 0:39:09
--  [求助]请老师帮忙把文化的MDI程序化交易指标修改成金字塔

TR := SMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),N,1);
HD := HIGH-REF(HIGH,1);
LD := REF(LOW,1)-LOW;
DMP:= SMA(IFELSE(HD>0&&HD>LD,HD,0),N,1);
DMM:= SMA(IFELSE(LD>0&&LD>HD,LD,0),N,1);
PDI:= DMP*100/TR;
MDI:= DMM*100/TR;
ADX:= SMA(ABS(MDI-PDI)/(MDI+PDI)*100,N,1);
ADXR:=(ADX+REF(ADX,M))/2;
CROSS(PDI,MDI) && TIME>0900 && TIME<1450,BK;//PDI上穿MDI开多仓。
CROSS(MDI,PDI) && TIME>0900 && TIME<1450,SK;//PDI下穿MDI开空仓。
ADX<HHV(ADX,N0)*(1-0.01*M0) || TIME>=1450,BP;//当ADX回落超过前N0周期内的M0%时平多仓。或收盘前平仓。
ADX<HHV(ADX,N0)*(1-0.01*M0) || TIME>=1450,SP;//当ADX回落超过前N0周期内的M0%时平空仓。或收盘前平仓。

 

 

参数  名称  最小  最大  缺省

     1   N     2    100   14

     2   M     1    100    6

     3   N0   1     50     20

     4   M0   1    100   20

 

 


--  作者:fly
--  发布时间:2010/7/28 8:48:16
--  

转到金字塔(图形分析)

T := SMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),N,1);
HD := HIGH-REF(HIGH,1);
LD := REF(LOW,1)-LOW;
DMP:= SMA(IF(HD>0&&HD>LD,HD,0),N,1);
DMM:= SMA(IF(LD>0&&LD>HD,LD,0),N,1);
PDI:= DMP*100/T;
MDI:= DMM*100/T;
ADX:= SMA(ABS(MDI-PDI)/(MDI+PDI)*100,N,1);
ADXR:=(ADX+REF(ADX,M))/2;
ENTERLONG:CROSS(PDI,MDI) && TIME>090100 && TIME<145000;//PDI上穿MDI开多仓。
ENTERSHORT:CROSS(MDI,PDI) && TIME>090100 && TIME<145000,SK;//PDI下穿MDI开空仓。

 

还差后两句,请高手帮忙


--  作者:admin
--  发布时间:2010/7/28 14:56:38
--  


INPUT:N(14,2,100,1);
INPUT:M(6,1,100,1);
INPUT:N0(20,1,50,1);
INPUT:M0(20,1,100,2);

 

HD := HIGH-REF(HIGH,1);
LD := REF(LOW,1)-LOW;
DMP:= SMA(IF(HD>0 AND HD>LD,HD,0),N,1);
DMM:= SMA(IF(LD>0 AND LD>HD,LD,0),N,1);
PDI:= DMP*100/TR;
MDI:= DMM*100/TR;
ADX:= SMA(ABS(MDI-PDI)/(MDI+PDI)*100,N,1);
ADXR:=(ADX+REF(ADX,M))/2;

 

EXITLONG:ADX<HHV(ADX,N0)*(1-0.01*M0) OR TIME>=145000,TFILTER;//当ADX回落超过前N0周期内的M0%时平多仓。或收盘前平仓。
EXITSHORT:ADX<HHV(ADX,N0)*(1-0.01*M0) OR TIME>=145000,TFILTER;//当ADX回落超过前N0周期内的M0%时平空仓。或收盘前平仓。
ENTERLONG:CROSS(PDI,MDI) AND TIME>090000 AND TIME<145000,TFILTER;//PDI上穿MDI开多仓。
ENTERSHORT:CROSS(MDI,PDI) AND TIME>090000 AND TIME<145000,TFILTER;//PDI下穿MDI开空仓。

 

[此贴子已经被作者于2010-7-28 14:56:52编辑过]

--  作者:sun418856620
--  发布时间:2010/7/30 1:29:52
--  
测试完美~谢谢斑竹!可以做进金字塔模型哦,信号还不错