summaryrefslogtreecommitdiffstats
path: root/Tank.hs
diff options
context:
space:
mode:
authorMatthias Schiffer <matthias@gamezock.de>2010-02-25 02:15:26 +0100
committerMatthias Schiffer <matthias@gamezock.de>2010-02-25 02:15:26 +0100
commitb4c3367c63459607f0919e77998d5405634e2003 (patch)
treebbd9a47429a642bc72456946ea8c5e7a646ee815 /Tank.hs
parent7f12f41e5fce40042f97d167da9a0fb58e5a1651 (diff)
downloadhtanks-b4c3367c63459607f0919e77998d5405634e2003.tar
htanks-b4c3367c63459607f0919e77998d5405634e2003.zip
Added texture loading
Diffstat (limited to 'Tank.hs')
-rw-r--r--Tank.hs9
1 files changed, 5 insertions, 4 deletions
diff --git a/Tank.hs b/Tank.hs
index 54322cf..28f286c 100644
--- a/Tank.hs
+++ b/Tank.hs
@@ -4,8 +4,9 @@ module Tank ( Tank(..)
import Data.Fixed
data Tank = Tank
- { posx :: !Micro
- , posy :: !Micro
- , dir :: !Micro
- , aim :: !Micro
+ { posx :: !Micro
+ , posy :: !Micro
+ , dir :: !Micro
+ , aim :: !Micro
+ , speed :: !Micro
} deriving Show