equal
deleted
inserted
replaced
1002 else |
1002 else |
1003 FindPlace(ar[i]^.Gear, false, leftX, rightX, true); |
1003 FindPlace(ar[i]^.Gear, false, leftX, rightX, true); |
1004 if ar[i]^.Gear <> nil then |
1004 if ar[i]^.Gear <> nil then |
1005 begin |
1005 begin |
1006 ar[i]^.Gear^.dX.isNegative:= hwRound(ar[i]^.Gear^.X) > leftX + playWidth div 2; |
1006 ar[i]^.Gear^.dX.isNegative:= hwRound(ar[i]^.Gear^.X) > leftX + playWidth div 2; |
1007 ar[i]^.Gear^.Pos:= GetRandom(19) |
|
1008 end; |
1007 end; |
1009 ar[i]:= ar[Count - 1]; |
1008 ar[i]:= ar[Count - 1]; |
1010 dec(Count) |
1009 dec(Count) |
1011 end |
1010 end |
1012 end; |
1011 end; |