home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 127 / 127.d81 / b.concert (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  303b  |  11 lines
  1. 5 dv=peek(186):ifdv<8thendv=8
  2. 6 poke53281,0:poke53280,0:poke53272,20
  3. 7 print"[147]loading presto concert
  4. 8 [151]646,[194](53281)
  5. 10 q[178]27:[151]44,q:[151]43,1:[151]q[172]256,0
  6. 20 [153]"load"[199](34)"concert"[199](34)","dv
  7. 30 [153]"run
  8. 40 poke631,13:poke632,13:poke198,2:end
  9. 59999 end
  10. 60000 open15,8,15,"s0:concert boot":close15:save"concert boot",8
  11.