hedgewars/uGears.pas
changeset 3271 0405e07ca44b
parent 3268 0e52ca22c1e0
child 3281 2f3be13e1140
equal deleted inserted replaced
3270:9bd8fb1707b9 3271:0405e07ca44b
   389                 end;
   389                 end;
   390     gtSwitcher: begin
   390     gtSwitcher: begin
   391                 gear^.Z:= cCurrHHZ
   391                 gear^.Z:= cCurrHHZ
   392                 end;
   392                 end;
   393       gtTarget: begin
   393       gtTarget: begin
       
   394                 gear^.ImpactSound:= sndGrenadeImpact;
       
   395                 gear^.nImpactSounds:= 1;
   394                 gear^.Radius:= 10;
   396                 gear^.Radius:= 10;
   395                 gear^.Elasticity:= _0_3;
   397                 gear^.Elasticity:= _0_3;
   396                 gear^.Timer:= 0
   398                 gear^.Timer:= 0
   397                 end;
   399                 end;
   398       gtMortar: begin
   400       gtMortar: begin