pokered/home/give.asm

26 lines
496 B
NASM

GiveItem::
; Give player quantity c of item b,
; and copy the item's name to wStringBuffer.
; Return carry on success.
ld a, b
ld [wd11e], a
ld [wCurItem], a
ld a, c
ld [wItemQuantity], a
ld hl, wNumBagItems
call AddItemToInventory
ret nc
call GetItemName
call CopyToStringBuffer
scf
ret
GivePokemon::
; Give the player monster b at level c.
ld a, b
ld [wCurPartySpecies], a
ld a, c
ld [wCurEnemyLevel], a
xor a ; PLAYER_PARTY_DATA
ld [wMonDataLocation], a
farjp _GivePokemon