diff --git a/src/Dodge/Creature/Action.hs b/src/Dodge/Creature/Action.hs
index eb609f888..952015eaf 100644
--- a/src/Dodge/Creature/Action.hs
+++ b/src/Dodge/Creature/Action.hs
@@ -46,7 +46,7 @@ performActions cid w =
         iss
   where
     cr = w ^?! cWorld . lWorld . creatures . ix cid
-    (iss, mayas) = fromMaybe ([],NoAction) $ performAction cr w <$> cr ^? crActionPlan . apAction
+    (iss, mayas) = maybe ([],NoAction) (performAction cr w) (cr ^? crActionPlan . apAction)
 
 type ActionUpdate = ([Impulse], Action)
 
diff --git a/src/Dodge/Creature/Picture.hs b/src/Dodge/Creature/Picture.hs
index 29be37bb1..d70cc98a4 100644
--- a/src/Dodge/Creature/Picture.hs
+++ b/src/Dodge/Creature/Picture.hs
@@ -67,10 +67,6 @@ drawSlimeCrit cr =
         guard $ length qs == 12
         return $ zipWith (+) (fmap (0.1 * (10 - x) *^) so) (fmap (0.1 * x *^) qs)
 
--- assumes d is a unit vector
-scaleAlong :: Point2 -> Float -> Point2 -> Point2
-scaleAlong d s p = ((s - 1) * dot d p) *^ d + p
-
 basicCrPict :: IM.IntMap Item -> Creature -> SPic
 basicCrPict m cr = drawEquipment m cr <> noPic (basicCrShape cr)
 
@@ -122,20 +118,17 @@ drawBeeCrit cr =
     colorSH
         col
         (f . upperPrismPolyHalfMI 3 $ polyCirc 6 r)
-        <> colorSH (dark col) (overPosSH (Q.apply (beakpos)) $ upperPrismPolyHalfST 1 $ [V2 0 (-2), V2 4 0, V2 0 2])
+        <> colorSH (dark col) (overPosSH (Q.apply beakpos) $ upperPrismPolyHalfST 1 [V2 0 (-2), V2 4 0, V2 0 2])
   where
     r = cr ^. crType . to crRad
     beakpos = (V3 (r - 1) 0 0, Q.qid)
-    col
-        | cr ^?! crType . beeAggro > 0 = red
+    col | cr ^?! crType . beeAggro > 0 = red
         | otherwise = yellow
-    f
-        | Mounted{} <- cr ^. crStance . carriage =
-            each . sfVs . each . _xy %~ scaleAlong (V2 0 1) (1 + g (modTo 1 (cr ^?! crType . beeSlime . to ((/ 100) . fromIntegral))))
+    f   | Mounted{} <- cr ^. crStance . carriage =
+            each.sfVs.each._y *~ g (modTo 1 $ cr ^?! crType . beeSlime . to ((/ 100) . fromIntegral))
         | otherwise = id
-    g x
-        | x > 0.5 = 1 - x
-        | otherwise = x
+    g x | x > 0.5 = 2 - x
+        | otherwise = 1 + x
 
 drawCrabCrit :: World -> Creature -> Shape
 drawCrabCrit w cr =
