Scale component for NAT entries

2021-09-27 19:45:54 -06:00
parent 6eb8aafb77
commit 0e21755e31
4 changed files with 16 additions and 0 deletions
--- a/projects/nat-flixel-desktop-playground/source/EntrySprite.kiss
+++ b/projects/nat-flixel-desktop-playground/source/EntrySprite.kiss
@@ -13,6 +13,10 @@
        (.onComplete (BitmapData.loadFromFile (joinPath archive.archiveDir "files" (nth images.imageFiles images.pinnedImageIndex)))
            ->bitmapData {
                (loadGraphic bitmapData)
+                (when (hasComponent e Scale)
+                    (let [:Float scale (readComponent archive e Scale)]
+                        (this.scale.set scale scale)
+                        (updateHitbox)))
                (enableMouseClicks false)
                (enableMouseDrag)
             }))