home *** CD-ROM | disk | FTP | other *** search
/ Commodore Disc 55 / Commodore_Disc_55_19xx_-_de.d64 / cp-comp (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1990-01-01  |  215 b   |  7 lines
  1. 1 printchr$(147):if peek(772)=124then3
  2. 2 printchr$(19)"run "chr$(34)"cp-comp.128":poke842,19:poke843,13:poke208,2:end
  3. 3 printchr$(19)"load "chr$(34)"cp-comp.64"chr$(34)",8"
  4. 4 rn$="run":print""
  5. 5 printchr$(145)rn$
  6. 6 poke631,19:fori=1to3:poke631+i,13:next:poke198,4:end
  7.