line input""s$:for i=1to len(s$)?s$next