reanimate/examples/doc_spriteVar.hs
David Himmelstrup ff2f7f614b Documentation (mostly for scenes) (#58)
Former-commit-id: 76fe4a261710ff744d09c9dd0a9b694f759fda41
2020-02-22 20:32:31 +08:00

12 lines
302 B
Haskell
Executable file

#!/usr/bin/env stack
-- stack runghc --package reanimate
module Main(main) where
import Reanimate
import Reanimate.Builtin.Documentation
main :: IO ()
main = reanimate $ docEnv $ sceneAnimation $ do
s <- fork $ newSpriteA drawBox
v <- spriteVar s 0 rotate
tweenVar v 2 $ \val -> fromToS val 90