hedgewars/uGearsList.pas
changeset 8774 39754516eee6
parent 8751 4609823efc94
child 8795 b5b79a8f9354
equal deleted inserted replaced
8771:ea6ee35d9434 8774:39754516eee6
   546                 gear^.Timer:= 0;
   546                 gear^.Timer:= 0;
   547                 gear^.Tag:= TotalRounds + 3;
   547                 gear^.Tag:= TotalRounds + 3;
   548                 gear^.Pos:= 1;
   548                 gear^.Pos:= 1;
   549                 end;
   549                 end;
   550 }
   550 }
   551       gtIceGun: gear^.Health:= 1000;
   551       gtIceGun: begin
       
   552                 gear^.Health:= 1000;
       
   553                 gear^.Radius:= 8;
       
   554                 end;
   552 gtGenericFaller:begin
   555 gtGenericFaller:begin
   553                 gear^.AdvBounce:= 1;
   556                 gear^.AdvBounce:= 1;
   554                 gear^.Radius:= 1;
   557                 gear^.Radius:= 1;
   555                 gear^.Elasticity:= _0_9;
   558                 gear^.Elasticity:= _0_9;
   556                 gear^.Friction:= _0_995;
   559                 gear^.Friction:= _0_995;