hedgewars/uGearsList.pas
changeset 7394 789d7831ec53
parent 7393 3f203c62353b
child 7395 d0d38cd0d27c
equal deleted inserted replaced
7393:3f203c62353b 7394:789d7831ec53
   186        gtGrave: begin
   186        gtGrave: begin
   187                 gear^.ImpactSound:= sndGraveImpact;
   187                 gear^.ImpactSound:= sndGraveImpact;
   188                 gear^.nImpactSounds:= 1;
   188                 gear^.nImpactSounds:= 1;
   189                 gear^.Radius:= 10;
   189                 gear^.Radius:= 10;
   190                 gear^.Elasticity:= _0_6;
   190                 gear^.Elasticity:= _0_6;
   191                 gear^.Timer:= 1;
       
   192                 end;
   191                 end;
   193          gtBee: begin
   192          gtBee: begin
   194                 gear^.Radius:= 5;
   193                 gear^.Radius:= 5;
   195                 gear^.Timer:= 500;
   194                 gear^.Timer:= 500;
   196                 gear^.RenderTimer:= true;
   195                 gear^.RenderTimer:= true;