hedgewars/uGears.pas
changeset 5493 49769489af37
parent 5490 18c6049b5ae3
child 5501 0ba2dca673e6
equal deleted inserted replaced
5492:a0455a050ca8 5493:49769489af37
   273        gtShell: begin
   273        gtShell: begin
   274                 gear^.Radius:= 4;
   274                 gear^.Radius:= 4;
   275                 gear^.Density:= _1;
   275                 gear^.Density:= _1;
   276                 end;
   276                 end;
   277        gtSnowball: begin
   277        gtSnowball: begin
       
   278                 gear^.ImpactSound:= sndMudballImpact;
       
   279                 gear^.nImpactSounds:= 1;
   278                 gear^.Radius:= 4;
   280                 gear^.Radius:= 4;
   279                 gear^.Elasticity:= _1;
   281                 gear^.Elasticity:= _1;
   280                 gear^.Friction:= _1;
   282                 gear^.Friction:= _1;
   281                 gear^.Density:= _0_5;
   283                 gear^.Density:= _0_5;
   282                 end;
   284                 end;
   326                 gear^.Radius:= 3;
   328                 gear^.Radius:= 3;
   327                 gear^.Friction:= _450 * _0_01 * cRopePercent;
   329                 gear^.Friction:= _450 * _0_01 * cRopePercent;
   328                 RopePoints.Count:= 0;
   330                 RopePoints.Count:= 0;
   329                 end;
   331                 end;
   330         gtMine: begin
   332         gtMine: begin
   331                 gear^.Health:= 10;
   333                 gear^.ImpactSound:= sndMineImpact;
       
   334                 gear^.nImpactSounds:= 1;
       
   335 		        gear^.Health:= 10;
   332                 gear^.State:= gear^.State or gstMoving;
   336                 gear^.State:= gear^.State or gstMoving;
   333                 gear^.Radius:= 2;
   337                 gear^.Radius:= 2;
   334                 gear^.Elasticity:= _0_55;
   338                 gear^.Elasticity:= _0_55;
   335                 gear^.Friction:= _0_995;
   339                 gear^.Friction:= _0_995;
   336                 gear^.Density:= _0_9;
   340                 gear^.Density:= _0_9;