$E2E2/58082:   Divide data blocks into records

Jump from $DD7B, $E3C2, $E3CE:

E2E2: 20 2B DE  JSR $DE2B       ; set buffer pointer
E2E5: A0 02     LDY #$02
E2E7: A9 00     LDA #$00

Jump from $E2EC:

E2E9: 91 94     STA ($94),Y     ; erase buffer
E2EB: C8        INY
E2EC: D0 FB     BNE $E2E9
E2EE: 20 04 E3  JSR $E304       ; set pointer to next record

Jump from $E2FB:

E2F1: 95 C1     STA $C1,X
E2F3: A8        TAY
E2F4: A9 FF     LDA #$FF
E2F6: 91 94     STA ($94),Y     ; $FF as 1st character in record
E2F8: 20 04 E3  JSR $E304       ; set pointer to next record
E2FB: 90 F4     BCC $E2F1       ; done in this block?
E2FD: D0 04     BNE $E303       ; block full?
E2FF: A9 00     LDA #$00
E301: 95 C1     STA $C1,X       ; write pointer to zero

Jump from $E2FD:

E303: 60        RTS

    Previous Page / Next Page