主题：将此公式从序列计算改为逐K线计算

上图为序列计算，下图为逐K线计算。

指标源码如下，变量a1=5 a2=10 a3=20 a4=60

DIR1:=ABS(CLOSE-REF(CLOSE,a1));
VIR1:=SUM(ABS(CLOSE-REF(CLOSE,1)),a1);
ER1:=DIR1/VIR1;
CS1:=ER1*(2/3-2/31)+2/31;
CQ1:=CS1*CS1;
AMA1:EMA(DMA(CLOSE,CQ1),2);

DIR2:=ABS(CLOSE-REF(CLOSE,a2));
VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),a2);
ER2:=DIR2/VIR2;
CS2:=ER2*(2/3-2/31)+2/31;
CQ2:=CS2*CS2;
AMA2:EMA(DMA(CLOSE,CQ2),2);

DIR3:=ABS(CLOSE-REF(CLOSE,a3));
VIR3:=SUM(ABS(CLOSE-REF(CLOSE,1)),a3);
ER3:=DIR3/VIR3;
CS3:=ER3*(2/3-2/31)+2/31;
CQ3:=CS3*CS3;
AMA3:EMA(DMA(CLOSE,CQ3),2);

DIR4:=ABS(CLOSE-REF(CLOSE,a4));
VIR4:=SUM(ABS(CLOSE-REF(CLOSE,1)),a4);
ER4:=DIR4/VIR4;
CS4:=ER4*(2/3-2/31)+2/31;
CQ4:=CS4*CS4;
AMA4:EMA(DMA(CLOSE,CQ4),2);