Remove shrink gun
This commit is contained in:
+1
-12
@@ -10,8 +10,6 @@ import Dodge.Item.Held.Launcher
|
||||
import Dodge.Cleat
|
||||
import Dodge.Data.GenWorld
|
||||
import Dodge.Item.Craftable
|
||||
import Dodge.Item.Weapon
|
||||
import Dodge.LevelGen.PlacementHelper
|
||||
import Dodge.Room.Containing
|
||||
import Dodge.Room.Corridor
|
||||
import Dodge.Room.Door
|
||||
@@ -20,17 +18,8 @@ import Dodge.Room.RezBox
|
||||
import Dodge.Room.Room
|
||||
import Dodge.Room.RunPast
|
||||
import Dodge.Tree
|
||||
--import Dodge.LevelGen.PlacementHelper
|
||||
--import Geometry.Data
|
||||
--import Padding
|
||||
--import Shape
|
||||
import LensHelp
|
||||
import RandomHelp
|
||||
|
||||
--import Data.Maybe
|
||||
--import Data.Tree
|
||||
--import qualified IntMapHelp as IM
|
||||
|
||||
powerFakeout' :: RandomGen g => State g (MetaTree Room String)
|
||||
powerFakeout' = tToBTree "powerFakeout'" <$> powerFakeout
|
||||
|
||||
@@ -52,7 +41,7 @@ powerFakeout = do
|
||||
, door
|
||||
]
|
||||
++ randcors
|
||||
++ [ corridor & rmPmnts .:~ plRRpt 0 (PutFlIt shrinkGun)
|
||||
++ [ corridor
|
||||
, keyholeCorridor
|
||||
, corridor
|
||||
, cleatOnward door
|
||||
|
||||
Reference in New Issue
Block a user