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

fix pause on supertext

Browse Source
This commit is contained in:
Nat Quayle Nelson
2021-12-30 11:44:43 -07:00
parent de6d2bc01d
commit c568200ca8
1 changed files with 3 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
projects/hollywoo/src/hollywoo/Movie.kiss
View File

@@ -43,7 +43,9 @@
(let [cc ->:Void {(director.hideDialog) (cc)}] (let [cc ->:Void {(director.hideDialog) (cc)}]
(director.showDialog actorName dialogType wryly text cc) (director.showDialog actorName dialogType wryly text cc)
(when (< 0 (count voiceTracks)) // When an actorName is given, check for a voiced line to play.
// Otherwise, assume it is un-voiced super text
(when (and actorName (< 0 (count voiceTracks)))
(case (try (dictGet voiceLines "$actorName $text") (catch [e] (print e) null)) (case (try (dictGet voiceLines "$actorName $text") (catch [e] (print e) null))
((objectWith trackKey start end) ((objectWith trackKey start end)
(director.playVoiceTrack (dictGet voiceTracks trackKey) 1 start end cc)) (director.playVoiceTrack (dictGet voiceTracks trackKey) 1 start end cc))