equal
deleted
inserted
replaced
318 pa.ar[i].x:= BasePoints^[i].x + integer(GetRandom(BasePoints^[i].w)); |
318 pa.ar[i].x:= BasePoints^[i].x + integer(GetRandom(BasePoints^[i].w)); |
319 pa.ar[i].y:= BasePoints^[i].y + integer(GetRandom(BasePoints^[i].h)) |
319 pa.ar[i].y:= BasePoints^[i].y + integer(GetRandom(BasePoints^[i].h)) |
320 end; |
320 end; |
321 |
321 |
322 if canMirror then |
322 if canMirror then |
323 if getrandom(16) < 8 then |
323 if getrandom(2) = 0 then |
324 begin |
324 begin |
325 for i:= 0 to pred(BasePointsCount) do |
325 for i:= 0 to pred(BasePointsCount) do |
326 BasePoints^[i].x:= 2047 - BasePoints^[i].x; |
326 pa.ar[i].x:= 2047 - pa.ar[i].x; |
327 for i:= 0 to pred(FillPointsCount) do |
327 for i:= 0 to pred(FillPointsCount) do |
328 FillPoints^[i].x:= 2047 - FillPoints^[i].x; |
328 FillPoints^[i].x:= 2047 - FillPoints^[i].x; |
329 end; |
329 end; |
330 |
330 |
331 if canFlip then |
331 if canFlip then |
332 if getrandom(16) < 8 then |
332 if getrandom(2) = 0 then |
333 begin |
333 begin |
334 for i:= 0 to pred(BasePointsCount) do |
334 for i:= 0 to pred(BasePointsCount) do |
335 BasePoints^[i].y:= 1023 - BasePoints^[i].y; |
335 pa.ar[i].y:= 1023 - pa.ar[i].y; |
336 for i:= 0 to pred(FillPointsCount) do |
336 for i:= 0 to pred(FillPointsCount) do |
337 FillPoints^[i].y:= 1023 - FillPoints^[i].y; |
337 FillPoints^[i].y:= 1023 - FillPoints^[i].y; |
338 end; |
338 end; |
339 end |
339 end |
340 end; |
340 end; |