hedgewars/uGears.pas
changeset 2934 e0f2b0f97c2b
parent 2933 02af54eb7e1e
child 2935 b80800979436
equal deleted inserted replaced
2933:02af54eb7e1e 2934:e0f2b0f97c2b
   327                 gear^.Elasticity:= _0_3
   327                 gear^.Elasticity:= _0_3
   328                 end;
   328                 end;
   329   gtExplosives: begin
   329   gtExplosives: begin
   330                 gear^.Radius:= 16;
   330                 gear^.Radius:= 16;
   331                 gear^.Elasticity:= _0_4;
   331                 gear^.Elasticity:= _0_4;
   332                 gear^.Friction:= _1;
   332                 gear^.Friction:= _0_995;
   333                 gear^.Health:= cBarrelHealth
   333                 gear^.Health:= cBarrelHealth
   334                 end;
   334                 end;
   335   gtDEagleShot: begin
   335   gtDEagleShot: begin
   336                 gear^.Radius:= 1;
   336                 gear^.Radius:= 1;
   337                 gear^.Health:= 50
   337                 gear^.Health:= 50