<model-buffers> ( models -- buffers )

Vocabulary

model-viewer

Inputs

models

an object

Outputs

buffers

an object

Definition

USING: accessors combinators gpu.buffers kernel sequences ;

IN: model-viewer

: <model-buffers> ( models -- buffers )
    [
        {
            [
                attribute-buffer>> underlying>> static-upload
                draw-usage vertex-buffer byte-array>buffer
            ]
            [
                index-buffer>> underlying>> static-upload
                draw-usage index-buffer byte-array>buffer
            ]
            [ index-buffer>> length ]
            [ vertex-format>> ]
            [
                material>> ambient-map>> white-image
                make-texture
            ]
            [ material>> bump-map>> up-image make-texture ]
            [ material>> ambient-reflectivity>> ]
        } cleave vbo boa
    ] map ;