home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1985 February / 64er_Magazin_85-02_1985_Markt__Technik_de.d64 / basic-lader (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1985-01-01  |  482 b   |  28 lines
  1. 50000 rem    basic-lader
  2. 50010 data   ..................
  3. 50020 data   ..................
  4. 50030 data   ..................
  5. 50040 :
  6. 50050 rem    maschinenprogramme aus
  7. 50060 rem    dataladern
  8. 50070 :
  9. 50080 rem s koennen weggelassen werden
  10. 50090 :
  11. 50100 rem   da = startadresse
  12. 50110 rem   ea = endadresse
  13. 50120 :
  14. 50130 open 1,8,1, "name"
  15. 50140 :
  16. 50150 rem sa u.ea zuordnen
  17. 50160 :
  18. 50170 sh = int(sa/256) :rem high-byte
  19. 50180 sl = sa-sh*256   :rem low-byte
  20. 50190 print#1,chrs$(sl);chr$(sh);
  21. 50200 :
  22. 50210 for i=sa to ea
  23. 50220 read wert
  24. 50230 print#1,chr$(wert);
  25. 50240 next i
  26. 50250 :
  27. 50260 close 1
  28.