refactor print utils

[z180-stamp-cpm3.git] / cbios / chario.180

diff --git a/cbios/chario.180 b/cbios/chario.180
index 3451262a9036018601c33d61851e5885a6e6f8bc..7133b7745b5a86b94e452540eee3c276eb5d5f0e 100644 (file)
--- a/cbios/chario.180
+++ b/cbios/chario.180
@@ -4,17 +4,17 @@
 \r
 \r
 \r
-       public ?cinit,?ci,?co,?cist,?cost\r
+       public ?cinit,ioctl,?ci,?co,?cist,?cost\r
        public @ctbl\r
 \r
        extrn   ff_dev\r
        extrn   as0_dev,as1_dev\r
        extrn   _b0call\r
 \r
-       include config.inc\r
-       include z180reg.inc\r
+       maclib z180reg.inc\r
+       maclib config.inc\r
 \r
-       include modebaud.inc    ; define mode bits and baud equates\r
+       maclib modebaud.inc     ; define mode bits and baud equates\r
 \r
 \r
 \r
@@ -32,7 +32,7 @@
 \r
        db      'ASCI1 '                ; device 2\r
        db      mb$in$out+mb$serial+mb$soft$baud\r
-       db      baud$19200\r
+       db      baud$134\r
 \r
        db      0                               ; table terminator\r
 \r
@@ -42,7 +42,7 @@ O_COF equ     -10
 O_COSTF        equ     -8\r
 O_CIF  equ     -6\r
 O_CISTF        equ     -4\r
-O_INITF        equ     -2\r
+O_IOCTLF equ   -2\r
 \r
        dseg\r
 xctbl:\r
@@ -71,14 +71,15 @@ null_dev:
 \r
        cseg\r
 ?cinit:                                ; init devices\r
-       b0call  _cinit\r
+       ld      b,c\r
+       ld      c,0             ;\r
+ioctl:\r
+       b0call  _ioctl\r
        ret\r
 \r
        dseg\r
-_cinit:\r
-       ld      b,c\r
-       ld      hl,O_INITF\r
-       ld      c,0             ;\r
+_ioctl:\r
+       ld      hl,O_IOCTLF\r
        jr      vector_io\r
 \r
 ;--------------------------------------------------------------\r