N:=20;
DIR:=ABS(CLOSE-REF(CLOSE,N));
VIR:=SUM(ABS(CLOSE-REF(CLOSE,1)),N);
ER:=DIR/VIR;
CS:=ER*(2/3-2/31)+2/31;
CQ:=CS*CS;
AMA1:=DMA(CLOSE,CQ);
AMA2:=IF(AMA1<REF(AMA1,1),0,1);
SPJ:=IF(C<=AMA1,0,1);
AMA2 AND SPJ;
N:=20;
DIR:=ABS(CLOSE-REF(CLOSE,N));
VIR:=SUM(ABS(CLOSE-REF(CLOSE,1)),N);
ER:=DIR/VIR;
CS:=ER*(2/3-2/31)+2/31;
CQ:=CS*CS;
AMA1:=DMA(CLOSE,CQ);
AMA2:=IF(AMA1<REF(AMA1,1),0,1);
SPJ:=IF(C<=AMA1,0,1);
AMA2 AND SPJ;