     $C44F/50255:   Search for file in directory

    Jump from $C952, $CA99, $E7B8:

    C44F: 20 CA C3  JSR $C3CA       ; initialize drive

    Jump from $C46D:

    C452: A9 00     LDA #$00
    C454: 8D 92 02  STA $0292       ; pointer
    C457: 20 AC C5  JSR $C5AC       ; read first directory block
    C45A: D0 19     BNE $C475       ; entry present?

    Jump from $C488:

    C45C: CE 8C 02  DEC $028C       ; drive number clear?
    C45F: 10 01     BPL $C462       ; no
    C461: 60        RTS

    Jump from $C45F:

    C462: A9 01     LDA #$01
    C464: 8D 8D 02  STA $028D
    C467: 20 8F C3  JSR $C38F       ; change drive
    C46A: 20 00 C1  JSR $C100       ; turn LED on
    C46D: 4C 52 C4  JMP $C452       ; and search

    Jump from $C481:

    C470: 20 17 C6  JSR $C617       ; search next file in directory
    C473: F0 10     BEQ $C485       ; not found?

    Jump from $C45A, $C483:

    C475: 20 D8 C4  JSR $C4D8       ; verify directory entry
    C478: AD 8F 02  LDA $028F
    C47B: F0 01     BEQ $C47E       ; more files?
    C47D: 60        RTS

    Jump from $C47B:

    C47E: AD 53 02  LDA $0253
    C481: 30 ED     BMI $C470       ; file not found?
    C483: 10 F0     BPL $C475       ; yes

    Jump from $C473:

    C485: AD 8F 02  LDA $028F
    C488: F0 D2     BEQ $C45C
    C48A: 60        RTS

        Previous Page / Next Page