zero allmovement in collision direction
This commit is contained in:
parent
a1af74be74
commit
f9ff9d1db2
1 changed files with 8 additions and 0 deletions
|
@ -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
|
||||
}
|
||||
)
|
||||
|
|
Loading…
Reference in a new issue