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
OUT (C),A ; Z84.SYS.Control
INC C
;LD A,1 ; enable CS0, disable CS1
; no boundary set!
XOR A ; disable CS0, disable CS1
;LD A,1 ; enable CS0, disable CS1
OUT (C),A ; Z84.SYS.Data
JP POST_TEST.START
;--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==
@ -1034,7 +1035,7 @@ PORTS_INIT:
;----[Clearing the keyboard buffer]-----
.clean_kbd_buf:
IN A,(Z84.SIO.Ch_A.Ctrl)
BIT 0,A
AND 1
JR Z,1F
IN A,(Z84.SIO.Ch_A.Data)
JR .clean_kbd_buf