485                 gear^.Elasticity:= _0_3;

   485                 gear^.Elasticity:= _0_3;

   486                 if gear^.Timer = 0 then gear^.Timer:= 500

   486                 if gear^.Timer = 0 then gear^.Timer:= 500

   487                 end;

   487                 end;

   488   gtExplosives: begin

   488   gtExplosives: begin

   489                 gear^.AdvBounce:= 1;

   489                 gear^.AdvBounce:= 1;

   490                 gear^.ImpactSound:= sndGrenadeImpact;

   492                 gear^.ImpactSound:= sndGrenadeImpact;

   491                 gear^.nImpactSounds:= 1;

   493                 gear^.nImpactSounds:= 1;

   492                 gear^.Radius:= 16;

   494                 gear^.Radius:= 16;

   493                 gear^.Elasticity:= _0_4;

   495                 gear^.Elasticity:= _0_4;

   494                 gear^.Friction:= _0_995;

   496                 gear^.Friction:= _0_995;