From 1ffa84bd778a4112b9e8e1cfb3de71108fb1a977 Mon Sep 17 00:00:00 2001
From: Leo C <erbl259-lmu@yahoo.de>
Date: Wed, 12 Sep 2018 22:23:55 +0200
Subject: [PATCH] Disable Refresh Cycles, pulse I/O 040h when loaded.

---
 z180/cpuinfo.180 | 17 +++++++++++++++--
 1 file changed, 15 insertions(+), 2 deletions(-)

diff --git a/z180/cpuinfo.180 b/z180/cpuinfo.180
index 8629aa5..7d25dc2 100644
--- a/z180/cpuinfo.180
+++ b/z180/cpuinfo.180
@@ -167,6 +167,9 @@ nxt_base:
 
 base_found:
 	inc	e		; HD64180
+	ld	l,RCR		; Disable Refresh Controller
+	xor	a		;
+	call	reg_out		;
 	ld	l,omcr		; Check, if CPU has OMCR register
 	ld	d,M_IOC		;
 	call	chk_reg		;
@@ -192,8 +195,18 @@ start:
 	ld	(hl),e
 	dec	hl
 	ld	(hl),0ffH
-	halt
-	jp	$-1
+	out	(040H),a
+
+;	ld	a,(wstates)
+;	out0	(DCNTL),a
+				;Z80	Z180(0W) Z180(MaxW)
+loop:				;--------------------------
+	in	a,(050h)	;11       10     +3*3  19
+	jp	loop		;10	   9	 +3*3  18
+				;--------------------------
+				;21       19           37
+
+;	jr	loop		;12        8     +2*3  14
 
 	rept	8
 	  dw	0
-- 
2.39.2