pokecrystal/event/squirtbottle.asm

48 lines
736 B
NASM
Executable File

_Squirtbottle: ; 50730
ld hl, .SquirtbottleScript
call QueueScript
ld a, $1
ld [wItemEffectSucceeded], a
ret
.SquirtbottleScript:
reloadmappart
special UpdateTimePals
callasm .CheckCanUseSquirtbottle
iffalse .NothingHappenedScript
farjump WateredWeirdTreeScript
.NothingHappenedScript:
jumptext .NothingHappenedText
.NothingHappenedText:
; sprinkled water. But nothing happened…
text_jump UnknownText_0x1c0b3b
db "@"
.CheckCanUseSquirtbottle:
ld a, [MapGroup]
cp GROUP_ROUTE_36
jr nz, .nope
ld a, [MapNumber]
cp MAP_ROUTE_36
jr nz, .nope
callba GetFacingObject
jr c, .nope
ld a, d
cp SPRITEMOVEDATA_SUDOWOODO
jr nz, .nope
ld a, 1
ld [ScriptVar], a
ret
.nope
xor a
ld [ScriptVar], a
ret
; 50779