Schließen

 Plus/4 Kernal Disassembly $c9cc-$c9f2

; $C9CC: COLLECT
COLLECT:jsr     LCB1F        ; process DOS command 
        and     #$E7         ; address and drive ? 
        bne     LC974        ; no, error 
        jsr     CLALL        ; close all
        ldy     #$14         ; get table offset 
        bne     BCMD         ; process DOS command
; $C9DA: COPY
COPY:   jsr     LCB1F        ; process DOS command  
        and     #$30          
        cmp     #$30         ; two drives ? 
        bne     LC9E9        ; no
        lda     $82          ; fetch syntax flag
        and     #$C7         ; filename present ? 
        beq     LC9F0        ; no 
LC9E9:  lda     $82          ; fetch syntax flag 
        jsr     LCCC0        ; syntax check
        lda     $82          ; fetch syntax flag
LC9F0:  ldy     #$17         ; table offset 
        bne     BCMD         ; process DOS command

 

Letzte Änderung: 2019-01-06 09:50:40