pokecrystal-board/engine/events/itemfinder.asm
2024-02-11 00:16:00 +01:00

51 lines
792 B
NASM

ItemFinder:
farcall CheckForHiddenItems
jr c, .found_something
ld hl, .Script_FoundNothing
jr .resume
.found_something
ld hl, .Script_FoundSomething
.resume
call QueueScript
ld a, $1
ld [wItemEffectSucceeded], a
ret
.ItemfinderSound:
ld c, 4
.sfx_loop
push bc
ld de, SFX_SECOND_PART_OF_ITEMFINDER
call WaitPlaySFX
ld de, SFX_TRANSACTION
call WaitPlaySFX
pop bc
dec c
jr nz, .sfx_loop
ret
.Script_FoundSomething:
refreshmap
special UpdateTimePals
callasm .ItemfinderSound
writetext .ItemfinderItemNearbyText
closetext
end
.Script_FoundNothing:
refreshmap
special UpdateTimePals
writetext .ItemfinderNopeText
closetext
end
.ItemfinderItemNearbyText:
text_far _ItemfinderItemNearbyText
text_end
.ItemfinderNopeText:
text_far _ItemfinderNopeText
text_end