# viewport.cpp

Go to the documentation of this file.

    00001 /* $Id: viewport.cpp 22839 2011-08-25 13:27:56Z rubidium $ */
    00002
    00003 /*
    00004  * This file is part of OpenTTD.
    00005  * OpenTTD is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, version 2.
    00006  * OpenTTD is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
    00007  * See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with OpenTTD. If not, see <http://www.gnu.org/licenses/>.
    00008  */
    00009
    00029 #include "stdafx.h"
    00030 #include "landscape.h"
    00031 #include "viewport_func.h"
    00032 #include "station_base.h"
    00033 #include "waypoint_base.h"
    00034 #include "town.h"
    00035 #include "signs_base.h"
    00036 #include "signs_func.h"
    00037 #include "vehicle_base.h"
    00038 #include "vehicle_gui.h"
    00039 #include "blitter/factory.hpp"
    00040 #include "strings_func.h"
    00041 #include "zoom_func.h"
    00042 #include "vehicle_func.h"
    00043 #include "company_func.h"
    00044 #include "waypoint_func.h"
    00045 #include "window_func.h"
    00046 #include "tilehighlight_func.h"
    00047 #include "window_gui.h"
    00048
    00049 #include "table/strings.h"
    00050
    00051 Point _tile_fract_coords;
    00052
    00053 struct StringSpriteToDraw {
    00054   StringID string;
    00055   Colours colour;
    00056   int32 x;
    00057   int32 y;
    00058   uint64 params[2];
    00059   uint16 width;
    00060 };
    00061
    00062 struct TileSpriteToDraw {
    00063   SpriteID image;
    00064   PaletteID pal;
    00065   const SubSprite *sub;
    00066   int32 x;
    00067   int32 y;
    00068 };
    00069
    00070 struct ChildScreenSpriteToDraw {
    00071   SpriteID image;
    00072   PaletteID pal;
    00073   const SubSprite *sub;
    00074   int32 x;
    00075   int32 y;
    00076   int next;
    00077 };
    00078
    00080 struct ParentSpriteToDraw {
    00081   SpriteID image;
    00082   PaletteID pal;
    00083   const SubSprite *sub;
    00084
    00085   int32 x;
    00086   int32 y;
    00087
    00088   int32 left;
    00089   int32 top;
    00090
    00091   int32 xmin;
    00092   int32 xmax;
    00093   int32 ymin;
    00094   int32 ymax;
    00095   int zmin;
    00096   int zmax;
    00097
    00098   int first_child;
    00099   bool comparison_done;
    00100 };
    00101
    00103 enum FoundationPart {
    00104   FOUNDATION_PART_NONE     = 0xFF,
    00105   FOUNDATION_PART_NORMAL   = 0,
    00106   FOUNDATION_PART_HALFTILE = 1,
    00107   FOUNDATION_PART_END
    00108 };
    00109
    00114 enum SpriteCombineMode {
    00115   SPRITE_COMBINE_NONE,
    00116   SPRITE_COMBINE_PENDING,
    00117   SPRITE_COMBINE_ACTIVE,
    00118 };
    00119
    00120 typedef SmallVector<TileSpriteToDraw, 64> TileSpriteToDrawVector;
    00121 typedef SmallVector<StringSpriteToDraw, 4> StringSpriteToDrawVector;
    00122 typedef SmallVector<ParentSpriteToDraw, 64> ParentSpriteToDrawVector;
    00123 typedef SmallVector<ParentSpriteToDraw*, 64> ParentSpriteToSortVector;
    00124 typedef SmallVector<ChildScreenSpriteToDraw, 16> ChildScreenSpriteToDrawVector;
    00125
    00127 struct ViewportDrawer {
    00128   DrawPixelInfo dpi;
    00129
    00130   StringSpriteToDrawVector string_sprites_to_draw;
    00131   TileSpriteToDrawVector tile_sprites_to_draw;
    00132   ParentSpriteToDrawVector parent_sprites_to_draw;
    00133   ParentSpriteToSortVector parent_sprites_to_sort;
    00134   ChildScreenSpriteToDrawVector child_screen_sprites_to_draw;
    00135
    00136   int *last_child;
    00137
    00138   SpriteCombineMode combine_sprites;
    00139
    00140   int foundation[FOUNDATION_PART_END];
    00141   FoundationPart foundation_part;
    00142   int *last_foundation_child[FOUNDATION_PART_END];
    00143   Point foundation_offset[FOUNDATION_PART_END];
    00144 };
    00145
    00146 static ViewportDrawer _vd;
    00147
    00148 TileHighlightData _thd;
    00149 static TileInfo *_cur_ti;
    00150 bool _draw_bounding_boxes = false;
    00151
    00152 static Point MapXYZToViewport(const ViewPort *vp, int x, int y, int z)
    00153 {
    00154   Point p = RemapCoords(x, y, z);
    00155   p.x -= vp->virtual_width / 2;
    00156   p.y -= vp->virtual_height / 2;
    00157   return p;
    00158 }
    00159
    00160 void DeleteWindowViewport(Window *w)
    00161 {
    00162   free(w->viewport);
    00163   w->viewport = NULL;
    00164 }
    00165
    00178 void InitializeWindowViewport(Window *w, int x, int y,
    00179   int width, int height, uint32 follow_flags, ZoomLevel zoom)
    00180 {
    00181   assert(w->viewport == NULL);
    00182
    00183   ViewportData *vp = CallocT<ViewportData>(1);
    00184
    00185   vp->left = x + w->left;
    00186   vp->top = y + w->top;
    00187   vp->width = width;
    00188   vp->height = height;
    00189
    00190   vp->zoom = zoom;
    00191
    00192   vp->virtual_width = ScaleByZoom(width, zoom);
    00193   vp->virtual_height = ScaleByZoom(height, zoom);
    00194
    00195   Point pt;
    00196
    00197   if (follow_flags & 0x80000000) {
    00198     const Vehicle *veh;
    00199
    00200     vp->follow_vehicle = (VehicleID)(follow_flags & 0xFFFFF);
    00201     veh = Vehicle::Get(vp->follow_vehicle);
    00202     pt = MapXYZToViewport(vp, veh->x_pos, veh->y_pos, veh->z_pos);
    00203   } else {
    00204     uint x = TileX(follow_flags) * TILE_SIZE;
    00205     uint y = TileY(follow_flags) * TILE_SIZE;
    00206
    00207     vp->follow_vehicle = INVALID_VEHICLE;
    00208     pt = MapXYZToViewport(vp, x, y, GetSlopeZ(x, y));
    00209   }
    00210
    00211   vp->scrollpos_x = pt.x;
    00212   vp->scrollpos_y = pt.y;
    00213   vp->dest_scrollpos_x = pt.x;
    00214   vp->dest_scrollpos_y = pt.y;
    00215
    00216   w->viewport = vp;
    00217   vp->virtual_left = 0;//pt.x;
    00218   vp->virtual_top = 0;//pt.y;
    00219 }
    00220
    00221 static Point _vp_move_offs;
    00222
    00223 static void DoSetViewportPosition(const Window *w, int left, int top, int width, int height)
    00224 {
    00225   FOR_ALL_WINDOWS_FROM_BACK_FROM(w, w) {
    00226     if (left + width > w->left &&
    00227         w->left + w->width > left &&
    00228         top + height > w->top &&
    00229         w->top + w->height > top) {
    00230
    00231       if (left < w->left) {
    00232         DoSetViewportPosition(w, left, top, w->left - left, height);
    00233         DoSetViewportPosition(w, left + (w->left - left), top, width - (w->left - left), height);
    00234         return;
    00235       }
    00236
    00237       if (left + width > w->left + w->width) {
    00238         DoSetViewportPosition(w, left, top, (w->left + w->width - left), height);
    00239         DoSetViewportPosition(w, left + (w->left + w->width - left), top, width - (w->left + w->width - left), height);
    00240         return;
    00241       }
    00242
    00243       if (top < w->top) {
    00244         DoSetViewportPosition(w, left, top, width, (w->top - top));
    00245         DoSetViewportPosition(w, left, top + (w->top - top), width, height - (w->top - top));
    00246         return;
    00247       }
    00248
    00249       if (top + height > w->top + w->height) {
    00250         DoSetViewportPosition(w, left, top, width, (w->top + w->height - top));
    00251         DoSetViewportPosition(w, left, top + (w->top + w->height - top), width, height - (w->top + w->height - top));
    00252         return;
    00253       }
    00254
    00255       return;
    00256     }
    00257   }
    00258
    00259   {
    00260     int xo = _vp_move_offs.x;
    00261     int yo = _vp_move_offs.y;
    00262
    00263     if (abs(xo) >= width || abs(yo) >= height) {
    00264       /* fully_outside */
    00265       RedrawScreenRect(left, top, left + width, top + height);
    00266       return;
    00267     }
    00268
    00269     GfxScroll(left, top, width, height, xo, yo);
    00270
    00271     if (xo > 0) {
    00272       RedrawScreenRect(left, top, xo + left, top + height);
    00273       left += xo;
    00274       width -= xo;
    00275     } else if (xo < 0) {
    00276       RedrawScreenRect(left + width + xo, top, left + width, top + height);
    00277       width += xo;
    00278     }
    00279
    00280     if (yo > 0) {
    00281       RedrawScreenRect(left, top, width + left, top + yo);
    00282     } else if (yo < 0) {
    00283       RedrawScreenRect(left, top + height + yo, width + left, top + height);
    00284     }
    00285   }
    00286 }
    00287
    00288 static void SetViewportPosition(Window *w, int x, int y)
    00289 {
    00290   ViewPort *vp = w->viewport;
    00291   int old_left = vp->virtual_left;
    00292   int old_top = vp->virtual_top;
    00293   int i;
    00294   int left, top, width, height;
    00295
    00296   vp->virtual_left = x;
    00297   vp->virtual_top = y;
    00298
    00299   /* Viewport is bound to its left top corner, so it must be rounded down (UnScaleByZoomLower)
    00300    * else glitch described in FS#1412 will happen (offset by 1 pixel with zoom level > NORMAL)
    00301    */
    00302   old_left = UnScaleByZoomLower(old_left, vp->zoom);
    00303   old_top = UnScaleByZoomLower(old_top, vp->zoom);
    00304   x = UnScaleByZoomLower(x, vp->zoom);
    00305   y = UnScaleByZoomLower(y, vp->zoom);
    00306
    00307   old_left -= x;
    00308   old_top -= y;
    00309
    00310   if (old_top == 0 && old_left == 0) return;
    00311
    00312   _vp_move_offs.x = old_left;
    00313   _vp_move_offs.y = old_top;
    00314
    00315   left = vp->left;
    00316   top = vp->top;
    00317   width = vp->width;
    00318   height = vp->height;
    00319
    00320   if (left < 0) {
    00321     width += left;
    00322     left = 0;
    00323   }
    00324
    00325   i = left + width - _screen.width;
    00326   if (i >= 0) width -= i;
    00327
    00328   if (width > 0) {
    00329     if (top < 0) {
    00330       height += top;
    00331       top = 0;
    00332     }
    00333
    00334     i = top + height - _screen.height;
    00335     if (i >= 0) height -= i;
    00336
    00337     if (height > 0) DoSetViewportPosition(w->z_front, left, top, width, height);
    00338   }
    00339 }
    00340
    00349 ViewPort *IsPtInWindowViewport(const Window *w, int x, int y)
    00350 {
    00351   ViewPort *vp = w->viewport;
    00352
    00353   if (vp != NULL &&
    00354       IsInsideMM(x, vp->left, vp->left + vp->width) &&
    00355       IsInsideMM(y, vp->top, vp->top + vp->height))
    00356     return vp;
    00357
    00358   return NULL;
    00359 }
    00360
    00368 static Point TranslateXYToTileCoord(const ViewPort *vp, int x, int y)
    00369 {
    00370   Point pt;
    00371   int a, b;
    00372   uint z;
    00373
    00374   if ( (uint)(x -= vp->left) >= (uint)vp->width ||
    00375         (uint)(y -= vp->top) >= (uint)vp->height) {
    00376         Point pt = {-1, -1};
    00377         return pt;
    00378   }
    00379
    00380   x = (ScaleByZoom(x, vp->zoom) + vp->virtual_left) >> 2;
    00381   y = (ScaleByZoom(y, vp->zoom) + vp->virtual_top) >> 1;
    00382
    00383   a = y - x;
    00384   b = y + x;
    00385
    00386   /* we need to move variables in to the valid range, as the
    00387    * GetTileZoomCenterWindow() function can call here with invalid x and/or y,
    00388    * when the user tries to zoom out along the sides of the map */
    00389   a = Clamp(a, -4 * (int)TILE_SIZE, (int)(MapMaxX() * TILE_SIZE) - 1);
    00390   b = Clamp(b, -4 * (int)TILE_SIZE, (int)(MapMaxY() * TILE_SIZE) - 1);
    00391
    00392   /* (a, b) is the X/Y-world coordinate that belongs to (x,y) if the landscape would be completely flat on height 0.
    00393    * Now find the Z-world coordinate by fix point iteration.
    00394    * This is a bit tricky because the tile height is non-continuous at foundations.
    00395    * The clicked point should be approached from the back, otherwise there are regions that are not clickable.
    00396    * (FOUNDATION_HALFTILE_LOWER on SLOPE_STEEP_S hides north halftile completely)
    00397    * So give it a z-malus of 4 in the first iterations.
    00398    */
    00399   z = 0;
    00400
    00401   int min_coord = _settings_game.construction.freeform_edges ? TILE_SIZE : 0;
    00402
    00403   for (int i = 0; i < 5; i++) z = GetSlopeZ(Clamp(a + (int)max(z, 4u) - 4, min_coord, MapMaxX() * TILE_SIZE - 1), Clamp(b + (int)max(z, 4u) - 4, min_coord, MapMaxY() * TILE_SIZE - 1)) / 2;
    00404   for (uint malus = 3; malus > 0; malus--) z = GetSlopeZ(Clamp(a + (int)max(z, malus) - (int)malus, min_coord, MapMaxX() * TILE_SIZE - 1), Clamp(b + (int)max(z, malus) - (int)malus, min_coord, MapMaxY() * TILE_SIZE - 1)) / 2;
    00405   for (int i = 0; i < 5; i++) z = GetSlopeZ(Clamp(a + (int)z, min_coord, MapMaxX() * TILE_SIZE - 1), Clamp(b + (int)z, min_coord, MapMaxY() * TILE_SIZE - 1)) / 2;
    00406
    00407   pt.x = Clamp(a + (int)z, min_coord, MapMaxX() * TILE_SIZE - 1);
    00408   pt.y = Clamp(b + (int)z, min_coord, MapMaxY() * TILE_SIZE - 1);
    00409
    00410   return pt;
    00411 }
    00412
    00413 /* When used for zooming, check area below current coordinates (x,y)
    00414  * and return the tile of the zoomed out/in position (zoom_x, zoom_y)
    00415  * when you just want the tile, make x = zoom_x and y = zoom_y */
    00416 static Point GetTileFromScreenXY(int x, int y, int zoom_x, int zoom_y)
    00417 {
    00418   Window *w;
    00419   ViewPort *vp;
    00420   Point pt;
    00421
    00422   if ( (w = FindWindowFromPt(x, y)) != NULL &&
    00423        (vp = IsPtInWindowViewport(w, x, y)) != NULL)
    00424         return TranslateXYToTileCoord(vp, zoom_x, zoom_y);
    00425
    00426   pt.y = pt.x = -1;
    00427   return pt;
    00428 }
    00429
    00430 Point GetTileBelowCursor()
    00431 {
    00432   return GetTileFromScreenXY(_cursor.pos.x, _cursor.pos.y, _cursor.pos.x, _cursor.pos.y);
    00433 }
    00434
    00435
    00436 Point GetTileZoomCenterWindow(bool in, Window * w)
    00437 {
    00438   int x, y;
    00439   ViewPort *vp = w->viewport;
    00440
    00441   if (in) {
    00442     x = ((_cursor.pos.x - vp->left) >> 1) + (vp->width >> 2);
    00443     y = ((_cursor.pos.y - vp->top) >> 1) + (vp->height >> 2);
    00444   } else {
    00445     x = vp->width - (_cursor.pos.x - vp->left);
    00446     y = vp->height - (_cursor.pos.y - vp->top);
    00447   }
    00448   /* Get the tile below the cursor and center on the zoomed-out center */
    00449   return GetTileFromScreenXY(_cursor.pos.x, _cursor.pos.y, x + vp->left, y + vp->top);
    00450 }
    00451
    00460 void HandleZoomMessage(Window *w, const ViewPort *vp, byte widget_zoom_in, byte widget_zoom_out)
    00461 {
    00462   w->SetWidgetDisabledState(widget_zoom_in, vp->zoom == ZOOM_LVL_MIN);
    00463   w->SetWidgetDirty(widget_zoom_in);
    00464
    00465   w->SetWidgetDisabledState(widget_zoom_out, vp->zoom == ZOOM_LVL_MAX);
    00466   w->SetWidgetDirty(widget_zoom_out);
    00467 }
    00468
    00481 static void AddTileSpriteToDraw(SpriteID image, PaletteID pal, int32 x, int32 y, int z, const SubSprite *sub = NULL, int extra_offs_x = 0, int extra_offs_y = 0)
    00482 {
    00483   assert((image & SPRITE_MASK) < MAX_SPRITES);
    00484
    00485   TileSpriteToDraw *ts = _vd.tile_sprites_to_draw.Append();
    00486   ts->image = image;
    00487   ts->pal = pal;
    00488   ts->sub = sub;
    00489   Point pt = RemapCoords(x, y, z);
    00490   ts->x = pt.x + extra_offs_x;
    00491   ts->y = pt.y + extra_offs_y;
    00492 }
    00493
    00506 static void AddChildSpriteToFoundation(SpriteID image, PaletteID pal, const SubSprite *sub, FoundationPart foundation_part, int extra_offs_x, int extra_offs_y)
    00507 {
    00508   assert(IsInsideMM(foundation_part, 0, FOUNDATION_PART_END));
    00509   assert(_vd.foundation[foundation_part] != -1);
    00510   Point offs = _vd.foundation_offset[foundation_part];
    00511
    00512   /* Change the active ChildSprite list to the one of the foundation */
    00513   int *old_child = _vd.last_child;
    00514   _vd.last_child = _vd.last_foundation_child[foundation_part];
    00515
    00516   AddChildSpriteScreen(image, pal, offs.x + extra_offs_x, offs.y + extra_offs_y, false, sub);
    00517
    00518   /* Switch back to last ChildSprite list */
    00519   _vd.last_child = old_child;
    00520 }
    00521
    00535 void DrawGroundSpriteAt(SpriteID image, PaletteID pal, int32 x, int32 y, int z, const SubSprite *sub, int extra_offs_x, int extra_offs_y)
    00536 {
    00537   /* Switch to first foundation part, if no foundation was drawn */
    00538   if (_vd.foundation_part == FOUNDATION_PART_NONE) _vd.foundation_part = FOUNDATION_PART_NORMAL;
    00539
    00540   if (_vd.foundation[_vd.foundation_part] != -1) {
    00541     Point pt = RemapCoords(x, y, z);
    00542     AddChildSpriteToFoundation(image, pal, sub, _vd.foundation_part, pt.x + extra_offs_x, pt.y + extra_offs_y);
    00543   } else {
    00544     AddTileSpriteToDraw(image, pal, _cur_ti->x + x, _cur_ti->y + y, _cur_ti->z + z, sub, extra_offs_x, extra_offs_y);
    00545   }
    00546 }
    00547
    00558 void DrawGroundSprite(SpriteID image, PaletteID pal, const SubSprite *sub, int extra_offs_x, int extra_offs_y)
    00559 {
    00560   DrawGroundSpriteAt(image, pal, 0, 0, 0, sub, extra_offs_x, extra_offs_y);
    00561 }
    00562
    00570 void OffsetGroundSprite(int x, int y)
    00571 {
    00572   /* Switch to next foundation part */
    00573   switch (_vd.foundation_part) {
    00574     case FOUNDATION_PART_NONE:
    00575       _vd.foundation_part = FOUNDATION_PART_NORMAL;
    00576       break;
    00577     case FOUNDATION_PART_NORMAL:
    00578       _vd.foundation_part = FOUNDATION_PART_HALFTILE;
    00579       break;
    00580     default: NOT_REACHED();
    00581   }
    00582
    00583   /* _vd.last_child == NULL if foundation sprite was clipped by the viewport bounds */
    00584   if (_vd.last_child != NULL) _vd.foundation[_vd.foundation_part] = _vd.parent_sprites_to_draw.Length() - 1;
    00585
    00586   _vd.foundation_offset[_vd.foundation_part].x = x;
    00587   _vd.foundation_offset[_vd.foundation_part].y = y;
    00588   _vd.last_foundation_child[_vd.foundation_part] = _vd.last_child;
    00589 }
    00590
    00602 static void AddCombinedSprite(SpriteID image, PaletteID pal, int x, int y, byte z, const SubSprite *sub)
    00603 {
    00604   Point pt = RemapCoords(x, y, z);
    00605   const Sprite *spr = GetSprite(image & SPRITE_MASK, ST_NORMAL);
    00606
    00607   if (pt.x + spr->x_offs >= _vd.dpi.left + _vd.dpi.width ||
    00608       pt.x + spr->x_offs + spr->width <= _vd.dpi.left ||
    00609       pt.y + spr->y_offs >= _vd.dpi.top + _vd.dpi.height ||
    00610       pt.y + spr->y_offs + spr->height <= _vd.dpi.top)
    00611     return;
    00612
    00613   const ParentSpriteToDraw *pstd = _vd.parent_sprites_to_draw.End() - 1;
    00614   AddChildSpriteScreen(image, pal, pt.x - pstd->left, pt.y - pstd->top, false, sub);
    00615 }
    00616
    00642 void AddSortableSpriteToDraw(SpriteID image, PaletteID pal, int x, int y, int w, int h, int dz, int z, bool transparent, int bb_offset_x, int bb_offset_y, int bb_offset_z, const SubSprite *sub)
    00643 {
    00644   int32 left, right, top, bottom;
    00645
    00646   assert((image & SPRITE_MASK) < MAX_SPRITES);
    00647
    00648   /* make the sprites transparent with the right palette */
    00649   if (transparent) {
    00650     SetBit(image, PALETTE_MODIFIER_TRANSPARENT);
    00651     pal = PALETTE_TO_TRANSPARENT;
    00652   }
    00653
    00654   if (_vd.combine_sprites == SPRITE_COMBINE_ACTIVE) {
    00655     AddCombinedSprite(image, pal, x, y, z, sub);
    00656     return;
    00657   }
    00658
    00659   _vd.last_child = NULL;
    00660
    00661   Point pt = RemapCoords(x, y, z);
    00662   int tmp_left, tmp_top, tmp_x = pt.x, tmp_y = pt.y;
    00663
    00664   /* Compute screen extents of sprite */
    00665   if (image == SPR_EMPTY_BOUNDING_BOX) {
    00666     left = tmp_left = RemapCoords(x + w          , y + bb_offset_y, z + bb_offset_z).x;
    00667     right           = RemapCoords(x + bb_offset_x, y + h          , z + bb_offset_z).x + 1;
    00668     top  = tmp_top  = RemapCoords(x + bb_offset_x, y + bb_offset_y, z + dz         ).y;
    00669     bottom          = RemapCoords(x + w          , y + h          , z + bb_offset_z).y + 1;
    00670   } else {
    00671     const Sprite *spr = GetSprite(image & SPRITE_MASK, ST_NORMAL);
    00672     left = tmp_left = (pt.x += spr->x_offs);
    00673     right           = (pt.x +  spr->width );
    00674     top  = tmp_top  = (pt.y += spr->y_offs);
    00675     bottom          = (pt.y +  spr->height);
    00676   }
    00677
    00678   if (_draw_bounding_boxes && (image != SPR_EMPTY_BOUNDING_BOX)) {
    00679     /* Compute maximal extents of sprite and its bounding box */
    00680     left   = min(left  , RemapCoords(x + w          , y + bb_offset_y, z + bb_offset_z).x);
    00681     right  = max(right , RemapCoords(x + bb_offset_x, y + h          , z + bb_offset_z).x + 1);
    00682     top    = min(top   , RemapCoords(x + bb_offset_x, y + bb_offset_y, z + dz         ).y);
    00683     bottom = max(bottom, RemapCoords(x + w          , y + h          , z + bb_offset_z).y + 1);
    00684   }
    00685
    00686   /* Do not add the sprite to the viewport, if it is outside */
    00687   if (left   >= _vd.dpi.left + _vd.dpi.width ||
    00688       right  <= _vd.dpi.left                 ||
    00689       top    >= _vd.dpi.top + _vd.dpi.height ||
    00690       bottom <= _vd.dpi.top) {
    00691     return;
    00692   }
    00693
    00694   ParentSpriteToDraw *ps = _vd.parent_sprites_to_draw.Append();
    00695   ps->x = tmp_x;
    00696   ps->y = tmp_y;
    00697
    00698   ps->left = tmp_left;
    00699   ps->top  = tmp_top;
    00700
    00701   ps->image = image;
    00702   ps->pal = pal;
    00703   ps->sub = sub;
    00704   ps->xmin = x + bb_offset_x;
    00705   ps->xmax = x + max(bb_offset_x, w) - 1;
    00706
    00707   ps->ymin = y + bb_offset_y;
    00708   ps->ymax = y + max(bb_offset_y, h) - 1;
    00709
    00710   ps->zmin = z + bb_offset_z;
    00711   ps->zmax = z + max(bb_offset_z, dz) - 1;
    00712
    00713   ps->comparison_done = false;
    00714   ps->first_child = -1;
    00715
    00716   _vd.last_child = &ps->first_child;
    00717
    00718   if (_vd.combine_sprites == SPRITE_COMBINE_PENDING) _vd.combine_sprites = SPRITE_COMBINE_ACTIVE;
    00719 }
    00720
    00739 void StartSpriteCombine()
    00740 {
    00741   assert(_vd.combine_sprites == SPRITE_COMBINE_NONE);
    00742   _vd.combine_sprites = SPRITE_COMBINE_PENDING;
    00743 }
    00744
    00749 void EndSpriteCombine()
    00750 {
    00751   assert(_vd.combine_sprites != SPRITE_COMBINE_NONE);
    00752   _vd.combine_sprites = SPRITE_COMBINE_NONE;
    00753 }
    00754
    00764 static bool IsInRangeInclusive(int begin, int end, int check)
    00765 {
    00766   if (begin > end) Swap(begin, end);
    00767   return begin <= check && check <= end;
    00768 }
    00769
    00776 bool IsInsideRotatedRectangle(int x, int y)
    00777 {
    00778   int dist_a = (_thd.size.x + _thd.size.y);      // Rotated coordinate system for selected rectangle.
    00779   int dist_b = (_thd.size.x - _thd.size.y);      // We don't have to divide by 2. It's all relative!
    00780   int a = ((x - _thd.pos.x) + (y - _thd.pos.y)); // Rotated coordinate system for the point under scrutiny.
    00781   int b = ((x - _thd.pos.x) - (y - _thd.pos.y));
    00782
    00783   /* Check if a and b are between 0 and dist_a or dist_b respectively. */
    00784   return IsInRangeInclusive(dist_a, 0, a) && IsInRangeInclusive(dist_b, 0, b);
    00785 }
    00786
    00797 void AddChildSpriteScreen(SpriteID image, PaletteID pal, int x, int y, bool transparent, const SubSprite *sub)
    00798 {
    00799   assert((image & SPRITE_MASK) < MAX_SPRITES);
    00800
    00801   /* If the ParentSprite was clipped by the viewport bounds, do not draw the ChildSprites either */
    00802   if (_vd.last_child == NULL) return;
    00803
    00804   /* make the sprites transparent with the right palette */
    00805   if (transparent) {
    00806     SetBit(image, PALETTE_MODIFIER_TRANSPARENT);
    00807     pal = PALETTE_TO_TRANSPARENT;
    00808   }
    00809
    00810   *_vd.last_child = _vd.child_screen_sprites_to_draw.Length();
    00811
    00812   ChildScreenSpriteToDraw *cs = _vd.child_screen_sprites_to_draw.Append();
    00813   cs->image = image;
    00814   cs->pal = pal;
    00815   cs->sub = sub;
    00816   cs->x = x;
    00817   cs->y = y;
    00818   cs->next = -1;
    00819
    00820   /* Append the sprite to the active ChildSprite list.
    00821    * If the active ParentSprite is a foundation, update last_foundation_child as well.
    00822    * Note: ChildSprites of foundations are NOT sequential in the vector, as selection sprites are added at last. */
    00823   if (_vd.last_foundation_child[0] == _vd.last_child) _vd.last_foundation_child[0] = &cs->next;
    00824   if (_vd.last_foundation_child[1] == _vd.last_child) _vd.last_foundation_child[1] = &cs->next;
    00825   _vd.last_child = &cs->next;
    00826 }
    00827
    00828 static void AddStringToDraw(int x, int y, StringID string, uint64 params_1, uint64 params_2, Colours colour, uint16 width)
    00829 {
    00830   assert(width != 0);
    00831   StringSpriteToDraw *ss = _vd.string_sprites_to_draw.Append();
    00832   ss->string = string;
    00833   ss->x = x;
    00834   ss->y = y;
    00835   ss->params[0] = params_1;
    00836   ss->params[1] = params_2;
    00837   ss->width = width;
    00838   ss->colour = colour;
    00839 }
    00840
    00841
    00853 static void DrawSelectionSprite(SpriteID image, PaletteID pal, const TileInfo *ti, int z_offset, FoundationPart foundation_part)
    00854 {
    00855   /* FIXME: This is not totally valid for some autorail highlights that extend over the edges of the tile. */
    00856   if (_vd.foundation[foundation_part] == -1) {
    00857     /* draw on real ground */
    00858     AddTileSpriteToDraw(image, pal, ti->x, ti->y, ti->z + z_offset);
    00859   } else {
    00860     /* draw on top of foundation */
    00861     AddChildSpriteToFoundation(image, pal, NULL, foundation_part, 0, -z_offset);
    00862   }
    00863 }
    00864
    00871 static void DrawTileSelectionRect(const TileInfo *ti, PaletteID pal)
    00872 {
    00873   if (!IsValidTile(ti->tile)) return;
    00874
    00875   SpriteID sel;
    00876   if (IsHalftileSlope(ti->tileh)) {
    00877     Corner halftile_corner = GetHalftileSlopeCorner(ti->tileh);
    00878     SpriteID sel2 = SPR_HALFTILE_SELECTION_FLAT + halftile_corner;
    00879     DrawSelectionSprite(sel2, pal, ti, 7 + TILE_HEIGHT, FOUNDATION_PART_HALFTILE);
    00880
    00881     Corner opposite_corner = OppositeCorner(halftile_corner);
    00882     if (IsSteepSlope(ti->tileh)) {
    00883       sel = SPR_HALFTILE_SELECTION_DOWN;
    00884     } else {
    00885       sel = ((ti->tileh & SlopeWithOneCornerRaised(opposite_corner)) != 0 ? SPR_HALFTILE_SELECTION_UP : SPR_HALFTILE_SELECTION_FLAT);
    00886     }
    00887     sel += opposite_corner;
    00888   } else {
    00889     sel = SPR_SELECT_TILE + SlopeToSpriteOffset(ti->tileh);
    00890   }
    00891   DrawSelectionSprite(sel, pal, ti, 7, FOUNDATION_PART_NORMAL);
    00892 }
    00893
    00894 static bool IsPartOfAutoLine(int px, int py)
    00895 {
    00896   px -= _thd.selstart.x;
    00897   py -= _thd.selstart.y;
    00898
    00899   if ((_thd.drawstyle & HT_DRAG_MASK) != HT_LINE) return false;
    00900
    00901   switch (_thd.drawstyle & HT_DIR_MASK) {
    00902     case HT_DIR_X:  return py == 0; // x direction
    00903     case HT_DIR_Y:  return px == 0; // y direction
    00904     case HT_DIR_HU: return px == -py || px == -py - 16; // horizontal upper
    00905     case HT_DIR_HL: return px == -py || px == -py + 16; // horizontal lower
    00906     case HT_DIR_VL: return px == py || px == py + 16; // vertical left
    00907     case HT_DIR_VR: return px == py || px == py - 16; // vertical right
    00908     default:
    00909       NOT_REACHED();
    00910   }
    00911 }
    00912
    00913 /* [direction][side] */
    00914 static const HighLightStyle _autorail_type[6][2] = {
    00915   { HT_DIR_X,  HT_DIR_X },
    00916   { HT_DIR_Y,  HT_DIR_Y },
    00917   { HT_DIR_HU, HT_DIR_HL },
    00918   { HT_DIR_HL, HT_DIR_HU },
    00919   { HT_DIR_VL, HT_DIR_VR },
    00920   { HT_DIR_VR, HT_DIR_VL }
    00921 };
    00922
    00923 #include "table/autorail.h"
    00924
    00931 static void DrawAutorailSelection(const TileInfo *ti, uint autorail_type)
    00932 {
    00933   SpriteID image;
    00934   PaletteID pal;
    00935   int offset;
    00936
    00937   FoundationPart foundation_part = FOUNDATION_PART_NORMAL;
    00938   Slope autorail_tileh = RemoveHalftileSlope(ti->tileh);
    00939   if (IsHalftileSlope(ti->tileh)) {
    00940     static const uint _lower_rail[4] = { 5U, 2U, 4U, 3U };
    00941     Corner halftile_corner = GetHalftileSlopeCorner(ti->tileh);
    00942     if (autorail_type != _lower_rail[halftile_corner]) {
    00943       foundation_part = FOUNDATION_PART_HALFTILE;
    00944       /* Here we draw the highlights of the "three-corners-raised"-slope. That looks ok to me. */
    00945       autorail_tileh = SlopeWithThreeCornersRaised(OppositeCorner(halftile_corner));
    00946     }
    00947   }
    00948
    00949   offset = _AutorailTilehSprite[autorail_tileh][autorail_type];
    00950   if (offset >= 0) {
    00951     image = SPR_AUTORAIL_BASE + offset;
    00952     pal = PAL_NONE;
    00953   } else {
    00954     image = SPR_AUTORAIL_BASE - offset;
    00955     pal = PALETTE_SEL_TILE_RED;
    00956   }
    00957
    00958   DrawSelectionSprite(image, _thd.make_square_red ? PALETTE_SEL_TILE_RED : pal, ti, 7, foundation_part);
    00959 }
    00960
    00965 static void DrawTileSelection(const TileInfo *ti)
    00966 {
    00967   /* Draw a red error square? */
    00968   bool is_redsq = _thd.redsq == ti->tile;
    00969   if (is_redsq) DrawTileSelectionRect(ti, PALETTE_TILE_RED_PULSATING);
    00970
    00971   /* No tile selection active? */
    00972   if ((_thd.drawstyle & HT_DRAG_MASK) == HT_NONE) return;
    00973
    00974   if (_thd.diagonal) { // We're drawing a 45 degrees rotated (diagonal) rectangle
    00975     if (IsInsideRotatedRectangle((int)ti->x, (int)ti->y)) goto draw_inner;
    00976     return;
    00977   }
    00978
    00979   /* Inside the inner area? */
    00980   if (IsInsideBS(ti->x, _thd.pos.x, _thd.size.x) &&
    00981       IsInsideBS(ti->y, _thd.pos.y, _thd.size.y)) {
    00982 draw_inner:
    00983     if (_thd.drawstyle & HT_RECT) {
    00984       if (!is_redsq) DrawTileSelectionRect(ti, _thd.make_square_red ? PALETTE_SEL_TILE_RED : PAL_NONE);
    00985     } else if (_thd.drawstyle & HT_POINT) {
    00986       /* Figure out the Z coordinate for the single dot. */
    00987       byte z = 0;
    00988       FoundationPart foundation_part = FOUNDATION_PART_NORMAL;
    00989       if (ti->tileh & SLOPE_N) {
    00990         z += TILE_HEIGHT;
    00991         if (RemoveHalftileSlope(ti->tileh) == SLOPE_STEEP_N) z += TILE_HEIGHT;
    00992       }
    00993       if (IsHalftileSlope(ti->tileh)) {
    00994         Corner halftile_corner = GetHalftileSlopeCorner(ti->tileh);
    00995         if ((halftile_corner == CORNER_W) || (halftile_corner == CORNER_E)) z += TILE_HEIGHT;
    00996         if (halftile_corner != CORNER_S) {
    00997           foundation_part = FOUNDATION_PART_HALFTILE;
    00998           if (IsSteepSlope(ti->tileh)) z -= TILE_HEIGHT;
    00999         }
    01000       }
    01001       DrawSelectionSprite(_cur_dpi->zoom <= ZOOM_LVL_DETAIL ? SPR_DOT : SPR_DOT_SMALL, PAL_NONE, ti, z, foundation_part);
    01002     } else if (_thd.drawstyle & HT_RAIL) {
    01003       /* autorail highlight piece under cursor */
    01004       HighLightStyle type = _thd.drawstyle & HT_DIR_MASK;
    01005       assert(type < HT_DIR_END);
    01006       DrawAutorailSelection(ti, _autorail_type[type][0]);
    01007     } else if (IsPartOfAutoLine(ti->x, ti->y)) {
    01008       /* autorail highlighting long line */
    01009       HighLightStyle dir = _thd.drawstyle & HT_DIR_MASK;
    01010       uint side;
    01011
    01012       if (dir == HT_DIR_X || dir == HT_DIR_Y) {
    01013         side = 0;
    01014       } else {
    01015         TileIndex start = TileVirtXY(_thd.selstart.x, _thd.selstart.y);
    01016         side = Delta(Delta(TileX(start), TileX(ti->tile)), Delta(TileY(start), TileY(ti->tile)));
    01017       }
    01018
    01019       DrawAutorailSelection(ti, _autorail_type[dir][side]);
    01020     }
    01021     return;
    01022   }
    01023
    01024   /* Check if it's inside the outer area? */
    01025   if (!is_redsq && _thd.outersize.x > 0 &&
    01026       IsInsideBS(ti->x, _thd.pos.x + _thd.offs.x, _thd.size.x + _thd.outersize.x) &&
    01027       IsInsideBS(ti->y, _thd.pos.y + _thd.offs.y, _thd.size.y + _thd.outersize.y)) {
    01028     /* Draw a blue rect. */
    01029     DrawTileSelectionRect(ti, PALETTE_SEL_TILE_BLUE);
    01030     return;
    01031   }
    01032 }
    01033
    01034 static void ViewportAddLandscape()
    01035 {
    01036   int x, y, width, height;
    01037   TileInfo ti;
    01038   bool direction;
    01039
    01040   _cur_ti = &ti;
    01041
    01042   /* Transform into tile coordinates and round to closest full tile */
    01043   x = ((_vd.dpi.top >> 1) - (_vd.dpi.left >> 2)) & ~TILE_UNIT_MASK;
    01044   y = ((_vd.dpi.top >> 1) + (_vd.dpi.left >> 2) - TILE_SIZE) & ~TILE_UNIT_MASK;
    01045
    01046   /* determine size of area */
    01047   {
    01048     Point pt = RemapCoords(x, y, 241);
    01049     width = (_vd.dpi.left + _vd.dpi.width - pt.x + 95) >> 6;
    01050     height = (_vd.dpi.top + _vd.dpi.height - pt.y) >> 5 << 1;
    01051   }
    01052
    01053   assert(width > 0);
    01054   assert(height > 0);
    01055
    01056   direction = false;
    01057
    01058   do {
    01059     int width_cur = width;
    01060     uint x_cur = x;
    01061     uint y_cur = y;
    01062
    01063     do {
    01064       TileType tt = MP_VOID;
    01065
    01066       ti.x = x_cur;
    01067       ti.y = y_cur;
    01068
    01069       ti.z = 0;
    01070
    01071       ti.tileh = SLOPE_FLAT;
    01072       ti.tile = INVALID_TILE;
    01073
    01074       if (x_cur < MapMaxX() * TILE_SIZE &&
    01075           y_cur < MapMaxY() * TILE_SIZE) {
    01076         TileIndex tile = TileVirtXY(x_cur, y_cur);
    01077
    01078         if (!_settings_game.construction.freeform_edges || (TileX(tile) != 0 && TileY(tile) != 0)) {
    01079           if (x_cur == ((int)MapMaxX() - 1) * TILE_SIZE || y_cur == ((int)MapMaxY() - 1) * TILE_SIZE) {
    01080             uint maxh = max<uint>(TileHeight(tile), 1);
    01081             for (uint h = 0; h < maxh; h++) {
    01082               AddTileSpriteToDraw(SPR_SHADOW_CELL, PAL_NONE, ti.x, ti.y, h * TILE_HEIGHT);
    01083             }
    01084           }
    01085
    01086           ti.tile = tile;
    01087           ti.tileh = GetTileSlope(tile, &ti.z);
    01088           tt = GetTileType(tile);
    01089         }
    01090       }
    01091
    01092       _vd.foundation_part = FOUNDATION_PART_NONE;
    01093       _vd.foundation[0] = -1;
    01094       _vd.foundation[1] = -1;
    01095       _vd.last_foundation_child[0] = NULL;
    01096       _vd.last_foundation_child[1] = NULL;
    01097
    01098       _tile_type_procs[tt]->draw_tile_proc(&ti);
    01099
    01100       if ((x_cur == (int)MapMaxX() * TILE_SIZE && IsInsideMM(y_cur, 0, MapMaxY() * TILE_SIZE + 1)) ||
    01101           (y_cur == (int)MapMaxY() * TILE_SIZE && IsInsideMM(x_cur, 0, MapMaxX() * TILE_SIZE + 1))) {
    01102         TileIndex tile = TileVirtXY(x_cur, y_cur);
    01103         ti.tile = tile;
    01104         ti.tileh = GetTileSlope(tile, &ti.z);
    01105         tt = GetTileType(tile);
    01106       }
    01107       if (ti.tile != INVALID_TILE) DrawTileSelection(&ti);
    01108
    01109       y_cur += 0x10;
    01110       x_cur -= 0x10;
    01111     } while (--width_cur);
    01112
    01113     if ((direction ^= 1) != 0) {
    01114       y += 0x10;
    01115     } else {
    01116       x += 0x10;
    01117     }
    01118   } while (--height);
    01119 }
    01120
    01131 void ViewportAddString(const DrawPixelInfo *dpi, ZoomLevel small_from, const ViewportSign *sign, StringID string_normal, StringID string_small, StringID string_small_shadow, uint64 params_1, uint64 params_2, Colours colour)
    01132 {
    01133   bool small = dpi->zoom >= small_from;
    01134
    01135   int left   = dpi->left;
    01136   int top    = dpi->top;
    01137   int right  = left + dpi->width;
    01138   int bottom = top + dpi->height;
    01139
    01140   int sign_height     = ScaleByZoom(VPSM_TOP + FONT_HEIGHT_NORMAL + VPSM_BOTTOM, dpi->zoom);
    01141   int sign_half_width = ScaleByZoom((small ? sign->width_small : sign->width_normal) / 2, dpi->zoom);
    01142
    01143   if (bottom < sign->top ||
    01144       top   > sign->top + sign_height ||
    01145       right < sign->center - sign_half_width ||
    01146       left  > sign->center + sign_half_width) {
    01147     return;
    01148   }
    01149
    01150   if (!small) {
    01151     AddStringToDraw(sign->center - sign_half_width, sign->top, string_normal, params_1, params_2, colour, sign->width_normal);
    01152   } else {
    01153     int shadow_offset = 0;
    01154     if (string_small_shadow != STR_NULL) {
    01155       shadow_offset = 4;
    01156       AddStringToDraw(sign->center - sign_half_width + shadow_offset, sign->top, string_small_shadow, params_1, params_2, INVALID_COLOUR, sign->width_small);
    01157     }
    01158     AddStringToDraw(sign->center - sign_half_width, sign->top - shadow_offset, string_small, params_1, params_2,
    01159         colour, sign->width_small | 0x8000);
    01160   }
    01161 }
    01162
    01163 static void ViewportAddTownNames(DrawPixelInfo *dpi)
    01164 {
    01165   if (!HasBit(_display_opt, DO_SHOW_TOWN_NAMES) || _game_mode == GM_MENU) return;
    01166
    01167   const Town *t;
    01168   FOR_ALL_TOWNS(t) {
    01169     ViewportAddString(dpi, ZOOM_LVL_OUT_4X, &t->sign,
    01170         _settings_client.gui.population_in_label ? STR_VIEWPORT_TOWN_POP : STR_VIEWPORT_TOWN,
    01171         STR_VIEWPORT_TOWN_TINY_WHITE, STR_VIEWPORT_TOWN_TINY_BLACK,
    01172         t->index, t->population);
    01173   }
    01174 }
    01175
    01176
    01177 static void ViewportAddStationNames(DrawPixelInfo *dpi)
    01178 {
    01179   if (!(HasBit(_display_opt, DO_SHOW_STATION_NAMES) || HasBit(_display_opt, DO_SHOW_WAYPOINT_NAMES)) || _game_mode == GM_MENU) return;
    01180
    01181   const BaseStation *st;
    01182   FOR_ALL_BASE_STATIONS(st) {
    01183     /* Check whether the base station is a station or a waypoint */
    01184     bool is_station = Station::IsExpected(st);
    01185
    01186     /* Don't draw if the display options are disabled */
    01187     if (!HasBit(_display_opt, is_station ? DO_SHOW_STATION_NAMES : DO_SHOW_WAYPOINT_NAMES)) continue;
    01188
    01189     ViewportAddString(dpi, ZOOM_LVL_OUT_4X, &st->sign,
    01190         is_station ? STR_VIEWPORT_STATION : STR_VIEWPORT_WAYPOINT,
    01191         (is_station ? STR_VIEWPORT_STATION : STR_VIEWPORT_WAYPOINT) + 1, STR_NULL,
    01192         st->index, st->facilities, (st->owner == OWNER_NONE || !st->IsInUse()) ? COLOUR_GREY : _company_colours[st->owner]);
    01193   }
    01194 }
    01195
    01196
    01197 static void ViewportAddSigns(DrawPixelInfo *dpi)
    01198 {
    01199   /* Signs are turned off or are invisible */
    01200   if (!HasBit(_display_opt, DO_SHOW_SIGNS) || IsInvisibilitySet(TO_SIGNS)) return;
    01201
    01202   const Sign *si;
    01203   FOR_ALL_SIGNS(si) {
    01204     ViewportAddString(dpi, ZOOM_LVL_OUT_4X, &si->sign,
    01205         STR_WHITE_SIGN,
    01206         IsTransparencySet(TO_SIGNS) ? STR_VIEWPORT_SIGN_SMALL_WHITE : STR_VIEWPORT_SIGN_SMALL_BLACK, STR_NULL,
    01207         si->index, 0, (si->owner == OWNER_NONE) ? COLOUR_GREY : _company_colours[si->owner]);
    01208   }
    01209 }
    01210
    01217 void ViewportSign::UpdatePosition(int center, int top, StringID str)
    01218 {
    01219   if (this->width_normal != 0) this->MarkDirty();
    01220
    01221   this->top = top;
    01222
    01223   char buffer[DRAW_STRING_BUFFER];
    01224
    01225   GetString(buffer, str, lastof(buffer));
    01226   this->width_normal = VPSM_LEFT + Align(GetStringBoundingBox(buffer).width, 2) + VPSM_RIGHT;
    01227   this->center = center;
    01228
    01229   /* zoomed out version */
    01230   this->width_small = VPSM_LEFT + Align(GetStringBoundingBox(buffer, FS_SMALL).width, 2) + VPSM_RIGHT;
    01231
    01232   this->MarkDirty();
    01233 }
    01234
    01240 void ViewportSign::MarkDirty() const
    01241 {
    01242   /* We use ZOOM_LVL_MAX here, as every viewport can have another zoom,
    01243    *  and there is no way for us to know which is the biggest. So make the
    01244    *  biggest area dirty, and we are safe for sure.
    01245    * We also add 1 to make sure the whole thing is redrawn. */
    01246   MarkAllViewportsDirty(
    01247     this->center - ScaleByZoom(this->width_normal / 2 + 1, ZOOM_LVL_MAX),
    01248     this->top    - ScaleByZoom(1, ZOOM_LVL_MAX),
    01249     this->center + ScaleByZoom(this->width_normal / 2 + 1, ZOOM_LVL_MAX),
    01250     this->top    + ScaleByZoom(VPSM_TOP + FONT_HEIGHT_NORMAL + VPSM_BOTTOM + 1, ZOOM_LVL_MAX));
    01251 }
    01252
    01253 static void ViewportDrawTileSprites(const TileSpriteToDrawVector *tstdv)
    01254 {
    01255   const TileSpriteToDraw *tsend = tstdv->End();
    01256   for (const TileSpriteToDraw *ts = tstdv->Begin(); ts != tsend; ++ts) {
    01257     DrawSprite(ts->image, ts->pal, ts->x, ts->y, ts->sub);
    01258   }
    01259 }
    01260
    01262 static void ViewportSortParentSprites(ParentSpriteToSortVector *psdv)
    01263 {
    01264   ParentSpriteToDraw **psdvend = psdv->End();
    01265   ParentSpriteToDraw **psd = psdv->Begin();
    01266   while (psd != psdvend) {
    01267     ParentSpriteToDraw *ps = *psd;
    01268
    01269     if (ps->comparison_done) {
    01270       psd++;
    01271       continue;
    01272     }
    01273
    01274     ps->comparison_done = true;
    01275
    01276     for (ParentSpriteToDraw **psd2 = psd + 1; psd2 != psdvend; psd2++) {
    01277       ParentSpriteToDraw *ps2 = *psd2;
    01278
    01279       if (ps2->comparison_done) continue;
    01280
    01281       /* Decide which comparator to use, based on whether the bounding
    01282        * boxes overlap
    01283        */
    01284       if (ps->xmax >= ps2->xmin && ps->xmin <= ps2->xmax && // overlap in X?
    01285           ps->ymax >= ps2->ymin && ps->ymin <= ps2->ymax && // overlap in Y?
    01286           ps->zmax >= ps2->zmin && ps->zmin <= ps2->zmax) { // overlap in Z?
    01287         /* Use X+Y+Z as the sorting order, so sprites closer to the bottom of
    01288          * the screen and with higher Z elevation, are drawn in front.
    01289          * Here X,Y,Z are the coordinates of the "center of mass" of the sprite,
    01290          * i.e. X=(left+right)/2, etc.
    01291          * However, since we only care about order, don't actually divide / 2
    01292          */
    01293         if (ps->xmin + ps->xmax + ps->ymin + ps->ymax + ps->zmin + ps->zmax <=
    01294             ps2->xmin + ps2->xmax + ps2->ymin + ps2->ymax + ps2->zmin + ps2->zmax) {
    01295           continue;
    01296         }
    01297       } else {
    01298         /* We only change the order, if it is definite.
    01299          * I.e. every single order of X, Y, Z says ps2 is behind ps or they overlap.
    01300          * That is: If one partial order says ps behind ps2, do not change the order.
    01301          */
    01302         if (ps->xmax < ps2->xmin ||
    01303             ps->ymax < ps2->ymin ||
    01304             ps->zmax < ps2->zmin) {
    01305           continue;
    01306         }
    01307       }
    01308
    01309       /* Move ps2 in front of ps */
    01310       ParentSpriteToDraw *temp = ps2;
    01311       for (ParentSpriteToDraw **psd3 = psd2; psd3 > psd; psd3--) {
    01312         *psd3 = *(psd3 - 1);
    01313       }
    01314       *psd = temp;
    01315     }
    01316   }
    01317 }
    01318
    01319 static void ViewportDrawParentSprites(const ParentSpriteToSortVector *psd, const ChildScreenSpriteToDrawVector *csstdv)
    01320 {
    01321   const ParentSpriteToDraw * const *psd_end = psd->End();
    01322   for (const ParentSpriteToDraw * const *it = psd->Begin(); it != psd_end; it++) {
    01323     const ParentSpriteToDraw *ps = *it;
    01324     if (ps->image != SPR_EMPTY_BOUNDING_BOX) DrawSprite(ps->image, ps->pal, ps->x, ps->y, ps->sub);
    01325
    01326     int child_idx = ps->first_child;
    01327     while (child_idx >= 0) {
    01328       const ChildScreenSpriteToDraw *cs = csstdv->Get(child_idx);
    01329       child_idx = cs->next;
    01330       DrawSprite(cs->image, cs->pal, ps->left + cs->x, ps->top + cs->y, cs->sub);
    01331     }
    01332   }
    01333 }
    01334
    01339 static void ViewportDrawBoundingBoxes(const ParentSpriteToSortVector *psd)
    01340 {
    01341   const ParentSpriteToDraw * const *psd_end = psd->End();
    01342   for (const ParentSpriteToDraw * const *it = psd->Begin(); it != psd_end; it++) {
    01343     const ParentSpriteToDraw *ps = *it;
    01344     Point pt1 = RemapCoords(ps->xmax + 1, ps->ymax + 1, ps->zmax + 1); // top front corner
    01345     Point pt2 = RemapCoords(ps->xmin    , ps->ymax + 1, ps->zmax + 1); // top left corner
    01346     Point pt3 = RemapCoords(ps->xmax + 1, ps->ymin    , ps->zmax + 1); // top right corner
    01347     Point pt4 = RemapCoords(ps->xmax + 1, ps->ymax + 1, ps->zmin    ); // bottom front corner
    01348
    01349     DrawBox(        pt1.x,         pt1.y,
    01350             pt2.x - pt1.x, pt2.y - pt1.y,
    01351             pt3.x - pt1.x, pt3.y - pt1.y,
    01352             pt4.x - pt1.x, pt4.y - pt1.y);
    01353   }
    01354 }
    01355
    01356 static void ViewportDrawStrings(DrawPixelInfo *dpi, const StringSpriteToDrawVector *sstdv)
    01357 {
    01358   DrawPixelInfo dp;
    01359   ZoomLevel zoom;
    01360
    01361   _cur_dpi = &dp;
    01362   dp = *dpi;
    01363
    01364   zoom = dp.zoom;
    01365   dp.zoom = ZOOM_LVL_NORMAL;
    01366
    01367   dp.left   = UnScaleByZoom(dp.left,   zoom);
    01368   dp.top    = UnScaleByZoom(dp.top,    zoom);
    01369   dp.width  = UnScaleByZoom(dp.width,  zoom);
    01370   dp.height = UnScaleByZoom(dp.height, zoom);
    01371
    01372   const StringSpriteToDraw *ssend = sstdv->End();
    01373   for (const StringSpriteToDraw *ss = sstdv->Begin(); ss != ssend; ++ss) {
    01374     TextColour colour = TC_BLACK;
    01375     bool small = HasBit(ss->width, 15);
    01376     int w = GB(ss->width, 0, 15);
    01377     int x = UnScaleByZoom(ss->x, zoom);
    01378     int y = UnScaleByZoom(ss->y, zoom);
    01379     int h = VPSM_TOP + (small ? FONT_HEIGHT_SMALL : FONT_HEIGHT_NORMAL) + VPSM_BOTTOM;
    01380
    01381     SetDParam(0, ss->params[0]);
    01382     SetDParam(1, ss->params[1]);
    01383
    01384     if (ss->colour != INVALID_COLOUR) {
    01385       /* Do not draw signs nor station names if they are set invisible */
    01386       if (IsInvisibilitySet(TO_SIGNS) && ss->string != STR_WHITE_SIGN) continue;
    01387
    01388       /* if we didn't draw a rectangle, or if transparant building is on,
    01389        * draw the text in the colour the rectangle would have */
    01390       if (IsTransparencySet(TO_SIGNS) && ss->string != STR_WHITE_SIGN) {
    01391         /* Real colours need the TC_IS_PALETTE_COLOUR flag
    01392          * otherwise colours from _string_colourmap are assumed. */
    01393         colour = (TextColour)_colour_gradient[ss->colour][6] | TC_IS_PALETTE_COLOUR;
    01394       }
    01395
    01396       /* Draw the rectangle if 'tranparent station signs' is off,
    01397        * or if we are drawing a general text sign (STR_WHITE_SIGN) */
    01398       if (!IsTransparencySet(TO_SIGNS) || ss->string == STR_WHITE_SIGN) {
    01399         DrawFrameRect(
    01400           x, y, x + w, y + h, ss->colour,
    01401           IsTransparencySet(TO_SIGNS) ? FR_TRANSPARENT : FR_NONE
    01402         );
    01403       }
    01404     }
    01405
    01406     DrawString(x + VPSM_LEFT, x + w - 1 - VPSM_RIGHT, y + VPSM_TOP, ss->string, colour, SA_HOR_CENTER);
    01407   }
    01408 }
    01409
    01410 void ViewportDoDraw(const ViewPort *vp, int left, int top, int right, int bottom)
    01411 {
    01412   DrawPixelInfo *old_dpi = _cur_dpi;
    01413   _cur_dpi = &_vd.dpi;
    01414
    01415   _vd.dpi.zoom = vp->zoom;
    01416   int mask = ScaleByZoom(-1, vp->zoom);
    01417
    01418   _vd.combine_sprites = SPRITE_COMBINE_NONE;
    01419
    01420   _vd.dpi.width = (right - left) & mask;
    01421   _vd.dpi.height = (bottom - top) & mask;
    01422   _vd.dpi.left = left & mask;
    01423   _vd.dpi.top = top & mask;
    01424   _vd.dpi.pitch = old_dpi->pitch;
    01425   _vd.last_child = NULL;
    01426
    01427   int x = UnScaleByZoom(_vd.dpi.left - (vp->virtual_left & mask), vp->zoom) + vp->left;
    01428   int y = UnScaleByZoom(_vd.dpi.top - (vp->virtual_top & mask), vp->zoom) + vp->top;
    01429
    01430   _vd.dpi.dst_ptr = BlitterFactoryBase::GetCurrentBlitter()->MoveTo(old_dpi->dst_ptr, x - old_dpi->left, y - old_dpi->top);
    01431
    01432   ViewportAddLandscape();
    01433   ViewportAddVehicles(&_vd.dpi);
    01434
    01435   ViewportAddTownNames(&_vd.dpi);
    01436   ViewportAddStationNames(&_vd.dpi);
    01437   ViewportAddSigns(&_vd.dpi);
    01438
    01439   DrawTextEffects(&_vd.dpi);
    01440
    01441   if (_vd.tile_sprites_to_draw.Length() != 0) ViewportDrawTileSprites(&_vd.tile_sprites_to_draw);
    01442
    01443   ParentSpriteToDraw *psd_end = _vd.parent_sprites_to_draw.End();
    01444   for (ParentSpriteToDraw *it = _vd.parent_sprites_to_draw.Begin(); it != psd_end; it++) {
    01445     *_vd.parent_sprites_to_sort.Append() = it;
    01446   }
    01447
    01448   ViewportSortParentSprites(&_vd.parent_sprites_to_sort);
    01449   ViewportDrawParentSprites(&_vd.parent_sprites_to_sort, &_vd.child_screen_sprites_to_draw);
    01450
    01451   if (_draw_bounding_boxes) ViewportDrawBoundingBoxes(&_vd.parent_sprites_to_sort);
    01452
    01453   if (_vd.string_sprites_to_draw.Length() != 0) ViewportDrawStrings(&_vd.dpi, &_vd.string_sprites_to_draw);
    01454
    01455   _cur_dpi = old_dpi;
    01456
    01457   _vd.string_sprites_to_draw.Clear();
    01458   _vd.tile_sprites_to_draw.Clear();
    01459   _vd.parent_sprites_to_draw.Clear();
    01460   _vd.parent_sprites_to_sort.Clear();
    01461   _vd.child_screen_sprites_to_draw.Clear();
    01462 }
    01463
    01468 static void ViewportDrawChk(const ViewPort *vp, int left, int top, int right, int bottom)
    01469 {
    01470   if (ScaleByZoom(bottom - top, vp->zoom) * ScaleByZoom(right - left, vp->zoom) > 180000) {
    01471     if ((bottom - top) > (right - left)) {
    01472       int t = (top + bottom) >> 1;
    01473       ViewportDrawChk(vp, left, top, right, t);
    01474       ViewportDrawChk(vp, left, t, right, bottom);
    01475     } else {
    01476       int t = (left + right) >> 1;
    01477       ViewportDrawChk(vp, left, top, t, bottom);
    01478       ViewportDrawChk(vp, t, top, right, bottom);
    01479     }
    01480   } else {
    01481     ViewportDoDraw(vp,
    01482       ScaleByZoom(left - vp->left, vp->zoom) + vp->virtual_left,
    01483       ScaleByZoom(top - vp->top, vp->zoom) + vp->virtual_top,
    01484       ScaleByZoom(right - vp->left, vp->zoom) + vp->virtual_left,
    01485       ScaleByZoom(bottom - vp->top, vp->zoom) + vp->virtual_top
    01486     );
    01487   }
    01488 }
    01489
    01490 static inline void ViewportDraw(const ViewPort *vp, int left, int top, int right, int bottom)
    01491 {
    01492   if (right <= vp->left || bottom <= vp->top) return;
    01493
    01494   if (left >= vp->left + vp->width) return;
    01495
    01496   if (left < vp->left) left = vp->left;
    01497   if (right > vp->left + vp->width) right = vp->left + vp->width;
    01498
    01499   if (top >= vp->top + vp->height) return;
    01500
    01501   if (top < vp->top) top = vp->top;
    01502   if (bottom > vp->top + vp->height) bottom = vp->top + vp->height;
    01503
    01504   ViewportDrawChk(vp, left, top, right, bottom);
    01505 }
    01506
    01510 void Window::DrawViewport() const
    01511 {
    01512   DrawPixelInfo *dpi = _cur_dpi;
    01513
    01514   dpi->left += this->left;
    01515   dpi->top += this->top;
    01516
    01517   ViewportDraw(this->viewport, dpi->left, dpi->top, dpi->left + dpi->width, dpi->top + dpi->height);
    01518
    01519   dpi->left -= this->left;
    01520   dpi->top -= this->top;
    01521 }
    01522
    01523 static inline void ClampViewportToMap(const ViewPort *vp, int &x, int &y)
    01524 {
    01525   /* Centre of the viewport is hot spot */
    01526   x += vp->virtual_width / 2;
    01527   y += vp->virtual_height / 2;
    01528
    01529   /* Convert viewport coordinates to map coordinates
    01530    * Calculation is scaled by 4 to avoid rounding errors */
    01531   int vx = -x + y * 2;
    01532   int vy =  x + y * 2;
    01533
    01534   /* clamp to size of map */
    01535   vx = Clamp(vx, 0, MapMaxX() * TILE_SIZE * 4);
    01536   vy = Clamp(vy, 0, MapMaxY() * TILE_SIZE * 4);
    01537
    01538   /* Convert map coordinates to viewport coordinates */
    01539   x = (-vx + vy) / 2;
    01540   y = ( vx + vy) / 4;
    01541
    01542   /* Remove centering */
    01543   x -= vp->virtual_width / 2;
    01544   y -= vp->virtual_height / 2;
    01545 }
    01546
    01551 void UpdateViewportPosition(Window *w)
    01552 {
    01553   const ViewPort *vp = w->viewport;
    01554
    01555   if (w->viewport->follow_vehicle != INVALID_VEHICLE) {
    01556     const Vehicle *veh = Vehicle::Get(w->viewport->follow_vehicle);
    01557     Point pt = MapXYZToViewport(vp, veh->x_pos, veh->y_pos, veh->z_pos);
    01558
    01559     w->viewport->scrollpos_x = pt.x;
    01560     w->viewport->scrollpos_y = pt.y;
    01561     SetViewportPosition(w, pt.x, pt.y);
    01562   } else {
    01563     /* Ensure the destination location is within the map */
    01564     ClampViewportToMap(vp, w->viewport->dest_scrollpos_x, w->viewport->dest_scrollpos_y);
    01565
    01566     int delta_x = w->viewport->dest_scrollpos_x - w->viewport->scrollpos_x;
    01567     int delta_y = w->viewport->dest_scrollpos_y - w->viewport->scrollpos_y;
    01568
    01569     if (delta_x != 0 || delta_y != 0) {
    01570       if (_settings_client.gui.smooth_scroll) {
    01571         int max_scroll = ScaleByMapSize1D(512);
    01572         /* Not at our desired position yet... */
    01573         w->viewport->scrollpos_x += Clamp(delta_x / 4, -max_scroll, max_scroll);
    01574         w->viewport->scrollpos_y += Clamp(delta_y / 4, -max_scroll, max_scroll);
    01575       } else {
    01576         w->viewport->scrollpos_x = w->viewport->dest_scrollpos_x;
    01577         w->viewport->scrollpos_y = w->viewport->dest_scrollpos_y;
    01578       }
    01579     }
    01580
    01581     ClampViewportToMap(vp, w->viewport->scrollpos_x, w->viewport->scrollpos_y);
    01582
    01583     SetViewportPosition(w, w->viewport->scrollpos_x, w->viewport->scrollpos_y);
    01584   }
    01585 }
    01586
    01596 static void MarkViewportDirty(const ViewPort *vp, int left, int top, int right, int bottom)
    01597 {
    01598   right -= vp->virtual_left;
    01599   if (right <= 0) return;
    01600
    01601   bottom -= vp->virtual_top;
    01602   if (bottom <= 0) return;
    01603
    01604   left = max(0, left - vp->virtual_left);
    01605
    01606   if (left >= vp->virtual_width) return;
    01607
    01608   top = max(0, top - vp->virtual_top);
    01609
    01610   if (top >= vp->virtual_height) return;
    01611
    01612   SetDirtyBlocks(
    01613     UnScaleByZoomLower(left, vp->zoom) + vp->left,
    01614     UnScaleByZoomLower(top, vp->zoom) + vp->top,
    01615     UnScaleByZoom(right, vp->zoom) + vp->left + 1,
    01616     UnScaleByZoom(bottom, vp->zoom) + vp->top + 1
    01617   );
    01618 }
    01619
    01628 void MarkAllViewportsDirty(int left, int top, int right, int bottom)
    01629 {
    01630   Window *w;
    01631   FOR_ALL_WINDOWS_FROM_BACK(w) {
    01632     ViewPort *vp = w->viewport;
    01633     if (vp != NULL) {
    01634       assert(vp->width != 0);
    01635       MarkViewportDirty(vp, left, top, right, bottom);
    01636     }
    01637   }
    01638 }
    01639
    01645 void MarkTileDirtyByTile(TileIndex tile)
    01646 {
    01647   Point pt = RemapCoords(TileX(tile) * TILE_SIZE, TileY(tile) * TILE_SIZE, GetTileZ(tile));
    01648   MarkAllViewportsDirty(
    01649     pt.x - 31,
    01650     pt.y - 122,
    01651     pt.x - 31 + 67,
    01652     pt.y - 122 + 154
    01653   );
    01654 }
    01655
    01663 static void SetSelectionTilesDirty()
    01664 {
    01665   int x_size = _thd.size.x;
    01666   int y_size = _thd.size.y;
    01667
    01668   if (!_thd.diagonal) { // Selecting in a straigth rectangle (or a single square)
    01669     int x_start = _thd.pos.x;
    01670     int y_start = _thd.pos.y;
    01671
    01672     if (_thd.outersize.x != 0) {
    01673       x_size  += _thd.outersize.x;
    01674       x_start += _thd.offs.x;
    01675       y_size  += _thd.outersize.y;
    01676       y_start += _thd.offs.y;
    01677     }
    01678
    01679     x_size -= TILE_SIZE;
    01680     y_size -= TILE_SIZE;
    01681
    01682     assert(x_size >= 0);
    01683     assert(y_size >= 0);
    01684
    01685     int x_end = Clamp(x_start + x_size, 0, MapSizeX() * TILE_SIZE - TILE_SIZE);
    01686     int y_end = Clamp(y_start + y_size, 0, MapSizeY() * TILE_SIZE - TILE_SIZE);
    01687
    01688     x_start = Clamp(x_start, 0, MapSizeX() * TILE_SIZE - TILE_SIZE);
    01689     y_start = Clamp(y_start, 0, MapSizeY() * TILE_SIZE - TILE_SIZE);
    01690
    01691     /* make sure everything is multiple of TILE_SIZE */
    01692     assert((x_end | y_end | x_start | y_start) % TILE_SIZE == 0);
    01693
    01694     /* How it works:
    01695      * Suppose we have to mark dirty rectangle of 3x4 tiles:
    01696      *   x
    01697      *  xxx
    01698      * xxxxx
    01699      *  xxxxx
    01700      *   xxx
    01701      *    x
    01702      * This algorithm marks dirty columns of tiles, so it is done in 3+4-1 steps:
    01703      * 1)  x     2)  x
    01704      *    xxx       Oxx
    01705      *   Oxxxx     xOxxx
    01706      *    xxxxx     Oxxxx
    01707      *     xxx       xxx
    01708      *      x         x
    01709      * And so forth...
    01710      */
    01711
    01712     int top_x = x_end; // coordinates of top dirty tile
    01713     int top_y = y_start;
    01714     int bot_x = top_x; // coordinates of bottom dirty tile
    01715     int bot_y = top_y;
    01716
    01717     do {
    01718       /* topmost dirty point */
    01719       TileIndex top_tile = TileVirtXY(top_x, top_y);
    01720       Point top = RemapCoords(top_x, top_y, GetTileMaxZ(top_tile));
    01721
    01722       /* bottommost point */
    01723       TileIndex bottom_tile = TileVirtXY(bot_x, bot_y);
    01724       Point bot = RemapCoords(bot_x + TILE_SIZE, bot_y + TILE_SIZE, GetTileZ(bottom_tile)); // bottommost point
    01725
    01726       /* the 'x' coordinate of 'top' and 'bot' is the same (and always in the same distance from tile middle),
    01727        * tile height/slope affects only the 'y' on-screen coordinate! */
    01728
    01729       int l = top.x - (TILE_PIXELS - 2); // 'x' coordinate of left side of dirty rectangle
    01730       int t = top.y;                     // 'y' coordinate of top side -//-
    01731       int r = top.x + (TILE_PIXELS - 2); // right side of dirty rectangle
    01732       int b = bot.y;                     // bottom -//-
    01733
    01734       static const int OVERLAY_WIDTH = 4; // part of selection sprites is drawn outside the selected area
    01735
    01736       /* For halftile foundations on SLOPE_STEEP_S the sprite extents some more towards the top */
    01737       MarkAllViewportsDirty(l - OVERLAY_WIDTH, t - OVERLAY_WIDTH - TILE_HEIGHT, r + OVERLAY_WIDTH, b + OVERLAY_WIDTH);
    01738
    01739       /* haven't we reached the topmost tile yet? */
    01740       if (top_x != x_start) {
    01741         top_x -= TILE_SIZE;
    01742       } else {
    01743         top_y += TILE_SIZE;
    01744       }
    01745
    01746       /* the way the bottom tile changes is different when we reach the bottommost tile */
    01747       if (bot_y != y_end) {
    01748         bot_y += TILE_SIZE;
    01749       } else {
    01750         bot_x -= TILE_SIZE;
    01751       }
    01752     } while (bot_x >= top_x);
    01753   } else { // Selecting in a 45 degrees rotated (diagonal) rectangle.
    01754     /* a_size, b_size describe a rectangle with rotated coordinates */
    01755     int a_size = x_size + y_size, b_size = x_size - y_size;
    01756
    01757     int interval_a = a_size < 0 ? -(int)TILE_SIZE : (int)TILE_SIZE;
    01758     int interval_b = b_size < 0 ? -(int)TILE_SIZE : (int)TILE_SIZE;
    01759
    01760     for (int a = -interval_a; a != a_size + interval_a; a += interval_a) {
    01761       for (int b = -interval_b; b != b_size + interval_b; b += interval_b) {
    01762         uint x = (_thd.pos.x + (a + b) / 2) / TILE_SIZE;
    01763         uint y = (_thd.pos.y + (a - b) / 2) / TILE_SIZE;
    01764
    01765         if (x < MapMaxX() && y < MapMaxY()) {
    01766           MarkTileDirtyByTile(TileXY(x, y));
    01767         }
    01768       }
    01769     }
    01770   }
    01771 }
    01772
    01773
    01774 void SetSelectionRed(bool b)
    01775 {
    01776   _thd.make_square_red = b;
    01777   SetSelectionTilesDirty();
    01778 }
    01779
    01788 static bool CheckClickOnViewportSign(const ViewPort *vp, int x, int y, const ViewportSign *sign)
    01789 {
    01790   bool small = (vp->zoom >= ZOOM_LVL_OUT_4X);
    01791   int sign_half_width = ScaleByZoom((small ? sign->width_small : sign->width_normal) / 2, vp->zoom);
    01792   int sign_height = ScaleByZoom(VPSM_TOP + (small ? FONT_HEIGHT_SMALL : FONT_HEIGHT_NORMAL) + VPSM_BOTTOM, vp->zoom);
    01793
    01794   x = ScaleByZoom(x - vp->left, vp->zoom) + vp->virtual_left;
    01795   y = ScaleByZoom(y - vp->top, vp->zoom) + vp->virtual_top;
    01796
    01797   return y >= sign->top && y < sign->top + sign_height &&
    01798       x >= sign->center - sign_half_width && x < sign->center + sign_half_width;
    01799 }
    01800
    01801 static bool CheckClickOnTown(const ViewPort *vp, int x, int y)
    01802 {
    01803   if (!HasBit(_display_opt, DO_SHOW_TOWN_NAMES)) return false;
    01804
    01805   const Town *t;
    01806   FOR_ALL_TOWNS(t) {
    01807     if (CheckClickOnViewportSign(vp, x, y, &t->sign)) {
    01808       ShowTownViewWindow(t->index);
    01809       return true;
    01810     }
    01811   }
    01812
    01813   return false;
    01814 }
    01815
    01816 static bool CheckClickOnStation(const ViewPort *vp, int x, int y)
    01817 {
    01818   if (!(HasBit(_display_opt, DO_SHOW_STATION_NAMES) || HasBit(_display_opt, DO_SHOW_WAYPOINT_NAMES)) || IsInvisibilitySet(TO_SIGNS)) return false;
    01819
    01820   const BaseStation *st;
    01821   FOR_ALL_BASE_STATIONS(st) {
    01822     /* Check whether the base station is a station or a waypoint */
    01823     bool is_station = Station::IsExpected(st);
    01824
    01825     /* Don't check if the display options are disabled */
    01826     if (!HasBit(_display_opt, is_station ? DO_SHOW_STATION_NAMES : DO_SHOW_WAYPOINT_NAMES)) continue;
    01827
    01828     if (CheckClickOnViewportSign(vp, x, y, &st->sign)) {
    01829       if (is_station) {
    01830         ShowStationViewWindow(st->index);
    01831       } else {
    01832         ShowWaypointWindow(Waypoint::From(st));
    01833       }
    01834       return true;
    01835     }
    01836   }
    01837
    01838   return false;
    01839 }
    01840
    01841
    01842 static bool CheckClickOnSign(const ViewPort *vp, int x, int y)
    01843 {
    01844   /* Signs are turned off, or they are transparent and invisibility is ON, or company is a spectator */
    01845   if (!HasBit(_display_opt, DO_SHOW_SIGNS) || IsInvisibilitySet(TO_SIGNS) || _local_company == COMPANY_SPECTATOR) return false;
    01846
    01847   const Sign *si;
    01848   FOR_ALL_SIGNS(si) {
    01849     if (CheckClickOnViewportSign(vp, x, y, &si->sign)) {
    01850       HandleClickOnSign(si);
    01851       return true;
    01852     }
    01853   }
    01854
    01855   return false;
    01856 }
    01857
    01858
    01859 static bool CheckClickOnLandscape(const ViewPort *vp, int x, int y)
    01860 {
    01861   Point pt = TranslateXYToTileCoord(vp, x, y);
    01862
    01863   if (pt.x != -1) return ClickTile(TileVirtXY(pt.x, pt.y));
    01864   return true;
    01865 }
    01866
    01867 static void PlaceObject()
    01868 {
    01869   Point pt;
    01870   Window *w;
    01871
    01872   pt = GetTileBelowCursor();
    01873   if (pt.x == -1) return;
    01874
    01875   if ((_thd.place_mode & HT_DRAG_MASK) == HT_POINT) {
    01876     pt.x += 8;
    01877     pt.y += 8;
    01878   }
    01879
    01880   _tile_fract_coords.x = pt.x & TILE_UNIT_MASK;
    01881   _tile_fract_coords.y = pt.y & TILE_UNIT_MASK;
    01882
    01883   w = _thd.GetCallbackWnd();
    01884   if (w != NULL) w->OnPlaceObject(pt, TileVirtXY(pt.x, pt.y));
    01885 }
    01886
    01887
    01888 bool HandleViewportClicked(const ViewPort *vp, int x, int y)
    01889 {
    01890   const Vehicle *v = CheckClickOnVehicle(vp, x, y);
    01891
    01892   if (_thd.place_mode & HT_VEHICLE) {
    01893     if (v != NULL && VehicleClicked(v)) return true;
    01894   }
    01895
    01896   /* Vehicle placement mode already handled above. */
    01897   if ((_thd.place_mode & HT_DRAG_MASK) != HT_NONE) {
    01898     PlaceObject();
    01899     return true;
    01900   }
    01901
    01902   if (CheckClickOnTown(vp, x, y)) return true;
    01903   if (CheckClickOnStation(vp, x, y)) return true;
    01904   if (CheckClickOnSign(vp, x, y)) return true;
    01905   bool result = CheckClickOnLandscape(vp, x, y);
    01906
    01907   if (v != NULL) {
    01908     DEBUG(misc, 2, "Vehicle %d (index %d) at %p", v->unitnumber, v->index, v);
    01909     if (IsCompanyBuildableVehicleType(v)) {
    01910       v = v->First();
    01911       if (_ctrl_pressed && v->owner == _local_company) {
    01912         StartStopVehicle(v, true);
    01913       } else {
    01914         ShowVehicleViewWindow(v);
    01915       }
    01916     }
    01917     return true;
    01918   }
    01919   return result;
    01920 }
    01921
    01922
    01932 bool ScrollWindowTo(int x, int y, int z, Window *w, bool instant)
    01933 {
    01934   /* The slope cannot be acquired outside of the map, so make sure we are always within the map. */
    01935   if (z == -1) z = GetSlopeZ(Clamp(x, 0, MapSizeX() * TILE_SIZE - 1), Clamp(y, 0, MapSizeY() * TILE_SIZE - 1));
    01936
    01937   Point pt = MapXYZToViewport(w->viewport, x, y, z);
    01938   w->viewport->follow_vehicle = INVALID_VEHICLE;
    01939
    01940   if (w->viewport->dest_scrollpos_x == pt.x && w->viewport->dest_scrollpos_y == pt.y) return false;
    01941
    01942   if (instant) {
    01943     w->viewport->scrollpos_x = pt.x;
    01944     w->viewport->scrollpos_y = pt.y;
    01945   }
    01946
    01947   w->viewport->dest_scrollpos_x = pt.x;
    01948   w->viewport->dest_scrollpos_y = pt.y;
    01949   return true;
    01950 }
    01951
    01959 bool ScrollWindowToTile(TileIndex tile, Window *w, bool instant)
    01960 {
    01961   return ScrollWindowTo(TileX(tile) * TILE_SIZE, TileY(tile) * TILE_SIZE, -1, w, instant);
    01962 }
    01963
    01970 bool ScrollMainWindowToTile(TileIndex tile, bool instant)
    01971 {
    01972   return ScrollMainWindowTo(TileX(tile) * TILE_SIZE + TILE_SIZE / 2, TileY(tile) * TILE_SIZE + TILE_SIZE / 2, -1, instant);
    01973 }
    01974
    01979 void SetRedErrorSquare(TileIndex tile)
    01980 {
    01981   TileIndex old;
    01982
    01983   old = _thd.redsq;
    01984   _thd.redsq = tile;
    01985
    01986   if (tile != old) {
    01987     if (tile != INVALID_TILE) MarkTileDirtyByTile(tile);
    01988     if (old  != INVALID_TILE) MarkTileDirtyByTile(old);
    01989   }
    01990 }
    01991
    01997 void SetTileSelectSize(int w, int h)
    01998 {
    01999   _thd.new_size.x = w * TILE_SIZE;
    02000   _thd.new_size.y = h * TILE_SIZE;
    02001   _thd.new_outersize.x = 0;
    02002   _thd.new_outersize.y = 0;
    02003 }
    02004
    02005 void SetTileSelectBigSize(int ox, int oy, int sx, int sy)
    02006 {
    02007   _thd.offs.x = ox * TILE_SIZE;
    02008   _thd.offs.y = oy * TILE_SIZE;
    02009   _thd.new_outersize.x = sx * TILE_SIZE;
    02010   _thd.new_outersize.y = sy * TILE_SIZE;
    02011 }
    02012
    02014 static HighLightStyle GetAutorailHT(int x, int y)
    02015 {
    02016   return HT_RAIL | _autorail_piece[x & TILE_UNIT_MASK][y & TILE_UNIT_MASK];
    02017 }
    02018
    02022 void TileHighlightData::Reset()
    02023 {
    02024   this->pos.x = 0;
    02025   this->pos.y = 0;
    02026   this->new_pos.x = 0;
    02027   this->new_pos.y = 0;
    02028 }
    02029
    02034 bool TileHighlightData::IsDraggingDiagonal()
    02035 {
    02036   return (this->place_mode & HT_DIAGONAL) != 0 && _ctrl_pressed && _left_button_down;
    02037 }
    02038
    02043 Window *TileHighlightData::GetCallbackWnd()
    02044 {
    02045   return FindWindowById(this->window_class, this->window_number);
    02046 }
    02047
    02048
    02049
    02057 void UpdateTileSelection()
    02058 {
    02059   int x1;
    02060   int y1;
    02061
    02062   HighLightStyle new_drawstyle = HT_NONE;
    02063   bool new_diagonal = false;
    02064
    02065   if ((_thd.place_mode & HT_DRAG_MASK) == HT_SPECIAL) {
    02066     x1 = _thd.selend.x;
    02067     y1 = _thd.selend.y;
    02068     if (x1 != -1) {
    02069       int x2 = _thd.selstart.x & ~TILE_UNIT_MASK;
    02070       int y2 = _thd.selstart.y & ~TILE_UNIT_MASK;
    02071       x1 &= ~TILE_UNIT_MASK;
    02072       y1 &= ~TILE_UNIT_MASK;
    02073
    02074       if (_thd.IsDraggingDiagonal()) {
    02075         new_diagonal = true;
    02076       } else {
    02077         if (x1 >= x2) Swap(x1, x2);
    02078         if (y1 >= y2) Swap(y1, y2);
    02079       }
    02080       _thd.new_pos.x = x1;
    02081       _thd.new_pos.y = y1;
    02082       _thd.new_size.x = x2 - x1;
    02083       _thd.new_size.y = y2 - y1;
    02084       if (!new_diagonal) {
    02085         _thd.new_size.x += TILE_SIZE;
    02086         _thd.new_size.y += TILE_SIZE;
    02087       }
    02088       new_drawstyle = _thd.next_drawstyle;
    02089     }
    02090   } else if ((_thd.place_mode & HT_DRAG_MASK) != HT_NONE) {
    02091     Point pt = GetTileBelowCursor();
    02092     x1 = pt.x;
    02093     y1 = pt.y;
    02094     if (x1 != -1) {
    02095       switch (_thd.place_mode & HT_DRAG_MASK) {
    02096         case HT_RECT:
    02097           new_drawstyle = HT_RECT;
    02098           break;
    02099         case HT_POINT:
    02100           new_drawstyle = HT_POINT;
    02101           x1 += TILE_SIZE / 2;
    02102           y1 += TILE_SIZE / 2;
    02103           break;
    02104         case HT_RAIL:
    02105           /* Draw one highlighted tile in any direction */
    02106           new_drawstyle = GetAutorailHT(pt.x, pt.y);
    02107           break;
    02108         case HT_LINE:
    02109           switch (_thd.place_mode & HT_DIR_MASK) {
    02110             case HT_DIR_X: new_drawstyle = HT_LINE | HT_DIR_X; break;
    02111             case HT_DIR_Y: new_drawstyle = HT_LINE | HT_DIR_Y; break;
    02112
    02113             case HT_DIR_HU:
    02114             case HT_DIR_HL:
    02115               new_drawstyle = (pt.x & TILE_UNIT_MASK) + (pt.y & TILE_UNIT_MASK) <= TILE_SIZE ? HT_LINE | HT_DIR_HU : HT_LINE | HT_DIR_HL;
    02116               break;
    02117
    02118             case HT_DIR_VL:
    02119             case HT_DIR_VR:
    02120               new_drawstyle = (pt.x & TILE_UNIT_MASK) > (pt.y & TILE_UNIT_MASK) ? HT_LINE | HT_DIR_VL : HT_LINE | HT_DIR_VR;
    02121               break;
    02122
    02123             default: NOT_REACHED();
    02124           }
    02125           _thd.selstart.x = x1 & ~TILE_UNIT_MASK;
    02126           _thd.selstart.y = y1 & ~TILE_UNIT_MASK;
    02127           break;
    02128         default:
    02129           NOT_REACHED();
    02130           break;
    02131       }
    02132       _thd.new_pos.x = x1 & ~TILE_UNIT_MASK;
    02133       _thd.new_pos.y = y1 & ~TILE_UNIT_MASK;
    02134     }
    02135   }
    02136
    02137   /* redraw selection */
    02138   if (_thd.drawstyle != new_drawstyle ||
    02139       _thd.pos.x != _thd.new_pos.x || _thd.pos.y != _thd.new_pos.y ||
    02140       _thd.size.x != _thd.new_size.x || _thd.size.y != _thd.new_size.y ||
    02141       _thd.outersize.x != _thd.new_outersize.x ||
    02142       _thd.outersize.y != _thd.new_outersize.y ||
    02143       _thd.diagonal    != new_diagonal) {
    02144     /* Clear the old tile selection? */
    02145     if ((_thd.drawstyle & HT_DRAG_MASK) != HT_NONE) SetSelectionTilesDirty();
    02146
    02147     _thd.drawstyle = new_drawstyle;
    02148     _thd.pos = _thd.new_pos;
    02149     _thd.size = _thd.new_size;
    02150     _thd.outersize = _thd.new_outersize;
    02151     _thd.diagonal = new_diagonal;
    02152     _thd.dirty = 0xff;
    02153
    02154     /* Draw the new tile selection? */
    02155     if ((new_drawstyle & HT_DRAG_MASK) != HT_NONE) SetSelectionTilesDirty();
    02156   }
    02157 }
    02158
    02166 static inline void ShowMeasurementTooltips(StringID str, uint paramcount, const uint64 params[], TooltipCloseCondition close_cond = TCC_LEFT_CLICK)
    02167 {
    02168   if (!_settings_client.gui.measure_tooltip) return;
    02169   GuiShowTooltips(_thd.GetCallbackWnd(), str, paramcount, params, close_cond);
    02170 }
    02171
    02173 void VpStartPlaceSizing(TileIndex tile, ViewportPlaceMethod method, ViewportDragDropSelectionProcess process)
    02174 {
    02175   _thd.select_method = method;
    02176   _thd.select_proc   = process;
    02177   _thd.selend.x = TileX(tile) * TILE_SIZE;
    02178   _thd.selstart.x = TileX(tile) * TILE_SIZE;
    02179   _thd.selend.y = TileY(tile) * TILE_SIZE;
    02180   _thd.selstart.y = TileY(tile) * TILE_SIZE;
    02181
    02182   /* Needed so several things (road, autoroad, bridges, ...) are placed correctly.
    02183    * In effect, placement starts from the centre of a tile
    02184    */
    02185   if (method == VPM_X_OR_Y || method == VPM_FIX_X || method == VPM_FIX_Y) {
    02186     _thd.selend.x += TILE_SIZE / 2;
    02187     _thd.selend.y += TILE_SIZE / 2;
    02188     _thd.selstart.x += TILE_SIZE / 2;
    02189     _thd.selstart.y += TILE_SIZE / 2;
    02190   }
    02191
    02192   HighLightStyle others = _thd.place_mode & ~(HT_DRAG_MASK | HT_DIR_MASK);
    02193   if ((_thd.place_mode & HT_DRAG_MASK) == HT_RECT) {
    02194     _thd.place_mode = HT_SPECIAL | others;
    02195     _thd.next_drawstyle = HT_RECT | others;
    02196   } else if (_thd.place_mode & (HT_RAIL | HT_LINE)) {
    02197     _thd.place_mode = HT_SPECIAL | others;
    02198     _thd.next_drawstyle = _thd.drawstyle | others;
    02199   } else {
    02200     _thd.place_mode = HT_SPECIAL | others;
    02201     _thd.next_drawstyle = HT_POINT | others;
    02202   }
    02203   _special_mouse_mode = WSM_SIZING;
    02204 }
    02205
    02206 void VpSetPlaceSizingLimit(int limit)
    02207 {
    02208   _thd.sizelimit = limit;
    02209 }
    02210
    02216 void VpSetPresizeRange(TileIndex from, TileIndex to)
    02217 {
    02218   uint64 distance = DistanceManhattan(from, to) + 1;
    02219
    02220   _thd.selend.x = TileX(to) * TILE_SIZE;
    02221   _thd.selend.y = TileY(to) * TILE_SIZE;
    02222   _thd.selstart.x = TileX(from) * TILE_SIZE;
    02223   _thd.selstart.y = TileY(from) * TILE_SIZE;
    02224   _thd.next_drawstyle = HT_RECT;
    02225
    02226   /* show measurement only if there is any length to speak of */
    02227   if (distance > 1) ShowMeasurementTooltips(STR_MEASURE_LENGTH, 1, &distance, TCC_HOVER);
    02228 }
    02229
    02230 static void VpStartPreSizing()
    02231 {
    02232   _thd.selend.x = -1;
    02233   _special_mouse_mode = WSM_PRESIZE;
    02234 }
    02235
    02240 static HighLightStyle Check2x1AutoRail(int mode)
    02241 {
    02242   int fxpy = _tile_fract_coords.x + _tile_fract_coords.y;
    02243   int sxpy = (_thd.selend.x & TILE_UNIT_MASK) + (_thd.selend.y & TILE_UNIT_MASK);
    02244   int fxmy = _tile_fract_coords.x - _tile_fract_coords.y;
    02245   int sxmy = (_thd.selend.x & TILE_UNIT_MASK) - (_thd.selend.y & TILE_UNIT_MASK);
    02246
    02247   switch (mode) {
    02248     default: NOT_REACHED();
    02249     case 0: // end piece is lower right
    02250       if (fxpy >= 20 && sxpy <= 12) return HT_DIR_HL;
    02251       if (fxmy < -3 && sxmy > 3) return HT_DIR_VR;
    02252       return HT_DIR_Y;
    02253
    02254     case 1:
    02255       if (fxmy > 3 && sxmy < -3) return HT_DIR_VL;
    02256       if (fxpy <= 12 && sxpy >= 20) return HT_DIR_HU;
    02257       return HT_DIR_Y;
    02258
    02259     case 2:
    02260       if (fxmy > 3 && sxmy < -3) return HT_DIR_VL;
    02261       if (fxpy >= 20 && sxpy <= 12) return HT_DIR_HL;
    02262       return HT_DIR_X;
    02263
    02264     case 3:
    02265       if (fxmy < -3 && sxmy > 3) return HT_DIR_VR;
    02266       if (fxpy <= 12 && sxpy >= 20) return HT_DIR_HU;
    02267       return HT_DIR_X;
    02268   }
    02269 }
    02270
    02284 static bool SwapDirection(HighLightStyle style, TileIndex start_tile, TileIndex end_tile)
    02285 {
    02286   uint start_x = TileX(start_tile);
    02287   uint start_y = TileY(start_tile);
    02288   uint end_x = TileX(end_tile);
    02289   uint end_y = TileY(end_tile);
    02290
    02291   switch (style & HT_DRAG_MASK) {
    02292     case HT_RAIL:
    02293     case HT_LINE: return (end_x > start_x || (end_x == start_x && end_y > start_y));
    02294
    02295     case HT_RECT:
    02296     case HT_POINT: return (end_x != start_x && end_y < start_y);
    02297     default: NOT_REACHED();
    02298   }
    02299
    02300   return false;
    02301 }
    02302
    02318 static int CalcHeightdiff(HighLightStyle style, uint distance, TileIndex start_tile, TileIndex end_tile)
    02319 {
    02320   bool swap = SwapDirection(style, start_tile, end_tile);
    02321   uint h0, h1; // Start height and end height.
    02322
    02323   if (start_tile == end_tile) return 0;
    02324   if (swap) Swap(start_tile, end_tile);
    02325
    02326   switch (style & HT_DRAG_MASK) {
    02327     case HT_RECT: {
    02328       static const TileIndexDiffC heightdiff_area_by_dir[] = {
    02329         /* Start */ {1, 0}, /* Dragging east */ {0, 0}, // Dragging south
    02330         /* End   */ {0, 1}, /* Dragging east */ {1, 1}  // Dragging south
    02331       };
    02332
    02333       /* In the case of an area we can determine whether we were dragging south or
    02334        * east by checking the X-coordinates of the tiles */
    02335       byte style_t = (byte)(TileX(end_tile) > TileX(start_tile));
    02336       start_tile = TILE_ADD(start_tile, ToTileIndexDiff(heightdiff_area_by_dir[style_t]));
    02337       end_tile   = TILE_ADD(end_tile, ToTileIndexDiff(heightdiff_area_by_dir[2 + style_t]));
    02338       /* FALL THROUGH */
    02339     }
    02340
    02341     case HT_POINT:
    02342       h0 = TileHeight(start_tile);
    02343       h1 = TileHeight(end_tile);
    02344       break;
    02345     default: { // All other types, this is mostly only line/autorail
    02346       static const HighLightStyle flip_style_direction[] = {
    02347         HT_DIR_X, HT_DIR_Y, HT_DIR_HL, HT_DIR_HU, HT_DIR_VR, HT_DIR_VL
    02348       };
    02349       static const TileIndexDiffC heightdiff_line_by_dir[] = {
    02350         /* Start */ {1, 0}, {1, 1}, /* HT_DIR_X  */ {0, 1}, {1, 1}, // HT_DIR_Y
    02351         /* Start */ {1, 0}, {0, 0}, /* HT_DIR_HU */ {1, 0}, {1, 1}, // HT_DIR_HL
    02352         /* Start */ {1, 0}, {1, 1}, /* HT_DIR_VL */ {0, 1}, {1, 1}, // HT_DIR_VR
    02353
    02354         /* Start */ {0, 1}, {0, 0}, /* HT_DIR_X  */ {1, 0}, {0, 0}, // HT_DIR_Y
    02355         /* End   */ {0, 1}, {0, 0}, /* HT_DIR_HU */ {1, 1}, {0, 1}, // HT_DIR_HL
    02356         /* End   */ {1, 0}, {0, 0}, /* HT_DIR_VL */ {0, 0}, {0, 1}, // HT_DIR_VR
    02357       };
    02358
    02359       distance %= 2; // we're only interested if the distance is even or uneven
    02360       style &= HT_DIR_MASK;
    02361
    02362       /* To handle autorail, we do some magic to be able to use a lookup table.
    02363        * Firstly if we drag the other way around, we switch start&end, and if needed
    02364        * also flip the drag-position. Eg if it was on the left, and the distance is even
    02365        * that means the end, which is now the start is on the right */
    02366       if (swap && distance == 0) style = flip_style_direction[style];
    02367
    02368       /* Use lookup table for start-tile based on HighLightStyle direction */
    02369       byte style_t = style * 2;
    02370       assert(style_t < lengthof(heightdiff_line_by_dir) - 13);
    02371       h0 = TileHeight(TILE_ADD(start_tile, ToTileIndexDiff(heightdiff_line_by_dir[style_t])));
    02372       uint ht = TileHeight(TILE_ADD(start_tile, ToTileIndexDiff(heightdiff_line_by_dir[style_t + 1])));
    02373       h0 = max(h0, ht);
    02374
    02375       /* Use lookup table for end-tile based on HighLightStyle direction
    02376        * flip around side (lower/upper, left/right) based on distance */
    02377       if (distance == 0) style_t = flip_style_direction[style] * 2;
    02378       assert(style_t < lengthof(heightdiff_line_by_dir) - 13);
    02379       h1 = TileHeight(TILE_ADD(end_tile, ToTileIndexDiff(heightdiff_line_by_dir[12 + style_t])));
    02380       ht = TileHeight(TILE_ADD(end_tile, ToTileIndexDiff(heightdiff_line_by_dir[12 + style_t + 1])));
    02381       h1 = max(h1, ht);
    02382       break;
    02383     }
    02384   }
    02385
    02386   if (swap) Swap(h0, h1);
    02387   return (int)(h1 - h0) * TILE_HEIGHT_STEP;
    02388 }
    02389
    02390 static const StringID measure_strings_length[] = {STR_NULL, STR_MEASURE_LENGTH, STR_MEASURE_LENGTH_HEIGHTDIFF};
    02391
    02398 static void CheckUnderflow(int &test, int &other, int mult)
    02399 {
    02400   if (test >= 0) return;
    02401
    02402   other += mult * test;
    02403   test = 0;
    02404 }
    02405
    02413 static void CheckOverflow(int &test, int &other, int max, int mult)
    02414 {
    02415   if (test <= max) return;
    02416
    02417   other += mult * (test - max);
    02418   test = max;
    02419 }
    02420
    02422 static void CalcRaildirsDrawstyle(int x, int y, int method)
    02423 {
    02424   HighLightStyle b;
    02425
    02426   int dx = _thd.selstart.x - (_thd.selend.x & ~TILE_UNIT_MASK);
    02427   int dy = _thd.selstart.y - (_thd.selend.y & ~TILE_UNIT_MASK);
    02428   uint w = abs(dx) + TILE_SIZE;
    02429   uint h = abs(dy) + TILE_SIZE;
    02430
    02431   if (method & ~(VPM_RAILDIRS | VPM_SIGNALDIRS)) {
    02432     /* We 'force' a selection direction; first four rail buttons. */
    02433     method &= ~(VPM_RAILDIRS | VPM_SIGNALDIRS);
    02434     int raw_dx = _thd.selstart.x - _thd.selend.x;
    02435     int raw_dy = _thd.selstart.y - _thd.selend.y;
    02436     switch (method) {
    02437       case VPM_FIX_X:
    02438         b = HT_LINE | HT_DIR_Y;
    02439         x = _thd.selstart.x;
    02440         break;
    02441
    02442       case VPM_FIX_Y:
    02443         b = HT_LINE | HT_DIR_X;
    02444         y = _thd.selstart.y;
    02445         break;
    02446
    02447       case VPM_FIX_HORIZONTAL:
    02448         if (dx == -dy) {
    02449           /* We are on a straight horizontal line. Determine the 'rail'
    02450            * to build based the sub tile location. */
    02451           b = (x & TILE_UNIT_MASK) + (y & TILE_UNIT_MASK) >= TILE_SIZE ? HT_LINE | HT_DIR_HL : HT_LINE | HT_DIR_HU;
    02452         } else {
    02453           /* We are not on a straight line. Determine the rail to build
    02454            * based on whether we are above or below it. */
    02455           b = dx + dy >= (int)TILE_SIZE ? HT_LINE | HT_DIR_HU : HT_LINE | HT_DIR_HL;
    02456
    02457           /* Calculate where a horizontal line through the start point and
    02458            * a vertical line from the selected end point intersect and
    02459            * use that point as the end point. */
    02460           int offset = (raw_dx - raw_dy) / 2;
    02461           x = _thd.selstart.x - (offset & ~TILE_UNIT_MASK);
    02462           y = _thd.selstart.y + (offset & ~TILE_UNIT_MASK);
    02463
    02464           /* 'Build' the last half rail tile if needed */
    02465           if ((offset & TILE_UNIT_MASK) > (TILE_SIZE / 2)) {
    02466             if (dx + dy >= (int)TILE_SIZE) {
    02467               x += (dx + dy < 0) ? (int)TILE_SIZE : -(int)TILE_SIZE;
    02468             } else {
    02469               y += (dx + dy < 0) ? (int)TILE_SIZE : -(int)TILE_SIZE;
    02470             }
    02471           }
    02472
    02473           /* Make sure we do not overflow the map! */
    02474           CheckUnderflow(x, y, 1);
    02475           CheckUnderflow(y, x, 1);
    02476           CheckOverflow(x, y, (MapMaxX() - 1) * TILE_SIZE, 1);
    02477           CheckOverflow(y, x, (MapMaxY() - 1) * TILE_SIZE, 1);
    02478           assert(x >= 0 && y >= 0 && x <= (int)(MapMaxX() * TILE_SIZE) && y <= (int)(MapMaxY() * TILE_SIZE));
    02479         }
    02480         break;
    02481
    02482       case VPM_FIX_VERTICAL:
    02483         if (dx == dy) {
    02484           /* We are on a straight vertical line. Determine the 'rail'
    02485            * to build based the sub tile location. */
    02486           b = (x & TILE_UNIT_MASK) > (y & TILE_UNIT_MASK) ? HT_LINE | HT_DIR_VL : HT_LINE | HT_DIR_VR;
    02487         } else {
    02488           /* We are not on a straight line. Determine the rail to build
    02489            * based on whether we are left or right from it. */
    02490           b = dx < dy ? HT_LINE | HT_DIR_VL : HT_LINE | HT_DIR_VR;
    02491
    02492           /* Calculate where a vertical line through the start point and
    02493            * a horizontal line from the selected end point intersect and
    02494            * use that point as the end point. */
    02495           int offset = (raw_dx + raw_dy + (int)TILE_SIZE) / 2;
    02496           x = _thd.selstart.x - (offset & ~TILE_UNIT_MASK);
    02497           y = _thd.selstart.y - (offset & ~TILE_UNIT_MASK);
    02498
    02499           /* 'Build' the last half rail tile if needed */
    02500           if ((offset & TILE_UNIT_MASK) > (TILE_SIZE / 2)) {
    02501             if (dx - dy < 0) {
    02502               y += (dx > dy) ? (int)TILE_SIZE : -(int)TILE_SIZE;
    02503             } else {
    02504               x += (dx < dy) ? (int)TILE_SIZE : -(int)TILE_SIZE;
    02505             }
    02506           }
    02507
    02508           /* Make sure we do not overflow the map! */
    02509           CheckUnderflow(x, y, -1);
    02510           CheckUnderflow(y, x, -1);
    02511           CheckOverflow(x, y, (MapMaxX() - 1) * TILE_SIZE, -1);
    02512           CheckOverflow(y, x, (MapMaxY() - 1) * TILE_SIZE, -1);
    02513           assert(x >= 0 && y >= 0 && x <= (int)(MapMaxX() * TILE_SIZE) && y <= (int)(MapMaxY() * TILE_SIZE));
    02514         }
    02515         break;
    02516
    02517       default:
    02518         NOT_REACHED();
    02519     }
    02520   } else if (TileVirtXY(_thd.selstart.x, _thd.selstart.y) == TileVirtXY(x, y)) { // check if we're only within one tile
    02521     if (method & VPM_RAILDIRS) {
    02522       b = GetAutorailHT(x, y);
    02523     } else { // rect for autosignals on one tile
    02524       b = HT_RECT;
    02525     }
    02526   } else if (h == TILE_SIZE) { // Is this in X direction?
    02527     if (dx == (int)TILE_SIZE) { // 2x1 special handling
    02528       b = (Check2x1AutoRail(3)) | HT_LINE;
    02529     } else if (dx == -(int)TILE_SIZE) {
    02530       b = (Check2x1AutoRail(2)) | HT_LINE;
    02531     } else {
    02532       b = HT_LINE | HT_DIR_X;
    02533     }
    02534     y = _thd.selstart.y;
    02535   } else if (w == TILE_SIZE) { // Or Y direction?
    02536     if (dy == (int)TILE_SIZE) { // 2x1 special handling
    02537       b = (Check2x1AutoRail(1)) | HT_LINE;
    02538     } else if (dy == -(int)TILE_SIZE) { // 2x1 other direction
    02539       b = (Check2x1AutoRail(0)) | HT_LINE;
    02540     } else {
    02541       b = HT_LINE | HT_DIR_Y;
    02542     }
    02543     x = _thd.selstart.x;
    02544   } else if (w > h * 2) { // still count as x dir?
    02545     b = HT_LINE | HT_DIR_X;
    02546     y = _thd.selstart.y;
    02547   } else if (h > w * 2) { // still count as y dir?
    02548     b = HT_LINE | HT_DIR_Y;
    02549     x = _thd.selstart.x;
    02550   } else { // complicated direction
    02551     int d = w - h;
    02552     _thd.selend.x = _thd.selend.x & ~TILE_UNIT_MASK;
    02553     _thd.selend.y = _thd.selend.y & ~TILE_UNIT_MASK;
    02554
    02555     /* four cases. */
    02556     if (x > _thd.selstart.x) {
    02557       if (y > _thd.selstart.y) {
    02558         /* south */
    02559         if (d == 0) {
    02560           b = (x & TILE_UNIT_MASK) > (y & TILE_UNIT_MASK) ? HT_LINE | HT_DIR_VL : HT_LINE | HT_DIR_VR;
    02561         } else if (d >= 0) {
    02562           x = _thd.selstart.x + h;
    02563           b = HT_LINE | HT_DIR_VL;
    02564         } else {
    02565           y = _thd.selstart.y + w;
    02566           b = HT_LINE | HT_DIR_VR;
    02567         }
    02568       } else {
    02569         /* west */
    02570         if (d == 0) {
    02571           b = (x & TILE_UNIT_MASK) + (y & TILE_UNIT_MASK) >= TILE_SIZE ? HT_LINE | HT_DIR_HL : HT_LINE | HT_DIR_HU;
    02572         } else if (d >= 0) {
    02573           x = _thd.selstart.x + h;
    02574           b = HT_LINE | HT_DIR_HL;
    02575         } else {
    02576           y = _thd.selstart.y - w;
    02577           b = HT_LINE | HT_DIR_HU;
    02578         }
    02579       }
    02580     } else {
    02581       if (y > _thd.selstart.y) {
    02582         /* east */
    02583         if (d == 0) {
    02584           b = (x & TILE_UNIT_MASK) + (y & TILE_UNIT_MASK) >= TILE_SIZE ? HT_LINE | HT_DIR_HL : HT_LINE | HT_DIR_HU;
    02585         } else if (d >= 0) {
    02586           x = _thd.selstart.x - h;
    02587           b = HT_LINE | HT_DIR_HU;
    02588         } else {
    02589           y = _thd.selstart.y + w;
    02590           b = HT_LINE | HT_DIR_HL;
    02591         }
    02592       } else {
    02593         /* north */
    02594         if (d == 0) {
    02595           b = (x & TILE_UNIT_MASK) > (y & TILE_UNIT_MASK) ? HT_LINE | HT_DIR_VL : HT_LINE | HT_DIR_VR;
    02596         } else if (d >= 0) {
    02597           x = _thd.selstart.x - h;
    02598           b = HT_LINE | HT_DIR_VR;
    02599         } else {
    02600           y = _thd.selstart.y - w;
    02601           b = HT_LINE | HT_DIR_VL;
    02602         }
    02603       }
    02604     }
    02605   }
    02606
    02607   if (_settings_client.gui.measure_tooltip) {
    02608     TileIndex t0 = TileVirtXY(_thd.selstart.x, _thd.selstart.y);
    02609     TileIndex t1 = TileVirtXY(x, y);
    02610     uint distance = DistanceManhattan(t0, t1) + 1;
    02611     byte index = 0;
    02612     uint64 params[2];
    02613
    02614     if (distance != 1) {
    02615       int heightdiff = CalcHeightdiff(b, distance, t0, t1);
    02616       /* If we are showing a tooltip for horizontal or vertical drags,
    02617        * 2 tiles have a length of 1. To bias towards the ceiling we add
    02618        * one before division. It feels more natural to count 3 lengths as 2 */
    02619       if ((b & HT_DIR_MASK) != HT_DIR_X && (b & HT_DIR_MASK) != HT_DIR_Y) {
    02620         distance = CeilDiv(distance, 2);
    02621       }
    02622
    02623       params[index++] = distance;
    02624       if (heightdiff != 0) params[index++] = heightdiff;
    02625     }
    02626
    02627     ShowMeasurementTooltips(measure_strings_length[index], index, params);
    02628   }
    02629
    02630   _thd.selend.x = x;
    02631   _thd.selend.y = y;
    02632   _thd.next_drawstyle = b;
    02633 }
    02634
    02642 void VpSelectTilesWithMethod(int x, int y, ViewportPlaceMethod method)
    02643 {
    02644   int sx, sy;
    02645   HighLightStyle style;
    02646
    02647   if (x == -1) {
    02648     _thd.selend.x = -1;
    02649     return;
    02650   }
    02651
    02652   /* Special handling of drag in any (8-way) direction */
    02653   if (method & (VPM_RAILDIRS | VPM_SIGNALDIRS)) {
    02654     _thd.selend.x = x;
    02655     _thd.selend.y = y;
    02656     CalcRaildirsDrawstyle(x, y, method);
    02657     return;
    02658   }
    02659
    02660   /* Needed so level-land is placed correctly */
    02661   if ((_thd.next_drawstyle & HT_DRAG_MASK) == HT_POINT) {
    02662     x += TILE_SIZE / 2;
    02663     y += TILE_SIZE / 2;
    02664   }
    02665
    02666   sx = _thd.selstart.x;
    02667   sy = _thd.selstart.y;
    02668
    02669   int limit = 0;
    02670
    02671   switch (method) {
    02672     case VPM_X_OR_Y: // drag in X or Y direction
    02673       if (abs(sy - y) < abs(sx - x)) {
    02674         y = sy;
    02675         style = HT_DIR_X;
    02676       } else {
    02677         x = sx;
    02678         style = HT_DIR_Y;
    02679       }
    02680       goto calc_heightdiff_single_direction;
    02681
    02682     case VPM_X_LIMITED: // Drag in X direction (limited size).
    02683       limit = (_thd.sizelimit - 1) * TILE_SIZE;
    02684       /* FALL THROUGH */
    02685
    02686     case VPM_FIX_X: // drag in Y direction
    02687       x = sx;
    02688       style = HT_DIR_Y;
    02689       goto calc_heightdiff_single_direction;
    02690
    02691     case VPM_Y_LIMITED: // Drag in Y direction (limited size).
    02692       limit = (_thd.sizelimit - 1) * TILE_SIZE;
    02693       /* FALL THROUGH */
    02694
    02695     case VPM_FIX_Y: // drag in X direction
    02696       y = sy;
    02697       style = HT_DIR_X;
    02698
    02699 calc_heightdiff_single_direction:;
    02700       if (limit > 0) {
    02701         x = sx + Clamp(x - sx, -limit, limit);
    02702         y = sy + Clamp(y - sy, -limit, limit);
    02703       }
    02704       if (_settings_client.gui.measure_tooltip) {
    02705         TileIndex t0 = TileVirtXY(sx, sy);
    02706         TileIndex t1 = TileVirtXY(x, y);
    02707         uint distance = DistanceManhattan(t0, t1) + 1;
    02708         byte index = 0;
    02709         uint64 params[2];
    02710
    02711         if (distance != 1) {
    02712           /* With current code passing a HT_LINE style to calculate the height
    02713            * difference is enough. However if/when a point-tool is created
    02714            * with this method, function should be called with new_style (below)
    02715            * instead of HT_LINE | style case HT_POINT is handled specially
    02716            * new_style := (_thd.next_drawstyle & HT_RECT) ? HT_LINE | style : _thd.next_drawstyle; */
    02717           int heightdiff = CalcHeightdiff(HT_LINE | style, 0, t0, t1);
    02718
    02719           params[index++] = distance;
    02720           if (heightdiff != 0) params[index++] = heightdiff;
    02721         }
    02722
    02723         ShowMeasurementTooltips(measure_strings_length[index], index, params);
    02724       }
    02725       break;
    02726
    02727     case VPM_X_AND_Y_LIMITED: // Drag an X by Y constrained rect area.
    02728       limit = (_thd.sizelimit - 1) * TILE_SIZE;
    02729       x = sx + Clamp(x - sx, -limit, limit);
    02730       y = sy + Clamp(y - sy, -limit, limit);
    02731       /* FALL THROUGH */
    02732
    02733     case VPM_X_AND_Y: // drag an X by Y area
    02734       if (_settings_client.gui.measure_tooltip) {
    02735         static const StringID measure_strings_area[] = {
    02736           STR_NULL, STR_NULL, STR_MEASURE_AREA, STR_MEASURE_AREA_HEIGHTDIFF
    02737         };
    02738
    02739         TileIndex t0 = TileVirtXY(sx, sy);
    02740         TileIndex t1 = TileVirtXY(x, y);
    02741         uint dx = Delta(TileX(t0), TileX(t1)) + 1;
    02742         uint dy = Delta(TileY(t0), TileY(t1)) + 1;
    02743         byte index = 0;
    02744         uint64 params[3];
    02745
    02746         /* If dragging an area (eg dynamite tool) and it is actually a single
    02747          * row/column, change the type to 'line' to get proper calculation for height */
    02748         style = (HighLightStyle)_thd.next_drawstyle;
    02749         if (_thd.IsDraggingDiagonal()) {
    02750           /* Determine the "area" of the diagonal dragged selection.
    02751            * We assume the area is the number of tiles along the X
    02752            * edge and the number of tiles along the Y edge. However,
    02753            * multiplying these two numbers does not give the exact
    02754            * number of tiles; basically we are counting the black
    02755            * squares on a chess board and ignore the white ones to
    02756            * make the tile counts at the edges match up. There is no
    02757            * other way to make a proper count though.
    02758            *
    02759            * First convert to the rotated coordinate system. */
    02760           int dist_x = TileX(t0) - TileX(t1);
    02761           int dist_y = TileY(t0) - TileY(t1);
    02762           int a_max = dist_x + dist_y;
    02763           int b_max = dist_y - dist_x;
    02764
    02765           /* Now determine the size along the edge, but due to the
    02766            * chess board principle this counts double. */
    02767           a_max = abs(a_max + (a_max > 0 ? 2 : -2)) / 2;
    02768           b_max = abs(b_max + (b_max > 0 ? 2 : -2)) / 2;
    02769
    02770           /* We get a 1x1 on normal 2x1 rectangles, due to it being
    02771            * a seen as two sides. As the result for actual building
    02772            * will be the same as non-diagonal dragging revert to that
    02773            * behaviour to give it a more normally looking size. */
    02774           if (a_max != 1 || b_max != 1) {
    02775             dx = a_max;
    02776             dy = b_max;
    02777           }
    02778         } else if (style & HT_RECT) {
    02779           if (dx == 1) {
    02780             style = HT_LINE | HT_DIR_Y;
    02781           } else if (dy == 1) {
    02782             style = HT_LINE | HT_DIR_X;
    02783           }
    02784         }
    02785
    02786         if (dx != 1 || dy != 1) {
    02787           int heightdiff = CalcHeightdiff(style, 0, t0, t1);
    02788
    02789           params[index++] = dx - (style & HT_POINT ? 1 : 0);
    02790           params[index++] = dy - (style & HT_POINT ? 1 : 0);
    02791           if (heightdiff != 0) params[index++] = heightdiff;
    02792         }
    02793
    02794         ShowMeasurementTooltips(measure_strings_area[index], index, params);
    02795       }
    02796       break;
    02797
    02798     default: NOT_REACHED();
    02799   }
    02800
    02801   _thd.selend.x = x;
    02802   _thd.selend.y = y;
    02803 }
    02804
    02809 EventState VpHandlePlaceSizingDrag()
    02810 {
    02811   if (_special_mouse_mode != WSM_SIZING) return ES_NOT_HANDLED;
    02812
    02813   /* stop drag mode if the window has been closed */
    02814   Window *w = _thd.GetCallbackWnd();
    02815   if (w == NULL) {
    02816     ResetObjectToPlace();
    02817     return ES_HANDLED;
    02818   }
    02819
    02820   /* while dragging execute the drag procedure of the corresponding window (mostly VpSelectTilesWithMethod() ) */
    02821   if (_left_button_down) {
    02822     w->OnPlaceDrag(_thd.select_method, _thd.select_proc, GetTileBelowCursor());
    02823     return ES_HANDLED;
    02824   }
    02825
    02826   /* mouse button released..
    02827    * keep the selected tool, but reset it to the original mode. */
    02828   _special_mouse_mode = WSM_NONE;
    02829   HighLightStyle others = _thd.place_mode & ~(HT_DRAG_MASK | HT_DIR_MASK);
    02830   if ((_thd.next_drawstyle & HT_DRAG_MASK) == HT_RECT) {
    02831     _thd.place_mode = HT_RECT | others;
    02832   } else if (_thd.select_method & VPM_SIGNALDIRS) {
    02833     _thd.place_mode = HT_RECT | others;
    02834   } else if (_thd.select_method & VPM_RAILDIRS) {
    02835     _thd.place_mode = (_thd.select_method & ~VPM_RAILDIRS) ? _thd.next_drawstyle : (HT_RAIL | others);
    02836   } else {
    02837     _thd.place_mode = HT_POINT | others;
    02838   }
    02839   SetTileSelectSize(1, 1);
    02840
    02841   w->OnPlaceMouseUp(_thd.select_method, _thd.select_proc, _thd.selend, TileVirtXY(_thd.selstart.x, _thd.selstart.y), TileVirtXY(_thd.selend.x, _thd.selend.y));
    02842
    02843   return ES_HANDLED;
    02844 }
    02845
    02846 void SetObjectToPlaceWnd(CursorID icon, PaletteID pal, HighLightStyle mode, Window *w)
    02847 {
    02848   SetObjectToPlace(icon, pal, mode, w->window_class, w->window_number);
    02849 }
    02850
    02851 #include "table/animcursors.h"
    02852
    02853 void SetObjectToPlace(CursorID icon, PaletteID pal, HighLightStyle mode, WindowClass window_class, WindowNumber window_num)
    02854 {
    02855   if (_thd.window_class != WC_INVALID) {
    02856     /* Undo clicking on button and drag & drop */
    02857     Window *w = _thd.GetCallbackWnd();
    02858     /* Call the abort function, but set the window class to something
    02859      * that will never be used to avoid infinite loops. Setting it to
    02860      * the 'next' window class must not be done because recursion into
    02861      * this function might in some cases reset the newly set object to
    02862      * place or not properly reset the original selection. */
    02863     _thd.window_class = WC_INVALID;
    02864     if (w != NULL) w->OnPlaceObjectAbort();
    02865   }
    02866
    02867   /* Mark the old selection dirty, in case the selection shape or colour changes */
    02868   if ((_thd.drawstyle & HT_DRAG_MASK) != HT_NONE) SetSelectionTilesDirty();
    02869
    02870   SetTileSelectSize(1, 1);
    02871
    02872   _thd.make_square_red = false;
    02873
    02874   if (mode == HT_DRAG) { // HT_DRAG is for dragdropping trains in the depot window
    02875     mode = HT_NONE;
    02876     _special_mouse_mode = WSM_DRAGDROP;
    02877   } else {
    02878     _special_mouse_mode = WSM_NONE;
    02879   }
    02880
    02881   _thd.place_mode = mode;
    02882   _thd.window_class = window_class;
    02883   _thd.window_number = window_num;
    02884
    02885   if ((mode & HT_DRAG_MASK) == HT_SPECIAL) { // special tools, like tunnels or docks start with presizing mode
    02886     VpStartPreSizing();
    02887   }
    02888
    02889   if ((icon & ANIMCURSOR_FLAG) != 0) {
    02890     SetAnimatedMouseCursor(_animcursors[icon & ~ANIMCURSOR_FLAG]);
    02891   } else {
    02892     SetMouseCursor(icon, pal);
    02893   }
    02894
    02895 }
    02896
    02897 void ResetObjectToPlace()
    02898 {
    02899   SetObjectToPlace(SPR_CURSOR_MOUSE, PAL_NONE, HT_NONE, WC_MAIN_WINDOW, 0);
    02900 }