do?chr$(n);:m=n+11*!n-m-3:n=peek(0):n=n+14*!m-n-14loop