Fix bad Hollywoo naming conventions

src/hollywoo_flixel/ActorFlxSprite.hx

@@ -5,4 +5,4 @@ import kiss.List;
 import flixel.FlxSprite;
 
 @:build(kiss.Kiss.build())
-class FlxActorSprite extends FlxSprite {}
+class ActorFlxSprite extends FlxSprite {}

src/hollywoo_flixel/FlxDirector.hx

@@ -2,10 +2,11 @@ package hollywoo_flixel;
 
 import kiss.Prelude;
 import kiss.List;
+import flixel.FlxG;
+import flixel.FlxSprite;
+import hollywoo.Scene;
 import hollywoo.Director;
-import hollywoo.Stage;
-
-import hollywoo_flixel.FlxStageState;
+import hollywoo_flixel.FlxMovie;
 
 @:build(kiss.Kiss.build())
-class FlxDirector implements Director<FlxSetState, FlxStagePosition, FlxStageFacing, FlxScreenPosition, FlxActorSprite> {}
+class FlxDirector implements Director<String, FlxStagePosition, FlxStageFacing, FlxScreenPosition, ActorFlxSprite> {}

src/hollywoo_flixel/FlxDirector.kiss

@@ -1,7 +1,7 @@
 (defNew [])
 
-(method :Void showSet [:FlxSetState set :Appearance appearance :Continuation cc]
-    (print "Shneezy"))
+(method :Void showScene [:Scene<String,FlxStagePosition,FlxStageFacing,FlxScreenPosition,ActorFlxSprite> scene :Appearance appearance :Continuation cc]
+    (FlxG.switchState (cast scene SceneFlxState)))
 
-(method :Void showCharacter [:Character<FlxStagePosition,FlxStageFacing,FlxActorSprite> character :Appearance appearance :Continuation cc]
+(method :Void showCharacter [:Character<FlxStagePosition,FlxStageFacing,ActorFlxSprite> character :Appearance appearance :Continuation cc]
     (print "Character shneezy"))

src/hollywoo_flixel/FlxMovie.hx

@@ -1,7 +1,10 @@
 package hollywoo_flixel;
 
 import flixel.FlxState;
-import hollywoo.Stage;
+import flixel.FlxSprite;
+import hollywoo.Movie;
+import hollywoo_flixel.ActorFlxSprite;
+import hollywoo_flixel.SceneFlxState;
 
 enum FlxStagePosition {
     Left;
@@ -22,7 +25,4 @@ enum FlxScreenPosition {
     UpperCenter;
 }
 
-typedef FlxStage = Stage<FlxSetState, FlxStagePosition, FlxStageFacing, FlxScreenPosition, FlxActorSprite>;
-
-@:build(kiss.Kiss.build())
-class FlxStageState extends FlxState {}
+class FlxMovie extends Movie<String, FlxStagePosition, FlxStageFacing, FlxScreenPosition, ActorFlxSprite> {}

src/hollywoo_flixel/FlxSetState.kiss

@@ -1,5 +0,0 @@
-(method &override :Void create []
-    (super.create))
-
-(method &override :Void update [:Float elapsed]
-    (super.update elapsed))

src/hollywoo_flixel/MovieFlxState.hx

@@ -1,8 +1,6 @@
 package hollywoo_flixel;
 
-import kiss.Prelude;
-import kiss.List;
 import flixel.FlxState;
 
 @:build(kiss.Kiss.build())
-class FlxSetState extends FlxState {}
+class MovieFlxState extends FlxState {}

src/hollywoo_flixel/MovieFlxState.kiss

@@ -1,11 +1,10 @@
 (prop &mut :FlxDirector director)
-(prop &mut :FlxStage stage)
+(prop &mut :FlxMovie movie)
 
 (method &override :Void create []
     (super.create)
     (set director (new FlxDirector))
-    //(this.run)
-    )
+    (set movie (new FlxMovie director)))
 
 (method &override :Void update [:Float elapsed]
     (super.update elapsed))

src/hollywoo_flixel/SceneFlxState.hx

@@ -0,0 +1,11 @@
+package hollywoo_flixel;
+
+import kiss.Prelude;
+import kiss.List;
+import flixel.FlxState;
+import flixel.FlxSprite;
+import hollywoo.Scene;
+import hollywoo_flixel.FlxMovie;
+
+@:build(kiss.Kiss.build())
+class SceneFlxState extends FlxState {}

src/hollywoo_flixel/SceneFlxState.kiss

@@ -0,0 +1,12 @@
+(defNew [&prop :String set &prop :SceneTime time &prop :ScenePerspective perspective]
+    [
+        :Map<String,Character<FlxStagePosition,FlxStageFacing,ActorFlxSprite>> characters (new Map)
+    ]
+    (super))
+
+(method &override :Void create []
+    (super.create)
+    (add (.loadGraphic (new FlxSprite 0 0) set)))
+
+(method &override :Void update [:Float elapsed]
+    (super.update elapsed))