$CDD2/52690:   Open channel

Jump from $CDBD, $CDF2:

CDD2: A6 D3     LDX $D3
CDD4: E6 D3     INC $D3
CDD6: BD 85 02  LDA $0285,X     ; buffer number
CDD9: A8        TAY
CDDA: 88        DEY
CDDB: 88        DEY
CDDC: C0 0C     CPY #$0C        ; buffer number smaller than 14?
CDDE: 90 05     BCC $CDE5       ; yes

Jump from $CDEA:

CDE0: A9 70     LDA #$70
CDE2: 4C C8 C1  JMP $C1C8       ; 70, 'no channel'

Jump from $CDDE:

CDE5: 85 83     STA $83         ; secondary address
CDE7: 20 EB D0  JSR $D0EB       ; open channel
CDEA: B0 F4     BCS $CDE0       ; already allocated, 'no channel'
CDEC: 20 93 DF  JSR $DF93       ; buffer number
CDEF: 85 F9     STA $F9         ; set
CDF1: 60        RTS

    Previous Page / Next Page