pokecrystal-board/engine/events/sacred_ash.asm

75 lines
991 B
NASM
Raw Normal View History

2015-11-11 20:38:57 -08:00
_SacredAsh: ; 507e6
ld a, $0
2015-12-17 14:51:32 -08:00
ld [wItemEffectSucceeded], a
2015-11-11 20:38:57 -08:00
call CheckAnyFaintedMon
ret nc
ld hl, SacredAshScript
call QueueScript
ld a, $1
2015-12-17 14:51:32 -08:00
ld [wItemEffectSucceeded], a
2015-11-11 20:38:57 -08:00
ret
; 507fb
CheckAnyFaintedMon: ; 507fb
ld de, PARTYMON_STRUCT_LENGTH
ld bc, PartySpecies
ld hl, PartyMon1HP
ld a, [PartyCount]
and a
ret z
.loop
push af
push hl
ld a, [bc]
inc bc
cp EGG
jr z, .next
ld a, [hli]
or [hl]
jr z, .done
.next
pop hl
add hl, de
pop af
dec a
jr nz, .loop
xor a
ret
.done
pop hl
pop af
scf
ret
; 50821
SacredAshScript: ; 0x50821
special HealParty
reloadmappart
playsound SFX_WARP_TO
2015-11-26 18:05:32 -08:00
special FadeOutPalettes
special FadeInPalettes
special FadeOutPalettes
special FadeInPalettes
special FadeOutPalettes
special FadeInPalettes
2015-11-25 07:16:29 -08:00
waitsfx
2015-11-11 20:38:57 -08:00
writetext UnknownText_0x50845
playsound SFX_CAUGHT_MON
2015-11-25 07:16:29 -08:00
waitsfx
2015-11-11 20:38:57 -08:00
waitbutton
closetext
end
; 0x50845
UnknownText_0x50845: ; 0x50845
; 's #MON were all healed!
text_jump UnknownText_0x1c0b65
db "@"
; 0x5084a