do?chr$(n);:n=peek(0) if asc(mid$("mariko@",i+1))=n*!k n=n-32:i=i+1:k=1 k=k*!n=10loop
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page