X-Git-Url: http://cloudbase.mooo.com/gitweb/z180-stamp.git/blobdiff_plain/64cc220767e870fad388fb9021cf96ff2958275b..b08e079d1541c80028e3a11affec3f863eb9129d:/z180/conbuf-a.180 diff --git a/z180/conbuf-a.180 b/z180/conbuf-a.180 index 096bbf9..0a35195 100644 --- a/z180/conbuf-a.180 +++ b/z180/conbuf-a.180 @@ -1,6 +1,6 @@ page 255 .z80 - + ; ; FIFO channels for communication with avr ; @@ -17,10 +17,10 @@ ;-------------------------------------------------------------- dseg - - mkbuf co.fifo,co.fifo_len - mkbuf ci.fifo,ci.fifo_len + + mkbuf ci.fifo_id, ci.fifo, ci.fifo_len + mkbuf co.fifo_id, co.fifo, co.fifo_len ;-------------------------------------------------------------- @@ -50,7 +50,7 @@ buf.empty: ret z or 0ffh ret - + ff.in: push ix @@ -71,12 +71,12 @@ bg.wait: inc h bg.nc: ld l,(hl) - + ld a,(ix+o.out_idx) ; inc a and (ix+o.mask) ld (ix+o.out_idx),a - + ld a,l pop hl pop ix @@ -122,7 +122,7 @@ bp.wait: cp (ix+o.out_idx) ;19 jr z,bp.wait ;12/7 ld (ix+o.in_idx),a ;19 - + out (AVRINT6),a ;11 ld a,b ;4 pop bc ;10 @@ -163,4 +163,3 @@ bp.wait: endif end -