home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Compute! Gazette 1991 January
/
1991-01.d64
/
bamaid.not.128
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-09-20
|
459b
|
14 lines
100 print"[147]":poke53280,2:poke53281,2
110 a$=chr$(34)+"[194][193][205] [193]id"+chr$(34)+" is a set of routines":gosub290
120 a$="for directory recovery which must be":gosub290
125 a$="run separately from the [199]azette [205]enu":gosub290
130 a$="program. [208]lease read the documentation":gosub290
140 a$="provided on this disk.":gosub290:print
220 a$="[175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175]":gosub290
230 a$=" [208]ress any key to reload menu":gosub290
240 get a$:if a$="" then 240
250 (NULL)
280 end
290 for x=1 to int(20-(len(a$)/2)):printchr$(32);:next
300 printa$:return