hedgewars: comparison hedgewars/uLandGenTemplateBased.pas

equal deleted inserted replaced

-:bcbf029e6b08
+:0eb97cf4c78e
 aqpb:= a * q - p * b;
 if (aqpb <> 0) then
 begin
 // (ix; iy) is intersection point
-iy:= ((Int64(pa.ar[i].x - mp.x) * b + Int64(mp.y) * a) * q - Int64(pa.ar[i].y) * p * b) div aqpb;
+iy:= (((Int64(pa.ar[i].x) - mp.x) * b + Int64(mp.y) * a) * q - Int64(pa.ar[i].y) * p * b) div aqpb;
 if abs(b) > abs(q) then
 ix:= (iy - mp.y) * a div b + mp.x
 else
 ix:= (iy - pa.ar[i].y) * p div q + pa.ar[i].x;
 aqpb:= a * q - p * b;
 if (aqpb <> 0) then
 begin
 // (ix; iy) is intersection point
-iy:= ((Int64(p1.x - mp.x) * b + Int64(mp.y) * a) * q - Int64(p1.y) * p * b) div aqpb;
+iy:= (((Int64(p1.x) - mp.x) * b + Int64(mp.y) * a) * q - Int64(p1.y) * p * b) div aqpb;
 if abs(b) > abs(q) then
 ix:= (iy - mp.y) * a div b + mp.x
 else
 ix:= (iy - p1.y) * p div q + p1.x;
 aqpb:= a * q - p * b;
 if (aqpb <> 0) then
 begin
 // (ix; iy) is intersection point
-iy:= ((Int64(p2.x - mp.x) * b + Int64(mp.y) * a) * q - Int64(p2.y) * p * b) div aqpb;
+iy:= (((Int64(p2.x) - mp.x) * b + Int64(mp.y) * a) * q - Int64(p2.y) * p * b) div aqpb;
 if abs(b) > abs(q) then
 ix:= (iy - mp.y) * a div b + mp.x
 else
 ix:= (iy - p2.y) * p div q + p2.x;