hedgewars/uGearsList.pas
changeset 11174 22d8835beb4d
parent 11173 1b386b9e1be0
child 11175 546e75fdb879
equal deleted inserted replaced
11173:1b386b9e1be0 11174:22d8835beb4d
   464                 if gear^.Timer = 0 then gear^.Timer:= 3000;
   464                 if gear^.Timer = 0 then gear^.Timer:= 3000;
   465                 gear^.Radius:= 15;
   465                 gear^.Radius:= 15;
   466                 gear^.Tag:= Y
   466                 gear^.Tag:= Y
   467                 end;
   467                 end;
   468    gtAirAttack: begin
   468    gtAirAttack: begin
   469                 gear^.Health:= 6;
   469                 gear^.Health:= 12;
       
   470                 gear^.Damage:= 30;
   470                 gear^.Z:= cHHZ+2;
   471                 gear^.Z:= cHHZ+2;
   471                 gear^.Tint:= gear^.Hedgehog^.Team^.Clan^.Color shl 8 or $FF
   472                 gear^.Tint:= gear^.Hedgehog^.Team^.Clan^.Color shl 8 or $FF
   472                 end;
   473                 end;
   473      gtAirBomb: begin
   474      gtAirBomb: begin
   474                 gear^.AdvBounce:= 1;
   475                 gear^.AdvBounce:= 1;