mirror of
https://github.com/pret/pokered.git
synced 2024-10-23 06:58:24 +00:00
15 lines
328 B
NASM
Executable file
15 lines
328 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:
|
|
call GetPredefRegisters
|
|
ld bc, wPartyMon1Type - wPartyMon1 ; $5
|
|
add hl, bc
|
|
ld a, [wd11e]
|
|
ld [wd0b5], a
|
|
push hl
|
|
call GetMonHeader
|
|
pop hl
|
|
ld a, [wMonHType1]
|
|
ld [hli], a
|
|
ld a, [wMonHType2]
|
|
ld [hl], a
|
|
ret
|