AMA指标改进版【源码】

AMA指标改进版【原创 源码】

T:=12;
Y:=(HIGH+LOW+CLOSE)/3;
W:=Y*IF(VOL=0,1,VOL);
DIR:=ABS(W-EMA(W,T));
VIR:=T*EMA(AVEDEV(W,2),T);
SE:=POW(DIR/VIR+1/T,2);
Y0:=REF(IC,1)+SE*(IC-REF(IC,1));
C0:=REF(IC,BARSLAST(Y0));
YI:=REF(C0,1)+SE*(IC-REF(C0,1));
AMA:=DMA(YI,SE);

精简版
T:=12;
Y:=(HIGH+LOW+CLOSE)/3;
W:=Y*IF(VOL=0,1,VOL);
DIR:=ABS(W-EMA(W,T));
VIR:=T*EMA(AVEDEV(W,2),T);
SE:=POW(DIR/VIR+1/T,2);
AMA:DMA(IC,SE);

改进后的AMA指标可作为一般函数使用，只需将IC带入相应的函数值，一并调整相应的参数T;
例如：求K值
T:=3;
IC:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9));