equal
deleted
inserted
replaced
338 targXWrap:= Targ.Point.X + (RightX-LeftX) |
338 targXWrap:= Targ.Point.X + (RightX-LeftX) |
339 else targXWrap:= Targ.Point.X - (RightX-LeftX); |
339 else targXWrap:= Targ.Point.X - (RightX-LeftX); |
340 timer:= 0; |
340 timer:= 0; |
341 repeat |
341 repeat |
342 rTime:= rTime + 300 + Level * 50 + random(300); |
342 rTime:= rTime + 300 + Level * 50 + random(300); |
343 Vx:= - windSpeed * rTime * 0.5 + (Targ.Point.X + AIrndSign(2) - mX) / rTime; |
|
344 if (WorldEdge = weWrap) and (random(2)=0) then |
343 if (WorldEdge = weWrap) and (random(2)=0) then |
345 Vx:= - windSpeed * rTime * 0.5 + (targXWrap + AIrndSign(2) - mX) / rTime |
344 Vx:= - windSpeed * rTime * 0.5 + (targXWrap + AIrndSign(2) - mX) / rTime |
346 else Vx:= - windSpeed * rTime * 0.5 + (Targ.Point.X + AIrndSign(2) - mX) / rTime; |
345 else Vx:= - windSpeed * rTime * 0.5 + (Targ.Point.X + AIrndSign(2) - mX) / rTime; |
347 Vy:= cGravityf * rTime * 0.5 - (Targ.Point.Y - 35 - mY) / rTime; |
346 Vy:= cGravityf * rTime * 0.5 - (Targ.Point.Y - 35 - mY) / rTime; |
348 r:= sqr(Vx) + sqr(Vy); |
347 r:= sqr(Vx) + sqr(Vy); |