zero allmovement in collision direction

This commit is contained in:
nek0 2021-01-20 05:20:56 +01:00
parent a1af74be74
commit f9ff9d1db2

View file

@ -162,5 +162,13 @@ instance Collidible Pituicat where
if dirx /= 0
then V2 0 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
}
)