open-model-viewer ( model-path -- )

Vocabulary

model-viewer

Inputs

model-path

an object

Outputs

None

Definition

USING: kernel ui ;

IN: model-viewer

:: open-model-viewer ( model-path -- )
    [
        f T{ model-attributes
            { world-class model-world }
            { grab-input? t }
            { title "Model Viewer" }
            { pref-dim { 1024 768 } }
            { tick-interval-nanos 16666666 }
            { use-game-input? t }
            { model-path model-path }
        } clone open-window
    ] with-ui ;