$CDBD/52669:   B-P block pointer

CDBD: 20 D2 CD  JSR $CDD2       ; open channel, get buffer number
CDC0: A5 F9     LDA $F9         ; buffer number
CDC2: 0A        ASL             ; * 2
CDC3: AA        TAX             ; as index
CDC4: AD 86 02  LDA $0286       ; pointer value
CDC7: 95 99     STA $99,X       ; save as buffer pointer
CDC9: 20 2F D1  JSR $D12F       ; prepare a byte in buffer
CDCC: 20 EE D3  JSR $D3EE       ; for output
CDCF: 4C 94 C1  JMP $C194       ; done

    Previous Page / Next Page