From 3aacf3d2cedfdeca49ceb57533389870bfc688a9 Mon Sep 17 00:00:00 2001
From: sik
Date: Sun, 23 Jul 2017 03:20:35 -0300
Subject: Now with pausing and other niceties

---
 src-z80/core/macro.z80 | 41 +++++++++++++++++++++++++++++++++++++++++
 1 file changed, 41 insertions(+)
 create mode 100644 src-z80/core/macro.z80

(limited to 'src-z80/core/macro.z80')

diff --git a/src-z80/core/macro.z80 b/src-z80/core/macro.z80
new file mode 100644
index 0000000..eedd527
--- /dev/null
+++ b/src-z80/core/macro.z80
@@ -0,0 +1,41 @@
+;****************************************************************************
+; PollPCM
+; Used to update PCM while not idle
+;----------------------------------------------------------------------------
+; breaks: af
+;****************************************************************************
+
+PollPCM: macro
+    ld a, ($4000)
+    rrca
+    rst $08
+    endm
+
+;****************************************************************************
+; BankSwitch
+; Switches into a new bank (won't update player status!)
+;----------------------------------------------------------------------------
+; input A .... New bank to switch into
+; input HL ... Must be $60xx
+;----------------------------------------------------------------------------
+; breaks ..... AF
+;****************************************************************************
+
+BankSwitch: macro
+    ld (hl), a
+    rrca
+    ld (hl), a
+    rrca
+    ld (hl), a
+    rrca
+    ld (hl), a
+    rrca
+    ld (hl), a
+    rrca
+    ld (hl), a
+    rrca
+    ld (hl), a
+    ld (hl), h
+    rrca
+    ld (hl), a
+    endm
-- 
cgit v1.2.3