bunny-world

Vocabulary

gpu.demos.bunny

Definition

USING: gpu.util.wasd ;

IN: gpu.demos.bunny

TUPLE: bunny-world < wasd-world bunny sobel loading ;

Methods

USING: accessors game.worlds gpu gpu.demos.bunny gpu.util
gpu.util.wasd kernel ;

M: bunny-world begin-game-world
    init-gpu { -0.2 0.13 0.1 } 1.1 0.2 set-wasd-view
    <bunny-state> >>bunny <window-vertex-buffer>
    [ <sobel-state> >>sobel ] [ <loading-state> >>loading ] bi
    drop ;


USING: accessors gpu.demos.bunny kernel ui.gadgets.worlds ;

M: bunny-world draw-world*
    dup bunny>> dup bunny-loaded? [
        dup bunny-state-filled? [ drop ] [ fill-bunny-state ] if
        draw-sobeled-bunny
    ] [ drop draw-loading ] if ;


USING: accessors generic gpu.demos.bunny gpu.framebuffers kernel
ui.gadgets.worlds ;

M: bunny-world resize-world
    [ M\ bunny-world resize-world (call-next-method) ] [
        [ sobel>> framebuffer>> ] [ dim>> ] bi
        resize-framebuffer
    ] bi ;


USING: gpu.demos.bunny gpu.util.wasd kernel ;

M: bunny-world wasd-far-plane drop 256.0 ;


USING: gpu.demos.bunny gpu.util.wasd kernel ;

M: bunny-world wasd-movement-speed drop 0.00625 ;


USING: gpu.demos.bunny gpu.util.wasd kernel ;

M: bunny-world wasd-near-plane drop 0.03125 ;