     $ED67/60775:   Get byte from buffer

    Jump from $D40E:

    ED67: 20 37 D1  JSR $D137       ; get byte
    ED6A: F0 01     BEQ $ED6D       ; buffer pointer zero?
    ED6C: 60        RTS

    Jump from $ED6A:

    ED6D: 85 85     STA $85         ; save data byte
    ED6F: A4 82     LDY $82         ; channel number
    ED71: B9 44 02  LDA $0244,Y     ; set end marker
    ED74: F0 08     BEQ $ED7E       ; zero (LOAD $)?
    ED76: A9 80     LDA #$80
    ED78: 99 F2 00  STA $F2,Y       ; set READ flag
    ED7B: A5 85     LDA $85         ; data byte
    ED7D: 60        RTS

    Jump from $ED74:

    ED7E: 48        PHA
    ED7F: 20 EA EC  JSR $ECEA       ; create directory line in buffer
    ED82: 68        PLA
    ED83: 60        RTS

        Previous Page / Next Page