X-Git-Url: http://cloudbase.mooo.com/gitweb/z180-stamp.git/blobdiff_plain/6dc26e92c20eedcfcba9e0b75a015a5b160748c5..bad2d92d98f9990ee5ccf509c0eafe5b3af9f4dc:/z180/console.180 diff --git a/z180/console.180 b/z180/console.180 index d7b5ef6..9b0d519 100644 --- a/z180/console.180 +++ b/z180/console.180 @@ -8,8 +8,8 @@ extrn ser.init,ser.instat,ser.in,ser.out -; extrn f.init,f.in,f.out,f.i.st -; extrn msg.co + extrn msginit,msg.in,msg.out,msgi.st + extrn msg.co include config.inc @@ -20,19 +20,19 @@ ; $coninit: -; call f.init + call msginit call ser.init ret $cists: -; call f.i.st -; ret nz + call msgi.st + ret nz call ser.instat ret $ci: -; call f.i.st -; jp nz,f.in + call msgi.st + jp nz,msg.in call ser.instat jp nz,ser.in jr $ci @@ -41,7 +41,7 @@ $ci: ; jp f.o.st $co: -; call msg.co + call msg.co jp ser.out end