home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 57 / 64er_Magazin_Sonderheft_57_19xx_Markt__Technik_de_Side_A.d64 / super-saver (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  909b  |  20 lines
  1. 10 print"[147]super-saver by horst schmidt"
  2. 20 print"bitte taste druecken!"
  3. 110 a=52224:q=0
  4. 120 reads:ifs=-1then170
  5. 130 pokea,s:a=a+1:goto120
  6. 170 print"befehlsformat: .save adr.1,adr.2,geadr.:[146]"
  7. 180 print:print"adr.1    =anfangsadresse.":print
  8. 210 print"adr.2    =endadresse.":print
  9. 230 print"geadr.   =geraetenummer"
  10. 240 sys52224
  11. 32000 data162,11,160,204,142,8,3,140,9,3,96,32,115,0,201,46,240,3,76,231,167
  12. 32001 data32,115,0,201,148,240,3,76,8,175,234,32,115,0,32,138,173,32,247,183
  13. 32002 data166,20,164,21,134,251,132,252,32,138,204,162,0,189,0,1,240,15,157,130
  14. 32003 data204,232,76,54,204,32,121,0,201,44,208,211,96,32,66,204,32,115,0,32
  15. 32004 data138,173,32,247,183,166,20,164,21,142,119,204,140,121,204,32,66,204
  16. 32005 data32,155,183,169,100,160,1,32,186,255,169,5,162,131,160,204,32,189,255
  17. 32006 data162,255,160,0,169,251,32,216,255,32,228,167,96,32,48,32,32,32,32,32
  18. 32007 data164,251,165,252,132,99,133,98,162,144,56,32,73,188,32,221,189,162,6
  19. 32008 data169,32,157,130,204,202,208,250,96,-1
  20.