halt\r
jr gech.wait\r
gech.cont:\r
- jr nc,$+5\r
- adc (ix+o.mask) ; mask+carry == buffer size\r
+ and (ix+o.mask) ;\r
dec a\r
ld b,a\r
ld a,c\r
ff_cnt:\r
ld a,(ix+o.in_idx) ;\r
sub (ix+o.out_idx) ;\r
- ret nc\r
- adc (ix+o.mask) ; mask+carry == buffer size\r
+ and (ix+o.mask) ;\r
ret\r
\r
;--------------------------------------------------------------\r