0 A$="":AZ!=VARPTR(A$):POKEAZ!,128:POKEAZ!+1,137:POKEAZ!+2,247:AZ$=A$:REM SAVE F-KEY SETTINGS 100 KEY1,"Files" 150 A$=INPUT$(1) 200 GOSUB65500 300 END 65500 FORX=0TO7:KY$=MID$(AZ$,X*16+1,16)+CHR$(0):FORY=1TO17:IFASC(MID$(KY$,Y,1))=0THENZ=Y-1:Y=17:NEXTYELSENEXTY 65501 KY$=LEFT$(KY$,Z):KEYX+1,KY$:NEXTX:RETURN