summaryrefslogtreecommitdiff
path: root/engine/routines/playslowcry.asm
diff options
context:
space:
mode:
Diffstat (limited to 'engine/routines/playslowcry.asm')
-rw-r--r--engine/routines/playslowcry.asm31
1 files changed, 31 insertions, 0 deletions
diff --git a/engine/routines/playslowcry.asm b/engine/routines/playslowcry.asm
new file mode 100644
index 000000000..3cc347a55
--- /dev/null
+++ b/engine/routines/playslowcry.asm
@@ -0,0 +1,31 @@
+PlaySlowCry: ; fb841
+ ld a, [ScriptVar]
+ call LoadCryHeader
+ jr c, .done
+
+ ld hl, CryPitch
+ ld a, [hli]
+ ld h, [hl]
+ ld l, a
+ ld bc, -$140
+ add hl, bc
+ ld a, l
+ ld [CryPitch], a
+ ld a, h
+ ld [CryPitch + 1], a
+ ld hl, CryLength
+ ld a, [hli]
+ ld h, [hl]
+ ld l, a
+ ld bc, $60
+ add hl, bc
+ ld a, l
+ ld [CryLength], a
+ ld a, h
+ ld [CryLength + 1], a
+ farcall _PlayCryHeader
+ call WaitSFX
+
+.done
+ ret
+; fb877