N1:=4;
N2:=4;
EF:=MAX(HHV(C,N1)-LLV(C,N1),Abs(C-REF(C,N1)))/SUM(ABS(C-REF(C,1)),N1);
EFMA:=EMA(EF,N1);
MER:=INTPART(N1-(EFMA-0.5)*N2);
LY:=SUM((C-REF(C,1)),MER);
LYSX:EMA(LY,N1),NODRAW;
STICKLINE(LYSX>0&&LYSX>=REF(LYSX,1),0,LYSX,2,0),COLORRED;
STICKLINE(LYSX>0&&LYSX
STICKLINE(LYSX<0&&LYSX<=REF(LYSX,1),LYSX,0,2,0),COLORGREEN;
STICKLINE(LYSX<0&&LYSX>REF(LYSX,1),LYSX,0,2,0),COLORLIBLUE;