mirror of
https://github.com/pret/pokegold-spaceworld.git
synced 2026-03-21 17:45:52 -05:00
452a322140
Some checks failed
CI / build (push) Has been cancelled
* Split bank $0f into engine/battle/core.asm and engine/overworld/wildmons.asm * Split wildmon probabilities into separate data/wild/probabilities.inc file for consistency
117 lines
1.2 KiB
NASM
117 lines
1.2 KiB
NASM
INCLUDE "constants.asm"
|
|
|
|
SECTION "home/util.asm", ROM0
|
|
|
|
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:
|
|
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:
|
|
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::
|
|
; Returns hl + a * 6
|
|
and a
|
|
ret z
|
|
ld bc, 6
|
|
.loop:
|
|
add hl, bc
|
|
dec a
|
|
jr nz, .loop
|
|
ret
|
|
|
|
AddNTimes::
|
|
; Adds bc to hl, a times
|
|
and a
|
|
ret z
|
|
.loop
|
|
add hl, bc
|
|
dec a
|
|
jr nz, .loop
|
|
ret
|
|
|
|
CompareBytes::
|
|
; 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::
|
|
; Place 2x2 sprite from *de into OAM at slot a
|
|
ld h, HIGH(wShadowOAM)
|
|
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:
|
|
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
|