home *** CD-ROM | disk | FTP | other *** search
/ CBM Funet Archive / cbm-funet-archive-2003.iso / cbm / c64 / diskutil / misc / chdirsys.sfx / quellcode < prev   
Encoding:
Text File  |  1994-01-18  |  564 b   |  25 lines
  1. ;********************************
  2. ;* &-File Routine in der Floppy *
  3. ;* von: Sven Oliver Moll,Lehrte *
  4. ;* verwendet in:   CHDIR-SYSTEM *
  5. ;********************************
  6.  
  7. lda #$12 ;track 18
  8. sta $08  ;
  9. lda #$01 ;sektor 1
  10. sta $09  ;
  11. lda #$80 ;jobcode fuer lesen
  12. jsr do   ;ausfuehren und warten
  13.          ;bis eingelesen
  14. lda #ns  ;neuen sektor bestimmen
  15.          ;(variert von dir zu dir)
  16. sta $0401;als linker schreiben
  17. lda #$90 ;jobcode fuer block screiben
  18. :do      ;
  19. sta $01  ;fuer jobcodespeicher
  20. :wait    ;
  21. lda $01  ;warten bis ausfuehrung
  22. bmi wait ;beendet.
  23. rts
  24.  
  25.