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

Cleanup

Browse Source
This commit is contained in:
justin
2024-09-30 12:03:23 +01:00
parent 9ad1b8cc5b
commit 65564c993b
11 changed files with 147 additions and 290 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Dodge/Item/Craftable.hs
+10 -10
View File
@@ -15,19 +15,19 @@ makeTypeCraftNum i ct = replicate i $
makeTypeCraft :: CraftType -> Item
makeTypeCraft = head . makeTypeCraftNum 1
energyBallCraft :: EnergyBallType -> Item
energyBallCraft ebt = makeTypeCraft (ENERGYBALLCRAFT ebt) & itInvSize .~ 1
--energyBallCraft :: EnergyBallType -> Item
--energyBallCraft ebt = makeTypeCraft (ENERGYBALLCRAFT ebt) & itInvSize .~ 1
incendiaryModule :: Item
incendiaryModule = energyBallCraft IncBall
--incendiaryModule :: Item
--incendiaryModule = energyBallCraft IncBall
bulletBodyCraft :: BulletEffect -> Item
bulletBodyCraft ebt =
makeTypeCraft (BULBODYCRAFT ebt)
& itInvSize .~ 1
--bulletBodyCraft :: BulletEffect -> Item
--bulletBodyCraft ebt =
-- makeTypeCraft (BULBODYCRAFT ebt)
-- & itInvSize .~ 1
bounceModule :: Item
bounceModule = bulletBodyCraft BounceBullet
--bounceModule :: Item
--bounceModule = bulletBodyCraft BounceBullet
teleportModule :: Item
teleportModule = makeTypeCraft TELEPORTMODULE & itInvSize .~ 1