diff options
author | Matthias Schiffer <matthias@gamezock.de> | 2010-03-18 09:22:21 +0100 |
---|---|---|
committer | Matthias Schiffer <matthias@gamezock.de> | 2010-03-18 09:22:21 +0100 |
commit | 736ad91b328c23287b6065f6dc8f75c424d84b8b (patch) | |
tree | cc36cc00fbf1222cf7418ad7ffd12651bbdf8815 /src/HTanks.hs | |
parent | 5c34cd694117421e570b3a6cc3bb813e17e50b33 (diff) | |
download | htanks-736ad91b328c23287b6065f6dc8f75c424d84b8b.tar htanks-736ad91b328c23287b6065f6dc8f75c424d84b8b.zip |
Hit tanks will die now.
Diffstat (limited to 'src/HTanks.hs')
-rw-r--r-- | src/HTanks.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/HTanks.hs b/src/HTanks.hs index 63e647d..c7cf8a8 100644 --- a/src/HTanks.hs +++ b/src/HTanks.hs @@ -32,8 +32,8 @@ main = do [ SomePlayer $ DefaultPlayer S.empty 0 0 False , SomePlayer $ CPUPlayer 0 ]} - gameState = GameState {level = theLevel, tanks = [ Tank 5.0 5.0 0 0 2 270 False 3 1 5 - , Tank 5.0 3.5 0 0 2 270 False 3 1 5 + gameState = GameState {level = theLevel, tanks = [ Tank 5.0 5.0 0 0 2 270 False 3 1 5 1 + , Tank 5.0 3.5 0 0 2 270 False 3 1 5 1 ], bullets = [], textures = M.empty} runGame gameState $ do |