for h=1:8;
   quinama3
xq=xq-passo; 
xr=xr-passo;
xp=xp-passo;
x0=x0-passo;
xt=xt-passo;   
end