equal
deleted
inserted
replaced
135 if not Gear^.Invulnerable then |
135 if not Gear^.Invulnerable then |
136 Gear^.State:= (Gear^.State or gstMoving) and (not gstWinner); |
136 Gear^.State:= (Gear^.State or gstMoving) and (not gstWinner); |
137 Gear^.Active:= true; |
137 Gear^.Active:= true; |
138 if Gear^.Kind <> gtFlame then FollowGear:= Gear |
138 if Gear^.Kind <> gtFlame then FollowGear:= Gear |
139 end; |
139 end; |
140 if ((Mask and EXPLPoisoned) <> 0) and (Gear^.Kind = gtHedgehog) and (not Gear^.Invulnerable) then |
140 if ((Mask and EXPLPoisoned) <> 0) and (Gear^.Kind = gtHedgehog) and (not Gear^.Invulnerable) and ((Gear^.State and gstHHDeath) = 0) then |
141 Gear^.Hedgehog^.Effects[hePoisoned] := 1; |
141 Gear^.Hedgehog^.Effects[hePoisoned] := 1; |
142 end; |
142 end; |
143 |
143 |
144 end; |
144 end; |
145 gtGrave: begin |
145 gtGrave: begin |