From 2682bc5d1d864341aaeb42a449db73c3ecd16d70 Mon Sep 17 00:00:00 2001 From: "Juan J. Martinez" Date: Wed, 30 Dec 2020 19:07:31 +0000 Subject: Initial import --- src/ubox/ubox_get_tile.z80 | 28 ++++++++++++++++++++++++++++ 1 file changed, 28 insertions(+) create mode 100644 src/ubox/ubox_get_tile.z80 (limited to 'src/ubox/ubox_get_tile.z80') diff --git a/src/ubox/ubox_get_tile.z80 b/src/ubox/ubox_get_tile.z80 new file mode 100644 index 0000000..49dcb30 --- /dev/null +++ b/src/ubox/ubox_get_tile.z80 @@ -0,0 +1,28 @@ +.globl _ubox_get_tile + +RDVRM = 0x004a + +_ubox_get_tile:: + ld hl, #2 + add hl, sp + + ld b, #0 + ld c, (hl) + inc hl + ld l, (hl) + + ld h, #0 + add hl, hl + add hl, hl + add hl, hl + add hl, hl + add hl, hl + add hl, bc + + ld bc, #0x1800 + add hl, bc + + call RDVRM + ld l, a + ret + -- cgit v1.2.3