move-player ( world move face -- )

Vocabulary

papier

Inputs

world	an object
move	an object
face	an object

Outputs

None

Definition

USING: accessors assocs kernel math.vectors papier.map
papier.sprites sequences ;

IN: papier

: move-player ( world move face -- )
    [
        slabs-by-name>> "marco" swap at
        dup animations>> second switch-animation
    ] 2dip [ [ v+ ] curry change-center ] [ >>orient ] bi*
    update-slab-matrix ;