handle-mesh-hit ( hit-state ray model bbox -- hit-state ? )

Vocabulary

raylib.demo.mesh-picking

Inputs

hit-state	an object
ray	an object
model	an object
bbox	an object

Outputs

hit-state	an object
?	an object

Definition

USING: accessors kernel raylib ;

IN: raylib.demo.mesh-picking

: handle-mesh-hit
    ( hit-state ray model bbox -- hit-state ? )
    pick swap get-ray-collision-box [
        get-ray-collision-model
        over nearest-hit>> swap update-hit?
        [ >>nearest-hit ] dip
        [ ORANGE >>color "Mesh" >>name ] when t
    ] [ 2drop f ] if ;