home *** CD-ROM | disk | FTP | other *** search
- 10 dv=peek(186):ifdv<8thendv=8
- 20 poke53281,0:poke53280,0:printchr$(14)
- 30 print"[147][217]ou must have already followed the"
- 40 print"instructions and created the file"
- 50 print"called 'psycloid.bas'. [201]f you have"
- 60 print"already created it, [211]elect ([195]) to"
- 70 print"[195]ontinue and load the 'u.psycloid'"
- 80 print"ultragem. [201]f you have [206][207][212] created"
- 90 print"psycloid.bas, [211]elect ([209]) which will"
- 100 print"return you to the [213]ltragems [208]resenter"
- 110 print"program."
- 120 print"[211]elect ([195]) or ([209]) [206]ow"
- 130 getz$:ifz$=""then130
- 140 ifz$="c"then170
- 150 ifz$="q"then210
- 160 goto130
- 170 print"[147]load"chr$(34)"u.psycloid"chr$(34)","dv
- 180 print"run"
- 190 poke631,13:poke632,13:poke198,2:end
- 200 open15,8,15,"s0:n.psycloid":close15:save"n.psycloid",8:end
- 210 print"[147]load"chr$(34)"b.ultragems ii"chr$(34)","dv
- 220 print"run"
- 230 poke631,13:poke632,13:poke198,2:end
- 10000 open15,8,15,"s0:n.psycloid":close15:save"n.psycloid",8:end
-