0 'MEMLST 1.01 20Oct85 1 'CLUB 100 LIBRARY - 415/939-1246 BBS, 937-5039 NEWSLETTER, 932-8856 VOICE 2 'ANDREW MOORE 3 CLS:I1$=CHR$(27)+"p":I2$=CHR$(27)+"q":PRINT"> MEMLST 1.01":PRINT"> Copyright 1985 Andrew Moore":PRINT:PRINT" Start search at _____ (dec)";STRING$(11,8);:LINE INPUT S$:S=VAL(S$):IFS<0ORS>65536THENPRINT"Out of range (0-65526)":END 4 PRINT" End search at _____ (dec)";STRING$(11,8);:LINE INPUT E$:E=VAL(E$):IFE0ANDASC(P$)<27THENPRINTI1$;CHR$(ASC(P$)+64);I2$;:GOTO9 6 IF ASC(P$)>126THENPRINTCHR$(255);:GOTO9 7 IF ASC(P$)=0 THEN PRINTCHR$(255);:GOTO9 8 PRINTP$; 9 NEXTB:PRINTTAB(24);"u":L=L+1:IFL=7THENPRINT"--More-vqqqqqqqqqqqqqqqqw";:K$=INKEY$:I$=INPUT$(1):PRINTCHR$(13);CHR$(13);CHR$(27);"K";:PRINT@0,"";:L=0 10 NEXTA