From e2f066492f90fd8a0a6e57bda0c9854cfbd4ba03 Mon Sep 17 00:00:00 2001 From: b1ackmai1er Date: Sun, 24 Nov 2019 20:51:39 +0800 Subject: [PATCH] Create ctcstub.asm --- Source/HBIOS/ctcstub.asm | 20 ++++++++++++++++++++ 1 file changed, 20 insertions(+) create mode 100644 Source/HBIOS/ctcstub.asm diff --git a/Source/HBIOS/ctcstub.asm b/Source/HBIOS/ctcstub.asm new file mode 100644 index 00000000..4551502e --- /dev/null +++ b/Source/HBIOS/ctcstub.asm @@ -0,0 +1,20 @@ +;___CTC________________________________________________________________________________________________________________ +; +; Z80 CTC STUB +; +; DISPLAY CONFIGURATION DETAILS +;______________________________________________________________________________________________________________________ +; +CTC_INIT: ; MINIMAL INIT +CTC_PRTCFG: + ; ANNOUNCE PORT + CALL NEWLINE ; FORMATTING + PRTS("CTC$") ; FORMATTING +; LD A,(IY) ; DEVICE NUM +; CALL PRTDECB ; PRINT DEVICE NUM + PRTS(": IO=0x$") ; FORMATTING + LD A,CTCBASE ; GET BASE PORT + CALL PRTHEXBYTE ; PRINT BASE PORT +; + XOR A + RET