; Output the next character from the buffer
@L0: ldy #0
- lda (ptr2),y
- inc ptr2
+ lda (ptr1),y
+ inc ptr1
bne @L1
- inc ptr2+1 ; A = *buf++;
+ inc ptr1+1 ; A = *buf++;
@L1: jsr BSOUT
; Check the status
; Decrement count
-@L2: inc ptr1
+@L2: inc ptr2
bne @L0
- inc ptr1+1
+ inc ptr2+1
bne @L0
; Wrote all chars or disk full. Close the output channel