725                 if gear^.Timer = 0 then      

   725                 if gear^.Timer = 0 then      

   726                     gear^.Timer:= 15000;      // Explosion timer to avoid duck existing forever

   726                     gear^.Timer:= 15000;      // Explosion timer to avoid duck existing forever

   727                 gear^.Radius:= 9;            // Collision radius (with landscape)

   727                 gear^.Radius:= 9;            // Collision radius (with landscape)

   728                 gear^.Karma:= 24;            // Distance from water when swimming

   728                 gear^.Karma:= 24;            // Distance from water when swimming

   729                 gear^.Elasticity:= _0_6;

   729                 gear^.Elasticity:= _0_6;

   731                 gear^.Density:= _0_5;

   731                 gear^.Density:= _0_5;

   732                 gear^.AdvBounce:= 1;

   732                 gear^.AdvBounce:= 1;

   733                 end;

   733                 end;

   734 gtGenericFaller:begin

   734 gtGenericFaller:begin

   735                 gear^.AdvBounce:= 1;

   735                 gear^.AdvBounce:= 1;