equal
deleted
inserted
replaced
179 Gear^.State:= (Gear^.State or gstMoving) and (not gstLoser); |
179 Gear^.State:= (Gear^.State or gstMoving) and (not gstLoser); |
180 if Gear^.Kind = gtKnife then Gear^.State:= Gear^.State and (not gstCollision); |
180 if Gear^.Kind = gtKnife then Gear^.State:= Gear^.State and (not gstCollision); |
181 if (Gear^.Kind = gtHedgehog) and (Gear^.Hedgehog^.Effects[heInvulnerable] = 0) then |
181 if (Gear^.Kind = gtHedgehog) and (Gear^.Hedgehog^.Effects[heInvulnerable] = 0) then |
182 Gear^.State:= (Gear^.State or gstMoving) and (not gstWinner); |
182 Gear^.State:= (Gear^.State or gstMoving) and (not gstWinner); |
183 Gear^.Active:= true; |
183 Gear^.Active:= true; |
184 if Gear^.Kind <> gtFlame then FollowGear:= Gear |
184 if Gear^.Kind <> gtFlame then FollowGear:= Gear; |
|
185 if Gear^.Kind = gtAirMine then |
|
186 begin |
|
187 Gear^.Tag:= 1; |
|
188 Gear^.FlightTime:= 5000; |
|
189 end |
185 end; |
190 end; |
186 if ((Mask and EXPLPoisoned) <> 0) and (Gear^.Kind = gtHedgehog) and |
191 if ((Mask and EXPLPoisoned) <> 0) and (Gear^.Kind = gtHedgehog) and |
187 (Gear^.Hedgehog^.Effects[heInvulnerable] = 0) and (Gear^.Hedgehog^.Effects[heFrozen] = 0) and |
192 (Gear^.Hedgehog^.Effects[heInvulnerable] = 0) and (Gear^.Hedgehog^.Effects[heFrozen] = 0) and |
188 (Gear^.State and gstHHDeath = 0) then |
193 (Gear^.State and gstHHDeath = 0) then |
189 begin |
194 begin |