21 lines
516 B
Text
21 lines
516 B
Text
|
(local pxl8 (require :pxl8))
|
||
|
|
|
||
|
|
(var button-clicks 0)
|
||
|
|
|
||
|
|
(global init (fn []
|
||
|
|
(pxl8.load_palette "palettes/gruvbox.ase")))
|
||
|
|
|
||
|
|
(global update (fn [_dt]))
|
||
|
|
|
||
|
|
(global frame (fn []
|
||
|
|
(pxl8.clr 1)
|
||
|
|
|
||
|
|
(when pxl8.ui
|
||
|
|
(when (pxl8.ui_window_begin "UI Demo" 20 20 280 150)
|
||
|
|
(pxl8.ui_layout_row 1 0 0)
|
||
|
|
(pxl8.ui_label "Welcome to some window UI!")
|
||
|
|
(pxl8.ui_label (.. "Clicks: " button-clicks))
|
||
|
|
(when (pxl8.ui_button "Click me!")
|
||
|
|
(set button-clicks (+ button-clicks 1)))
|
||
|
|
(pxl8.ui_window_end)))))
|