1605             FrameTicks:= 200;

  1605             FrameTicks:= 200;

  1606             Scale:= hwFloat2Float(Gear^.Density * hwAbs(Gear^.dY) + hwAbs(Gear^.dX)) / 1.5;

  1606             Scale:= hwFloat2Float(Gear^.Density * hwAbs(Gear^.dY) + hwAbs(Gear^.dX)) / 1.5;

  1607             State:= ord(sprBoing)

  1607             State:= ord(sprBoing)

  1608             end;

  1608             end;

  1609     if Gear^.Kind = gtDuck then

  1609     if Gear^.Kind = gtDuck then

  1611     else

  1611     else

  1612         PlaySound(sndMelonImpact, true)

  1612         PlaySound(sndMelonImpact, true)

  1613 end;

  1613 end;

  1614 

  1614 

  1615 function IsHogLocal(HH: PHedgehog): boolean;

  1615 function IsHogLocal(HH: PHedgehog): boolean;