center and squash hollywoo-flixel set backgrounds

2021-10-25 16:43:52 -04:00
parent 0bb4ab7be4
commit c6583df56b
2 changed files with 9 additions and 1 deletions
--- a/src/hollywoo_flixel/SceneFlxState.kiss
+++ b/src/hollywoo_flixel/SceneFlxState.kiss
@@ -6,7 +6,14 @@

 (method &override :Void create []
    (super.create)
-    (add (.loadGraphic (new FlxSprite 0 0) set)))
+    (let [setSprite (new FlxSprite 0 0)]
+        (setSprite.loadGraphic set)
+        (when (> setSprite.width FlxG.width)
+            (setSprite.setGraphicSize FlxG.width))
+        (when (> setSprite.height FlxG.height)
+            (setSprite.setGraphicSize 0 FlxG.height))
+        (setSprite.screenCenter)
+        (add setSprite)))

 (method &override :Void update [:Float elapsed]
    (super.update elapsed))