X-Git-Url: http://cloudbase.mooo.com/gitweb/z180-stamp-cpm3.git/blobdiff_plain/3c56f4c2ba4bfa53c22bd0b70453012dd94dee3e..5d7663e12c563f78fab15eeaf5ecbfcad39d8194:/cbios/fifo.180 diff --git a/cbios/fifo.180 b/cbios/fifo.180 index ca2924a..e818c5a 100644 --- a/cbios/fifo.180 +++ b/cbios/fifo.180 @@ -120,12 +120,13 @@ ff_gech: ld c,(ix+o.out_idx) ; ld b,0 add hl,bc - jr $+3 gech.wait: - halt ld a,(ix+o.in_idx) ; sub c - jr z,gech.wait + jr nz,gech.cont + halt + jr gech.wait +gech.cont: jr nc,$+5 adc (ix+o.mask) ; mask+carry == buffer size dec a