hedgewars/uGearsList.pas
changeset 14920 06af4f0a92bd
parent 14765 ba8dd081359d
child 14969 65be598c64b9
equal deleted inserted replaced
14919:e28ff0f1aca2 14920:06af4f0a92bd
   664                 gear^.Density:= _2
   664                 gear^.Density:= _2
   665                 end;
   665                 end;
   666        gtBirdy: begin
   666        gtBirdy: begin
   667                 gear^.Radius:= 16; // todo: check
   667                 gear^.Radius:= 16; // todo: check
   668                 gear^.Health := 2000;
   668                 gear^.Health := 2000;
   669                 gear^.FlightTime := 2
   669                 gear^.FlightTime := 2;
       
   670                 gear^.Z:= cCurrHHZ+1;
   670                 end;
   671                 end;
   671          gtEgg: begin
   672          gtEgg: begin
   672                 gear^.AdvBounce:= 1;
   673                 gear^.AdvBounce:= 1;
   673                 gear^.Radius:= 4;
   674                 gear^.Radius:= 4;
   674                 gear^.Elasticity:= _0_6;
   675                 gear^.Elasticity:= _0_6;