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

fix edge clipping of circles

Browse Source
This commit is contained in:
Nat Quayle Nelson
2022-07-08 19:23:03 +00:00
parent cb6991bfe8
commit 750e1a7bee
1 changed files with 7 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
projects/nat-flixel-desktop-playground/source/EntrySprite.kiss
View File

@@ -19,9 +19,10 @@
((hasComponent e Circle) ((hasComponent e Circle)
(set isCircle true) (set isCircle true)
(let [c (readComponent e Circle) (let [c (readComponent e Circle)
diam (Std.int (* 2 c.radius))] diam (Std.int (* 2 c.radius))
(makeGraphic diam diam FlxColor.TRANSPARENT true) squareSize (+ diam CIRCLE_THICKNESS)]
(FlxSpriteUtil.drawCircle this -1 -1 c.radius FlxColor.TRANSPARENT (object thickness 5 color CIRCLE_COLOR)))) (makeGraphic squareSize squareSize FlxColor.TRANSPARENT true)
(FlxSpriteUtil.drawCircle this -1 -1 c.radius FlxColor.TRANSPARENT (object thickness CIRCLE_THICKNESS color CIRCLE_COLOR))))
(true (true
(set pixels .pixels (new FlxText 0 0 0 (readComponent e Name) PlayState.TEXT_SIZE)))) (set pixels .pixels (new FlxText 0 0 0 (readComponent e Name) PlayState.TEXT_SIZE))))
(updateColor) (updateColor)
@@ -82,3 +83,5 @@
(var CIRCLE_COLOR FlxColor.LIME) (var CIRCLE_COLOR FlxColor.LIME)
(var CIRCLE_SELECTED_COLOR FlxColor.GRAY) (var CIRCLE_SELECTED_COLOR FlxColor.GRAY)
(var DEFAULT_COLOR FlxColor.WHITE) (var DEFAULT_COLOR FlxColor.WHITE)
(var CIRCLE_THICKNESS 5)