Port gdscript to haxe/kiss

2023-02-15 05:47:53 -07:00
parent 3a21c8b687
commit 008eea39cf
9 changed files with 86 additions and 68 deletions
--- a/projects/nat-godot-playground/scripts/EntryPanelSystem.kiss
+++ b/projects/nat-godot-playground/scripts/EntryPanelSystem.kiss
@@ -9,9 +9,12 @@
        // Create Entry node:
        ->[archive e pos &opt ui]
            (let [:PackedScene ePanelScene (GD.load "res://EntryPanel.tscn")
-                    :PanelContainer ePanel (cast (ePanelScene.instance))
+                    :EntryPanel ePanel (cast (ePanelScene.instance))
                    :Label eLabel (getNode ePanel "EntryLabel")]
                (set eLabel.text (readComponentOr e Name ""))
+                (set ePanel.rectPosition (new Vector2 pos.x pos.y))
+                (set ePanel.z pos.z)
+                (set ePanel.e e)
                (pgEntries.addChild ePanel)
                ePanel)
        // Draw line: