This commit is contained in:
Anatoliy Belyanskiy 2023-09-17 00:56:32 +10:00
parent eeaab481e6
commit 5c88c7d658

View File

@ -2,7 +2,8 @@
; ;
;************************************************************* ;*************************************************************
; ;
; EXPANSION VER 3.00 (C) Peters Plus Ltd. ; EXPANSION VER 3.00 (C) Peters Plus Ltd.
; EXPANSION VER 3.1 (C) Sprinter Team
; ;
;************************************************************* ;*************************************************************
@ -313,9 +314,9 @@ NO_RESTART:
LD A,3 ; Z84.REG.Misc_Ctrl LD A,3 ; Z84.REG.Misc_Ctrl
OUT (C),A ; Z84.SYS.Control OUT (C),A ; Z84.SYS.Control
INC C INC C
;LD A,1 ; enable CS0, disable CS1
; no boundary set! ; no boundary set!
XOR A ; disable CS0, disable CS1 XOR A ; disable CS0, disable CS1
;LD A,1 ; enable CS0, disable CS1
OUT (C),A ; Z84.SYS.Data OUT (C),A ; Z84.SYS.Data
JP POST_TEST.START JP POST_TEST.START
;--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--== ;--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==
@ -1034,7 +1035,7 @@ PORTS_INIT:
;----[Clearing the keyboard buffer]----- ;----[Clearing the keyboard buffer]-----
.clean_kbd_buf: .clean_kbd_buf:
IN A,(Z84.SIO.Ch_A.Ctrl) IN A,(Z84.SIO.Ch_A.Ctrl)
BIT 0,A AND 1
JR Z,1F JR Z,1F
IN A,(Z84.SIO.Ch_A.Data) IN A,(Z84.SIO.Ch_A.Data)
JR .clean_kbd_buf JR .clean_kbd_buf