USING: kernel accessors sequences ui.gadgets.editors ui.gadgets.frames ui.gadgets.grids ui.gadgets.labels ui.gadgets.buttons ui ; IN: ui2 : change-gui ( object -- ) children>> 0 swap ?nth dup editor-string "\n factor rocks" append swap set-editor-string ; : gooo ( -- frame ) 2 2 { 1 1 } >>filled-cell { 100 50 } >>gap dup { 0 0 } grid-add "hello"