shithub: pokecrystal

ref: b5a7e7de3e6b75e95967edd28b9c2af5959cd136
dir: /engine/events/play_slow_cry.asm/

View raw version
PlaySlowCry:
	ld a, [wScriptVar]
	call LoadCry
	jr c, .done

	ld hl, wCryPitch
	ld a, [hli]
	ld h, [hl]
	ld l, a
	ld bc, -$140
	add hl, bc
	ld a, l
	ld [wCryPitch], a
	ld a, h
	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
	ld [wCryLength], a
	ld a, h
	ld [wCryLength + 1], a
	farcall _PlayCry
	call WaitSFX

.done
	ret