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

stopWaitForInput needs to check for same cc

Browse Source
This commit is contained in:
Nat Quayle Nelson
2023-03-08 09:47:52 -07:00
parent 6832bf4715
commit a1d5647446
3 changed files with 7 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
projects/hollywoo-flixel/src/hollywoo_flixel/FlxDirector.kiss
View File

@@ -75,8 +75,9 @@
(method :Void startWaitForInput [:Continuation cc] (method :Void startWaitForInput [:Continuation cc]
(set nextCC cc)) (set nextCC cc))
(method :Void stopWaitForInput [] (method :Void stopWaitForInput [:Continuation cc]
(set nextCC null)) (when (= nextCC cc)
(set nextCC null)))
(var TITLE_Y 240) (var TITLE_Y 240)
(var TITLE_SIZE 72) (var TITLE_SIZE 72)

2
projects/hollywoo/src/hollywoo/Director.hx
View File

@@ -43,7 +43,7 @@ interface Director<Set:Cloneable<Set>, ScreenPosition, Actor, Sound, Song, Prop,
function playVoiceTrack(track:VoiceTrack, volumeMod:Float, start:Float, end:Float, cc:Continuation):Void; function playVoiceTrack(track:VoiceTrack, volumeMod:Float, start:Float, end:Float, cc:Continuation):Void;
function stopVoiceTrack(track:VoiceTrack):Void; function stopVoiceTrack(track:VoiceTrack):Void;
function startWaitForInput(cc:Continuation):Void; function startWaitForInput(cc:Continuation):Void;
function stopWaitForInput():Void; function stopWaitForInput(cc:Continuation):Void;
function showDialog(speakerName:String, type:SpeechType<Actor>, wryly:String, dialog:String, cc:Continuation):Void; function showDialog(speakerName:String, type:SpeechType<Actor>, wryly:String, dialog:String, cc:Continuation):Void;
function hideDialog():Void; function hideDialog():Void;
function showTitleCard(text:Array<String>, cc:Continuation):Void; function showTitleCard(text:Array<String>, cc:Continuation):Void;

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

@@ -193,20 +193,20 @@
(let [autoDelay (let [autoDelay
(Timer.delay (Timer.delay
->{ ->{
(director.stopWaitForInput) (director.stopWaitForInput cc)
(cc) (cc)
} }
(* 1000 sec))] (* 1000 sec))]
(director.startWaitForInput (director.startWaitForInput
->{ ->{
(director.stopWaitForInput) (director.stopWaitForInput cc)
(autoDelay.stop) (autoDelay.stop)
(cc) (cc)
}))) })))
(Manual (Manual
(director.startWaitForInput (director.startWaitForInput
->{ ->{
(director.stopWaitForInput) (director.stopWaitForInput cc)
(cc) (cc)
})) }))
(otherwise (throw "Unsupported delay type $delayHandling")))) (otherwise (throw "Unsupported delay type $delayHandling"))))