home *** CD-ROM | disk | FTP | other *** search
/ Transactor / Transactor_11_1986_Transactor_Publishing.d64 / saverify (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  293b  |  8 lines

  1. 10 rem ** saverify -- bob hayes **
  2. 20 rem ** wpg, man. canada      **
  3. 25 sa=828: rem start address-note: relocatable
  4. 30 q$=chr$(34): a=0: for x=0 to 18: read q: poke sa+x,q: a=a+q: next
  5. 40 print: print"format: sys"sa;q$"filename"q$",8"
  6. 50 end
  7. 60 data 32,212,225,32,89,225,169,1,133,147,44,169,0,133,10,32,111,225,96
  8.