home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1985 December / 64er_Magazin_85-12_1985_Markt__Technik_de.d64 / swap (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  342b  |  14 lines
  1. 10 data32,250,174,32,158,173,32,143
  2. 20 data173,165,100,133,247,165,101,133
  3. 30 data248,32,253,174,32,158,173,32
  4. 40 data143,173,160,0,177,247,133,249
  5. 50 data177,100,145,247,165,249,145,100
  6. 60 data200,192,3,208,239,32,247,174
  7. 70 data96,0,0,0,0,0,0,0
  8. 100 input"startadresse";sa
  9. 110 fori=sa to sa +48
  10. 120 readx:pokei,x:cs=cs+x
  11. 130 next i
  12. 140 if cs<>7314 then print"fehler!!"
  13. 150 end
  14.