diff --git a/src/Types/Player.hs b/src/Types/Player.hs index 31a2521..21ec06d 100644 --- a/src/Types/Player.hs +++ b/src/Types/Player.hs @@ -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 } )