justin/loop
1
0
Fork 0
Code Issues Pull Requests 1 Packages Projects Releases Wiki Activity

Broken commit (removed loadKeyConfig)

Browse Source
This commit is contained in:
justin
2021-08-27 11:58:11 +01:00
parent c4df048d31
commit 3ff04576ab
25 changed files with 122 additions and 200 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Dodge/Combine.hs
+26 -24
View File
@@ -1,35 +1,37 @@
module Dodge.Combine
(
)
where
--import Dodge.Data
import Dodge.Combine.Data
--import Dodge.Combine.Data
--import qualified Data.IntMap.Strict as IM
--import qualified Data.IntSet as IS
import qualified Data.Map.Strict as M
--import qualified Data.Map.Strict as M
--combineList :: IM.IntMap Item -> [(Item , IS.IntSet)]
--combineList
invert :: (Ord a) => M.Map b a -> M.Map a [b]
invert = M.foldrWithKey (\k val -> M.insertWith (++) val [k]) M.empty
combineList :: [([ItemType], ItemType)]
combineList =
[ ( [ TPistol, TPipe, THardware ] , TRifle )
, ( [ TRifle, THardware ] , TPistol )
, ( [ TPistol, TPistol, THardware ] , TSpreadGun 2 )
, ( [ TSpreadGun 2, TPistol, THardware ] , TSpreadGun 3 )
, ( [ TSpreadGun 3, TPistol, THardware ] , TSpreadGun 4 )
, ( [ TSpreadGun 4, TPistol, THardware ] , TSpreadGun 5 )
, ( [ TPistol, TAutoGun, THardware ] , TLtAutoGun )
, ( [ TLtAutoGun, TPipe, THardware ] , TAutoGun )
, ( [ TRifle, TRifle, THardware ] , TMultGun 2 )
, ( [ TMultGun 2, TRifle, THardware ] , TMultGun 3 )
, ( [ TMultGun 3, TRifle, THardware ] , TMultGun 4 )
, ( [ TMultGun 4, TRifle, THardware ] , TMultGun 5 )
, ( [ TLtAutoGun, TPipe, THardware ] , TAutoGun )
, ( [ TPistol, TBigTube, THardware] , TLauncher 1 )
, ( [ TLauncher 1, TBigTube, TPistol, THardware] , TLauncher 2)
, ( [ TLauncher 2, TBigTube, TPistol, THardware] , TLauncher 3)
]
--invert :: (Ord a) => M.Map b a -> M.Map a [b]
--invert = M.foldrWithKey (\k val -> M.insertWith (++) val [k]) M.empty
--
--combineList :: [([ItemType], ItemType)]
--combineList =
-- [ ( [ TPistol, TPipe, THardware ] , TRifle )
-- , ( [ TRifle, THardware ] , TPistol )
-- , ( [ TPistol, TPistol, THardware ] , TSpreadGun 2 )
-- , ( [ TSpreadGun 2, TPistol, THardware ] , TSpreadGun 3 )
-- , ( [ TSpreadGun 3, TPistol, THardware ] , TSpreadGun 4 )
-- , ( [ TSpreadGun 4, TPistol, THardware ] , TSpreadGun 5 )
-- , ( [ TPistol, TAutoGun, THardware ] , TLtAutoGun )
-- , ( [ TLtAutoGun, TPipe, THardware ] , TAutoGun )
-- , ( [ TRifle, TRifle, THardware ] , TMultGun 2 )
-- , ( [ TMultGun 2, TRifle, THardware ] , TMultGun 3 )
-- , ( [ TMultGun 3, TRifle, THardware ] , TMultGun 4 )
-- , ( [ TMultGun 4, TRifle, THardware ] , TMultGun 5 )
-- , ( [ TLtAutoGun, TPipe, THardware ] , TAutoGun )
-- , ( [ TPistol, TBigTube, THardware] , TLauncher 1 )
-- , ( [ TLauncher 1, TBigTube, TPistol, THardware] , TLauncher 2)
-- , ( [ TLauncher 2, TBigTube, TPistol, THardware] , TLauncher 3)
-- ]