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

Habit puzzles ui to toggle top priority

Browse Source
This commit is contained in:
Nat Quayle Nelson
2022-09-14 21:06:53 +00:00
parent 4a45b00fc0
commit fc03c8df11
2 changed files with 24 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
projects/flixel-desktop-habit-puzzle-game/source/HabitModel.kiss
View File

@@ -254,6 +254,10 @@
(set e.labels (for label e.labels (object points label.points label "~"))) (set e.labels (for label e.labels (object points label.points label "~")))
(save)) (save))
(method toggleEntryPriority [:Entry e]
(set e.topPriority !e.topPriority)
(save))
(method addRewardFile [path startingPoints puzzleWidth puzzleHeight piecesPerPoint] (method addRewardFile [path startingPoints puzzleWidth puzzleHeight piecesPerPoint]
(rewardFiles.push (objectWith [skipped false] path startingPoints puzzleWidth puzzleHeight piecesPerPoint)) (rewardFiles.push (objectWith [skipped false] path startingPoints puzzleWidth puzzleHeight piecesPerPoint))
(save)) (save))

21
projects/flixel-desktop-habit-puzzle-game/source/HabitState.kiss
View File

@@ -194,12 +194,13 @@
(prop &mut :SimpleWindow puzzlePackChoiceWindow null) (prop &mut :SimpleWindow puzzlePackChoiceWindow null)
(prop &mut :SimpleWindow entryDeletionWindow null) (prop &mut :SimpleWindow entryDeletionWindow null)
(prop &mut :SimpleWindow entryCreationWindow null) (prop &mut :SimpleWindow entryCreationWindow null)
(prop &mut :SimpleWindow priorityWindow null)
(method windowIsShown [] (method windowIsShown []
(or (tempWindowIsShown) (and entryWindow (entryWindow.isShown)))) (or (tempWindowIsShown) (and entryWindow (entryWindow.isShown))))
(method tempWindowIsShown [] (method tempWindowIsShown []
(doFor window [puzzlePackChoiceWindow entryDeletionWindow entryCreationWindow] (doFor window [puzzlePackChoiceWindow entryDeletionWindow entryCreationWindow priorityWindow]
(when (and window (window.isShown)) (when (and window (window.isShown))
(return true))) (return true)))
false) false)
@@ -323,6 +324,24 @@
((Some "Bonus") (createBonusEntry)) ((Some "Bonus") (createBonusEntry))
(otherwise (throw "nonexistent choice"))) (otherwise (throw "nonexistent choice")))
null null FlxColor.LIME 0.9 0.9 true xKey backToEntryWindow)))) null null FlxColor.LIME 0.9 0.9 true xKey backToEntryWindow))))
(_makeText "Choose Top-Priority habits and tasks" 0
->_
(defAndCall method choosePriorities
(entryWindow.hide)
(let [pw (SimpleWindow.promptForChoice "Choose your top priorities. A ! will appear in front of them"
(model.allUndeletedEntries)
->:Void [:Entry e] {
(model.toggleEntryPriority e)
(refreshModel)
(priorityWindow.clearActions)
(priorityWindow.show)
(nextFrame ->{
(priorityWindow.hide)
(choosePriorities)
})
}
null null FlxColor.WHITE 0.9 0.9 true (defAndReturn prop xKey "escape") backToEntryWindow true)]
(set priorityWindow pw))))
(set entryWindow.textColor (FlxColor.RED.getDarkened)) (set entryWindow.textColor (FlxColor.RED.getDarkened))
(_makeText "Delete a habit or task" 0 (_makeText "Delete a habit or task" 0
->_ ->_