equal
deleted
inserted
replaced
7253 HHGear:= nil; |
7253 HHGear:= nil; |
7254 |
7254 |
7255 if CheckGearDrowning(Gear) then |
7255 if CheckGearDrowning(Gear) then |
7256 exit; |
7256 exit; |
7257 |
7257 |
7258 if TestCollisionY(Gear, 1) = 0 then |
7258 if TestCollisionYwithGear(Gear, 1) = 0 then |
7259 begin |
7259 begin |
7260 doStepFallingGear(Gear); |
7260 doStepFallingGear(Gear); |
7261 if Gear^.Tag <> sentry_Idle then |
7261 if Gear^.Tag <> sentry_Idle then |
7262 begin |
7262 begin |
7263 Gear^.Timer := 0; |
7263 Gear^.Timer := 0; |