diff options
| author | Juan J. Martinez <jjm@usebox.net> | 2020-12-30 19:07:31 +0000 |
|---|---|---|
| committer | Juan J. Martinez <jjm@usebox.net> | 2020-12-30 19:23:41 +0000 |
| commit | 2682bc5d1d864341aaeb42a449db73c3ecd16d70 (patch) | |
| tree | 9116764364b4ee0ce7f6037305077807b57776de /src/ubox/ubox_set_colors.z80 | |
| download | ubox-msx-lib-2682bc5d1d864341aaeb42a449db73c3ecd16d70.tar.gz ubox-msx-lib-2682bc5d1d864341aaeb42a449db73c3ecd16d70.zip | |
Initial import1.0
Diffstat (limited to 'src/ubox/ubox_set_colors.z80')
| -rw-r--r-- | src/ubox/ubox_set_colors.z80 | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/src/ubox/ubox_set_colors.z80 b/src/ubox/ubox_set_colors.z80 new file mode 100644 index 0000000..b4638b8 --- /dev/null +++ b/src/ubox/ubox_set_colors.z80 @@ -0,0 +1,23 @@ +.globl _ubox_set_colors + +CHGCLR = 0x0062 +FORCLR = 0xf3e9 +BAKCLR = 0xf3ea +BDRCLR = 0xf3eb + +_ubox_set_colors:: + ld hl, #2 + add hl, sp + + ld a, (hl) + inc hl + ld (FORCLR), a + ld a, (hl) + inc hl + ld (BAKCLR), a + ld a, (hl) + inc hl + ld (BDRCLR), a + call CHGCLR + ret + |