equal
deleted
inserted
replaced
639 AddRandomness(GameTicks); |
639 AddRandomness(GameTicks); |
640 |
640 |
641 gi := GearsList; |
641 gi := GearsList; |
642 while gi <> nil do |
642 while gi <> nil do |
643 begin |
643 begin |
644 if gi^.Kind = gtGenericFaller then |
644 if (gi^.Kind = gtGenericFaller) and (gi^.State and gstInvisible <> 0) then |
645 begin |
645 begin |
646 gi^.Active:= true; |
646 gi^.Active:= true; |
|
647 gi^.State:= gi^.State or gstTmpFlag; |
647 gi^.X:= int2hwFloat(GetRandom(rightX-leftX)+leftX); |
648 gi^.X:= int2hwFloat(GetRandom(rightX-leftX)+leftX); |
648 gi^.Y:= int2hwFloat(GetRandom(LAND_HEIGHT-topY)+topY); |
649 gi^.Y:= int2hwFloat(GetRandom(LAND_HEIGHT-topY)+topY); |
649 gi^.dX:= _90-(GetRandomf*_360); |
650 gi^.dX:= _90-(GetRandomf*_360); |
650 gi^.dY:= _90-(GetRandomf*_360) |
651 gi^.dY:= _90-(GetRandomf*_360) |
651 end; |
652 end; |