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

stagger label buttons in columns

Browse Source
This commit is contained in:
Nat Quayle Nelson
2022-01-10 13:44:43 -07:00
parent 3af6d89844
commit 3a01b07e79
1 changed files with 8 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
src/hollywoo_flixel/HollywooFlixelDSL.kiss
View File

@@ -54,12 +54,17 @@
(let [runners (labelRunners) (let [runners (labelRunners)
buttons (new flixel.group.FlxGroup.FlxTypedGroup<flixel.ui.FlxButton>)] buttons (new flixel.group.FlxGroup.FlxTypedGroup<flixel.ui.FlxButton>)]
(localVar &mut buttonY 0) (localVar &mut buttonY 0)
(doFor label (sort (collect (runners.keys))) (localVar buttonsPerColumn 25)
(doFor [num label] (enumerate (sort (collect (runners.keys))))
(let [runner (dictGet runners label) (let [runner (dictGet runners label)
b (new flixel.ui.FlxButton 0 buttonY label ->{(FlxG.state.remove buttons)(runner)})] b (new flixel.ui.FlxButton 0 buttonY label ->{(FlxG.state.remove buttons)(runner)})]
(let [column (Std.int (/ num buttonsPerColumn))]
(set b.x (* b.width column)))
(buttons.add b)) (buttons.add b))
(+= buttonY 20)) (+= buttonY 20)
(FlxG.state.add buttons))) (when (= (- buttonsPerColumn 1) (% num buttonsPerColumn))
(set buttonY 0)))
(.add (cast (_currentScene) SceneFlxState) buttons)))
(defMacro withProp [propKey name &body body] (defMacro withProp [propKey name &body body]
`(let [,name (dictGet props ,propKey)] `(let [,name (dictGet props ,propKey)]