1 D=63908 2 D=D+11:IFPEEK(D)=255THENMENUELSEIFPEEK(D)-192THEN2 4 D$="":I$="":FORI=3TO10:D$=D$+CHR$(PEEK(D+I)):NEXT:I=INSTR(D$," "):IFI=0THENI=7 5 D$=LEFT$(D$,I-1)+"."+RIGHT$(D$,2):PRINTD$;:INPUTI$ 6 IFI$="Menu"THENMENU 8 IFLEFT$(I$,1)="n"THEN2 10 DEFINTA-Z:RESTORE:PR=1:PG!=0:FORN=0TO3:READX:POKEVARPTR(PG!)+N,X:NEXT 12 DATA235,195,116,91 14 FORI=1TOLEN(D$):POKE64984+I,ASC(MID$(D$,I,1)):NEXT:POKE64985+LEN(D$),0:CALLVARPTR(PG!),PR,64985