Add count of used items to combinations

This commit is contained in:
2022-02-17 10:05:04 +00:00
parent 6573b3346e
commit bae0e1f0b7
3 changed files with 37 additions and 10 deletions
+3
View File
@@ -50,6 +50,9 @@ invertListInv = IM.foldrWithKey
(\k it -> ((_itType it, k, itStackAmount it) :) )
[]
-- gives a list of indices-item pairs.
-- Note that within the pair, indices can be repeated if two or more of an item
-- are needed
combineItemListYou :: World -> [([Int],Item)]
combineItemListYou = concatMap lookupItems . invertListInvMult . yourInv