Allow for yet more complex placement positioning

2021-11-24 21:31:19 +00:00
parent 1c80f1a681
commit 2c759cb40e
2 changed files with 27 additions and 13 deletions
@@ -1,5 +1,6 @@
 module Dodge.Room.Room where
 import Dodge.Data
+import Dodge.PlacementSpot
 import Dodge.RoomLink
 import Dodge.Default.Room
 import Dodge.Item.Weapon.BulletGuns
@@ -316,8 +317,12 @@ weaponBetweenPillars = do
        d p = argV $ V2 120 120 -.- p
        plmnts = 
            [sPS wpPos 0 $ RandPS randFirstWeapon
-            ,sPS crPos1 (d crPos1) randC1
-            ,sPS crPos2 (d crPos2) randC1
+            , sps (unusedSpotAwayFromInLink 150) randC1
+            , sps (unusedSpotAwayFromInLink 150) randC1
+            , sps (unusedSpotAwayFromInLink 150) randC1
+            , sps (unusedSpotAwayFromInLink 150) randC1
+            --,sPS crPos1 (d crPos1) randC1
+            --,sPS crPos2 (d crPos2) randC1
            ]
        theRoom = roomPillars & rmPmnts %~ (++ plmnts)
    (fmap singleUseAll . randomiseOutLinks) =<< filterLinks f theRoom