Move toward adding multiple equipable items that are not directly usable

2021-12-08 17:09:24 +00:00
parent 9f6e5af991
commit a9139db0a8
22 changed files with 260 additions and 137 deletions
@@ -34,7 +34,7 @@ laserGunFlashAt :: Point3 -> World -> World
 laserGunFlashAt = flareCircleAt yellow 0.2

 muzFlareAt :: Color -> Point3 -> Float -> World -> World
-muzFlareAt col tranv dir w = w & particles .:~ theFlare
+muzFlareAt col tranv dir w = w & instantParticles .:~ theFlare
  where
    theFlare = Particle
        { _ptDraw = const $ setLayer 1 . translate3 tranv $ theShape