X-Git-Url: http://cloudbase.mooo.com/gitweb/z180-stamp.git/blobdiff_plain/78a3a76d0da08b39b370efc45e9c0ba1ee6bef26..f4d5b4febbffab80cb06bd18564d4c326756fad7:/Z180/console.180 diff --git a/Z180/console.180 b/Z180/console.180 deleted file mode 100644 index 70169b4..0000000 --- a/Z180/console.180 +++ /dev/null @@ -1,48 +0,0 @@ - ;page 255 - .z80 - - - global $coninit - global $cists,$ci - global $co - - - extrn f.init,f.in,f.out,f.i.st - extrn ser.init,ser.instat,ser.in,ser.out - extrn msg.co - - - include config.inc - include z180reg.inc - - cseg -; -; - -$coninit: - call f.init - call ser.init - ret - -$cists: - call f.i.st - ret nz - call ser.instat - ret - -$ci: - call f.i.st - jp nz,f.in - call ser.instat - jp nz,ser.in - jr $ci - -;$costs: -; jp f.o.st - -$co: - call msg.co - jp ser.out - - end -