hedgewars/uGearsList.pas
changeset 7733 a1476c09403f
parent 7730 2013733f9ca9
child 7754 e81dc9bef8b8
equal deleted inserted replaced
7732:fad3408fdcc1 7733:a1476c09403f
   248                 gear^.Elasticity:= _0_55;
   248                 gear^.Elasticity:= _0_55;
   249                 gear^.Friction:= _0_995;
   249                 gear^.Friction:= _0_995;
   250                 gear^.Density:= _1_6;
   250                 gear^.Density:= _1_6;
   251                 gear^.Timer:= 500;
   251                 gear^.Timer:= 500;
   252                 end;
   252                 end;
   253        gtKnife: gear^.Radius:= 5;
   253        gtKnife: begin
       
   254                 gear^.Density:= _0_5;
       
   255                 gear^.Radius:= 1;
       
   256                 gear^.CollisionMask:= $FF00;
       
   257                 end;
   254         gtCase: begin
   258         gtCase: begin
   255                 gear^.ImpactSound:= sndGraveImpact;
   259                 gear^.ImpactSound:= sndGraveImpact;
   256                 gear^.nImpactSounds:= 1;
   260                 gear^.nImpactSounds:= 1;
   257                 gear^.Radius:= 16;
   261                 gear^.Radius:= 16;
   258                 gear^.Elasticity:= _0_3;
   262                 gear^.Elasticity:= _0_3;