main ( -- gadget )

Vocabulary

gamelib.demos.maze-game

Inputs

None

Outputs

gadget

an object

Definition

USING: accessors gamelib.ui kernel ui.gadgets
ui.gadgets.scrollers ui.gadgets.tracks ;

IN: gamelib.demos.maze-game

: main ( -- gadget )
    vertical maze-gadget new-track
    { 1700 1700 } init-board-gadget board
    [ >>board-gadget ] keep <scroller> [ >>maze-scroller ] keep
    1 track-add ;