gameServer/EngineInteraction.hs
changeset 8541 0cd63b963330
parent 8527 bf671ddf467c
child 9304 3f4c3fc146c2
--- a/gameServer/EngineInteraction.hs	Thu Feb 21 22:31:03 2013 +0400
+++ b/gameServer/EngineInteraction.hs	Thu Feb 21 22:43:00 2013 +0400
@@ -90,7 +90,7 @@
         initHealth = scheme !! 27
         teamSetup :: TeamInfo -> [B.ByteString]
         teamSetup t = (++) ammo $
-                eml ["eaddteam <hash> ", showB $ (1 + (readInt_ $ teamcolor t) :: Int) * 1234, " ", teamname t]
+                eml ["eaddteam <hash> ", showB $ (1 + (readInt_ $ teamcolor t) :: Int) * 2113696, " ", teamname t]
                 : em "erdriven"
                 : eml ["efort ", teamfort t]
                 : take (2 * hhnum t) (