Tweak ammo distribution

This commit is contained in:
2025-12-09 23:51:33 +00:00
parent f6e0514408
commit eac80d2b43
2 changed files with 11 additions and 6 deletions
+1 -1
View File
@@ -447,7 +447,7 @@ distributerRoom atype aamount = do
& rmInPmnt <>~ [(0,dst),(1,thepipe)]
tmDistributeLines :: [TerminalLine]
tmDistributeLines = [TLine 1 [TerminalLineConst "DISTRIBUTING AMMO" white] TmDistributeAmmo]
tmDistributeLines = [TLine 1 [TerminalLineConst "DISTRIBUTING..." white] TmDistributeAmmo]
-- cor <- shuffleLinks corridor
-- return $ tToBTree "corDoor" $ treePost [door,cor,cleatOnward door]