(loop
[i
0
entity
(->
entity
(assoc
:viewport
{:x 0, :y 0, :width game-width, :height game-height})
(play-cljc.transforms/project game-width game-height)
(play-cljc.transforms/color [1 0 0.5 1]))]
(when
(< i 5)
(let
[entity
(->
entity
(play-cljc.transforms/translate tx ty)
(play-cljc.transforms/rotate r))]
(play-cljc.gl.core/render game entity)
(recur (inc i) entity))))