ATR——如何在简语言里面的5分钟周期实现日线级别的ATR

HighD:=REF(HHV(HIGH,48),BARSLAST(DATE<>REF(DATE,1))+1); // 昨日最高价LowD:=REF(LLV(LOW,48),BARSLAST(DATE<>REF(DATE,1))+1); // 昨日最低价CloseD:=REF(C,BARSLAST(DATE<>REF(DATE,1))+1); // 昨日收盘价OpenD:=REF(O,BARSLAST(DATE<>REF(DATE,1))); // 今日开盘价// 计算指标（不含当前K线）MTR : MAX(MAX((HighD-LowD),ABS(REF(CloseD,1)-HighD)),ABS(REF(CloseD,1)-LowD));//求最高价减去最低价，一个周期前的收盘价减去最高价的绝对值，一个周期前的收盘价减去最低价的绝对值，这三个值中的最大值//得到的是昨天的ATRATR : MA(REF(MTR,BARSLAST(DATE<>REF(DATE,1))),ATRN);//求ATRN个周期内的MTR的简单移动平均我这样勉强可以计算出昨天的MTR值，但计算ATR就不对了，还有今天的MTR和ATR就更加搞不定了，可有高手帮忙看一下？