Multi Time Frame Stochastic Slow

Nw:=HOUR()<>ref(HOUR(),-1);      n2:=5;       n1:=5;  n3:=3;    p2:=2/(n1+1);   p3:=2/(n3+1); 
WH:=ValueWhen(1,Nw,Ref(HighestSince(n2,Nw,H),-1));
WL:=ValueWhen(1,Nw,Ref(LowestSince(n2,Nw,L),-1));
WCL:=ValueWhen(1,Nw,Ref(C,-1));     s:=100*(WCL-WL) /(WH-WL);
x1:=If(nw,(p2*Ref(s,-0))+((1-p2)*PREV),PREV);  x2:=If(nw,(p3*Ref(x1,-0))+((1-p3)*PREV),PREV);
x1;x2:20:80