kiss-lang/hollywoo-flixel
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Allow relative sizing when drawing sprite on sprite

Browse Source
This commit is contained in:
Nat Quayle Nelson
2021-12-16 14:58:51 -07:00
parent 8056f1f871
commit d0a8a78713
2 changed files with 12 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/hollywoo_flixel/SpriteTools.hx
View File

@@ -18,6 +18,8 @@ typedef RelativePosition = {
y:RelativeCoordinate, y:RelativeCoordinate,
?anchorX:RelativeCoordinate, // default Percent(0.5) ?anchorX:RelativeCoordinate, // default Percent(0.5)
?anchorY:RelativeCoordinate, // default Percent(0.5) ?anchorY:RelativeCoordinate, // default Percent(0.5)
?sizeX:RelativeCoordinate,
?sizeY:RelativeCoordinate,
}; };
@:build(kiss.Kiss.build()) @:build(kiss.Kiss.build())

10
src/hollywoo_flixel/SpriteTools.kiss
View File

@@ -21,9 +21,19 @@
p) p)
(otherwise (throw "$coord is out of range $range"))))) (otherwise (throw "$coord is out of range $range")))))
(function :Void scaleStampOn [:FlxSprite stamp :FlxSprite canvas :RelativePosition pos]
(let [&mut x 0 &mut y 0]
(when pos.sizeX
(set x (coordIn pos.sizeX canvas.frameWidth)))
(when pos.sizeY
(set y (coordIn pos.sizeY canvas.frameHeight)))
(stamp.setGraphicSize x y)
(stamp.updateHitbox)))
// TODO allow specifying size relative to canvas // TODO allow specifying size relative to canvas
(function :Void drawOnSprite [:FlxSprite stamp :FlxSprite canvas :RelativePosition pos] (function :Void drawOnSprite [:FlxSprite stamp :FlxSprite canvas :RelativePosition pos]
(let [[x y] (positionOn stamp canvas pos)] (let [[x y] (positionOn stamp canvas pos)]
(scaleStampOn stamp canvas pos)
(canvas.stamp stamp x y))) (canvas.stamp stamp x y)))
// TODO allow specifying size relative to canvas // TODO allow specifying size relative to canvas