home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1991 January / 1991-01.d64 / bamaid.not.128 (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  459b  |  14 lines

  1. 100 print"[147]":poke53280,2:poke53281,2
  2. 110 a$=chr$(34)+"[194][193][205] [193]id"+chr$(34)+" is a set of routines":gosub290
  3. 120 a$="for directory recovery which must be":gosub290
  4. 125 a$="run separately from the [199]azette [205]enu":gosub290
  5. 130 a$="program. [208]lease read the documentation":gosub290
  6. 140 a$="provided on this disk.":gosub290:print
  7. 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
  8. 230 a$=" [208]ress any key to reload menu":gosub290
  9. 240 get a$:if a$="" then 240
  10. 250 (NULL)
  11. 280 end
  12. 290 for x=1 to int(20-(len(a$)/2)):printchr$(32);:next
  13. 300 printa$:return
  14.