equal
deleted
inserted
replaced
150 |
150 |
151 // right border |
151 // right border |
152 iy:= (rightX - mapBorderMargin - mp.x) * b div a + mp.y; |
152 iy:= (rightX - mapBorderMargin - mp.x) * b div a + mp.y; |
153 d:= DistanceI(mp.x - rightX + mapBorderMargin, mp.y - iy).Round; |
153 d:= DistanceI(mp.x - rightX + mapBorderMargin, mp.y - iy).Round; |
154 if t1 > 0 then distR:= d else distL:= d; |
154 if t1 > 0 then distR:= d else distL:= d; |
|
155 end else |
|
156 begin |
|
157 distL:= LAND_WIDTH + LAND_HEIGHT; |
|
158 distR:= distL; |
155 end; |
159 end; |
156 |
160 |
157 if b <> 0 then |
161 if b <> 0 then |
158 begin |
162 begin |
159 // top border |
163 // top border |