page 255\r
.z80\r
- \r
+\r
;\r
; FIFO channels for communication with avr\r
;\r
global ff.init,ff.in,ff.out,ff.i.st,ff.o.st\r
\r
- extrn buf.init\r
+ extrn bufinit\r
\r
include config.inc\r
if CPU_Z180\r
;--------------------------------------------------------------\r
\r
dseg\r
- \r
\r
- mkbuf co.fifo,co.fifo_len\r
- mkbuf ci.fifo,ci.fifo_len\r
+\r
+ mkbuf ci.fifo_id, ci.fifo, ci.fifo_len\r
+ mkbuf co.fifo_id, co.fifo, co.fifo_len\r
\r
\r
;--------------------------------------------------------------\r
\r
ff.init:\r
ld ix,ci.fifo\r
- ld a,ci.fifo.mask\r
- call buf.init\r
+ call bufinit\r
ld ix,co.fifo\r
- ld a,co.fifo.mask\r
- jp buf.init\r
+ jp bufinit\r
\r
\r
ff.i.st:\r
ret z\r
or 0ffh\r
ret\r
- \r
+\r
\r
ff.in:\r
push ix\r
inc h\r
bg.nc:\r
ld l,(hl)\r
- \r
+\r
ld a,(ix+o.out_idx) ;\r
inc a\r
and (ix+o.mask)\r
ld (ix+o.out_idx),a\r
- \r
+\r
ld a,l\r
pop hl\r
pop ix\r
cp (ix+o.out_idx) ;19\r
jr z,bp.wait ;12/7\r
ld (ix+o.in_idx),a ;19\r
- \r
+\r
out (AVRINT6),a ;11\r
ld a,b ;4\r
pop bc ;10\r
endif\r
\r
end\r
-\r