home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1990 January / 64er_Magazin_90-01_1990_Markt__Technik_de_Side_A.d64 / bytechanger (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  296b  |  17 lines
  1. 110 open15,8,15:rem
  2. 120 open5,8,5,"#":rem
  3. 125 input"spurnummer";t:rem
  4. 127 input"sektornummer";s:rem
  5. 129 input"welches byte";b:rem
  6. 130 print#15,"u1";5;0;t;s:rem
  7. 140 print#15,"b-p";5;b:rem
  8. 150 get#5,a$:rem
  9. 155 ifa$=""thena$=chr$(0):rem
  10. 160 print"alt:"asc(a$);:rem
  11. 165 input"neu:";a:rem
  12. 170 print#15,"b-p";5;b:rem
  13. 180 print#5,chr$(a);:rem
  14. 190 print#15,"u2";5;0;t;s:rem
  15. 200 close5:rem
  16. 210 close15:rem
  17.