zero allmovement in collision direction

This commit is contained in:
nek0 2021-01-20 05:20:56 +01:00
parent 87b2b2ad05
commit de22c2fffe

View file

@ -166,5 +166,13 @@ instance Collidible Pituicat where
if dirx /= 0 if dirx /= 0
then V2 0 1 then V2 0 1
else V2 1 1 else V2 1 1
, pcTMoveVel = pcTMoveVel ncat *
if dirx /= 0
then V2 0 1
else V2 1 1
, pcVel = pcVel ncat *
if dirx /= 0
then V2 0 1
else V2 1 1
} }
) )