Initial upload, Echo 0.8 UNSTABLE VERSION

1 files changed, 31 insertions, 0 deletions

diff --git a/src-z80/player/misc.z80 b/src-z80/player/misc.z80
new file mode 100644
index 0000000..6373ab0
--- /dev/null
+++ b/src-z80/player/misc.z80
@@ -0,0 +1,31 @@
+;****************************************************************************
+; SetDelay* [event $FE]
+; Adds a delay in playback
+;****************************************************************************
+
+SetDelaySFX:
+    call SetDelay               ; We're just a wrapper
+    jp DoTick_SFXSkip           ; End of subroutine
+
+SetDelayBGM:
+    call SetDelay               ; We're just a wrapper
+    jp DoTick_BGMSkip           ; End of subroutine
+
+SetDelay:
+    PollPCM
+    call GetParam               ; Get delay
+    PollPCM
+
+    ex de, hl
+    ld (hl), d                  ; Store new address
+    dec l
+    ld (hl), e
+    dec l
+    ld (hl), c
+
+    PollPCM
+
+    dec l                       ; Store new delay
+    ld (hl), b
+
+    ret                         ; End of subroutine