     $D7F3/55283:   -Check '$' Directory

    Jump from $D7C5, $D7C9:

    D7F3: E0 24     CPX #$24        ; '$'
    D7F5: D0 1E     BNE $D815       ; no
    D7F7: AD 4C 02  LDA $024C       ; secondary address
    D7FA: D0 03     BNE $D7FF       ; not equal to zero?
    D7FC: 4C 55 DA  JMP $DA55       ; OPEN $

    Jump from $D7FA:

    D7FF: 20 D1 C1  JSR $C1D1       ; analyze line to end
    D802: AD 85 FE  LDA $FE85       ; 18, directory track
    D805: 85 80     STA $80         ; track
    D807: A9 00     LDA #$00
    D809: 85 81     STA $81         ; sector 0
    D80B: 20 46 DC  JSR $DC46       ; allocate buffer, read block
    D80E: A5 7F     LDA $7F         ; drive number
    D810: 09 02     ORA #$02
    D812: 4C EB D7  JMP $D7EB       ; continue as above

        Previous Page / Next Page