Tweak inventory management

2021-12-01 01:55:20 +00:00
parent 0ed260c9b7
commit b9e4a80a46
12 changed files with 138 additions and 109 deletions
@@ -8,6 +8,7 @@ import Control.Lens
 applyTerminalString :: String -> Universe -> Universe
 applyTerminalString "NOCLIP" w = w & config . debug_noclip %~ not
 applyTerminalString "LOADME" w = w & uvWorld . creatures . ix 0 . crInv .~ stackedInventory
+    & uvWorld . creatures . ix 0 . crInvCapacity .~ 50
 applyTerminalString "LM" w = applyTerminalString "LOADME" w
 applyTerminalString _ w = w