pokecrystal-board/engine/events/misc_scripts_2.asm
2019-11-03 12:48:54 -05:00

49 lines
704 B
NASM

RepelWoreOffScript::
opentext
writetext .RepelWoreOffText
waitbutton
closetext
end
.RepelWoreOffText:
text_far _RepelWoreOffText
text_end
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