home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1984 December / 64er_Magazin_84-12_1984_Markt__Technik_de.d64 / ahlborn_saverout (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  413b  |  18 lines
  1. 10 *save-routine fur c-64 synthesizer
  2. 20 *bitte im direktmodus eingeben,
  3. 30 *also ohne zeilennummern
  4. 40 *
  5. 100 poke 781,geraetenummer (1 bzw 8)
  6. 110 sys 65466
  7. 120 nm$="synthesizer-obj"
  8. 130 poke183,len(nm$)
  9. 140 poke781,681and255
  10. 150 poke782,681/256
  11. 160 forc=1to15:poke680+c,asc(mid$(nm$,c)):next
  12. 170 poke250,12032and255
  13. 180 poke251,12032/256     *startadresse
  14. 190 poke780,250
  15. 200 poke781,13790and255
  16. 210 poke782,13790/256     *endadresse
  17. 220 sys65496              *save
  18.