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_select_ctl.z80 | 42 ++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 42 insertions(+) create mode 100644 src/ubox/ubox_select_ctl.z80 (limited to 'src/ubox/ubox_select_ctl.z80') diff --git a/src/ubox/ubox_select_ctl.z80 b/src/ubox/ubox_select_ctl.z80 new file mode 100644 index 0000000..9685bec --- /dev/null +++ b/src/ubox/ubox_select_ctl.z80 @@ -0,0 +1,42 @@ +.globl _ubox_select_ctl + +GTTRIG = 0x00d8 + +_ubox_select_ctl:: + ld b, #3 +loop: + ld a, b + dec a + push bc + call GTTRIG + pop bc + or a + jr nz, trigger + djnz loop + + ; 2nd button + + ld b, #4 + ld a, b + push bc + call GTTRIG + pop bc + or a + jr nz, trigger_b + + dec b + ld a, b + push bc + call GTTRIG + pop bc + or a + jr nz, trigger_b + + ld l, #0xff + ret +trigger_b: + dec b +trigger: + dec b + ld l, b + ret -- cgit v1.2.3