do input""s$:?chr$(asc(s$)*8.67-901),s$loop