diff --git a/src/kernal/iec/ciout.s b/src/kernal/iec/ciout.s
index b6972665..b1f2038c 100644
--- a/src/kernal/iec/ciout.s
+++ b/src/kernal/iec/ciout.s
@@ -28,9 +28,10 @@ CIOUT:
 	
 ciout_store_in_buffer:
 
-	; Store in the buffer data to be sent next, return
+	; Store in the buffer data to be sent next, return; iec_tx_byte
+	; sends the byte from TBTCNT, so that is our buffer, not BSOUR
 	pla
-	sta BSOUR
+	sta TBTCNT
 	rts
 	
 ciout_send_byte: