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

fix smart prop and character positions

Browse Source
This commit is contained in:
Nat Quayle Nelson
2022-01-12 23:40:05 -07:00
parent b12879a694
commit 1568094609
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/hollywoo_flixel/FlxDirector.kiss
View File

@@ -43,8 +43,8 @@
(ifLet [(FullControl layer rpos) character.stagePosition] (ifLet [(FullControl layer rpos) character.stagePosition]
{ {
(assert (<= 0 layer SceneFlxState.LAYER_MAX) "Layer $layer is out of range 0-$SceneFlxState.LAYER_MAX") (assert (<= 0 layer SceneFlxState.LAYER_MAX) "Layer $layer is out of range 0-$SceneFlxState.LAYER_MAX")
(SpriteTools.scaleStampOn character.actor (canvas) rpos)
(let [[x y] (SpriteTools.positionOn character.actor (canvas) rpos)] (let [[x y] (SpriteTools.positionOn character.actor (canvas) rpos)]
(SpriteTools.scaleStampOn character.actor (canvas) rpos)
(set character.actor.x x) (set character.actor.x x)
(set character.actor.y y) (set character.actor.y y)
(if (= layer SceneFlxState.LAYER_MAX) (if (= layer SceneFlxState.LAYER_MAX)
@@ -329,8 +329,8 @@
(method :Void smartShowPropOnScreen [:FlxSprite prop :Int layer :RelativePosition rpos :Continuation cc] (method :Void smartShowPropOnScreen [:FlxSprite prop :Int layer :RelativePosition rpos :Continuation cc]
(assert (<= 0 layer SceneFlxState.LAYER_MAX) "Layer $layer is out of range 0-$SceneFlxState.LAYER_MAX") (assert (<= 0 layer SceneFlxState.LAYER_MAX) "Layer $layer is out of range 0-$SceneFlxState.LAYER_MAX")
(SpriteTools.scaleStampOn prop (canvas) rpos)
(let [[x y] (SpriteTools.positionOn prop (canvas) rpos)] (let [[x y] (SpriteTools.positionOn prop (canvas) rpos)]
(SpriteTools.scaleStampOn prop (canvas) rpos)
(set prop.x x) (set prop.x x)
(set prop.y y) (set prop.y y)
(if (= layer SceneFlxState.LAYER_MAX) (if (= layer SceneFlxState.LAYER_MAX)