$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