hedgewars/uGears.pas
changeset 4883 7cddc9201a1d
parent 4881 35e6269227b6
child 4885 bf7f2c1cc235
equal deleted inserted replaced
4882:b4c84db92d8f 4883:7cddc9201a1d
   518    gtStructure: begin
   518    gtStructure: begin
   519                 gear^.ImpactSound:= sndGrenadeImpact;
   519                 gear^.ImpactSound:= sndGrenadeImpact;
   520                 gear^.nImpactSounds:= 1;
   520                 gear^.nImpactSounds:= 1;
   521                 gear^.Radius:= 13;
   521                 gear^.Radius:= 13;
   522                 gear^.Elasticity:= _0_3;
   522                 gear^.Elasticity:= _0_3;
   523                 gear^.Timer:= 5000;
       
   524                 gear^.Health:= 50;
   523                 gear^.Health:= 50;
   525                 end;
   524                 end;
   526     end;
   525     end;
   527 
   526 
   528 InsertGearToList(gear);
   527 InsertGearToList(gear);