hedgewars/uGears.pas
changeset 13350 e54d6db06f35
parent 13324 78f097923bcb
child 13574 7d2e2a5d4bff
equal deleted inserted replaced
13349:4f9108f82879 13350:e54d6db06f35
   535 
   535 
   536                     if (Gear <> nil) then
   536                     if (Gear <> nil) then
   537                         begin
   537                         begin
   538                         if (GameFlags and gfInvulnerable) = 0 then
   538                         if (GameFlags and gfInvulnerable) = 0 then
   539                             Gear^.Hedgehog^.Effects[heInvulnerable]:= 0;
   539                             Gear^.Hedgehog^.Effects[heInvulnerable]:= 0;
       
   540                         if (Gear^.Hedgehog^.Effects[heArtillery] = 2) then
       
   541                             Gear^.Hedgehog^.Effects[heArtillery]:= 0;
   540                         end;
   542                         end;
   541                     end;
   543                     end;
   542     t:= GearsList;
   544     t:= GearsList;
   543     while t <> nil do
   545     while t <> nil do
   544         begin
   546         begin