 ! See http://factorcode.org/license.txt for BSD license.
 USING: accessors arrays boids.simulation calendar classes
 colors.constants kernel literals locals math math.functions
-math.trig models opengl opengl.demo-support opengl.gl sequences
-threads ui ui.gadgets ui.gadgets.borders ui.gadgets.buttons
-ui.gadgets.frames ui.gadgets.grids ui.gadgets.labeled
-ui.gadgets.labels ui.gadgets.packs ui.gadgets.sliders
-ui.gadgets.tracks ui.render ui.tools.common ;
+math.trig models namespaces opengl opengl.demo-support opengl.gl
+sequences threads ui ui.commands ui.gadgets ui.gadgets.borders
+ui.gadgets.buttons ui.gadgets.frames ui.gadgets.grids
+ui.gadgets.labeled ui.gadgets.labels ui.gadgets.packs
+ui.gadgets.sliders ui.gadgets.tracks ui.gadgets.worlds ui.render
+ui.tools.common ;
 QUALIFIED-WITH: models.range mr
 IN: boids
 

    "simulation" COLOR: gray <framed-labeled-gadget> ;

:: create-gadgets ( -- gadgets )
    <shelf>
    <boids-gadget> :> boids-gadget
    boids-gadget [ start-boids-thread ] keep
    add-gadget

    <pile> { 5 5 } >>gap 1.0 >>fill


    { 5 5 } <border> add-gadget

    <shelf> { 2 2 } >>gap
    "pause" [ drop boids-gadget com-pause ]
    <border-button> add-gadget
    "randomize" [ drop boids-gadget com-randomize ]
    <border-button> add-gadget

    { 5 5 } <border> add-gadget
