You've already forked pokecrystal-board
mirror of
https://gitlab.com/xCrystal/pokecrystal-board.git
synced 2025-09-08 08:13:02 -07:00
Fix snake_case filenames
Renamed a bunch of files, most of them one-off functions, to better fit the general snake_case naming scheme. Also renamed some awfully long filenames.
This commit is contained in:
63
engine/rtc/print_hours_mins.asm
Normal file
63
engine/rtc/print_hours_mins.asm
Normal file
@@ -0,0 +1,63 @@
|
||||
Unreferenced_Function1dd6a9: ; 1dd6a9
|
||||
ld a, b
|
||||
ld b, c
|
||||
ld c, a
|
||||
push bc
|
||||
push de
|
||||
ld hl, sp+$2
|
||||
ld d, h
|
||||
ld e, l
|
||||
pop hl
|
||||
lb bc, PRINTNUM_LEADINGZEROS | 2, 5
|
||||
call PrintNum
|
||||
pop bc
|
||||
ret
|
||||
|
||||
PrintHoursMins: ; 1dd6bb (77:56bb)
|
||||
; Hours in b, minutes in c
|
||||
ld a, b
|
||||
cp 12
|
||||
push af
|
||||
jr c, .AM
|
||||
jr z, .PM
|
||||
sub 12
|
||||
jr .PM
|
||||
.AM:
|
||||
or a
|
||||
jr nz, .PM
|
||||
ld a, 12
|
||||
.PM:
|
||||
ld b, a
|
||||
; Crazy stuff happening with the stack
|
||||
push bc
|
||||
ld hl, sp+$1
|
||||
push de
|
||||
push hl
|
||||
pop de
|
||||
pop hl
|
||||
ld [hl], " "
|
||||
lb bc, 1, 2
|
||||
call PrintNum
|
||||
ld [hl], ":"
|
||||
inc hl
|
||||
ld d, h
|
||||
ld e, l
|
||||
ld hl, sp+$0
|
||||
push de
|
||||
push hl
|
||||
pop de
|
||||
pop hl
|
||||
lb bc, PRINTNUM_LEADINGZEROS | 1, 2
|
||||
call PrintNum
|
||||
pop bc
|
||||
ld de, String_AM
|
||||
pop af
|
||||
jr c, .place_am_pm
|
||||
ld de, String_PM
|
||||
.place_am_pm
|
||||
inc hl
|
||||
call PlaceString
|
||||
ret
|
||||
|
||||
String_AM: db "AM@" ; 1dd6fc
|
||||
String_PM: db "PM@" ; 1dd6ff
|
||||
Reference in New Issue
Block a user