hedgewars/uGearsList.pas
changeset 7754 e81dc9bef8b8
parent 7733 a1476c09403f
child 8026 4a4f21070479
child 8145 6408c0ba4ba1
equal deleted inserted replaced
7753:dda33caa609d 7754:e81dc9bef8b8
   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: begin
   253        gtKnife: begin
   254                 gear^.Density:= _0_5;
   254                 gear^.Density:= _4;
   255                 gear^.Radius:= 1;
   255                 gear^.Radius:= 16
   256                 gear^.CollisionMask:= $FF00;
       
   257                 end;
   256                 end;
   258         gtCase: begin
   257         gtCase: begin
   259                 gear^.ImpactSound:= sndGraveImpact;
   258                 gear^.ImpactSound:= sndGraveImpact;
   260                 gear^.nImpactSounds:= 1;
   259                 gear^.nImpactSounds:= 1;
   261                 gear^.Radius:= 16;
   260                 gear^.Radius:= 16;