home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 9 / 64er_Magazin_Sonderheft_09_86-09_1986_Markt__Technik_de_Side_A.d64 / floppyk.listing6 (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  454b  |  19 lines
  1. 100 rem schreibschutz setzen
  2. 101 rem durch aenderung des format-
  3. 102 rem kennzeichens in der bam !!!
  4. 103 rem funktionsweise :
  5. 104 rem formatkennzeichen wird auf
  6. 105 rem beliebigen wert ausser 'a'
  7. 106 rem gesetzt. ab sofort koennen
  8. 107 rem keine schreibvorgaenge ausser
  9. 108 rem formatieren durchgefuehrt
  10. 109 rem werden. also vorsicht !
  11. 110 :
  12. 200 open 15,8,15,"i":open8,8,8,"#"
  13. 210 print#15,"u1 8 0 18 0"
  14. 220 print#15,"b-p 8 2"
  15. 230 print#8,"x";
  16. 240 print#15,"u2 8 0 18 0"
  17. 250 print#15,"i"
  18. 260 close8:close15:end
  19.