Work on slime crits

2026-04-13 19:54:11 +01:00
parent 8a57aa2f2c
commit b8bec2c830
14 changed files with 294 additions and 260 deletions
@@ -58,6 +58,7 @@ drawSlimeCrit cr = colorSH green $ upperPrismPolyHalf Medium Typical r $ polyCir
    & each %~ scaleAlong d s
    & each %~ scaleAlong (vNormal d) (1 / s)
    & each %~ rotateV (-cr ^. crDir)
+    & each %~ (((r-cr^?!crType.slimeRadWobble)/r) *^)
  where
    r = cr ^?! crType . slimeRad
    p = cr ^?! crType . slimeCompression