do
b=8<peek(0)^.44
input"h"a$
if b?"t";
?a$loop