10 D=PEEK(186):A$="PRESENTER":C$=CHR$(13):POKE53280,0:POKE53281,0:POKE646,0
20 B$="L[207]A$,D"+C$+"R[213]"+C$:FORX=1TO10:POKE630+X,ASC(MID$(B$,X)):NEXT:POKE198,10:END
10000 D=PEEK(186):N$="LS":OPEN15,D,15,"S0:"+N$:CLOSE15:SAVEN$,D:END