1a=peek(0)
if a=10+0^a?n:n=0:goto 1
n=n*8+a-48-(a>51)
goto 1