Delete some reified action/impulse stuff

2025-10-15 20:37:22 +01:00
parent 4d12d6cf2b
commit fe95bf381b
5 changed files with 5 additions and 58 deletions
@@ -130,7 +130,6 @@ performAction cr w ac = case ac of
        tcr <- w ^? cWorld . lWorld . creatures . ix i
        return $ ([TurnTo (tcr ^. crPos . _xy +.+ rotateV (_crDir tcr) p)], Nothing)
    UseSelf f -> performAction cr w $ doCrAc f cr
-    UseAheadPos f -> performAction cr w (doP2Ac f (cr ^. crPos . _xy +.+ 20 *.* unitVectorAtAngle (_crDir cr)))
    UseMvTargetPos f -> performAction cr w $ doMP2Ac f $ _mvToPoint $ _crIntention cr
    ArbitraryAction f -> performAction cr w (doCrWdAc f cr w)
    DoImpulsesAlongside sideImp mainAc -> case performAction cr w mainAc of