kiss-lang/hollywoo
1
0
Fork 0
Code Issues 1 Pull Requests Actions Packages Projects Releases Wiki Activity

allow skipping awaitplaysound

Browse Source
This commit is contained in:
Nat Quayle Nelson
2023-08-31 19:17:04 -06:00
parent 9a96fbf429
commit 92601ae5f1
1 changed files with 4 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/hollywoo/Movie.kiss
View File

@@ -791,12 +791,14 @@
(delay skipping (min MAX_CAPTION_DURATION (director.getSoundLength sound)) (delay skipping (min MAX_CAPTION_DURATION (director.getSoundLength sound))
(makeCC (makeCC
(director.hideCaption id)))) (director.hideCaption id))))
(director.playSound sound volumeMod (when waitForEnd cc)))
(withFunctions [(:Void innerCC [] (director.stopSound sound)(director.stopWaitForInput innerCC)(cc))]
(director.startWaitForInput innerCC)
(director.playSound sound volumeMod (when waitForEnd innerCC))))
(unless waitForEnd (unless waitForEnd
(cc))) (cc)))
(hollywooMethod awaitPlaySound [:Bool skipping :String name :Continuation cc &opt :Float volumeMod] (hollywooMethod awaitPlaySound [:Bool skipping :String name :Continuation cc &opt :Float volumeMod]
(director.startWaitForInput cc)
(playSound skipping name cc volumeMod true)) (playSound skipping name cc volumeMod true))