mirror of https://github.com/pret/pokecrystal.git
38 lines
557 B
NASM
38 lines
557 B
NASM
HiddenItemScript::
|
|
opentext
|
|
readmem wHiddenItemID
|
|
getitemname STRING_BUFFER_3, USE_SCRIPT_VAR
|
|
writetext .PlayerFoundItemText
|
|
giveitem ITEM_FROM_MEM
|
|
iffalse .bag_full
|
|
callasm SetMemEvent
|
|
specialsound
|
|
itemnotify
|
|
sjump .finish
|
|
|
|
.bag_full
|
|
promptbutton
|
|
writetext .ButNoSpaceText
|
|
waitbutton
|
|
|
|
.finish
|
|
closetext
|
|
end
|
|
|
|
.PlayerFoundItemText:
|
|
text_far _PlayerFoundItemText
|
|
text_end
|
|
|
|
.ButNoSpaceText:
|
|
text_far _ButNoSpaceText
|
|
text_end
|
|
|
|
SetMemEvent:
|
|
ld hl, wHiddenItemEvent
|
|
ld a, [hli]
|
|
ld d, [hl]
|
|
ld e, a
|
|
ld b, SET_FLAG
|
|
call EventFlagAction
|
|
ret
|