home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1985 August / 1985-08.d64 / crunch.boot (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  104b  |  4 lines
  1. 260 ifa=0 then a=1:load"crunch",8,1
  2. 300 a$="[147]sys49152"+chr$(13):poke198,len(a$)
  3. 310 fori=1tolen(a$):poke630+i,asc(mid$(a$,i)):next
  4.