fix some matchvoicetracks bugs

This commit is contained in:
2025-11-08 17:46:02 -06:00
parent a1065c3673
commit 6d5310f133

View File

@@ -8,7 +8,7 @@
percentWidth 1
percentHeight 1))
sound (new FlxSound)]
(sound.loadEmbedded wavFile)
(sound.loadStream wavFile)
(doFor [&mut i :String line] (enumerate fountainLines)
(doFor name characterNames
(when (line.startsWith (name.toUpperCase))
@@ -41,7 +41,7 @@
(when partsChosen
(window.makeTextV2 "Play" (object onClick ->_ {
(let [parts (partsChosen.copy)
playNext ->(whenLet [part (parts.pop)]
playNext ->(whenLet [part (parts.shift)]
(track.play true (* 1000.0 part.start) (* 1000.0 part.end)))]
(set track.onComplete playNext)
(playNext))
@@ -84,7 +84,7 @@
altActions [
=>"Use"
->_ {
(partsChosen.push alt)
(partsChosen.push (object text alt.text start (Std.parseFloat startText.text) end (Std.parseFloat endText.text)))
(recurse)
}
]