aboutsummaryrefslogtreecommitdiff
path: root/lib/cpcrslib/cpc_SetInk.s
diff options
context:
space:
mode:
authorJuan J. Martinez <jjm@usebox.net>2023-11-05 11:22:55 +0000
committerJuan J. Martinez <jjm@usebox.net>2023-11-05 11:31:28 +0000
commit2fbdf974338bde8576efdae40a819a76b2391033 (patch)
tree64d41a37470143f142344f9a439d96de3e7918c2 /lib/cpcrslib/cpc_SetInk.s
downloadkitsunes-curse-2fbdf974338bde8576efdae40a819a76b2391033.tar.gz
kitsunes-curse-2fbdf974338bde8576efdae40a819a76b2391033.zip
Initial import of the open source release
Diffstat (limited to 'lib/cpcrslib/cpc_SetInk.s')
-rw-r--r--lib/cpcrslib/cpc_SetInk.s12
1 files changed, 12 insertions, 0 deletions
diff --git a/lib/cpcrslib/cpc_SetInk.s b/lib/cpcrslib/cpc_SetInk.s
new file mode 100644
index 0000000..2c29464
--- /dev/null
+++ b/lib/cpcrslib/cpc_SetInk.s
@@ -0,0 +1,12 @@
+.globl _cpc_SetInk
+
+_cpc_SetInk::
+ LD HL,#2
+ ADD HL,SP
+ LD A,(HL)
+ INC HL
+
+ LD B,(HL)
+ LD C,B
+ JP 0XBC32
+