From e965594e34d57646caf6272d3f70c7ad1825bc50 Mon Sep 17 00:00:00 2001 From: Nat Quayle Nelson Date: Thu, 4 Aug 2022 18:59:43 +0000 Subject: [PATCH] misc little things --- .../source/HabitState.kiss | 7 +++---- projects/nat-archive-tool/src/nat/systems/DLSystem.kiss | 2 +- .../nat-archive-tool/src/nat/systems/PlaygroundSystem.kiss | 6 +++++- 3 files changed, 9 insertions(+), 6 deletions(-) diff --git a/projects/flixel-desktop-habit-puzzle-game/source/HabitState.kiss b/projects/flixel-desktop-habit-puzzle-game/source/HabitState.kiss index eef99c1b..7d382a72 100644 --- a/projects/flixel-desktop-habit-puzzle-game/source/HabitState.kiss +++ b/projects/flixel-desktop-habit-puzzle-game/source/HabitState.kiss @@ -273,10 +273,9 @@ (FlxSpriteUtil.alphaMask s source.pixels mask.pixels) (set s.cameras [pieceCamera]) - - (#when debug - // Uncomment for debugging match zones: - **(let [matchZones [(matchZoneLeft s) (matchZoneRight s)(matchZoneUp s)(matchZoneDown s)]] + // Uncomment for debugging match zones: + **(#when debug + (let [matchZones [(matchZoneLeft s) (matchZoneRight s)(matchZoneUp s)(matchZoneDown s)]] (doFor z matchZones (unless z.isEmpty (FlxSpriteUtil.drawRect s (- z.x s.x) (- z.y s.y) z.width z.height FlxColor.TRANSPARENT (object thickness 1 color FlxColor.RED)))))) diff --git a/projects/nat-archive-tool/src/nat/systems/DLSystem.kiss b/projects/nat-archive-tool/src/nat/systems/DLSystem.kiss index bb09bf88..919c522e 100644 --- a/projects/nat-archive-tool/src/nat/systems/DLSystem.kiss +++ b/projects/nat-archive-tool/src/nat/systems/DLSystem.kiss @@ -31,7 +31,7 @@ (#if target.threaded (Thread.create downloadMp3) { - (print "threading unavailable -- the program will freeze while downloading with youtube-dl") + (ui.displayMessage "threading unavailable -- the program will freeze while downloading with youtube-dl") (downloadMp3) })) (true diff --git a/projects/nat-archive-tool/src/nat/systems/PlaygroundSystem.kiss b/projects/nat-archive-tool/src/nat/systems/PlaygroundSystem.kiss index f1418e3c..bb7763a5 100644 --- a/projects/nat-archive-tool/src/nat/systems/PlaygroundSystem.kiss +++ b/projects/nat-archive-tool/src/nat/systems/PlaygroundSystem.kiss @@ -37,4 +37,8 @@ (when _playgroundKey (super.process archive ui))) (method defaultPosition [:Entry e] - (object x 0.0 y 0.0 z 0.0)) \ No newline at end of file + (object x 0.0 y 0.0 z 0.0)) + +// TODO overridable circleContainsEntry function (default is to check only the position, Flixel version will use scaled sprite bounding box) + +// TODO when a circle contains an entry in the current playground, add it as a child \ No newline at end of file