hedgewars/uGearsList.pas
changeset 15846 78745063cf33
parent 15820 b6379a7ed674
child 15847 2839b68a3732
equal deleted inserted replaced
15845:ad43384fbbe9 15846:78745063cf33
   839         gtSentry: begin
   839         gtSentry: begin
   840                 gear^.Radius:= cHHRadius;
   840                 gear^.Radius:= cHHRadius;
   841                 gear^.Health:= cSentryHealth;
   841                 gear^.Health:= cSentryHealth;
   842                 gear^.Friction:= _0_93;
   842                 gear^.Friction:= _0_93;
   843                 gear^.Elasticity:= _0_05;
   843                 gear^.Elasticity:= _0_05;
       
   844                 gear^.Density:= _3;
   844                 gear^.Tag:= 0;
   845                 gear^.Tag:= 0;
   845                 gear^.Timer:= 1000;
   846                 gear^.Timer:= 1000;
   846                 gear^.WDTimer:= 0;
   847                 gear^.WDTimer:= 0;
   847                 end;
   848                 end;
   848 gtGenericFaller:begin
   849 gtGenericFaller:begin