diff options
Diffstat (limited to 'engine')
| -rw-r--r-- | engine/menu/set_time.asm | 83 |
1 files changed, 83 insertions, 0 deletions
diff --git a/engine/menu/set_time.asm b/engine/menu/set_time.asm new file mode 100644 index 0000000..c7c4aa3 --- /dev/null +++ b/engine/menu/set_time.asm @@ -0,0 +1,83 @@ +INCLUDE "constants.asm" + +SECTION "engine/menu/set_time.asm", ROMX + +SetTime: ; 36:7ae4 + ld hl, wStartHour + ldh a, [hRTCHours] + ld [hli], a + ldh a, [hRTCMinutes] + ld [hl], a + ld hl, Textdbaf4 + call PrintText + ret + +Textdbaf4: ; 36:7af4 + deciram wStartHour, 1, 2 + text " じ" + line "@" + deciram wStartMinute, 1, 2 + text " ふん？@" + start_asm +.loop + call ClearJoypad + call GetJoypad + ldh a, [hJoyState] + and a + jr z, .loop + bit 0, a + jp nz, .sub_dbb63 + bit 6, a + jr nz, .sub_dbb2a + bit 7, a + jr nz, .sub_dbb37 + bit 4, a + jr nz, .sub_dbb43 + bit 5, a + jr nz, .sub_dbb50 + jr .loop +.sub_dbb2a + ld a, [wStartHour] + cp $17 + jr z, .sub_dbb5a + inc a + ld [wStartHour], a + jr .sub_dbb5a +.sub_dbb37 + ld a, [wStartHour] + and a + jr z, .sub_dbb5a + dec a + ld [wStartHour], a + jr .sub_dbb5a +.sub_dbb43 + ld a, [wStartMinute] + cp $3b + jr z, .sub_dbb5a + inc a + ld [wStartMinute], a + jr .sub_dbb5a +.sub_dbb50 + ld a, [wStartMinute] + and a + jr z, .sub_dbb5a + dec a + ld [wStartMinute], a +.sub_dbb5a + ld hl, Textdbaf4 ; meant Textdbb6c? + call PrintText + jp .loop +.sub_dbb63 + call Function04ac + call Function0502 + jp Function3036 + +Textdbb6c: ; 36:7b6c + deciram wStartHour, 1, 2 + text " じ" + line "@" + deciram wStartMinute, 1, 2 + text " ふん？" + done + +; 36:7b98 |