do
v=peek(0)
if v+0^v>a?chr$(v);:a=v
if v<11?:a=0
loop