From 5111383f59ae0fe1763003a7781c57844ae37eda Mon Sep 17 00:00:00 2001
From: Nat Quayle Nelson <natquaylenelson@gmail.com>
Date: Mon, 25 Oct 2021 14:19:17 -0400
Subject: [PATCH] Muddling out hollywoo-flixel basics

---
 haxelib.json                            | 17 +++++++++++++++
 src/hollywoo_flixel/FlxActorSprite.hx   |  8 +++++++
 src/hollywoo_flixel/FlxActorSprite.kiss |  0
 src/hollywoo_flixel/FlxDirector.hx      | 11 ++++++++++
 src/hollywoo_flixel/FlxDirector.kiss    |  7 +++++++
 src/hollywoo_flixel/FlxSetState.hx      |  8 +++++++
 src/hollywoo_flixel/FlxSetState.kiss    |  5 +++++
 src/hollywoo_flixel/FlxStageState.hx    | 28 +++++++++++++++++++++++++
 src/hollywoo_flixel/FlxStageState.kiss  | 11 ++++++++++
 9 files changed, 95 insertions(+)
 create mode 100644 haxelib.json
 create mode 100644 src/hollywoo_flixel/FlxActorSprite.hx
 create mode 100644 src/hollywoo_flixel/FlxActorSprite.kiss
 create mode 100644 src/hollywoo_flixel/FlxDirector.hx
 create mode 100644 src/hollywoo_flixel/FlxDirector.kiss
 create mode 100644 src/hollywoo_flixel/FlxSetState.hx
 create mode 100644 src/hollywoo_flixel/FlxSetState.kiss
 create mode 100644 src/hollywoo_flixel/FlxStageState.hx
 create mode 100644 src/hollywoo_flixel/FlxStageState.kiss

diff --git a/haxelib.json b/haxelib.json
new file mode 100644
index 0000000..5cc47bf
--- /dev/null
+++ b/haxelib.json
@@ -0,0 +1,17 @@
+{
+	"name": "hollywoo-flixel",
+	"description": "",
+	"classPath": "src/",
+	"dependencies": {
+		"kiss": "",
+		"hollywoo": ""
+	},
+	"url": "https://github.com/NQNStudios/kisslang",
+	"contributors": [
+		"NQNStudios"
+	],
+	"version": "0.0.0",
+	"releasenote": "",
+	"tags": [],
+	"license": "LGPL"
+}
\ No newline at end of file
diff --git a/src/hollywoo_flixel/FlxActorSprite.hx b/src/hollywoo_flixel/FlxActorSprite.hx
new file mode 100644
index 0000000..880b17b
--- /dev/null
+++ b/src/hollywoo_flixel/FlxActorSprite.hx
@@ -0,0 +1,8 @@
+package hollywoo_flixel;
+
+import kiss.Prelude;
+import kiss.List;
+import flixel.FlxSprite;
+
+@:build(kiss.Kiss.build())
+class FlxActorSprite extends FlxSprite {}
diff --git a/src/hollywoo_flixel/FlxActorSprite.kiss b/src/hollywoo_flixel/FlxActorSprite.kiss
new file mode 100644
index 0000000..e69de29
diff --git a/src/hollywoo_flixel/FlxDirector.hx b/src/hollywoo_flixel/FlxDirector.hx
new file mode 100644
index 0000000..5d9c9f0
--- /dev/null
+++ b/src/hollywoo_flixel/FlxDirector.hx
@@ -0,0 +1,11 @@
+package hollywoo_flixel;
+
+import kiss.Prelude;
+import kiss.List;
+import hollywoo.Director;
+import hollywoo.Stage;
+
+import hollywoo_flixel.FlxStageState;
+
+@:build(kiss.Kiss.build())
+class FlxDirector implements Director<FlxSetState, FlxStagePosition, FlxStageFacing, FlxScreenPosition, FlxActorSprite> {}
diff --git a/src/hollywoo_flixel/FlxDirector.kiss b/src/hollywoo_flixel/FlxDirector.kiss
new file mode 100644
index 0000000..071520c
--- /dev/null
+++ b/src/hollywoo_flixel/FlxDirector.kiss
@@ -0,0 +1,7 @@
+(defNew [])
+
+(method :Void showSet [:FlxSetState set :Appearance appearance :Continuation cc]
+    (print "Shneezy"))
+
+(method :Void showCharacter [:Character<FlxStagePosition,FlxStageFacing,FlxActorSprite> character :Appearance appearance :Continuation cc]
+    (print "Character shneezy"))
diff --git a/src/hollywoo_flixel/FlxSetState.hx b/src/hollywoo_flixel/FlxSetState.hx
new file mode 100644
index 0000000..a9316e9
--- /dev/null
+++ b/src/hollywoo_flixel/FlxSetState.hx
@@ -0,0 +1,8 @@
+package hollywoo_flixel;
+
+import kiss.Prelude;
+import kiss.List;
+import flixel.FlxState;
+
+@:build(kiss.Kiss.build())
+class FlxSetState extends FlxState {}
diff --git a/src/hollywoo_flixel/FlxSetState.kiss b/src/hollywoo_flixel/FlxSetState.kiss
new file mode 100644
index 0000000..0115821
--- /dev/null
+++ b/src/hollywoo_flixel/FlxSetState.kiss
@@ -0,0 +1,5 @@
+(method &override :Void create []
+    (super.create))
+
+(method &override :Void update [:Float elapsed]
+    (super.update elapsed))
\ No newline at end of file
diff --git a/src/hollywoo_flixel/FlxStageState.hx b/src/hollywoo_flixel/FlxStageState.hx
new file mode 100644
index 0000000..b925b3d
--- /dev/null
+++ b/src/hollywoo_flixel/FlxStageState.hx
@@ -0,0 +1,28 @@
+package hollywoo_flixel;
+
+import flixel.FlxState;
+import hollywoo.Stage;
+
+enum FlxStagePosition {
+    Left;
+    Right;
+}
+
+enum FlxStageFacing {
+    Left;
+    Right;
+}
+
+enum FlxScreenPosition {
+    UpperLeft;
+    UpperRight;
+    LowerLeft;
+    LowerRight;
+    LowerCenter;
+    UpperCenter;
+}
+
+typedef FlxStage = Stage<FlxSetState, FlxStagePosition, FlxStageFacing, FlxScreenPosition, FlxActorSprite>;
+
+@:build(kiss.Kiss.build())
+class FlxStageState extends FlxState {}
diff --git a/src/hollywoo_flixel/FlxStageState.kiss b/src/hollywoo_flixel/FlxStageState.kiss
new file mode 100644
index 0000000..c8131b3
--- /dev/null
+++ b/src/hollywoo_flixel/FlxStageState.kiss
@@ -0,0 +1,11 @@
+(prop &mut :FlxDirector director)
+(prop &mut :FlxStage stage)
+
+(method &override :Void create []
+    (super.create)
+    (set director (new FlxDirector))
+    //(this.run)
+    )
+
+(method &override :Void update [:Float elapsed]
+    (super.update elapsed))
\ No newline at end of file