equal
deleted
inserted
replaced
171 Gear^.dY:= Gear^.dY + SignAs(_0_005 * dmg + cHHKick, tdY)/(Gear^.Density/_3); |
171 Gear^.dY:= Gear^.dY + SignAs(_0_005 * dmg + cHHKick, tdY)/(Gear^.Density/_3); |
172 |
172 |
173 Gear^.State:= (Gear^.State or gstMoving) and (not gstLoser); |
173 Gear^.State:= (Gear^.State or gstMoving) and (not gstLoser); |
174 if Gear^.Kind = gtKnife then Gear^.State:= Gear^.State and (not gstCollision); |
174 if Gear^.Kind = gtKnife then Gear^.State:= Gear^.State and (not gstCollision); |
175 if (Gear^.Kind = gtHedgehog) and (Gear^.Hedgehog^.Effects[heInvulnerable] = 0) then |
175 if (Gear^.Kind = gtHedgehog) and (Gear^.Hedgehog^.Effects[heInvulnerable] = 0) then |
176 Gear^.State:= (Gear^.State or gstMoving) and (not (gstWinner or gstHHJumping or gstHHHJump)); |
176 begin |
|
177 Gear^.State:= (Gear^.State or gstMoving) and (not (gstHHJumping or gstHHHJump)); |
|
178 if (not GameOver) then |
|
179 Gear^.State:= (Gear^.State and (not gstWinner)); |
|
180 end; |
177 Gear^.Active:= true; |
181 Gear^.Active:= true; |
178 if Gear^.Kind <> gtFlame then FollowGear:= Gear; |
182 if Gear^.Kind <> gtFlame then FollowGear:= Gear; |
179 if Gear^.Kind = gtAirMine then |
183 if Gear^.Kind = gtAirMine then |
180 begin |
184 begin |
181 Gear^.Tag:= 1; |
185 Gear^.Tag:= 1; |