home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Compute! Gazette 1984 May
/
1984-05.d64
/
menu
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-09-20
|
167b
|
6 lines
100 f$="vicmenu":sys 65517:if peek(781)=40 then f$="64menu"
110 print"[147]load";chr$(34);f$;chr$(34);",8"
120 a$=chr$(13)+"run"+chr$(13)
130 fori=1tolen(a$):poke630+i,asc(mid$(a$,i)):next:poke198,i-1
140 new