1 CLEAR 256, - 3200 2 DATA "Load ",34,"Run",34,"Files",13 3 DATA "List",32,"Run",13,"Edir",32 4 DATA "Cont",13,"Print",32,"List",13 5 DATA "Menu",13:FORX=1TO10:READA$,B 6 KEYX,A$+CHR$(B):NEXTX