From 2d8cd1538f3553c63a678ad2368860677adaa180 Mon Sep 17 00:00:00 2001
From: b1ackmai1er <difficultylevelhigh@gmail.com>
Date: Wed, 22 May 2019 21:39:26 +0800
Subject: [PATCH 1/3] Update hbios.asm

---
 Source/HBIOS/hbios.asm | 16 ++++++++++++++--
 1 file changed, 14 insertions(+), 2 deletions(-)

diff --git a/Source/HBIOS/hbios.asm b/Source/HBIOS/hbios.asm
index 6e7df928..c5027f32 100644
--- a/Source/HBIOS/hbios.asm
+++ b/Source/HBIOS/hbios.asm
@@ -1254,8 +1254,20 @@ PSCNX	.EQU	$ + 1
 	CALL	PRTD3M			; PRINT AS DECIMAL WITH 3 DIGIT MANTISSA
 	PRTS("MHz$")
 #IF ((PLATFORM == PLT_N8) | (PLATFORM == PLT_MK4) | (PLATFORM == PLT_RCZ180))
-	CALL	PC_COMMA
-	PRTS(" IO=0x$")
+	LD	L,1			; flag Z180
+	OUT0	(Z180_ASTC1L),D		; D = 0 at this point
+	IN0	A,(Z180_FRC)		; supposedly only on S-class
+	INC	A			; FF or 00 -> 0 or 1 (weak S-class or higher)
+	ADD	A,L
+	LD	L,A			; result to L and A
+	IN0	A,(Z180_ASTC1L)		; counter reg
+	INC	A			; FF or 00 -> 0 or 1 (super-S)
+	ADD	A,L
+	LD	L,A			; 1 means Z180 - 80180
+	LD	A,$30			; 2 means Z180 S-class, SL1960 version
+	ADD	A,L			; 3 means Z180 advanced S-class, with Baud Rate Generator
+	CALL	COUT			; Courtesy John Coffman MK IV UnaBIOS
+	PRTS(", IO=0x$")
 	LD	A,Z180_BASE
 	CALL	PRTHEXBYTE
 #ENDIF

From 6106e1600fe4b8c61b8acd252fe3d42faa52bf01 Mon Sep 17 00:00:00 2001
From: b1ackmai1er <difficultylevelhigh@gmail.com>
Date: Wed, 22 May 2019 21:50:11 +0800
Subject: [PATCH 2/3] Update hbios.asm

---
 Source/HBIOS/hbios.asm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/Source/HBIOS/hbios.asm b/Source/HBIOS/hbios.asm
index c5027f32..2c2f0e39 100644
--- a/Source/HBIOS/hbios.asm
+++ b/Source/HBIOS/hbios.asm
@@ -1266,6 +1266,7 @@ PSCNX	.EQU	$ + 1
 	LD	L,A			; 1 means Z180 - 80180
 	LD	A,$30			; 2 means Z180 S-class, SL1960 version
 	ADD	A,L			; 3 means Z180 advanced S-class, with Baud Rate Generator
+	PRTS(" Type: $")
 	CALL	COUT			; Courtesy John Coffman MK IV UnaBIOS
 	PRTS(", IO=0x$")
 	LD	A,Z180_BASE

From 4860cd945f7aab34e20b3751aa6e090b06cf0ba4 Mon Sep 17 00:00:00 2001
From: b1ackmai1er <difficultylevelhigh@gmail.com>
Date: Thu, 23 May 2019 23:21:48 +0800
Subject: [PATCH 3/3] Update hbios.asm

---
 Source/HBIOS/hbios.asm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/Source/HBIOS/hbios.asm b/Source/HBIOS/hbios.asm
index 2c2f0e39..d59ccfb4 100644
--- a/Source/HBIOS/hbios.asm
+++ b/Source/HBIOS/hbios.asm
@@ -1255,6 +1255,7 @@ PSCNX	.EQU	$ + 1
 	PRTS("MHz$")
 #IF ((PLATFORM == PLT_N8) | (PLATFORM == PLT_MK4) | (PLATFORM == PLT_RCZ180))
 	LD	L,1			; flag Z180
+	LD	D,0
 	OUT0	(Z180_ASTC1L),D		; D = 0 at this point
 	IN0	A,(Z180_FRC)		; supposedly only on S-class
 	INC	A			; FF or 00 -> 0 or 1 (weak S-class or higher)