diff --git a/src/Dodge/Creature/State.hs b/src/Dodge/Creature/State.hs
index 8de3cef07..cec06936e 100644
--- a/src/Dodge/Creature/State.hs
+++ b/src/Dodge/Creature/State.hs
@@ -70,7 +70,7 @@ hivePainEffect cr w
     | otherwise = w
   where
     (a,g') = randomR (0,2*pi) $ w ^. randGen
-    (b,g) = runState randOnUnitSphere $ g'
+    (b,g) = runState randOnUnitSphere g'
     p = (crRad (cr ^. crType) + 5) *^ unitVectorAtAngle a
     v = 3 *^ b
 
diff --git a/src/Dodge/Creature/State/WalkCycle.hs b/src/Dodge/Creature/State/WalkCycle.hs
index df86daf2c..110721020 100644
--- a/src/Dodge/Creature/State/WalkCycle.hs
+++ b/src/Dodge/Creature/State/WalkCycle.hs
@@ -57,8 +57,10 @@ updateCarriage' cid cr w = \case
         mcr <- w ^? cWorld . lWorld . creatures . ix mid
         mp <- mcr ^? crPos
         d <- mcr ^? crType . slimeCompression
-        return $ w & tocr . crPos .~ mp + (p & _x *~ d & _y %~ (/d))
+        return $ w & tocr . crPos .~ mp + (oxyrot (mcr ^. crDir) 
+            (oxyrot (-mcr^.crDir) p & _x *~ d & _y %~ (/d)))
   where
+    oxyrot a = over _xy (rotateV a)
     tocr = cWorld . lWorld . creatures . ix cid
     oop = cr ^. crOldOldPos
     f v | norm v > 10 = 10 *^ signorm v
@@ -79,7 +81,6 @@ pushAgainst x y
     | a > 0 = y - project y x
     | otherwise = y
   where
-    -- project y x is the projection of x onto y
     a = dotV (normalize y) (project y x)
 
 walkCliffPush :: Creature -> [(Point2,Point2)] -> Point2
diff --git a/src/Dodge/Creature/Update.hs b/src/Dodge/Creature/Update.hs
index 574dfb46c..d6139712a 100644
--- a/src/Dodge/Creature/Update.hs
+++ b/src/Dodge/Creature/Update.hs
@@ -69,7 +69,7 @@ updateLivingCreature cr = case cr ^. crType of
     HoverCrit{} -> crUpdate cid . performActions cid . hoverCritHoverSound cr .
             updateHoverCrit cid
     SlinkCrit{} -> slinkCritUpdate cid
-    SlimeCrit{} -> slimeCritUpdate cid
+    SlimeCrit{} -> updateSlimeCrit cid
     BeeCrit{} -> crUpdate cid . performActions cid . updateBeeFromPheremones cr cid . updateBeeCrit cr cid
     HiveCrit{} -> crUpdate cid . performActions cid . updateHiveCrit cr cid
   where
@@ -196,7 +196,9 @@ updateCalmBee cr cid w
     , distance (cr ^. crPos . _xy) (tcr ^. crPos . _xy) < 0.8*crRad (tcr ^. crType) 
     , Just d <- tcr ^? crType . slimeCompression
         = w
-        & tocr . crStance . carriage .~ Mounted ti (cr ^. crPos - tcr ^. crPos & _x %~ (/d) & _y *~ d)
+        & tocr . crStance . carriage .~ Mounted ti 
+            (oxyrot (tcr^.crDir) 
+                (oxyrot (-tcr^.crDir) (cr ^. crPos - tcr ^. crPos) & _x %~ (/d) & _y *~ d))
         & tocr . crActionPlan . apAction .~ NoAction
     | Just (tcr,_) <- gettarg = w
             & tocr . crActionPlan . apAction .~ PathTo (tcr ^. crPos . _xy) NoAction
@@ -206,6 +208,7 @@ updateCalmBee cr cid w
         & tocr . crActionPlan . apStrategy . searchTimer %~ (max 0 . subtract 1)
     | otherwise = startsearch
   where
+    oxyrot a = over _xy (rotateV a)
     (sa,gsa) = runState (takeOne [0,1]) (w ^. randGen)
     starthivereturn = fromMaybe w $ do
         hcr <- gethive
@@ -242,8 +245,8 @@ updateCalmBee cr cid w
         r <- tcr ^? crType . slimeSlime . to slimeToRad
         return $ r > 12
 
-slimeCritUpdate :: Int -> World -> World
-slimeCritUpdate cid w 
+updateSlimeCrit :: Int -> World -> World
+updateSlimeCrit cid w 
     | r < 5 = w & cWorld . lWorld . creatures . at cid .~ Nothing
     | Just hitp <- w ^? cWorld . lWorld . creatures . ix cid . crDamage . ix 0 . dmPos
         , Just hitv <-  w ^? cWorld . lWorld . creatures . ix cid . crDamage . ix 0 . dmVector
@@ -341,9 +344,9 @@ splitSlimeCrit p v cr = do
     r = cr ^?! crType . slimeSlime . to slimeToRad
     cr' = cr & crDamage .~ []
         & crType . slimeSlimeChange .~ 0
-        & crType . slimeSplitTimer .~ Just (10, mempty)
+        & crType . slimeSplitTimer ?~ (10, mempty)
         & crType . slimeIsCompressing .~ False
-        & crType . slimeCompression .~ 1 -- rotateV (argV mvdir) (V2 r1 0)
+        & crType . slimeCompression .~ 1
     (ps,qs) = cutPoly (p-cxy) (p+v-cxy) $ slimeOutline cr & each %~ rotateV (cr ^. crDir)
     
 -- h is the height of the segment, ie r - distance to center
@@ -364,16 +367,10 @@ slinkCritUpdate cid w =
         *~ Q.axisAngle (V3 0 1 0) (pi / 1000)
 
 hoverCritHoverSound :: Creature -> World -> World
-hoverCritHoverSound cr w = fromMaybe w $ do
-    guard $ d < 100
-    return $
-        soundContinueVol
-            (0.5 * (1 - 0.01 * d))
-            (CrSound cid)
-            cxy
-            buzz1S
-            (Just 2)
-            w
+hoverCritHoverSound cr w
+    | d < 100 
+        = soundContinueVol (0.5 * (1 - 0.01 * d)) (CrSound cid) cxy buzz1S (Just 2) w
+    | otherwise = w
   where
     cxy = cr ^. crPos . _xy
     d = max 0 (dist (you w ^. crPos . _xy) cxy - 100)
diff --git a/src/Dodge/Update.hs b/src/Dodge/Update.hs
index c63f190f5..7e10e67cf 100644
--- a/src/Dodge/Update.hs
+++ b/src/Dodge/Update.hs
@@ -1058,7 +1058,7 @@ crCrSpring c1 c2
 slimeSuck :: Creature -> Creature -> World -> World
 slimeSuck c1 c2 = cWorld . lWorld . creatures %~ (rolap . rolap')
   where
-    suckx = (min 1 $ 2 * (1 - distance xy1 xy2 / (r1 + r2))) ^ (2:: Int)
+    suckx = min 1 (2 * (1 - distance xy1 xy2 / (r1 + r2))) ^ (2:: Int)
     rolap = ix id1 . crPos . _xy +~ f (suckx * 1.5 * m2 / (m1+m2)) *^ normalize (xy2 - xy1)
     rolap' = ix id2 . crPos . _xy +~ f (suckx * 1.5*m1 / (m1+m2)) *^ normalize (xy1 - xy2)
     f = min (distance xy1 xy2/2)
diff --git a/tags b/tags
index ef4e36cdf..dfd1cabb5 100644
--- a/tags
+++ b/tags
@@ -72,12 +72,12 @@ AttachType	src/Dodge/Data/Item/Combine.hs	92;"	t
 Attention	src/Dodge/Data/Creature/Perception.hs	58;"	t
 AttentiveTo	src/Dodge/Data/Creature/Perception.hs	59;"	C
 Audition	src/Dodge/Data/Creature/Perception.hs	45;"	t
-AutoCrit	src/Dodge/Data/Creature/Misc.hs	105;"	C
+AutoCrit	src/Dodge/Data/Creature/Misc.hs	101;"	C
 AutoTrigger	src/Dodge/Data/TriggerType.hs	8;"	C
-AvPosture	src/Dodge/Data/Creature/Misc.hs	112;"	C
-Avatar	src/Dodge/Data/Creature/Misc.hs	53;"	C
+AvPosture	src/Dodge/Data/Creature/Misc.hs	108;"	C
+Avatar	src/Dodge/Data/Creature/Misc.hs	49;"	C
 AvatarDestroyed	src/Dodge/Data/Creature.hs	66;"	C
-AvatarPosture	src/Dodge/Data/Creature/Misc.hs	112;"	t
+AvatarPosture	src/Dodge/Data/Creature/Misc.hs	108;"	t
 Awareness	src/Dodge/Data/Creature/Perception.hs	63;"	t
 BANGCONE	src/Dodge/Data/Item/Combine.hs	150;"	C
 BANGROD	src/Dodge/Data/Item/Combine.hs	159;"	C
@@ -104,10 +104,10 @@ BURSTRIFLE	src/Dodge/Data/Item/Combine.hs	158;"	C
 BackdropCurs	src/Dodge/Data/SelectionList.hs	23;"	C
 BackgroundSound	src/Dodge/Data/SoundOrigin.hs	13;"	C
 Bark	src/Dodge/Data/ActionPlan.hs	41;"	C
-BarrelCrit	src/Dodge/Data/Creature/Misc.hs	106;"	C
+BarrelCrit	src/Dodge/Data/Creature/Misc.hs	102;"	C
 BarrelHiss	src/Dodge/Data/SoundOrigin.hs	34;"	C
-BarrelType	src/Dodge/Data/Creature/Misc.hs	124;"	t
-Barreloid	src/Dodge/Data/Creature/Misc.hs	120;"	C
+BarrelType	src/Dodge/Data/Creature/Misc.hs	120;"	t
+Barreloid	src/Dodge/Data/Creature/Misc.hs	116;"	C
 BasicBeamDraw	src/Dodge/Data/Beam.hs	32;"	C
 BasicBulletTrajectory	src/Dodge/Data/Bullet.hs	42;"	C
 BasicBulletTrajectoryType	src/Dodge/Data/Bullet.hs	49;"	C
@@ -121,8 +121,8 @@ BeamSimple	src/Dodge/Data/Beam.hs	48;"	C
 BeamSplitterSF	src/Dodge/Data/ComposedItem.hs	50;"	C
 BeamType	src/Dodge/Data/Beam.hs	44;"	t
 BecomePowerful	src/Dodge/Data/Scenario.hs	9;"	C
-BeeCrit	src/Dodge/Data/Creature/Misc.hs	90;"	C
-BeeMvType	src/Dodge/Data/Creature/Misc.hs	39;"	C
+BeeCrit	src/Dodge/Data/Creature/Misc.hs	86;"	C
+BeeMvType	src/Dodge/Data/Creature/Misc.hs	35;"	C
 BeePheremone	src/Dodge/Data/Cloud.hs	47;"	t
 BeltBulletAmmo	src/Dodge/Data/AmmoType.hs	11;"	C
 BezierTrajectory	src/Dodge/Data/Bullet.hs	43;"	C
@@ -197,7 +197,6 @@ CamOpticScope	src/Dodge/Data/Camera.hs	13;"	C
 CamRemoteScope	src/Dodge/Data/Camera.hs	14;"	C
 Camera	src/Dodge/Data/Camera.hs	22;"	t
 CameraScrollTimeFlow	src/Dodge/Data/World.hs	75;"	C
-CamouflageStatus	src/Dodge/Data/CamouflageStatus.hs	5;"	t
 CapacitorBelow	src/Dodge/Data/Muzzle.hs	23;"	C
 CapacitorSF	src/Dodge/Data/ComposedItem.hs	44;"	C
 CapacitorSelf	src/Dodge/Data/Muzzle.hs	24;"	C
@@ -208,7 +207,7 @@ CardinalPointBetween	src/Dodge/Data/CardinalPoint.hs	20;"	t
 Carriage	src/Dodge/Data/Creature/Stance.hs	23;"	t
 ChangePosture	src/Dodge/Data/ActionPlan.hs	45;"	C
 ChangeStrategy	src/Dodge/Data/ActionPlan.hs	47;"	C
-ChaseCrit	src/Dodge/Data/Creature/Misc.hs	63;"	C
+ChaseCrit	src/Dodge/Data/Creature/Misc.hs	59;"	C
 ChaseCritters	src/Dodge/Data/Creature/State.hs	16;"	C
 ChasmObstacle	src/Dodge/Data/PathGraph.hs	51;"	C
 ChemFuel	src/Dodge/Data/Item/Use/Consumption/Ammo.hs	14;"	C
@@ -269,7 +268,7 @@ CrIsAnimate	src/Dodge/Data/CreatureEffect.hs	20;"	C
 CrIsCorpse	src/Dodge/Data/Creature.hs	65;"	C
 CrMeleeO	src/Dodge/Data/Damage.hs	32;"	C
 CrMouth	src/Dodge/Data/SoundOrigin.hs	17;"	C
-CrMvType	src/Dodge/Data/Creature/Misc.hs	25;"	t
+CrMvType	src/Dodge/Data/Creature/Misc.hs	21;"	t
 CrOpenAutoDoor	src/Dodge/Data/CreatureEffect.hs	21;"	C
 CrSound	src/Dodge/Data/SoundOrigin.hs	15;"	C
 CrTurnAround	src/Dodge/Data/CreatureEffect.hs	24;"	C
@@ -279,15 +278,15 @@ CrWeaponSound	src/Dodge/Data/SoundOrigin.hs	19;"	C
 CrWlID	src/Dodge/Data/CrWlID.hs	10;"	t
 Cr_awareness	src/Dodge/Data/Config.hs	85;"	C
 Cr_status	src/Dodge/Data/Config.hs	84;"	C
-CrabCrit	src/Dodge/Data/Creature/Misc.hs	67;"	C
+CrabCrit	src/Dodge/Data/Creature/Misc.hs	63;"	C
 CraftType	src/Dodge/Data/Item/Combine.hs	50;"	t
 Crawling	src/Dodge/Data/Creature/Stance.hs	25;"	C
 CreateFlame	src/Dodge/Data/Item/Use/Consumption/Ammo.hs	17;"	C
 CreatePoisonGas	src/Dodge/Data/Item/Use/Consumption/Ammo.hs	17;"	C
 Creature	src/Dodge/Data/Creature.hs	35;"	t
 CreaturePart	src/Dodge/Data/Wall/Structure.hs	16;"	C
-CreatureShape	src/Dodge/Data/Creature/Misc.hs	114;"	t
-CreatureType	src/Dodge/Data/Creature/Misc.hs	52;"	t
+CreatureShape	src/Dodge/Data/Creature/Misc.hs	110;"	t
+CreatureType	src/Dodge/Data/Creature/Misc.hs	48;"	t
 Crushing	src/Dodge/Data/Damage.hs	19;"	C
 CryoReleaseCloud	src/Dodge/Data/Cloud.hs	24;"	C
 CryostatisSS	src/Dodge/Data/Scenario.hs	91;"	C
@@ -406,7 +405,7 @@ Explosion	src/Dodge/Data/SoundOrigin.hs	39;"	C
 ExplosionPayload	src/Dodge/Data/Payload.hs	9;"	C
 Explosive	src/Dodge/Data/Damage.hs	25;"	C
 ExplosiveBall	src/Dodge/Data/EnergyBall/Type.hs	14;"	C
-ExplosiveBarrel	src/Dodge/Data/Creature/Misc.hs	126;"	C
+ExplosiveBarrel	src/Dodge/Data/Creature/Misc.hs	122;"	C
 ExplosivePutty	src/Dodge/Data/AmmoType.hs	16;"	C
 ExtraMenuOption	src/Dodge/Data/Universe.hs	76;"	t
 Eyes	src/Dodge/Data/Creature/Perception.hs	39;"	C
@@ -470,7 +469,6 @@ FromEdge	src/Dodge/Data/Room.hs	53;"	C
 FullRes	src/Dodge/Data/Config.hs	115;"	C
 FullShadowFidelity	src/Shape/Data.hs	20;"	C
 FullSize	src/Dodge/Data/Item/Params.hs	26;"	C
-FullyVisible	src/Dodge/Data/CamouflageStatus.hs	6;"	C
 FunctionChangeSF	src/Dodge/Data/ComposedItem.hs	35;"	C
 GBounce	src/Dodge/Data/Projectile.hs	48;"	C
 GEqC	src/SameConstr.hs	20;"	c
@@ -538,7 +536,7 @@ HeldItemType	src/Dodge/Data/Item/Combine.hs	141;"	t
 HeldPlatformSF	src/Dodge/Data/ComposedItem.hs	15;"	C
 HiddenGoal	src/Dodge/Data/Scenario.hs	14;"	C
 HighlightSI	src/Dodge/Data/SelectionList.hs	58;"	C
-HiveCrit	src/Dodge/Data/Creature/Misc.hs	99;"	C
+HiveCrit	src/Dodge/Data/Creature/Misc.hs	95;"	C
 HomeUsingRemoteScreen	src/Dodge/Data/Projectile.hs	43;"	C
 HomeUsingTargeting	src/Dodge/Data/Projectile.hs	44;"	C
 Hospital	src/Dodge/Data/Scenario.hs	69;"	C
@@ -560,9 +558,9 @@ HotkeyR	src/Dodge/Data/Equipment/Misc.hs	34;"	C
 HotkeyV	src/Dodge/Data/Equipment/Misc.hs	38;"	C
 HotkeyX	src/Dodge/Data/Equipment/Misc.hs	36;"	C
 HotkeyZ	src/Dodge/Data/Equipment/Misc.hs	35;"	C
-HoverCrit	src/Dodge/Data/Creature/Misc.hs	74;"	C
+HoverCrit	src/Dodge/Data/Creature/Misc.hs	70;"	C
 Huge	src/Shape/Data.hs	24;"	C
-Humanoid	src/Dodge/Data/Creature/Misc.hs	115;"	C
+Humanoid	src/Dodge/Data/Creature/Misc.hs	111;"	C
 IMSI	src/Dodge/Data/SelectionList.hs	41;"	t
 IMSS	src/Dodge/Data/SelectionList.hs	39;"	t
 INTROSCAN	src/Dodge/Data/Item/Combine.hs	32;"	C
@@ -608,7 +606,6 @@ InventoryHeadSI	src/Dodge/Data/SelectionList.hs	60;"	C
 InventoryPathing	src/Dodge/Data/Item/Combine.hs	39;"	t
 InventorySound	src/Dodge/Data/SoundOrigin.hs	11;"	C
 Investigate	src/Dodge/Data/ActionPlan.hs	143;"	C
-Invisible	src/Dodge/Data/CamouflageStatus.hs	7;"	C
 InwardShockwave	src/Dodge/Data/Shockwave.hs	13;"	C
 IsolationUnitSS	src/Dodge/Data/Scenario.hs	101;"	C
 ItCrWdItemHeldEffect	src/Dodge/Data/WorldEffect.hs	17;"	C
@@ -632,7 +629,7 @@ ItemUse	src/Dodge/Data/Item/Use.hs	28;"	t
 ItmInt	src/Dodge/Data/Item/Location.hs	25;"	t
 JOYSTICK	src/Dodge/Data/Item/Combine.hs	96;"	C
 JUMPLEGS	src/Dodge/Data/Item/Combine.hs	133;"	C
-JitMvType	src/Dodge/Data/Creature/Misc.hs	29;"	C
+JitMvType	src/Dodge/Data/Creature/Misc.hs	25;"	C
 JoystickSF	src/Dodge/Data/ComposedItem.hs	27;"	C
 Just'	src/MaybeHelp.hs	11;"	C
 JustStartedPlaying	src/Sound/Data.hs	22;"	C
@@ -651,7 +648,7 @@ LabLink	src/Dodge/Data/Room.hs	50;"	C
 LabSS	src/Dodge/Data/Scenario.hs	97;"	C
 LabelCluster	src/Dodge/Data/RoomCluster.hs	13;"	C
 Laboratory	src/Dodge/Data/Scenario.hs	61;"	C
-LampCrit	src/Dodge/Data/Creature/Misc.hs	107;"	C
+LampCrit	src/Dodge/Data/Creature/Misc.hs	103;"	C
 Large	src/Shape/Data.hs	25;"	C
 LasBeamCombine	src/Dodge/Data/Beam.hs	38;"	C
 LasGunFlare	src/Dodge/Data/Muzzle.hs	34;"	C
@@ -812,7 +809,7 @@ MuzzleUnsafeBlink	src/Dodge/Data/Muzzle.hs	56;"	C
 Muzzle_positions	src/Dodge/Data/Config.hs	110;"	C
 MvForward	src/Dodge/Data/ActionPlan.hs	36;"	C
 MvTurnToward	src/Dodge/Data/ActionPlan.hs	35;"	C
-MvWalking	src/Dodge/Data/Creature/Misc.hs	27;"	C
+MvWalking	src/Dodge/Data/Creature/Misc.hs	23;"	C
 NAILBOX	src/Dodge/Data/Item/Combine.hs	79;"	C
 NInt	src/NewInt.hs	16;"	C
 NIntMap	src/NewInt.hs	22;"	C
@@ -837,7 +834,7 @@ NoAmmoRequired	src/Dodge/Data/Muzzle.hs	25;"	C
 NoBeamCombine	src/Dodge/Data/Beam.hs	41;"	C
 NoConcurrentEffect	src/Loop/Data.hs	7;"	C
 NoCrImp	src/Dodge/Data/CreatureEffect.hs	9;"	C
-NoCreatureShape	src/Dodge/Data/Creature/Misc.hs	121;"	C
+NoCreatureShape	src/Dodge/Data/Creature/Misc.hs	117;"	C
 NoExtraMenuOption	src/Dodge/Data/Universe.hs	79;"	C
 NoFaction	src/Dodge/Data/Creature/State.hs	18;"	C
 NoFlare	src/Dodge/Data/Muzzle.hs	29;"	C
@@ -848,7 +845,7 @@ NoItemZone	src/Dodge/Data/Machine/Sensor.hs	31;"	C
 NoLightFlare	src/Dodge/Data/Muzzle.hs	31;"	C
 NoLighting	src/Dodge/Data/Config.hs	122;"	C
 NoMouseContext	src/Dodge/Data/Input.hs	14;"	C
-NoMvType	src/Dodge/Data/Creature/Misc.hs	26;"	C
+NoMvType	src/Dodge/Data/Creature/Misc.hs	22;"	C
 NoObjShads	src/Dodge/Data/Config.hs	120;"	C
 NoParams	src/Dodge/Data/Item/Params.hs	13;"	C
 NoRightButtonState	src/Dodge/Data/RightButtonOptions.hs	14;"	C
@@ -1007,7 +1004,7 @@ Piezoelectric	src/Dodge/Data/Material.hs	23;"	C
 Pitted	src/Dodge/Data/Creature.hs	75;"	C
 Placement	src/Dodge/Data/GenWorld.hs	113;"	t
 PlacementSpot	src/Dodge/Data/GenWorld.hs	97;"	t
-PlainBarrel	src/Dodge/Data/Creature/Misc.hs	125;"	C
+PlainBarrel	src/Dodge/Data/Creature/Misc.hs	121;"	C
 PlainDeath	src/Dodge/Data/Creature.hs	77;"	C
 PlantNurserySS	src/Dodge/Data/Scenario.hs	96;"	C
 PlasmaBall	src/Dodge/Data/PlasmaBall.hs	12;"	t
@@ -1045,12 +1042,12 @@ ProxSensor	src/Dodge/Data/Machine/Sensor.hs	24;"	C
 ProximityRequirement	src/Dodge/Data/Machine/Sensor.hs	33;"	t
 ProximitySensor	src/Dodge/Data/Machine/Sensor.hs	24;"	t
 ProximitySensorType	src/Dodge/Data/Machine/Sensor.hs	29;"	t
-Pulse	src/Dodge/Data/Creature/Misc.hs	46;"	t
+Pulse	src/Dodge/Data/Creature/Misc.hs	42;"	t
 PulseBall	src/Dodge/Data/PulseLaser.hs	22;"	t
 PulseBallSF	src/Dodge/Data/ComposedItem.hs	46;"	C
 PulseLaser	src/Dodge/Data/PulseLaser.hs	12;"	t
 PulseLaserSF	src/Dodge/Data/ComposedItem.hs	43;"	C
-PulseStatus	src/Dodge/Data/Creature/Misc.hs	46;"	C
+PulseStatus	src/Dodge/Data/Creature/Misc.hs	42;"	C
 PumpSF	src/Dodge/Data/ComposedItem.hs	49;"	C
 PushSource	src/Dodge/Data/Door.hs	23;"	t
 PushedBy	src/Dodge/Data/Door.hs	25;"	C
@@ -1244,9 +1241,9 @@ SixteenthRes	src/Dodge/Data/Config.hs	115;"	C
 Size	src/Shape/Data.hs	24;"	t
 SkiffBaySS	src/Dodge/Data/Scenario.hs	108;"	C
 SleepingQuatersSS	src/Dodge/Data/Scenario.hs	90;"	C
-SlimeCrit	src/Dodge/Data/Creature/Misc.hs	80;"	C
+SlimeCrit	src/Dodge/Data/Creature/Misc.hs	76;"	C
 SlimeIntelligence	src/Dodge/Data/ActionPlan.hs	16;"	C
-SlinkCrit	src/Dodge/Data/Creature/Misc.hs	75;"	C
+SlinkCrit	src/Dodge/Data/Creature/Misc.hs	71;"	C
 Small	src/Shape/Data.hs	27;"	C
 Smoke	src/Dodge/Data/Cloud.hs	22;"	C
 SmokeReducerSF	src/Dodge/Data/ComposedItem.hs	29;"	C
@@ -1285,7 +1282,7 @@ StabOrthReduce	src/Dodge/Projectile/Create.hs	17;"	C
 StabSpinIncrease	src/Dodge/Projectile/Create.hs	18;"	C
 Stance	src/Dodge/Data/Creature/Stance.hs	17;"	t
 StandaloneWall	src/Dodge/Data/Wall/Structure.hs	12;"	C
-StartStopMvType	src/Dodge/Data/Creature/Misc.hs	34;"	C
+StartStopMvType	src/Dodge/Data/Creature/Misc.hs	30;"	C
 StayInArea	src/Dodge/Data/Scenario.hs	13;"	C
 Stone	src/Dodge/Data/Material.hs	13;"	C
 StorageSS	src/Dodge/Data/Scenario.hs	94;"	C
@@ -1299,7 +1296,7 @@ Suspicious	src/Dodge/Data/Creature/Perception.hs	64;"	C
 Swallowed	src/Dodge/Data/Creature.hs	75;"	C
 SwapEquipment	src/Dodge/Data/RightButtonOptions.hs	24;"	C
 Swarm	src/Dodge/Data/Creature/State.hs	25;"	C
-SwarmCrit	src/Dodge/Data/Creature/Misc.hs	104;"	C
+SwarmCrit	src/Dodge/Data/Creature/Misc.hs	100;"	C
 TAPE	src/Dodge/Data/Item/Combine.hs	56;"	C
 TARGETING	src/Dodge/Data/Item/Combine.hs	21;"	C
 TCBase	src/Dodge/Data/Terminal.hs	49;"	C
@@ -1467,9 +1464,9 @@ Vigilance	src/Dodge/Data/Creature/Perception.hs	50;"	t
 Vigilant	src/Dodge/Data/Creature/Perception.hs	54;"	C
 Virus	src/Dodge/Data/Scenario.hs	25;"	C
 Vision	src/Dodge/Data/Creature/Perception.hs	39;"	t
-VocReady	src/Dodge/Data/Creature/Misc.hs	22;"	C
-VocTimer	src/Dodge/Data/Creature/Misc.hs	21;"	C
-Vocalization	src/Dodge/Data/Creature/Misc.hs	20;"	t
+VocReady	src/Dodge/Data/Creature/Misc.hs	18;"	C
+VocTimer	src/Dodge/Data/Creature/Misc.hs	17;"	C
+Vocalization	src/Dodge/Data/Creature/Misc.hs	16;"	t
 VolleyGunTrigger	src/Dodge/Data/TriggerType.hs	13;"	C
 VolleyUnfiredBarrels	src/Dodge/Data/Item/Params.hs	17;"	C
 WALLDETECTOR	src/Dodge/Data/Item/Combine.hs	186;"	C
@@ -1569,14 +1566,14 @@ _asDir	src/Dodge/Data/ArcStep.hs	14;"	f
 _asObject	src/Dodge/Data/ArcStep.hs	15;"	f
 _asPos	src/Dodge/Data/ArcStep.hs	13;"	f
 _auDist	src/Dodge/Data/Creature/Perception.hs	46;"	f
-_avDexterity	src/Dodge/Data/Creature/Misc.hs	57;"	f
-_avIntelligence	src/Dodge/Data/Creature/Misc.hs	58;"	f
-_avPosture	src/Dodge/Data/Creature/Misc.hs	59;"	f
-_avStrength	src/Dodge/Data/Creature/Misc.hs	56;"	f
-_avatarMaterial	src/Dodge/Data/Creature/Misc.hs	55;"	f
-_avatarPulse	src/Dodge/Data/Creature/Misc.hs	54;"	f
+_avDexterity	src/Dodge/Data/Creature/Misc.hs	53;"	f
+_avIntelligence	src/Dodge/Data/Creature/Misc.hs	54;"	f
+_avPosture	src/Dodge/Data/Creature/Misc.hs	55;"	f
+_avStrength	src/Dodge/Data/Creature/Misc.hs	52;"	f
+_avatarMaterial	src/Dodge/Data/Creature/Misc.hs	51;"	f
+_avatarPulse	src/Dodge/Data/Creature/Misc.hs	50;"	f
 _barrelShader	src/Data/Preload/Render.hs	27;"	f
-_barrelType	src/Dodge/Data/Creature/Misc.hs	106;"	f
+_barrelType	src/Dodge/Data/Creature/Misc.hs	102;"	f
 _bdColor	src/Dodge/Data/Prop.hs	23;"	f
 _bdMaxX	src/Dodge/Data/Bounds.hs	12;"	f
 _bdMaxY	src/Dodge/Data/Bounds.hs	14;"	f
@@ -1584,12 +1581,12 @@ _bdMinX	src/Dodge/Data/Bounds.hs	11;"	f
 _bdMinY	src/Dodge/Data/Bounds.hs	13;"	f
 _bdsTrigger	src/Dodge/Data/Button.hs	26;"	f
 _beamCombine	src/Dodge/Data/Beam.hs	46;"	f
-_beeAggro	src/Dodge/Data/Creature/Misc.hs	94;"	f
-_beeHive	src/Dodge/Data/Creature/Misc.hs	92;"	f
-_beeLifespan	src/Dodge/Data/Creature/Misc.hs	97;"	f
+_beeAggro	src/Dodge/Data/Creature/Misc.hs	90;"	f
+_beeHive	src/Dodge/Data/Creature/Misc.hs	88;"	f
+_beeLifespan	src/Dodge/Data/Creature/Misc.hs	93;"	f
 _beePheremones	src/Dodge/Data/LWorld.hs	99;"	f
-_beeRandomMovement	src/Dodge/Data/Creature/Misc.hs	96;"	f
-_beeSlime	src/Dodge/Data/Creature/Misc.hs	91;"	f
+_beeRandomMovement	src/Dodge/Data/Creature/Misc.hs	92;"	f
+_beeSlime	src/Dodge/Data/Creature/Misc.hs	87;"	f
 _blDir	src/Dodge/Data/Block.hs	27;"	f
 _blDraw	src/Dodge/Data/Block.hs	29;"	f
 _blFootprint	src/Dodge/Data/Block.hs	25;"	f
@@ -1808,7 +1805,7 @@ _doReplicateAction	src/Dodge/Data/ActionPlan.hs	115;"	f
 _doReplicateAction	src/Dodge/Data/ActionPlan.hs	120;"	f
 _doReplicateTimes	src/Dodge/Data/ActionPlan.hs	114;"	f
 _doReplicateTimes	src/Dodge/Data/ActionPlan.hs	119;"	f
-_dodgeCooldown	src/Dodge/Data/Creature/Misc.hs	70;"	f
+_dodgeCooldown	src/Dodge/Data/Creature/Misc.hs	66;"	f
 _doors	src/Dodge/Data/LWorld.hs	125;"	f
 _drFootPrint	src/Dodge/Data/Door.hs	37;"	f
 _drHP	src/Dodge/Data/Door.hs	38;"	f
@@ -1868,8 +1865,8 @@ _flboStride	src/Shader/Data.hs	88;"	f
 _floorItems	src/Dodge/Data/LWorld.hs	132;"	f
 _floorShader	src/Data/Preload/Render.hs	46;"	f
 _floorVBO	src/Data/Preload/Render.hs	45;"	f
+_footForward	src/Dodge/Data/Creature/Misc.hs	56;"	f
 _footForward	src/Dodge/Data/Creature/Misc.hs	60;"	f
-_footForward	src/Dodge/Data/Creature/Misc.hs	64;"	f
 _foreShapes	src/Dodge/Data/LWorld.hs	137;"	f
 _fsDir	src/Dodge/Data/ForegroundShape.hs	14;"	f
 _fsPos	src/Dodge/Data/ForegroundShape.hs	13;"	f
@@ -1925,9 +1922,9 @@ _harvestTarget	src/Dodge/Data/ActionPlan.hs	153;"	f
 _heldPos	src/Dodge/Data/Input.hs	43;"	f
 _heldWorldPos	src/Dodge/Data/Input.hs	45;"	f
 _highlightItems	src/Dodge/Data/CWorld.hs	36;"	f
-_hiveChildren	src/Dodge/Data/Creature/Misc.hs	100;"	f
-_hiveGestation	src/Dodge/Data/Creature/Misc.hs	101;"	f
-_hiveSlime	src/Dodge/Data/Creature/Misc.hs	102;"	f
+_hiveChildren	src/Dodge/Data/Creature/Misc.hs	96;"	f
+_hiveGestation	src/Dodge/Data/Creature/Misc.hs	97;"	f
+_hiveSlime	src/Dodge/Data/Creature/Misc.hs	98;"	f
 _hotkeys	src/Dodge/Data/LWorld.hs	146;"	f
 _hud	src/Dodge/Data/World.hs	47;"	f
 _ibtAmmoMag	src/Dodge/Data/Item/Combine.hs	20;"	f
@@ -1986,14 +1983,14 @@ _itsRangeInt	src/Dodge/Data/Item.hs	41;"	f
 _killTarget	src/Dodge/Data/ActionPlan.hs	160;"	f
 _lAimPos	src/Dodge/Data/LWorld.hs	148;"	f
 _lClock	src/Dodge/Data/LWorld.hs	143;"	f
-_lFootPos	src/Dodge/Data/Creature/Misc.hs	71;"	f
+_lFootPos	src/Dodge/Data/Creature/Misc.hs	67;"	f
 _lInvLock	src/Dodge/Data/LWorld.hs	149;"	f
 _lTestInt	src/Dodge/Data/LWorld.hs	145;"	f
 _lTestString	src/Dodge/Data/LWorld.hs	144;"	f
 _lWorld	src/Dodge/Data/CWorld.hs	24;"	f
-_lampColor	src/Dodge/Data/Creature/Misc.hs	107;"	f
-_lampHeight	src/Dodge/Data/Creature/Misc.hs	107;"	f
-_lampLSID	src/Dodge/Data/Creature/Misc.hs	107;"	f
+_lampColor	src/Dodge/Data/Creature/Misc.hs	103;"	f
+_lampHeight	src/Dodge/Data/Creature/Misc.hs	103;"	f
+_lampLSID	src/Dodge/Data/Creature/Misc.hs	103;"	f
 _lasWepXSF	src/Dodge/Data/ComposedItem.hs	42;"	f
 _laserEmmiter	src/Dodge/Data/Laser.hs	17;"	f
 _laserTypeDamage	src/Dodge/Data/Laser.hs	16;"	f
@@ -2083,11 +2080,11 @@ _mdPoint3	src/Dodge/Data/Modification.hs	18;"	f
 _mdTimer	src/Dodge/Data/Modification.hs	17;"	f
 _mdUpdate	src/Dodge/Data/Modification.hs	16;"	f
 _mdUpdate	src/Dodge/Data/Modification.hs	25;"	f
-_meleeCooldown	src/Dodge/Data/Creature/Misc.hs	63;"	f
-_meleeCooldown	src/Dodge/Data/Creature/Misc.hs	74;"	f
-_meleeCooldown	src/Dodge/Data/Creature/Misc.hs	95;"	f
-_meleeCooldownL	src/Dodge/Data/Creature/Misc.hs	68;"	f
-_meleeCooldownR	src/Dodge/Data/Creature/Misc.hs	69;"	f
+_meleeCooldown	src/Dodge/Data/Creature/Misc.hs	59;"	f
+_meleeCooldown	src/Dodge/Data/Creature/Misc.hs	70;"	f
+_meleeCooldown	src/Dodge/Data/Creature/Misc.hs	91;"	f
+_meleeCooldownL	src/Dodge/Data/Creature/Misc.hs	64;"	f
+_meleeCooldownR	src/Dodge/Data/Creature/Misc.hs	65;"	f
 _meleeTarget	src/Dodge/Data/ActionPlan.hs	147;"	f
 _mgField	src/Dodge/Data/Magnet.hs	23;"	f
 _mgPos	src/Dodge/Data/Magnet.hs	22;"	f
@@ -2110,17 +2107,17 @@ _mtBranches	src/Dodge/Data/MetaTree.hs	13;"	f
 _mtLabel	src/Dodge/Data/MetaTree.hs	13;"	f
 _mtTree	src/Dodge/Data/MetaTree.hs	13;"	f
 _musicData	src/Data/Preload.hs	13;"	f
-_mvPulseTime	src/Dodge/Data/Creature/Misc.hs	37;"	f
-_mvPulseTime	src/Dodge/Data/Creature/Misc.hs	42;"	f
-_mvSpeed	src/Dodge/Data/Creature/Misc.hs	27;"	f
-_mvSpeed	src/Dodge/Data/Creature/Misc.hs	30;"	f
-_mvSpeed	src/Dodge/Data/Creature/Misc.hs	35;"	f
-_mvSpeed	src/Dodge/Data/Creature/Misc.hs	40;"	f
+_mvPulseTime	src/Dodge/Data/Creature/Misc.hs	33;"	f
+_mvPulseTime	src/Dodge/Data/Creature/Misc.hs	38;"	f
+_mvSpeed	src/Dodge/Data/Creature/Misc.hs	23;"	f
+_mvSpeed	src/Dodge/Data/Creature/Misc.hs	26;"	f
+_mvSpeed	src/Dodge/Data/Creature/Misc.hs	31;"	f
+_mvSpeed	src/Dodge/Data/Creature/Misc.hs	36;"	f
 _mvToPoint	src/Dodge/Data/Creature.hs	81;"	f
-_mvTurnJit	src/Dodge/Data/Creature/Misc.hs	32;"	f
-_mvTurnRad	src/Dodge/Data/Creature/Misc.hs	31;"	f
-_mvTurnSpeed	src/Dodge/Data/Creature/Misc.hs	36;"	f
-_mvTurnSpeed	src/Dodge/Data/Creature/Misc.hs	41;"	f
+_mvTurnJit	src/Dodge/Data/Creature/Misc.hs	28;"	f
+_mvTurnRad	src/Dodge/Data/Creature/Misc.hs	27;"	f
+_mvTurnSpeed	src/Dodge/Data/Creature/Misc.hs	32;"	f
+_mvTurnSpeed	src/Dodge/Data/Creature/Misc.hs	37;"	f
 _mzAmmoSlot	src/Dodge/Data/Muzzle.hs	13;"	f
 _mzEffect	src/Dodge/Data/Muzzle.hs	15;"	f
 _mzFlareType	src/Dodge/Data/Muzzle.hs	14;"	f
@@ -2164,7 +2161,7 @@ _phTargetingID	src/Dodge/Data/Projectile.hs	44;"	f
 _pickUpLevel	src/Dodge/Layout/Generate.hs	15;"	f
 _pickUps	src/Dodge/Layout/Generate.hs	16;"	f
 _pictureShaders	src/Data/Preload/Render.hs	31;"	f
-_piercedPoints	src/Dodge/Data/Creature/Misc.hs	126;"	f
+_piercedPoints	src/Dodge/Data/Creature/Misc.hs	122;"	f
 _pjBarrelSpin	src/Dodge/Data/Projectile.hs	24;"	f
 _pjDetonatorID	src/Dodge/Data/Projectile.hs	26;"	f
 _pjDir	src/Dodge/Data/Projectile.hs	19;"	f
@@ -2211,8 +2208,8 @@ _psSelect	src/Dodge/Data/GenWorld.hs	101;"	f
 _pullWallShader	src/Data/Preload/Render.hs	22;"	f
 _pulseBalls	src/Dodge/Data/LWorld.hs	120;"	f
 _pulseLasers	src/Dodge/Data/LWorld.hs	119;"	f
-_pulseProgress	src/Dodge/Data/Creature/Misc.hs	48;"	f
-_pulseRate	src/Dodge/Data/Creature/Misc.hs	47;"	f
+_pulseProgress	src/Dodge/Data/Creature/Misc.hs	44;"	f
+_pulseRate	src/Dodge/Data/Creature/Misc.hs	43;"	f
 _putBlock	src/Dodge/Data/GenWorld.hs	43;"	f
 _putButton	src/Dodge/Data/GenWorld.hs	39;"	f
 _putChasmChasms	src/Dodge/Data/GenWorld.hs	60;"	f
@@ -2246,7 +2243,7 @@ _pzbPos	src/Dodge/Data/PulseLaser.hs	24;"	f
 _pzbTimer	src/Dodge/Data/PulseLaser.hs	25;"	f
 _pzbVel	src/Dodge/Data/PulseLaser.hs	23;"	f
 _rCommands	src/Dodge/Terminal.hs	165;"	f
-_rFootPos	src/Dodge/Data/Creature/Misc.hs	72;"	f
+_rFootPos	src/Dodge/Data/Creature/Misc.hs	68;"	f
 _radarBlips	src/Dodge/Data/LWorld.hs	112;"	f
 _radarSweeps	src/Dodge/Data/LWorld.hs	108;"	f
 _randGen	src/Dodge/Data/World.hs	40;"	f
@@ -2379,20 +2376,20 @@ _skOldPos	src/Dodge/Data/Spark.hs	14;"	f
 _skPos	src/Dodge/Data/Spark.hs	13;"	f
 _skType	src/Dodge/Data/Spark.hs	15;"	f
 _skVel	src/Dodge/Data/Spark.hs	12;"	f
-_skinHead	src/Dodge/Data/Creature/Misc.hs	116;"	f
-_skinLower	src/Dodge/Data/Creature/Misc.hs	118;"	f
-_skinUpper	src/Dodge/Data/Creature/Misc.hs	117;"	f
+_skinHead	src/Dodge/Data/Creature/Misc.hs	112;"	f
+_skinLower	src/Dodge/Data/Creature/Misc.hs	114;"	f
+_skinUpper	src/Dodge/Data/Creature/Misc.hs	113;"	f
 _slInt	src/Dodge/Data/HUD.hs	39;"	f
 _slSec	src/Dodge/Data/HUD.hs	39;"	f
 _slSet	src/Dodge/Data/HUD.hs	39;"	f
-_slimeCompression	src/Dodge/Data/Creature/Misc.hs	86;"	f
-_slimeEngulfProgress	src/Dodge/Data/Creature/Misc.hs	88;"	f
-_slimeIsCompressing	src/Dodge/Data/Creature/Misc.hs	87;"	f
-_slimeSlime	src/Dodge/Data/Creature/Misc.hs	81;"	f
-_slimeSlimeChange	src/Dodge/Data/Creature/Misc.hs	82;"	f
-_slimeSplitTimer	src/Dodge/Data/Creature/Misc.hs	85;"	f
-_slinkHeadPos	src/Dodge/Data/Creature/Misc.hs	78;"	f
-_slinkSpine	src/Dodge/Data/Creature/Misc.hs	77;"	f
+_slimeCompression	src/Dodge/Data/Creature/Misc.hs	82;"	f
+_slimeEngulfProgress	src/Dodge/Data/Creature/Misc.hs	84;"	f
+_slimeIsCompressing	src/Dodge/Data/Creature/Misc.hs	83;"	f
+_slimeSlime	src/Dodge/Data/Creature/Misc.hs	77;"	f
+_slimeSlimeChange	src/Dodge/Data/Creature/Misc.hs	78;"	f
+_slimeSplitTimer	src/Dodge/Data/Creature/Misc.hs	81;"	f
+_slinkHeadPos	src/Dodge/Data/Creature/Misc.hs	74;"	f
+_slinkSpine	src/Dodge/Data/Creature/Misc.hs	73;"	f
 _smoothScrollAmount	src/Dodge/Data/Input.hs	41;"	f
 _soundAngDist	src/Sound/Data.hs	47;"	f
 _soundChannel	src/Sound/Data.hs	46;"	f
@@ -2416,10 +2413,10 @@ _ssShownItems	src/Dodge/Data/SelectionList.hs	34;"	f
 _ssShownLength	src/Dodge/Data/SelectionList.hs	35;"	f
 _ssboName	src/Shader/Data.hs	97;"	f
 _ssboPtr	src/Shader/Data.hs	98;"	f
-_startStopMv	src/Dodge/Data/Creature/Misc.hs	93;"	f
+_startStopMv	src/Dodge/Data/Creature/Misc.hs	89;"	f
 _strategyInt	src/Dodge/Data/ActionPlan.hs	154;"	f
+_strideAmount	src/Dodge/Data/Creature/Misc.hs	57;"	f
 _strideAmount	src/Dodge/Data/Creature/Misc.hs	61;"	f
-_strideAmount	src/Dodge/Data/Creature/Misc.hs	65;"	f
 _stuckCrID	src/Dodge/Data/Projectile.hs	50;"	f
 _stuckCrOffset	src/Dodge/Data/Projectile.hs	50;"	f
 _stuckCrRot	src/Dodge/Data/Projectile.hs	50;"	f
@@ -2552,8 +2549,8 @@ _vboName	src/Shader/Data.hs	80;"	f
 _vboPtr	src/Shader/Data.hs	81;"	f
 _vboShapes	src/Data/Preload/Render.hs	44;"	f
 _vboVertexBytes	src/Shader/Data.hs	82;"	f
-_vcMaxTime	src/Dodge/Data/Creature/Misc.hs	21;"	f
-_vcTime	src/Dodge/Data/Creature/Misc.hs	21;"	f
+_vcMaxTime	src/Dodge/Data/Creature/Misc.hs	17;"	f
+_vcTime	src/Dodge/Data/Creature/Misc.hs	17;"	f
 _vertices	src/Polyhedra/Data.hs	22;"	f
 _viDist	src/Dodge/Data/Creature/Perception.hs	41;"	f
 _viFOV	src/Dodge/Data/Creature/Perception.hs	40;"	f
@@ -2724,7 +2721,7 @@ argV	src/Geometry/Vector.hs	89;"	f
 armourChaseCrit	src/Dodge/Creature/ArmourChase.hs	34;"	f
 armouredChasers	src/Dodge/Room/Boss.hs	58;"	f
 armouredCorridor	src/Dodge/Room/RoadBlock.hs	20;"	f
-arms	src/Dodge/Creature/Picture.hs	354;"	f
+arms	src/Dodge/Creature/Picture.hs	385;"	f
 arrow	src/Picture/Composite.hs	19;"	f
 arrowPath	src/Picture/Composite.hs	8;"	f
 assignHotkey	src/Dodge/AssignHotkey.hs	9;"	f
@@ -2767,7 +2764,7 @@ bangS	src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs	890;"	f
 bangStick	src/Dodge/Item/Held/Stick.hs	15;"	f
 barPP	src/Dodge/Room/Foreground.hs	231;"	f
 barrel	src/Dodge/Creature/Inanimate.hs	17;"	f
-barrelShape	src/Dodge/Creature/Picture.hs	405;"	f
+barrelShape	src/Dodge/Creature/Picture.hs	437;"	f
 baseAMRShape	src/Dodge/Item/Draw/SPic.hs	411;"	f
 baseBlockPane	src/Dodge/Placement/Instance/Wall.hs	76;"	f
 baseCI	src/Dodge/Item/Grammar.hs	167;"	f
@@ -2776,21 +2773,21 @@ baseItemTriggerType	src/Dodge/BaseTriggerType.hs	21;"	f
 baseRifleShape	src/Dodge/Item/Draw/SPic.hs	325;"	f
 baseRodShape	src/Dodge/Item/Draw/SPic.hs	408;"	f
 baseSMGShape	src/Dodge/Item/Draw/SPic.hs	396;"	f
-baseShoulder	src/Dodge/Creature/Picture.hs	392;"	f
+baseShoulder	src/Dodge/Creature/Picture.hs	424;"	f
 baseStickShape	src/Dodge/Item/Draw/SPic.hs	302;"	f
 baseStickShapeX	src/Dodge/Item/Draw/SPic.hs	294;"	f
 baseStickSpread	src/Dodge/HeldUse.hs	346;"	f
 basicAttentionUpdate	src/Dodge/Creature/Perception.hs	138;"	f
 basicAwarenessUpdate	src/Dodge/Creature/Perception.hs	31;"	f
-basicCrPict	src/Dodge/Creature/Picture.hs	77;"	f
-basicCrShape	src/Dodge/Creature/Picture.hs	83;"	f
+basicCrPict	src/Dodge/Creature/Picture.hs	74;"	f
+basicCrShape	src/Dodge/Creature/Picture.hs	77;"	f
 basicItemDisplay	src/Dodge/Item/Display.hs	23;"	f
 basicMachineApplyDamage	src/Dodge/Machine/Damage.hs	6;"	f
 basicMuzFlare	src/Dodge/HeldUse.hs	731;"	f
 battery	src/Dodge/Item/Ammo.hs	60;"	f
 batteryPack	src/Dodge/Item/Equipment.hs	38;"	f
 beeCrit	src/Dodge/Creature/ChaseCrit.hs	90;"	f
-beeLifespanCheck	src/Dodge/Creature/Update.hs	120;"	f
+beeLifespanCheck	src/Dodge/Creature/Update.hs	116;"	f
 beep3QuickS	src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs	710;"	f
 beltMag	src/Dodge/Item/Ammo.hs	38;"	f
 bgateCalc	src/Dodge/Inventory/SelectionList.hs	131;"	f
@@ -2901,10 +2898,10 @@ changeSwapWith	src/Dodge/Inventory.hs	283;"	f
 charToTuple	src/Picture/Base.hs	312;"	f
 charToTupleGrad	src/Picture/Text.hs	18;"	f
 chartreuse	src/Color.hs	51;"	f
-chaseCorpse	src/Dodge/Creature/Picture.hs	303;"	f
+chaseCorpse	src/Dodge/Creature/Picture.hs	323;"	f
 chaseCrit	src/Dodge/Creature/ChaseCrit.hs	35;"	f
 chaseCritMv	src/Dodge/Creature/ReaderUpdate.hs	193;"	f
-chaseUpperBody	src/Dodge/Creature/Picture.hs	180;"	f
+chaseUpperBody	src/Dodge/Creature/Picture.hs	188;"	f
 chasmRotate	src/Dodge/Creature/State/WalkCycle.hs	148;"	f
 chasmSimpleMaze	src/Dodge/Room/Tutorial.hs	417;"	f
 chasmSpitTerminal	src/Dodge/Room/Tutorial.hs	348;"	f
@@ -2912,8 +2909,8 @@ chasmTestCliffPush	src/Dodge/Creature/State/WalkCycle.hs	125;"	f
 chasmWallToSurface	src/Dodge/Base/Collide.hs	133;"	f
 checkCombineSelectionExists	src/Dodge/DisplayInventory.hs	100;"	f
 checkConnection	src/Dodge/Inventory/Swap.hs	66;"	f
-checkDeath	src/Dodge/Creature/Update.hs	411;"	f
-checkDeath'	src/Dodge/Creature/Update.hs	414;"	f
+checkDeath	src/Dodge/Creature/Update.hs	396;"	f
+checkDeath'	src/Dodge/Creature/Update.hs	399;"	f
 checkEndGame	src/Dodge/Update.hs	890;"	f
 checkErrorGL	src/Shader/Compile.hs	86;"	f
 checkFBO	src/Framebuffer/Check.hs	6;"	f
@@ -3040,7 +3037,7 @@ copierItemUpdate	src/Dodge/Creature/State.hs	159;"	f
 copyItemToFloor	src/Dodge/FloorItem.hs	14;"	f
 corDoor	src/Dodge/Room/Room.hs	411;"	f
 cornerList	src/Preload/Render.hs	236;"	f
-corpseOrGib	src/Dodge/Creature/Update.hs	460;"	f
+corpseOrGib	src/Dodge/Creature/Update.hs	443;"	f
 corridor	src/Dodge/Room/Corridor.hs	17;"	f
 corridorBoss	src/Dodge/LockAndKey.hs	135;"	f
 corridorN	src/Dodge/Room/Corridor.hs	58;"	f
@@ -3048,11 +3045,10 @@ corridorWallN	src/Dodge/Room/Corridor.hs	77;"	f
 crAdd	src/Dodge/Room/RezBox.hs	116;"	f
 crAwayFromPost	src/Dodge/Creature/Test.hs	82;"	f
 crBlips	src/Dodge/RadarSweep.hs	88;"	f
-crCamouflage	src/Dodge/Creature/Picture.hs	80;"	f
 crCanSeeCr	src/Dodge/Creature/Test.hs	49;"	f
 crCrSpring	src/Dodge/Update.hs	1011;"	f
 crCurrentEquipment	src/Dodge/Creature/Statistics.hs	68;"	f
-crDeathEffects	src/Dodge/Creature/Update.hs	435;"	f
+crDeathEffects	src/Dodge/Creature/Update.hs	418;"	f
 crDeathSounds	src/Dodge/Creature/Vocalization.hs	40;"	f
 crDexterity	src/Dodge/Creature/Statistics.hs	19;"	f
 crDisplayAwareness	src/Dodge/Creature/Picture/Awareness.hs	39;"	f
@@ -3093,7 +3089,7 @@ crShape	src/Dodge/Creature/Shape.hs	8;"	f
 crSpring	src/Dodge/Update.hs	999;"	f
 crStratConMatches	src/Dodge/Creature/Test.hs	77;"	f
 crStrength	src/Dodge/Creature/Statistics.hs	30;"	f
-crUpdate	src/Dodge/Creature/Update.hs	404;"	f
+crUpdate	src/Dodge/Creature/Update.hs	389;"	f
 crUpdateInvidLocations	src/Dodge/Inventory/Location.hs	67;"	f
 crUpdateItemLocations	src/Dodge/Inventory/Location.hs	49;"	f
 crVocalResetTime	src/Dodge/Creature/Vocalization.hs	69;"	f
@@ -3104,12 +3100,12 @@ crWlPbHit	src/Dodge/WorldEvent/ThingsHit.hs	71;"	f
 crWlPbHitZ	src/Dodge/WorldEvent/ThingsHit.hs	81;"	f
 crZoneSize	src/Dodge/Zoning/Creature.hs	43;"	f
 crabActionUpdate	src/Dodge/Creature/ReaderUpdate.hs	123;"	f
-crabCorpse	src/Dodge/Creature/Picture.hs	322;"	f
+crabCorpse	src/Dodge/Creature/Picture.hs	345;"	f
 crabCrit	src/Dodge/Creature/ChaseCrit.hs	42;"	f
 crabCritInternal	src/Dodge/Humanoid.hs	25;"	f
-crabFeet	src/Dodge/Creature/Picture.hs	232;"	f
+crabFeet	src/Dodge/Creature/Picture.hs	247;"	f
 crabRoom	src/Dodge/Room/Tutorial.hs	471;"	f
-crabUpperBody	src/Dodge/Creature/Picture.hs	156;"	f
+crabUpperBody	src/Dodge/Creature/Picture.hs	159;"	f
 craftInfo	src/Dodge/Item/Info.hs	168;"	f
 craftItemSPic	src/Dodge/Item/Draw/SPic.hs	41;"	f
 crankSlowS	src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs	642;"	f
@@ -3178,7 +3174,6 @@ damThingHitWith	src/Dodge/Damage.hs	73;"	f
 damToExpBarrel	src/Dodge/Barreloid.hs	52;"	f
 damageBlock	src/Dodge/Wall/Damage.hs	121;"	f
 damageCodeCommand	src/Dodge/Terminal.hs	67;"	f
-damageCorpse	src/Dodge/Creature/Update.hs	59;"	f
 damageCrWl	src/Dodge/Damage.hs	29;"	f
 damageCrWlID	src/Dodge/Damage.hs	23;"	f
 damageCrystal	src/Dodge/Material/Damage.hs	286;"	f
@@ -3211,10 +3206,10 @@ deZoneIX	src/Dodge/Zoning/Base.hs	91;"	f
 deZoneWall	src/Dodge/Zoning/Wall.hs	69;"	f
 deadEndPSType	src/Dodge/Room/Room.hs	264;"	f
 deadEndRoom	src/Dodge/Room/Room.hs	267;"	f
-deadFeet	src/Dodge/Creature/Picture.hs	350;"	f
-deadRot	src/Dodge/Creature/Picture.hs	368;"	f
-deadScalp	src/Dodge/Creature/Picture.hs	363;"	f
-deadUpperBody	src/Dodge/Creature/Picture.hs	389;"	f
+deadFeet	src/Dodge/Creature/Picture.hs	381;"	f
+deadRot	src/Dodge/Creature/Picture.hs	399;"	f
+deadScalp	src/Dodge/Creature/Picture.hs	394;"	f
+deadUpperBody	src/Dodge/Creature/Picture.hs	421;"	f
 debrisS	src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs	778;"	f
 debrisSPic	src/Dodge/Prop/Draw.hs	17;"	f
 debrisSize	src/Dodge/Block/Debris.hs	131;"	f
@@ -3397,7 +3392,7 @@ doRoomShift	src/Dodge/Room/Link.hs	34;"	f
 doScopeZoom	src/Dodge/Update/Scroll.hs	89;"	f
 doSectionSize	src/Dodge/DisplayInventory.hs	215;"	f
 doSideEffects	appDodge/Main.hs	118;"	f
-doSlimeRadChange	src/Dodge/Creature/Update.hs	305;"	f
+doSlimeRadChange	src/Dodge/Creature/Update.hs	294;"	f
 doTabComplete	src/Dodge/Terminal.hs	241;"	f
 doTestDrawing	src/Dodge/Render.hs	40;"	f
 doTextInputOver	src/Dodge/Update/Input/Text.hs	15;"	f
@@ -3430,14 +3425,14 @@ drawAllShadows	src/Dodge/Shadows.hs	5;"	f
 drawAnySelectionBox	src/Dodge/Render/Picture.hs	132;"	f
 drawArrowDown	src/Dodge/Render/Picture.hs	225;"	f
 drawBaseMachine	src/Dodge/Machine/Draw.hs	70;"	f
-drawBeeCrit	src/Dodge/Creature/Picture.hs	123;"	f
+drawBeeCrit	src/Dodge/Creature/Picture.hs	120;"	f
 drawBlip	src/Dodge/RadarBlip.hs	16;"	f
 drawBlock	src/Dodge/Render/ShapePicture.hs	81;"	f
 drawBoundingBox	src/Dodge/Debug/Picture.hs	368;"	f
 drawBullet	src/Dodge/Render/ShapePicture.hs	156;"	f
 drawButton	src/Dodge/Button/Draw.hs	11;"	f
 drawCPUShadows	src/Dodge/Render/Shadow.hs	19;"	f
-drawChaseCrit	src/Dodge/Creature/Picture.hs	147;"	f
+drawChaseCrit	src/Dodge/Creature/Picture.hs	149;"	f
 drawCircCollisionTest	src/Dodge/Debug/Picture.hs	118;"	f
 drawCliff	src/Dodge/Render/ShapePicture.hs	87;"	f
 drawCollisionTest	src/Dodge/Debug/Picture.hs	103;"	f
@@ -3448,8 +3443,8 @@ drawCoord	src/Dodge/Debug/Picture.hs	396;"	f
 drawCountMod	src/Render.hs	231;"	f
 drawCrInfo	src/Dodge/Debug.hs	230;"	f
 drawCrInfo'	src/Dodge/Debug.hs	225;"	f
-drawCrabCrit	src/Dodge/Creature/Picture.hs	139;"	f
-drawCreature	src/Dodge/Creature/Picture.hs	38;"	f
+drawCrabCrit	src/Dodge/Creature/Picture.hs	140;"	f
+drawCreature	src/Dodge/Creature/Picture.hs	35;"	f
 drawCreatureDisplayTexts	src/Dodge/Debug/Picture.hs	199;"	f
 drawCreatureRad	src/Dodge/Debug.hs	314;"	f
 drawCross	src/Dodge/Render/Label.hs	25;"	f
@@ -3468,7 +3463,7 @@ drawDragSelecting	src/Dodge/Render/HUD.hs	162;"	f
 drawDumbSwitch	src/Dodge/Button/Draw.hs	31;"	f
 drawEmptySet	src/Dodge/Render/Picture.hs	153;"	f
 drawEnergyBall	src/Dodge/EnergyBall/Draw.hs	7;"	f
-drawEquipment	src/Dodge/Creature/Picture.hs	401;"	f
+drawEquipment	src/Dodge/Creature/Picture.hs	433;"	f
 drawExamineInventory	src/Dodge/Render/HUD.hs	199;"	f
 drawExplosiveBall	src/Dodge/EnergyBall/Draw.hs	15;"	f
 drawFarWallDetect	src/Dodge/Debug/Picture.hs	271;"	f
@@ -3478,8 +3473,8 @@ drawForceField	src/Dodge/Wall/Draw.hs	15;"	f
 drawGapPlus	src/Dodge/Render/Picture.hs	284;"	f
 drawGib	src/Dodge/Prop/Draw.hs	31;"	f
 drawHUD	src/Dodge/Render/HUD.hs	53;"	f
-drawHive	src/Dodge/Creature/Picture.hs	120;"	f
-drawHoverCrit	src/Dodge/Creature/Picture.hs	110;"	f
+drawHive	src/Dodge/Creature/Picture.hs	117;"	f
+drawHoverCrit	src/Dodge/Creature/Picture.hs	104;"	f
 drawInputMenu	src/Dodge/Render/MenuScreen.hs	33;"	f
 drawInspectWall	src/Dodge/Debug/Picture.hs	256;"	f
 drawInspectWalls	src/Dodge/Debug/Picture.hs	244;"	f
@@ -3532,8 +3527,8 @@ drawShaderLay	src/Render.hs	218;"	f
 drawShadowsByImportance	src/Dodge/Shadows.hs	8;"	f
 drawShell	src/Dodge/Projectile/Draw.hs	22;"	f
 drawShockwave	src/Dodge/Shockwave/Draw.hs	6;"	f
-drawSlimeCrit	src/Dodge/Creature/Picture.hs	60;"	f
-drawSlinkCrit	src/Dodge/Creature/Picture.hs	98;"	f
+drawSlimeCrit	src/Dodge/Creature/Picture.hs	57;"	f
+drawSlinkCrit	src/Dodge/Creature/Picture.hs	90;"	f
 drawSpark	src/Dodge/Spark/Draw.hs	7;"	f
 drawStaticBall	src/Dodge/EnergyBall/Draw.hs	28;"	f
 drawSubInventory	src/Dodge/Render/HUD.hs	173;"	f
@@ -3561,7 +3556,7 @@ drawZone	src/Dodge/Debug/Picture.hs	152;"	f
 drawZoneCirc	src/Dodge/Debug/Picture.hs	293;"	f
 drawZoneCol	src/Dodge/Debug/Picture.hs	149;"	f
 drawZoneNearPointCursor	src/Dodge/Debug/Picture.hs	286;"	f
-dropAll	src/Dodge/Creature/Update.hs	498;"	f
+dropAll	src/Dodge/Creature/Update.hs	481;"	f
 dropInventoryPath	src/Dodge/HeldUse.hs	1380;"	f
 dropItem	src/Dodge/Creature/Action.hs	180;"	f
 dropper	src/Dodge/Item/Scope.hs	82;"	f
@@ -3652,7 +3647,7 @@ facesToVF	src/Polyhedra/Geodesic.hs	70;"	f
 farWallDistDirection	src/Dodge/Update/Camera.hs	245;"	f
 fdiv	src/ShortShow.hs	41;"	f
 feedSlime	src/Dodge/Update.hs	1082;"	f
-feet	src/Dodge/Creature/Picture.hs	218;"	f
+feet	src/Dodge/Creature/Picture.hs	233;"	f
 filter3	src/FoldableHelp.hs	76;"	f
 filterSectionsPair	src/Dodge/DisplayInventory.hs	160;"	f
 findBlips	src/Dodge/RadarSweep.hs	63;"	f
@@ -3908,7 +3903,7 @@ hotkeyToChar	src/Dodge/Inventory/SelectionList.hs	201;"	f
 hotkeyToScancode	src/Dodge/Creature/YourControl.hs	62;"	f
 hotkeyToString	src/Dodge/Inventory/SelectionList.hs	198;"	f
 hoverCrit	src/Dodge/Creature/ChaseCrit.hs	81;"	f
-hoverCritHoverSound	src/Dodge/Creature/Update.hs	381;"	f
+hoverCritHoverSound	src/Dodge/Creature/Update.hs	366;"	f
 hoverCritMv	src/Dodge/Creature/ReaderUpdate.hs	228;"	f
 hoverDeathSounds	src/Dodge/Creature/Vocalization.hs	62;"	f
 hoverPainEffect	src/Dodge/Creature/State.hs	57;"	f
@@ -4114,7 +4109,7 @@ lConnectCol	src/Dodge/Render/Connectors.hs	46;"	f
 lConnectMulti	src/Dodge/Render/Connectors.hs	51;"	f
 lShape	src/Dodge/Placement/Instance/LightSource.hs	61;"	f
 lamp	src/Dodge/Creature/Lamp.hs	18;"	f
-lampCrSPic	src/Dodge/Creature/Picture.hs	410;"	f
+lampCrSPic	src/Dodge/Creature/Picture.hs	442;"	f
 lasCenRunClose'	src/Dodge/Room/LasTurret.hs	308;"	f
 lasCenRunClose1	src/Dodge/Room/LasTurret.hs	397;"	f
 lasCenRunClose2	src/Dodge/Room/LasTurret.hs	470;"	f
@@ -4241,7 +4236,7 @@ makeButton	src/Dodge/LevelGen/Switch.hs	16;"	f
 makeCloudAt	src/Dodge/WorldEvent/Cloud.hs	7;"	f
 makeColorTermLine	src/Dodge/Terminal.hs	124;"	f
 makeColorTermPara	src/Dodge/Terminal.hs	121;"	f
-makeCorpse	src/Dodge/Creature/Picture.hs	284;"	f
+makeCorpse	src/Dodge/Creature/Picture.hs	304;"	f
 makeCrGibs	src/Dodge/Prop/Gib.hs	19;"	f
 makeDebris	src/Dodge/Block/Debris.hs	75;"	f
 makeDebrisDirected	src/Dodge/Block/Debris.hs	101;"	f
@@ -4490,7 +4485,7 @@ oldMachineBootS	src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs	684;"	f
 onEquipWristShield	src/Dodge/Euse.hs	89;"	f
 onRemoveWristShield	src/Dodge/Euse.hs	79;"	f
 oneH	src/Dodge/Creature/Test.hs	91;"	f
-oneSmooth	src/Dodge/Creature/Picture.hs	215;"	f
+oneSmooth	src/Dodge/Creature/Picture.hs	230;"	f
 openConsole	src/Dodge/Update.hs	140;"	f
 optionMenu	src/Dodge/Menu.hs	110;"	f
 optionScreenDefaultEffect	src/Dodge/Update/Input/ScreenLayer.hs	62;"	f
@@ -4611,7 +4606,7 @@ pointerToItemID	src/Dodge/Item/Location.hs	42;"	f
 pointerYourRootItem	src/Dodge/Item/Location.hs	33;"	f
 pointerYourSelectedItem	src/Dodge/Item/Location.hs	26;"	f
 pointsToPoly	src/Geometry/ConvexPoly.hs	37;"	f
-poisonSPic	src/Dodge/Creature/Update.hs	494;"	f
+poisonSPic	src/Dodge/Creature/Update.hs	477;"	f
 poisonSprayer	src/Dodge/Item/Held/SprayGuns.hs	17;"	f
 poke34	src/Shader/Poke.hs	518;"	f
 pokeArrayOff	src/Shader/Poke.hs	530;"	f
@@ -4980,14 +4975,14 @@ sawtoothFailS	src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs	852;"	f
 scToTS	src/Dodge/Event/Input.hs	34;"	f
 scale	src/Picture/Base.hs	141;"	f
 scale3	src/Picture/Base.hs	137;"	f
-scaleAlong	src/Dodge/Creature/Picture.hs	73;"	f
+scaleAlong	src/Dodge/Creature/Picture.hs	71;"	f
 scaleMat	src/MatrixHelper.hs	71;"	f
 scaleMatrix	src/MatrixHelper.hs	68;"	f
 scaleSH	src/Shape.hs	271;"	f
-scalp	src/Dodge/Creature/Picture.hs	377;"	f
+scalp	src/Dodge/Creature/Picture.hs	408;"	f
 scancodeToHotkey	src/Dodge/Creature/YourControl.hs	82;"	f
 scodeToChar	src/Dodge/ScodeToChar.hs	6;"	f
-scorchSPic	src/Dodge/Creature/Update.hs	491;"	f
+scorchSPic	src/Dodge/Creature/Update.hs	474;"	f
 screenBox	src/Dodge/Base/Window.hs	54;"	f
 screenPolygon	src/Dodge/Base/Window.hs	18;"	f
 screenPolygonBord	src/Dodge/Base/Window.hs	28;"	f
@@ -5015,7 +5010,7 @@ sectionsSizes	src/Dodge/DisplayInventory.hs	205;"	f
 seedStartMenu	src/Dodge/Menu.hs	85;"	f
 seedStartOptions	src/Dodge/Menu.hs	88;"	f
 segOnCirc	src/Geometry.hs	113;"	f
-segmentArea	src/Dodge/Creature/Update.hs	362;"	f
+segmentArea	src/Dodge/Creature/Update.hs	350;"	f
 selNumPos	src/Dodge/Render/HUD.hs	475;"	f
 selNumPosCardinal	src/Dodge/Render/HUD.hs	492;"	f
 selSecDrawCursor	src/Dodge/Render/List.hs	101;"	f
@@ -5062,7 +5057,7 @@ setSelWhileDragging	src/Dodge/Update/Input/InGame.hs	360;"	f
 setSelectionListRestriction	src/Dodge/Update/Input/ScreenLayer.hs	93;"	f
 setShaderSource	src/Shader/Compile.hs	121;"	f
 setShadowLimits	src/Dodge/Shadows.hs	11;"	f
-setSlimeDir	src/Dodge/Creature/Update.hs	288;"	f
+setSlimeDir	src/Dodge/Creature/Update.hs	279;"	f
 setSoundVolume	src/Sound.hs	159;"	f
 setTile	src/Dodge/Layout.hs	78;"	f
 setTiles	src/Dodge/Layout.hs	68;"	f
@@ -5184,14 +5179,14 @@ slapS	src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs	718;"	f
 slideDoorS	src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs	676;"	f
 slideWindow	src/ListHelp.hs	81;"	f
 slimeCrit	src/Dodge/Creature/ChaseCrit.hs	68;"	f
-slimeCritUpdate	src/Dodge/Creature/Update.hs	253;"	f
+slimeCritUpdate	src/Dodge/Creature/Update.hs	245;"	f
 slimeEatSound	src/Dodge/Update.hs	1116;"	f
 slimeFood	src/Dodge/Update.hs	1074;"	f
 slimeOutline	src/Dodge/Creature/Slime.hs	9;"	f
 slimeSuck	src/Dodge/Update.hs	1058;"	f
-slimeToRad	src/Dodge/Data/Creature/Misc.hs	109;"	f
+slimeToRad	src/Dodge/Data/Creature/Misc.hs	105;"	f
 slinkCrit	src/Dodge/Creature/ChaseCrit.hs	56;"	f
-slinkCritUpdate	src/Dodge/Creature/Update.hs	365;"	f
+slinkCritUpdate	src/Dodge/Creature/Update.hs	353;"	f
 slowCrush90	src/Dodge/Room/LongDoor.hs	263;"	f
 slowCrushRoom	src/Dodge/Room/LongDoor.hs	148;"	f
 slowDoorRoom	src/Dodge/Room/LongDoor.hs	309;"	f
@@ -5251,15 +5246,15 @@ spawnAt	src/Dodge/SpawnAt.hs	14;"	f
 spawnerCrit	src/Dodge/Creature.hs	47;"	f
 spawnerRoom	src/Dodge/Room/Room.hs	390;"	f
 speedLegs	src/Dodge/Item/Equipment.hs	74;"	f
-spiderJoint	src/Dodge/Creature/Picture.hs	266;"	f
+spiderJoint	src/Dodge/Creature/Picture.hs	285;"	f
 splashMenu	src/Dodge/Menu.hs	31;"	f
 splashMenuOptions	src/Dodge/Menu.hs	36;"	f
 splashScreen	src/Dodge/Initialisation.hs	10;"	f
 splitBezierquad	src/Geometry/Bezier.hs	15;"	f
 splitExtra	src/Justify.hs	21;"	f
 splitLookupTrie	src/SimpleTrie.hs	39;"	f
-splitSlimeCrit	src/Dodge/Creature/Update.hs	322;"	f
-splitSlimeCrit'	src/Dodge/Creature/Update.hs	312;"	f
+splitSlimeCrit	src/Dodge/Creature/Update.hs	311;"	f
+splitSlimeCrit'	src/Dodge/Creature/Update.hs	301;"	f
 splitTrunk	src/TreeHelp.hs	181;"	f
 splitTrunkAt	src/TreeHelp.hs	169;"	f
 spreadAroundCenter	src/Dodge/Base.hs	173;"	f
@@ -5297,7 +5292,7 @@ stackText	src/Picture/Base.hs	180;"	f
 stackedInventory	src/Dodge/Creature.hs	318;"	f
 startCr	src/Dodge/Creature.hs	83;"	f
 startCrafts	src/Dodge/Room/Start.hs	94;"	f
-startDeathTimer	src/Dodge/Creature/Update.hs	447;"	f
+startDeathTimer	src/Dodge/Creature/Update.hs	430;"	f
 startDrag	src/Dodge/Update/Input/InGame.hs	319;"	f
 startInvList	src/Dodge/Creature.hs	97;"	f
 startInventory	src/Dodge/Creature.hs	100;"	f
@@ -5449,7 +5444,7 @@ toBinary	src/Dodge/Inventory/SelectionList.hs	154;"	f
 toBothLnk	src/Dodge/RoomLink.hs	136;"	f
 toClosestMultiple	src/HelpNum.hs	3;"	f
 toColor8	src/Color.hs	158;"	f
-toDeathCarriage	src/Dodge/Creature/Update.hs	453;"	f
+toDeathCarriage	src/Dodge/Creature/Update.hs	436;"	f
 toFloatVAs	src/Shader/Compile.hs	66;"	f
 toLabel	src/Dodge/Cleat.hs	16;"	f
 toMultiset	src/Multiset.hs	64;"	f
@@ -5477,7 +5472,7 @@ topTestPart	src/Dodge/TestString.hs	122;"	f
 torchShape	src/Dodge/Item/Draw/SPic.hs	278;"	f
 torqueAmount	src/Dodge/HeldUse.hs	606;"	f
 torqueCr	src/Dodge/WorldEffect.hs	85;"	f
-torso	src/Dodge/Creature/Picture.hs	382;"	f
+torso	src/Dodge/Creature/Picture.hs	414;"	f
 tractCr	src/Dodge/TractorBeam/Update.hs	28;"	f
 tractFlIt	src/Dodge/TractorBeam/Update.hs	23;"	f
 tractorBeamAt	src/Dodge/HeldUse.hs	851;"	f
@@ -5583,7 +5578,7 @@ unusedOffPathAwayFromLink	src/Dodge/PlacementSpot.hs	133;"	f
 unusedSpotAwayFromInLink	src/Dodge/PlacementSpot.hs	139;"	f
 unusedSpotAwayFromLink	src/Dodge/PlacementSpot.hs	121;"	f
 unusedSpotNearInLink	src/Dodge/PlacementSpot.hs	203;"	f
-updateAggroBee	src/Dodge/Creature/Update.hs	129;"	f
+updateAggroBee	src/Dodge/Creature/Update.hs	125;"	f
 updateAimPos	src/Dodge/Update.hs	400;"	f
 updateAllNodes	src/TreeHelp.hs	88;"	f
 updateArc	src/Dodge/Tesla.hs	44;"	f
@@ -5591,14 +5586,14 @@ updateBackspaceRegex	src/Dodge/Update/Input/InGame.hs	488;"	f
 updateBarrel	src/Dodge/Barreloid.hs	43;"	f
 updateBarreloid	src/Dodge/Barreloid.hs	16;"	f
 updateBaseWheelEvent	src/Dodge/Update/Scroll.hs	30;"	f
-updateBeeCrit	src/Dodge/Creature/Update.hs	115;"	f
-updateBeeFromPheremones	src/Dodge/Creature/Update.hs	108;"	f
+updateBeeCrit	src/Dodge/Creature/Update.hs	111;"	f
+updateBeeFromPheremones	src/Dodge/Creature/Update.hs	103;"	f
 updateBeePheremone	src/Dodge/Update.hs	786;"	f
 updateBounds	src/Dodge/Update/Camera.hs	262;"	f
 updateBulVel	src/Dodge/Bullet.hs	57;"	f
 updateBullet	src/Dodge/Bullet.hs	22;"	f
 updateBullets	src/Dodge/Update.hs	672;"	f
-updateCalmBee	src/Dodge/Creature/Update.hs	170;"	f
+updateCalmBee	src/Dodge/Creature/Update.hs	166;"	f
 updateCamera	src/Dodge/Update/Camera.hs	33;"	f
 updateCarriage	src/Dodge/Creature/State/WalkCycle.hs	22;"	f
 updateCarriage'	src/Dodge/Creature/State/WalkCycle.hs	27;"	f
@@ -5608,7 +5603,7 @@ updateCloud	src/Dodge/Update.hs	919;"	f
 updateClouds	src/Dodge/Update.hs	783;"	f
 updateCombinePositioning	src/Dodge/DisplayInventory.hs	40;"	f
 updateCombineSections	src/Dodge/DisplayInventory.hs	47;"	f
-updateCreature	src/Dodge/Creature/Update.hs	48;"	f
+updateCreature	src/Dodge/Creature/Update.hs	46;"	f
 updateCreatureGroups	src/Dodge/Update.hs	644;"	f
 updateCreatureSoundPositions	src/Dodge/Update.hs	623;"	f
 updateCreatureStride	src/Dodge/Update.hs	379;"	f
@@ -5639,7 +5634,7 @@ updateFunctionKey	src/Dodge/Update/Input/InGame.hs	372;"	f
 updateFunctionKeys	src/Dodge/Update/Input/InGame.hs	368;"	f
 updateGas	src/Dodge/Update.hs	941;"	f
 updateGusts	src/Dodge/Update.hs	903;"	f
-updateHiveCrit	src/Dodge/Creature/Update.hs	83;"	f
+updateHiveCrit	src/Dodge/Creature/Update.hs	78;"	f
 updateHoverCrit	src/Dodge/Humanoid.hs	39;"	f
 updateIMl	src/Dodge/Update.hs	638;"	f
 updateIMl'	src/Dodge/Update.hs	641;"	f
@@ -5658,7 +5653,7 @@ updateLaser	src/Dodge/Laser/Update.hs	12;"	f
 updateLasers	src/Dodge/Update.hs	516;"	f
 updateLeftParentSF	src/Dodge/Item/Grammar.hs	179;"	f
 updateLinearShockwave	src/Dodge/LinearShockwave/Update.hs	8;"	f
-updateLivingCreature	src/Dodge/Creature/Update.hs	62;"	f
+updateLivingCreature	src/Dodge/Creature/Update.hs	57;"	f
 updateLongPressInGame	src/Dodge/Update/Input/InGame.hs	451;"	f
 updateMachine	src/Dodge/Machine/Update.hs	24;"	f
 updateMagnets	src/Dodge/Update.hs	408;"	f
@@ -5675,7 +5670,7 @@ updatePlasmaBall	src/Dodge/Update.hs	530;"	f
 updatePlasmaBalls	src/Dodge/Update.hs	679;"	f
 updatePreload	src/Preload/Update.hs	21;"	f
 updateProjectile	src/Dodge/Projectile/Update.hs	26;"	f
-updatePulse	src/Dodge/Creature/Update.hs	506;"	f
+updatePulse	src/Dodge/Creature/Update.hs	484;"	f
 updatePulseBall	src/Dodge/Update.hs	550;"	f
 updatePulseLaser	src/Dodge/Update.hs	726;"	f
 updatePulseLasers	src/Dodge/Update.hs	525;"	f
@@ -5717,7 +5712,7 @@ updateWheelEvent	src/Dodge/Update/Scroll.hs	21;"	f
 updateWheelEvents	src/Dodge/Update.hs	495;"	f
 updateWorldEventFlag	src/Dodge/Update.hs	129;"	f
 updateWorldEventFlags	src/Dodge/Update.hs	117;"	f
-upperBody	src/Dodge/Creature/Picture.hs	397;"	f
+upperBody	src/Dodge/Creature/Picture.hs	429;"	f
 upperBox	src/Shape.hs	149;"	f
 upperBoxHalf	src/Shape.hs	224;"	f
 upperBoxMT	src/Shape.hs	140;"	f