home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 153 / 153.d81 / n.psycloid (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  788b  |  25 lines
  1. 10 dv=peek(186):ifdv<8thendv=8
  2. 20 poke53281,0:poke53280,0:printchr$(14)
  3. 30 print"[147][217]ou must have already followed the"
  4. 40 print"instructions and created the file"
  5. 50 print"called 'psycloid.bas'.  [201]f you have"
  6. 60 print"already created it, [211]elect ([195]) to"
  7. 70 print"[195]ontinue and load the 'u.psycloid'"
  8. 80 print"ultragem.  [201]f you have [206][207][212] created"
  9. 90 print"psycloid.bas, [211]elect ([209]) which will"
  10. 100 print"return you to the [213]ltragems [208]resenter"
  11. 110 print"program."
  12. 120 print"[211]elect ([195]) or ([209]) [206]ow"
  13. 130 getz$:ifz$=""then130
  14. 140 ifz$="c"then170
  15. 150 ifz$="q"then210
  16. 160 goto130
  17. 170 print"[147]load"chr$(34)"u.psycloid"chr$(34)","dv
  18. 180 print"run"
  19. 190 poke631,13:poke632,13:poke198,2:end
  20. 200 open15,8,15,"s0:n.psycloid":close15:save"n.psycloid",8:end
  21. 210 print"[147]load"chr$(34)"b.ultragems ii"chr$(34)","dv
  22. 220 print"run"
  23. 230 poke631,13:poke632,13:poke198,2:end
  24. 10000 open15,8,15,"s0:n.psycloid":close15:save"n.psycloid",8:end
  25.