hedgewars/uGearsList.pas
changeset 11171 546e75fdb879
parent 11170 22d8835beb4d
child 11203 2f4d0a387a02
equal deleted inserted replaced
11170:22d8835beb4d 11171:546e75fdb879
   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:= 12;
   469                 gear^.Health:= 6;
   470                 gear^.Damage:= 30;
   470                 gear^.Damage:= 30;
   471                 gear^.Z:= cHHZ+2;
   471                 gear^.Z:= cHHZ+2;
   472                 gear^.Tint:= gear^.Hedgehog^.Team^.Clan^.Color shl 8 or $FF
   472                 gear^.Tint:= gear^.Hedgehog^.Team^.Clan^.Color shl 8 or $FF
   473                 end;
   473                 end;
   474      gtAirBomb: begin
   474      gtAirBomb: begin