     $CACC/51916:   Check if file present

    Jump from $CAE7, $C96E:

    CACC: A5 E8     LDA $E8         ; file type
    CACE: 29 07     AND #$07
    CAD0: 8D 4A 02  STA $024A       ; save
    CAD3: AE 78 02  LDX $0278

    Jump from $CADF:

    CAD6: CA        DEX
    CAD7: EC 77 02  CPX $0277
    CADA: 90 0A     BCC $CAE6
    CADC: BD 80 02  LDA $0280,X     ; track number
    CADF: D0 F5     BNE $CAD6       ; not zero?
    CAE1: A9 62     LDA #$62
    CAE3: 4C C8 C1  JMP $C1C8       ; 62, 'file not found'

    Jump from $CADA:

    CAE6: 60        RTS

    Jump from $C9A7, $CA9C:

    CAE7: 20 CC CA  JSR $CACC       ; does file exist with old name?

    Jump from $CAF5:

    CAEA: BD 80 02  LDA $0280,X     ; track number of new file
    CAED: F0 05     BEQ $CAF4       ; file erased?
    CAEF: A9 63     LDA #$63
    CAF1: 4C C8 C1  JMP $C1C8       ; 63, 'file exists'

    Jump from $CAED:

    CAF4: CA        DEX
    CAF5: 10 F3     BPL $CAEA
    CAF7: 60        RTS

        Previous Page / Next Page