]> cloudbase.mooo.com Git - z180-stamp.git/blobdiff - z180/conbuf-a.180
ENV_HOME macro. 'fat help' command table entry
[z180-stamp.git] / z180 / conbuf-a.180
index 096bbf932125430a9946b096ddb8e3e34cae3ddc..f69b86d2b2f80f9ea2047597c4c980a9d63b6469 100644 (file)
@@ -1,12 +1,12 @@
        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
@@ -50,7 +48,7 @@ buf.empty:
        ret     z\r
        or      0ffh\r
        ret\r
-       \r
+\r
 \r
 ff.in:\r
        push    ix\r
@@ -71,12 +69,12 @@ bg.wait:
        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
@@ -122,7 +120,7 @@ bp.wait:
        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
@@ -163,4 +161,3 @@ bp.wait:
        endif\r
 \r
        end\r
-\r