diff options
Diffstat (limited to 'src/Tank.hs')
-rw-r--r-- | src/Tank.hs | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/src/Tank.hs b/src/Tank.hs new file mode 100644 index 0000000..21bc0da --- /dev/null +++ b/src/Tank.hs @@ -0,0 +1,17 @@ +module Tank ( Tank(..) + ) where + +import Data.Fixed + +data Tank = Tank + { tankX :: !Micro + , tankY :: !Micro + , tankDir :: !Micro + , tankAim :: !Micro + , tankSpeed :: !Micro + , tankTurnspeed :: !Micro + , tankMoving :: !Bool + , tankBulletSpeed :: !Micro + , tankBulletBounces :: !Int + , tankBulletsLeft :: !Int + } deriving Show |