timed titleCard

projects/hollywoo-flixel/src/hollywoo_flixel/FlxDirector.hx

@@ -11,11 +11,13 @@ import hollywoo.Movie;
 import hollywoo.Scene;
 import hollywoo.Director;
 import hollywoo_flixel.FlxMovie;
+import hollywoo_flixel.SpriteTools;
 import flixel.util.FlxColor;
 import flixel.text.FlxText;
 import flixel.system.FlxSound;
 import flixel.util.FlxTimer;
 import haxe.Constraints;
 
+
 @:build(kiss.Kiss.build())
 class FlxDirector implements Director<String, FlxStagePosition, FlxStageFacing, FlxScreenPosition, ActorFlxSprite, FlxSound, String, FlxSprite, FlxSound> {}

projects/hollywoo-flixel/src/hollywoo_flixel/FlxDirector.kiss

@@ -64,6 +64,27 @@
 (method :Void stopWaitForInput []
     (set nextCC null))
 
+(var TITLE_Y 240)
+(var TITLE_SIZE 72)
+(var TITLE_MARGIN 100)
+(var SUBTITLES_MARGIN 30)
+(var SUBTITLES_SIZE 48)
+(prop &mut :FlxSprite titleCard null)
+(method :Void showTitleCard [:Array<String> text :Continuation cc]
+    (set titleCard (new FlxSprite))
+    (titleCard.makeGraphic 1280 720 FlxColor.BLACK)
+    (SpriteTools.writeOnSprite (text.shift) TITLE_SIZE titleCard (object x (Percent 0.5) y (Pixels TITLE_Y)))
+    (localVar &mut subtitleY (+ TITLE_Y TITLE_SIZE TITLE_MARGIN))
+    (doFor subtitle text
+        (SpriteTools.writeOnSprite subtitle SUBTITLES_SIZE titleCard (object x (Percent 0.5) y (Pixels subtitleY)))
+        (+= subtitleY SUBTITLES_SIZE SUBTITLES_MARGIN))
+    (currentState.add titleCard)
+    // Allow skipping
+    (startWaitForInput cc))
+
+(method :Void hideTitleCard []
+    (currentState.remove titleCard))
+
 (var DIALOG_X 300)
 (var DIALOG_WIDTH (- 1280 ACTOR_WIDTH ACTOR_WIDTH))
 (var DIALOG_Y 500)