]> cloudbase.mooo.com Git - z180-stamp-cpm3.git/blobdiff - cbios/misc.180
refactor print utils
[z180-stamp-cpm3.git] / cbios / misc.180
index 10eb83c200655b9bde125846d46d6b5ed6f5cfc8..58122f8cc2281dcdd221e62966fb3637156dfa93 100644 (file)
@@ -3,11 +3,11 @@
        public cpu_frq\r
        public get_tmr\r
 \r
        public cpu_frq\r
        public get_tmr\r
 \r
-       extrn div32_r,?pmsg\r
+       extrn div32_r,pr.inln\r
        extrn msg.sm,msg.recv,hwl2phy\r
 \r
        extrn msg.sm,msg.recv,hwl2phy\r
 \r
-       include config.inc\r
-       include z180reg.inc\r
+       maclib z180reg.inc\r
+       maclib config.inc\r
 \r
 \r
 ;----------------------------------------------------------------------\r
 \r
 \r
 ;----------------------------------------------------------------------\r
@@ -67,16 +67,13 @@ sp.i.1:
 \r
        add     a,'0'\r
        ld      (spi$nr),a\r
 \r
        add     a,'0'\r
        ld      (spi$nr),a\r
-       ld      hl,spi$msg\r
-       call    ?pmsg\r
-sp.i.2:\r
-       halt\r
-       jr      sp.i.2\r
-\r
-spi$msg:\r
+       call    pr.inln\r
        db      13,10,'Spurious Int: '\r
 spi$nr:        db      '0'\r
        db      0\r
        db      13,10,'Spurious Int: '\r
 spi$nr:        db      '0'\r
        db      0\r
+sp.i.2:\r
+       halt\r
+       jr      sp.i.2\r
 \r
 ;--------------------------------------------------------------------\r
 ;\r
 \r
 ;--------------------------------------------------------------------\r
 ;\r