mirror of
https://github.com/pret/pokegold-spaceworld.git
synced 2026-08-09 11:47:38 -05:00
e1659ecd41
Addresses of sections will now be added to the linkerscript via `org`, and the section name will be the path/to/file. If there is more than one section in the file, then add a @SectionName after the path/to/file to describe the section.
121 lines
1.4 KiB
NASM
121 lines
1.4 KiB
NASM
INCLUDE "constants.asm"
|
|
|
|
; if DEBUG
|
|
SECTION "home/util.asm", ROM0
|
|
; else
|
|
; SECTION "Misc Utility Functions", ROM0[$33B3]
|
|
; endc
|
|
|
|
Function33ef::
|
|
; hl = src
|
|
; de = dest
|
|
; b = y
|
|
; c = x
|
|
push hl
|
|
push de
|
|
push bc
|
|
ld a, b
|
|
dec a
|
|
dec a
|
|
ld b, $0
|
|
.asm_33f7: ; 00:33f7
|
|
add hl, bc
|
|
dec a
|
|
jr nz, .asm_33f7
|
|
pop bc
|
|
dec b
|
|
ld a, b
|
|
push hl
|
|
add hl, bc
|
|
ld d, h
|
|
ld e, l
|
|
pop hl
|
|
.asm_3403: ; 00:3403
|
|
push af
|
|
push bc
|
|
call CopyBytes
|
|
pop bc
|
|
push bc
|
|
ld a, c
|
|
xor $ff
|
|
ld c, a
|
|
ld b, $ff
|
|
inc bc
|
|
add hl, bc
|
|
ld d, h
|
|
ld e, l
|
|
add hl, bc
|
|
pop bc
|
|
pop af
|
|
dec a
|
|
jr nz, .asm_3403
|
|
pop hl
|
|
pop de
|
|
jp CopyBytes
|
|
|
|
SkipNames:: ; 341f
|
|
; Returns hl + a * 6
|
|
and a
|
|
ret z
|
|
ld bc, 6
|
|
.loop:
|
|
add hl, bc
|
|
dec a
|
|
jr nz, .loop
|
|
ret
|
|
|
|
AddNTimes:: ; 3429 (0:3429)
|
|
; Adds bc to hl, a times
|
|
and a
|
|
ret z
|
|
.loop
|
|
add hl, bc
|
|
dec a
|
|
jr nz, .loop
|
|
ret
|
|
; 0x3430
|
|
|
|
memcmp:: ; 3430
|
|
; Compare c bytes at hl and de
|
|
; Returns z if all equal, nz otherwise.
|
|
.loop:
|
|
ld a, [de]
|
|
cp [hl]
|
|
ret nz
|
|
inc de
|
|
inc hl
|
|
dec c
|
|
jr nz, .loop
|
|
ret
|
|
|
|
Function3439:: ; 3439
|
|
; Place 2x2 sprite from *de into OAM at slot a
|
|
ld h, HIGH(wVirtualOAM)
|
|
swap a
|
|
ld l, a
|
|
call .Load
|
|
push bc
|
|
ld a, $8
|
|
add c
|
|
ld c, a
|
|
call .Load
|
|
pop bc
|
|
ld a, $8
|
|
add b
|
|
ld b, a
|
|
call .Load
|
|
ld a, $8
|
|
add c
|
|
ld c, a
|
|
.Load: ; 00:3455
|
|
ld [hl], b
|
|
inc hl
|
|
ld [hl], c
|
|
inc hl
|
|
ld a, [de]
|
|
inc de
|
|
ld [hli], a
|
|
ld a, [de]
|
|
inc de
|
|
ld [hli], a
|
|
ret |