reset building lvl if destroyed
This commit is contained in:
@@ -68,7 +68,9 @@ loop numSites siteInfo gameState = do
|
|||||||
Just gs -> head $ filter (\s -> s.id == infoS.id) gs.sites
|
Just gs -> head $ filter (\s -> s.id == infoS.id) gs.sites
|
||||||
Nothing -> Nothing
|
Nothing -> Nothing
|
||||||
let lvl = case prevSite of
|
let lvl = case prevSite of
|
||||||
Just site -> site.lvl
|
Just pSite -> if protoS.owner /= 0
|
||||||
|
then 0 -- reset level of all buildings, which are not (any longer) ours
|
||||||
|
else pSite.lvl
|
||||||
Nothing -> 0
|
Nothing -> 0
|
||||||
pure { id: protoS.id
|
pure { id: protoS.id
|
||||||
, gold: protoS.gold
|
, gold: protoS.gold
|
||||||
|
|||||||
Reference in New Issue
Block a user