equal
deleted
inserted
replaced
496 tt := tt - _2; |
496 tt := tt - _2; |
497 end; |
497 end; |
498 end; |
498 end; |
499 |
499 |
500 if Gear^.Elasticity < _20 then Gear^.CollisionMask:= lfLandMask |
500 if Gear^.Elasticity < _20 then Gear^.CollisionMask:= lfLandMask |
501 else Gear^.CollisionMask:= lfNotObjMask or lfNotHHObjMask; |
501 else Gear^.CollisionMask:= lfNotCurrentMask; //lfNotObjMask or lfNotHHObjMask; |
502 CheckCollision(Gear); |
502 CheckCollision(Gear); |
503 |
503 |
504 if (Gear^.State and gstCollision) <> 0 then |
504 if (Gear^.State and gstCollision) <> 0 then |
505 if Gear^.Elasticity < _10 then |
505 if Gear^.Elasticity < _10 then |
506 Gear^.Elasticity := _10000 |
506 Gear^.Elasticity := _10000 |