home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1988 August / 64er_Magazin_88-08_1988_Markt__Technik_de_Side_B.d64 / save$6-$8 (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  221b  |  16 lines
  1. 1 rem
  2. 2 rem
  3. 3 rem  save bitmap $6000-$8000
  4. 4 rem
  5. 5 rem  (w) gero bassenge
  6. 6 rem  (c) 64'er
  7. 7 rem
  8. 8 rem
  9. 9 rem
  10. 10 poke56,6*16:clr
  11. 20 open1,8,2,"dateiname,p,w"
  12. 30 print#1,chr$(0);chr$(32);
  13. 40 fori=6*4096to8*4096
  14. 50 print#1,chr$(peek(i));
  15. 60 nexti:close1
  16.