diff options
Diffstat (limited to '')
| -rw-r--r-- | app/Scratchy.hs | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/app/Scratchy.hs b/app/Scratchy.hs index cea910d..f2ac9a2 100644 --- a/app/Scratchy.hs +++ b/app/Scratchy.hs @@ -5,7 +5,7 @@ import Graphics.Gloss.Interface.Pure.Game import Scratchy.World import Scratchy.Syntax -import Example.CircleThatMoves +import Snakey.TwoSnakes -- Main ------------------------------------------------------------ @@ -19,7 +19,7 @@ main = play white [] [] - circSprite + twoSnakes [] [] [] @@ -32,7 +32,6 @@ main = play >> moveSprites tick >> handleKeyEvents >> tickTimers - >> runProg ) ) @@ -72,5 +71,3 @@ toScreen (gx, gy) = let fx = gx - (fromIntegral gridW - 1) / 2 fy = gy - (fromIntegral gridH - 1) / 2 in (fx * cellSize, fy * cellSize) - - |