equal
deleted
inserted
replaced
617 AddPickup(HH^.Hedgehog^, Gear^.AmmoType, Gear^.Power, hwRound(Gear^.X), hwRound(Gear^.Y)); |
617 AddPickup(HH^.Hedgehog^, Gear^.AmmoType, Gear^.Power, hwRound(Gear^.X), hwRound(Gear^.Y)); |
618 end |
618 end |
619 else |
619 else |
620 begin |
620 begin |
621 // Add spawning here... |
621 // Add spawning here... |
622 AddRandomness(CheckSum xor GameTicks); |
622 AddRandomness(GameTicks); |
623 |
623 |
624 gi := GearsList; |
624 gi := GearsList; |
625 while gi <> nil do |
625 while gi <> nil do |
626 begin |
626 begin |
627 if gi^.Kind = gtGenericFaller then |
627 if gi^.Kind = gtGenericFaller then |