(var string $texture)
(var number $speed 270)
(size 100 100) (fps 24)
(seq (/ 360 $speed)) (proj perspective (fov 37))
(scene
    (trans (t 0 3 5) (camera (pos 0 0 0)))
    (trans (r y (* $speed (time))) (s 2) (cube (texture $texture)))
)