mirror of
https://github.com/thornAvery/kep-hack.git
synced 2025-09-16 18:30:50 +12:00
16 lines
356 B
NASM
Executable file
16 lines
356 B
NASM
Executable file
; updates the types of a party mon (pointed to in hl) to the ones of the mon specified in wd11e
|
|
SetPartyMonTypes: ; 5db5e (17:5b5e)
|
|
call GetPredefRegisters
|
|
ld bc, W_PARTYMON1_TYPE1 - W_PARTYMON1DATA ; $5
|
|
add hl, bc
|
|
ld a, [wd11e]
|
|
ld [wd0b5], a
|
|
push hl
|
|
call GetMonHeader
|
|
pop hl
|
|
ld a, [W_MONHTYPE1]
|
|
ld [hli], a
|
|
ld a, [W_MONHTYPE2]
|
|
ld [hl], a
|
|
ret
|