pokecrystal/engine/events/play_slow_cry.asm

32 lines
398 B
NASM
Raw Normal View History

PlaySlowCry: ; fb841
2018-01-23 22:39:09 +00:00
ld a, [wScriptVar]
call LoadCry
jr c, .done
2018-01-23 22:39:09 +00:00
ld hl, wCryPitch
ld a, [hli]
ld h, [hl]
ld l, a
ld bc, -$140
add hl, bc
ld a, l
2018-01-23 22:39:09 +00:00
ld [wCryPitch], a
ld a, h
2018-01-23 22:39:09 +00:00
ld [wCryPitch + 1], a
ld hl, wCryLength
ld a, [hli]
ld h, [hl]
ld l, a
ld bc, $60
add hl, bc
ld a, l
2018-01-23 22:39:09 +00:00
ld [wCryLength], a
ld a, h
2018-01-23 22:39:09 +00:00
ld [wCryLength + 1], a
farcall _PlayCry
call WaitSFX
.done
ret
; fb877