以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://www.weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://www.weistock.com/bbs/list.asp?boardid=4)
----  [求助]能否把这个通达信DMI指标转化为金字塔的？感谢！  (http://www.weistock.com/bbs/dispbbs.asp?boardid=4&id=1567)
--  作者：hxbhz
--  发布时间：2010/5/1 20:43:10
--  [求助]能否把这个通达信DMI指标转化为金字塔的？感谢！
TR:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),N);
HD :=HIGH-REF(HIGH,1);
LD :=REF(LOW,1)-LOW;
DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),N);
DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),N);
PDI: DMP*100/TR;
MDI: DMM*100/TR;
ADX: EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,M);
ADXR:EXPMEMA(ADX,M);
--  作者：hxbhz
--  发布时间：2010/5/1 21:26:44
--  

N  2 90 14

M  2 60 6
--  作者：admin
--  发布时间：2010/5/1 21:33:51
--  

input:N(14,2,90),M(2,2,60);

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