{ Downloaded From https://www.WiseStockTrader.com }
ti:=Input("length",2,20,10);

v1:=((C-O)+(2*Ref(C-O,-1))+(2*Ref(C-O,-2))+Ref(C-O,-3))/6;

v2:=((H-L)+(2*Ref(H-L,-1))+(2*Ref(H-L,-2))+Ref(H-L,-3))/6;

temp:=If(Sum(v2,ti)=0,0.0001,Sum(v2,ti));

rv:=Sum(v1,ti)/temp;

rvsig:= (rv+Ref(2*rv,-1)+Ref(2*rv,-2)+Ref(rv,-3))/6;

rv;

rvsig