home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1990 February / 1990-02.d64 / geos.note (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  1KB  |  28 lines
  1. 10 printchr$(14):poke 53280,11:poke 53281,11:poke 646,15
  2. 20 print"[147][196]ir[209]uick cannot be run from the menu."
  3. 30 print"[212]his program requires [199][197][207][211] in order"
  4. 40 print"to run. [198]or your convenience, this"
  5. 50 print"disk has been converted to [199][197][207][211] format."
  6. 80 print"[212]o use [196]ir[209]uick, first boot [199][197][207][211] then"
  7. 115 print"copy [196]ir[209]uick to another [199]eos disk."
  8. 116 print"[201]nsert the disk containing [196]ir[209]uick and"
  9. 117 print"select it from the accessory menu."
  10. 118 print"[198]or more information about this program"
  11. 119 print"please refer to the corresponding"
  12. 120 print"article in [195][207][205][208][213][212][197]!'s [199]azette"
  13. 140 print"before attempting to use it."
  14. 170 print"[155][206][207][212][197]: [144][196]o not attempt to use the"
  15. 180 print"[199]eoconverter program on [196]ir[209]uick[144]"
  16. 190 print"[201]t has already been converted to [199][197][207][211]"
  17. 195 print"format."
  18. 200 ford=1to40:print"[155][164]";:next
  19. 210 print"    [208]ress any key to reload the menu    [146]"
  20. 220 getdh$:ifdh$=""then220
  21. 221 v=peek(772)+256*peek(773)
  22. 222 ifv=17165 then goto270
  23. 230 print"[147]"chr$(142):s$="l[207]"+chr$(34)+"mn"+chr$(34)+",8:"+chr$(131)
  24. 240 fori=1tolen(s$):poke630+i,asc(mid$(s$,i)):next:poke198,i
  25. 250 poke53281,0:poke53280,0
  26. 260 printchr$(142)"[145]          reloading the menu[144]":end
  27. 270 print"[147]":sys65341
  28.