diff --git a/src/viewport.cpp b/src/viewport.cpp new file mode 100644 --- /dev/null +++ b/src/viewport.cpp @@ -0,0 +1,2462 @@ +/* $Id$ */ + +#include "stdafx.h" +#include "openttd.h" +#include "debug.h" +#include "functions.h" +#include "gui.h" +#include "spritecache.h" +#include "strings.h" +#include "table/sprites.h" +#include "table/strings.h" +#include "map.h" +#include "viewport.h" +#include "window.h" +#include "vehicle.h" +#include "station.h" +#include "gfx.h" +#include "town.h" +#include "signs.h" +#include "waypoint.h" +#include "variables.h" +#include "train.h" + +#define VIEWPORT_DRAW_MEM (65536 * 2) + +/* viewport.c */ +// XXX - maximum viewports is maximum windows - 2 (main toolbar + status bar) +static ViewPort _viewports[25 - 2]; +static uint32 _active_viewports; ///< bitmasked variable where each bit signifies if a viewport is in use or not +assert_compile(lengthof(_viewports) < sizeof(_active_viewports) * 8); + +static bool _added_tile_sprite; +static bool _offset_ground_sprites; + +/* The in-game coordiante system looks like this * + * * + * ^ Z * + * | * + * | * + * | * + * | * + * / \ * + * / \ * + * / \ * + * / \ * + * X < > Y * + */ + +typedef struct StringSpriteToDraw { + uint16 string; + uint16 color; + struct StringSpriteToDraw *next; + int32 x; + int32 y; + uint32 params[2]; + uint16 width; +} StringSpriteToDraw; + +typedef struct TileSpriteToDraw { + uint32 image; + struct TileSpriteToDraw *next; + int32 x; + int32 y; + byte z; +} TileSpriteToDraw; + +typedef struct ChildScreenSpriteToDraw { + uint32 image; + int32 x; + int32 y; + struct ChildScreenSpriteToDraw *next; +} ChildScreenSpriteToDraw; + +typedef struct ParentSpriteToDraw { + uint32 image; + int32 left; + int32 top; + int32 right; + int32 bottom; + int32 xmin; + int32 ymin; + int32 xmax; + int32 ymax; + ChildScreenSpriteToDraw *child; + byte unk16; + byte zmin; + byte zmax; +} ParentSpriteToDraw; + +// Quick hack to know how much memory to reserve when allocating from the spritelist +// to prevent a buffer overflow. +#define LARGEST_SPRITELIST_STRUCT ParentSpriteToDraw + +typedef struct ViewportDrawer { + DrawPixelInfo dpi; + + byte *spritelist_mem; + const byte *eof_spritelist_mem; + + StringSpriteToDraw **last_string, *first_string; + TileSpriteToDraw **last_tile, *first_tile; + + ChildScreenSpriteToDraw **last_child; + + ParentSpriteToDraw **parent_list; + ParentSpriteToDraw * const *eof_parent_list; + + byte combine_sprites; + + int offs_x, offs_y; // used when drawing ground sprites relative +} ViewportDrawer; + +static ViewportDrawer *_cur_vd; + +TileHighlightData _thd; +static TileInfo *_cur_ti; + +extern void SmallMapCenterOnCurrentPos(Window *w); + +static Point MapXYZToViewport(const ViewPort *vp, uint x, uint y, uint z) +{ + Point p = RemapCoords(x, y, z); + p.x -= vp->virtual_width / 2; + p.y -= vp->virtual_height / 2; + return p; +} + +void InitViewports(void) { + memset(_viewports, 0, sizeof(_viewports)); + _active_viewports = 0; +} + +void DeleteWindowViewport(Window *w) +{ + CLRBIT(_active_viewports, w->viewport - _viewports); + w->viewport->width = 0; + w->viewport = NULL; +} + +void AssignWindowViewport(Window *w, int x, int y, + int width, int height, uint32 follow_flags, byte zoom) +{ + ViewPort *vp; + Point pt; + uint32 bit; + + for (vp = _viewports, bit = 0; ; vp++, bit++) { + assert(vp != endof(_viewports)); + if (vp->width == 0) break; + } + SETBIT(_active_viewports, bit); + + vp->left = x + w->left; + vp->top = y + w->top; + vp->width = width; + vp->height = height; + + vp->zoom = zoom; + + vp->virtual_width = width << zoom; + vp->virtual_height = height << zoom; + + if (follow_flags & 0x80000000) { + const Vehicle *veh; + + WP(w, vp_d).follow_vehicle = (VehicleID)(follow_flags & 0xFFFF); + veh = GetVehicle(WP(w, vp_d).follow_vehicle); + pt = MapXYZToViewport(vp, veh->x_pos, veh->y_pos, veh->z_pos); + } else { + uint x = TileX(follow_flags) * TILE_SIZE; + uint y = TileY(follow_flags) * TILE_SIZE; + + WP(w, vp_d).follow_vehicle = INVALID_VEHICLE; + pt = MapXYZToViewport(vp, x, y, GetSlopeZ(x, y)); + } + + WP(w, vp_d).scrollpos_x = pt.x; + WP(w, vp_d).scrollpos_y = pt.y; + w->viewport = vp; + vp->virtual_left = 0;//pt.x; + vp->virtual_top = 0;//pt.y; +} + +static Point _vp_move_offs; + +static void DoSetViewportPosition(Window* const *wz, int left, int top, int width, int height) +{ + + for (; wz != _last_z_window; wz++) { + const Window *w = *wz; + + if (left + width > w->left && + w->left + w->width > left && + top + height > w->top && + w->top + w->height > top) { + + if (left < w->left) { + DoSetViewportPosition(wz, left, top, w->left - left, height); + DoSetViewportPosition(wz, left + (w->left - left), top, width - (w->left - left), height); + return; + } + + if (left + width > w->left + w->width) { + DoSetViewportPosition(wz, left, top, (w->left + w->width - left), height); + DoSetViewportPosition(wz, left + (w->left + w->width - left), top, width - (w->left + w->width - left) , height); + return; + } + + if (top < w->top) { + DoSetViewportPosition(wz, left, top, width, (w->top - top)); + DoSetViewportPosition(wz, left, top + (w->top - top), width, height - (w->top - top)); + return; + } + + if (top + height > w->top + w->height) { + DoSetViewportPosition(wz, left, top, width, (w->top + w->height - top)); + DoSetViewportPosition(wz, left, top + (w->top + w->height - top), width , height - (w->top + w->height - top)); + return; + } + + return; + } + } + + { + int xo = _vp_move_offs.x; + int yo = _vp_move_offs.y; + + if (abs(xo) >= width || abs(yo) >= height) { + /* fully_outside */ + RedrawScreenRect(left, top, left + width, top + height); + return; + } + + GfxScroll(left, top, width, height, xo, yo); + + if (xo > 0) { + RedrawScreenRect(left, top, xo + left, top + height); + left += xo; + width -= xo; + } else if (xo < 0) { + RedrawScreenRect(left+width+xo, top, left+width, top + height); + width += xo; + } + + if (yo > 0) { + RedrawScreenRect(left, top, width+left, top + yo); + } else if (yo < 0) { + RedrawScreenRect(left, top + height + yo, width+left, top + height); + } + } +} + +static void SetViewportPosition(Window *w, int x, int y) +{ + ViewPort *vp = w->viewport; + int old_left = vp->virtual_left; + int old_top = vp->virtual_top; + int i; + int left, top, width, height; + + vp->virtual_left = x; + vp->virtual_top = y; + + old_left >>= vp->zoom; + old_top >>= vp->zoom; + x >>= vp->zoom; + y >>= vp->zoom; + + old_left -= x; + old_top -= y; + + if (old_top == 0 && old_left == 0) return; + + _vp_move_offs.x = old_left; + _vp_move_offs.y = old_top; + + left = vp->left; + top = vp->top; + width = vp->width; + height = vp->height; + + if (left < 0) { + width += left; + left = 0; + } + + i = left + width - _screen.width; + if (i >= 0) width -= i; + + if (width > 0) { + if (top < 0) { + height += top; + top = 0; + } + + i = top + height - _screen.height; + if (i >= 0) height -= i; + + if (height > 0) DoSetViewportPosition(FindWindowZPosition(w) + 1, left, top, width, height); + } +} + + +ViewPort *IsPtInWindowViewport(const Window *w, int x, int y) +{ + ViewPort *vp = w->viewport; + + if (vp != NULL && + IS_INT_INSIDE(x, vp->left, vp->left + vp->width) && + IS_INT_INSIDE(y, vp->top, vp->top + vp->height)) + return vp; + + return NULL; +} + +static Point TranslateXYToTileCoord(const ViewPort *vp, int x, int y) +{ + Point pt; + int a,b; + uint z; + + if ( (uint)(x -= vp->left) >= (uint)vp->width || + (uint)(y -= vp->top) >= (uint)vp->height) { + Point pt = {-1, -1}; + return pt; + } + + x = ((x << vp->zoom) + vp->virtual_left) >> 2; + y = ((y << vp->zoom) + vp->virtual_top) >> 1; + + a = y-x; + b = y+x; + + /* we need to move variables in to the valid range, as the + * GetTileZoomCenterWindow() function can call here with invalid x and/or y, + * when the user tries to zoom out along the sides of the map */ + a = clamp(a, 0, (int)(MapMaxX() * TILE_SIZE) - 1); + b = clamp(b, 0, (int)(MapMaxY() * TILE_SIZE) - 1); + + z = GetSlopeZ(a, b ) / 2; + z = GetSlopeZ(a + z, b + z) / 2; + z = GetSlopeZ(a + z, b + z) / 2; + z = GetSlopeZ(a + z, b + z) / 2; + z = GetSlopeZ(a + z, b + z) / 2; + + pt.x = a + z; + pt.y = b + z; + + return pt; +} + +/* When used for zooming, check area below current coordinates (x,y) + * and return the tile of the zoomed out/in position (zoom_x, zoom_y) + * when you just want the tile, make x = zoom_x and y = zoom_y */ +static Point GetTileFromScreenXY(int x, int y, int zoom_x, int zoom_y) +{ + Window *w; + ViewPort *vp; + Point pt; + + if ( (w = FindWindowFromPt(x, y)) != NULL && + (vp = IsPtInWindowViewport(w, x, y)) != NULL) + return TranslateXYToTileCoord(vp, zoom_x, zoom_y); + + pt.y = pt.x = -1; + return pt; +} + +Point GetTileBelowCursor(void) +{ + return GetTileFromScreenXY(_cursor.pos.x, _cursor.pos.y, _cursor.pos.x, _cursor.pos.y); +} + + +Point GetTileZoomCenterWindow(bool in, Window * w) +{ + int x, y; + ViewPort * vp; + + vp = w->viewport; + + if (in) { + x = ((_cursor.pos.x - vp->left) >> 1) + (vp->width >> 2); + y = ((_cursor.pos.y - vp->top) >> 1) + (vp->height >> 2); + } else { + x = vp->width - (_cursor.pos.x - vp->left); + y = vp->height - (_cursor.pos.y - vp->top); + } + /* Get the tile below the cursor and center on the zoomed-out center */ + return GetTileFromScreenXY(_cursor.pos.x, _cursor.pos.y, x + vp->left, y + vp->top); +} + +/** Update the status of the zoom-buttons according to the zoom-level + * of the viewport. This will update their status and invalidate accordingly + * @param window pointer to the window that has the zoom buttons + * @param vp pointer to the viewport whose zoom-level the buttons represent + * @param widget_zoom_in widget index for window with zoom-in button + * @param widget_zoom_out widget index for window with zoom-out button */ +void HandleZoomMessage(Window *w, const ViewPort *vp, byte widget_zoom_in, byte widget_zoom_out) +{ + SetWindowWidgetDisabledState(w, widget_zoom_in, vp->zoom == 0); + InvalidateWidget(w, widget_zoom_in); + + SetWindowWidgetDisabledState(w, widget_zoom_out, vp->zoom == 2); + InvalidateWidget(w, widget_zoom_out); +} + +void DrawGroundSpriteAt(uint32 image, int32 x, int32 y, byte z) +{ + ViewportDrawer *vd = _cur_vd; + TileSpriteToDraw *ts; + + assert((image & SPRITE_MASK) < MAX_SPRITES); + + if (vd->spritelist_mem >= vd->eof_spritelist_mem) { + DEBUG(sprite, 0, "Out of sprite memory"); + return; + } + ts = (TileSpriteToDraw*)vd->spritelist_mem; + + vd->spritelist_mem += sizeof(TileSpriteToDraw); + + ts->image = image; + ts->next = NULL; + ts->x = x; + ts->y = y; + ts->z = z; + *vd->last_tile = ts; + vd->last_tile = &ts->next; +} + +void DrawGroundSprite(uint32 image) +{ + if (_offset_ground_sprites) { + // offset ground sprite because of foundation? + AddChildSpriteScreen(image, _cur_vd->offs_x, _cur_vd->offs_y); + } else { + _added_tile_sprite = true; + DrawGroundSpriteAt(image, _cur_ti->x, _cur_ti->y, _cur_ti->z); + } +} + + +void OffsetGroundSprite(int x, int y) +{ + _cur_vd->offs_x = x; + _cur_vd->offs_y = y; + _offset_ground_sprites = true; +} + +static void AddCombinedSprite(uint32 image, int x, int y, byte z) +{ + const ViewportDrawer *vd = _cur_vd; + Point pt = RemapCoords(x, y, z); + const Sprite* spr = GetSprite(image & SPRITE_MASK); + + if (pt.x + spr->x_offs >= vd->dpi.left + vd->dpi.width || + pt.x + spr->x_offs + spr->width <= vd->dpi.left || + pt.y + spr->y_offs >= vd->dpi.top + vd->dpi.height || + pt.y + spr->y_offs + spr->height <= vd->dpi.top) + return; + + AddChildSpriteScreen(image, pt.x - vd->parent_list[-1]->left, pt.y - vd->parent_list[-1]->top); +} + + +void AddSortableSpriteToDraw(uint32 image, int x, int y, int w, int h, byte dz, byte z) +{ + ViewportDrawer *vd = _cur_vd; + ParentSpriteToDraw *ps; + const Sprite *spr; + Point pt; + + assert((image & SPRITE_MASK) < MAX_SPRITES); + + if (vd->combine_sprites == 2) { + AddCombinedSprite(image, x, y, z); + return; + } + + vd->last_child = NULL; + + if (vd->spritelist_mem >= vd->eof_spritelist_mem) { + DEBUG(sprite, 0, "Out of sprite memory"); + return; + } + ps = (ParentSpriteToDraw*)vd->spritelist_mem; + + if (vd->parent_list >= vd->eof_parent_list) { + // This can happen rarely, mostly when you zoom out completely + // and have a lot of stuff that moves (and is added to the + // sort-list, this function). To solve it, increase + // parent_list somewhere below to a higher number. + // This can not really hurt you, it just gives some black + // spots on the screen ;) + DEBUG(sprite, 0, "Out of sprite memory (parent_list)"); + return; + } + + pt = RemapCoords(x, y, z); + spr = GetSprite(image & SPRITE_MASK); + if ((ps->left = (pt.x += spr->x_offs)) >= vd->dpi.left + vd->dpi.width || + (ps->right = (pt.x + spr->width )) <= vd->dpi.left || + (ps->top = (pt.y += spr->y_offs)) >= vd->dpi.top + vd->dpi.height || + (ps->bottom = (pt.y + spr->height)) <= vd->dpi.top) { + return; + } + + vd->spritelist_mem += sizeof(ParentSpriteToDraw); + + ps->image = image; + ps->xmin = x; + ps->xmax = x + w - 1; + + ps->ymin = y; + ps->ymax = y + h - 1; + + ps->zmin = z; + ps->zmax = z + dz - 1; + + ps->unk16 = 0; + ps->child = NULL; + vd->last_child = &ps->child; + + *vd->parent_list++ = ps; + + if (vd->combine_sprites == 1) vd->combine_sprites = 2; +} + +void StartSpriteCombine(void) +{ + _cur_vd->combine_sprites = 1; +} + +void EndSpriteCombine(void) +{ + _cur_vd->combine_sprites = 0; +} + +void AddChildSpriteScreen(uint32 image, int x, int y) +{ + ViewportDrawer *vd = _cur_vd; + ChildScreenSpriteToDraw *cs; + + assert((image & SPRITE_MASK) < MAX_SPRITES); + + if (vd->spritelist_mem >= vd->eof_spritelist_mem) { + DEBUG(sprite, 0, "Out of sprite memory"); + return; + } + cs = (ChildScreenSpriteToDraw*)vd->spritelist_mem; + + if (vd->last_child == NULL) return; + + vd->spritelist_mem += sizeof(ChildScreenSpriteToDraw); + + *vd->last_child = cs; + vd->last_child = &cs->next; + + cs->image = image; + cs->x = x; + cs->y = y; + cs->next = NULL; +} + +/* Returns a StringSpriteToDraw */ +void *AddStringToDraw(int x, int y, StringID string, uint32 params_1, uint32 params_2) +{ + ViewportDrawer *vd = _cur_vd; + StringSpriteToDraw *ss; + + if (vd->spritelist_mem >= vd->eof_spritelist_mem) { + DEBUG(sprite, 0, "Out of sprite memory"); + return NULL; + } + ss = (StringSpriteToDraw*)vd->spritelist_mem; + + vd->spritelist_mem += sizeof(StringSpriteToDraw); + + ss->string = string; + ss->next = NULL; + ss->x = x; + ss->y = y; + ss->params[0] = params_1; + ss->params[1] = params_2; + ss->width = 0; + + *vd->last_string = ss; + vd->last_string = &ss->next; + + return ss; +} + + +static void DrawSelectionSprite(uint32 image, const TileInfo *ti) +{ + if (_added_tile_sprite && !(_thd.drawstyle & HT_LINE)) { // draw on real ground + DrawGroundSpriteAt(image, ti->x, ti->y, ti->z + 7); + } else { // draw on top of foundation + AddSortableSpriteToDraw(image, ti->x, ti->y, 0x10, 0x10, 1, ti->z + 7); + } +} + +static bool IsPartOfAutoLine(int px, int py) +{ + px -= _thd.selstart.x; + py -= _thd.selstart.y; + + switch (_thd.drawstyle) { + case HT_LINE | HT_DIR_X: return py == 0; // x direction + case HT_LINE | HT_DIR_Y: return px == 0; // y direction + case HT_LINE | HT_DIR_HU: return px == -py || px == -py - 16; // horizontal upper + case HT_LINE | HT_DIR_HL: return px == -py || px == -py + 16; // horizontal lower + case HT_LINE | HT_DIR_VL: return px == py || px == py + 16; // vertival left + case HT_LINE | HT_DIR_VR: return px == py || px == py - 16; // vertical right + default: + NOT_REACHED(); + } + + /* useless, but avoids compiler warning this way */ + return 0; +} + +// [direction][side] +static const int _AutorailType[6][2] = { + { HT_DIR_X, HT_DIR_X }, + { HT_DIR_Y, HT_DIR_Y }, + { HT_DIR_HU, HT_DIR_HL }, + { HT_DIR_HL, HT_DIR_HU }, + { HT_DIR_VL, HT_DIR_VR }, + { HT_DIR_VR, HT_DIR_VL } +}; + +#include "table/autorail.h" + +static void DrawTileSelection(const TileInfo *ti) +{ + uint32 image; + + // Draw a red error square? + if (_thd.redsq != 0 && _thd.redsq == ti->tile) { + DrawSelectionSprite(PALETTE_TILE_RED_PULSATING | (SPR_SELECT_TILE + _tileh_to_sprite[ti->tileh]), ti); + return; + } + + // no selection active? + if (_thd.drawstyle == 0) return; + + // Inside the inner area? + if (IS_INSIDE_1D(ti->x, _thd.pos.x, _thd.size.x) && + IS_INSIDE_1D(ti->y, _thd.pos.y, _thd.size.y)) { + if (_thd.drawstyle & HT_RECT) { + image = SPR_SELECT_TILE + _tileh_to_sprite[ti->tileh]; + if (_thd.make_square_red) image |= PALETTE_SEL_TILE_RED; + DrawSelectionSprite(image, ti); + } else if (_thd.drawstyle & HT_POINT) { + // Figure out the Z coordinate for the single dot. + byte z = ti->z; + if (ti->tileh & SLOPE_N) { + z += TILE_HEIGHT; + if (ti->tileh == SLOPE_STEEP_N) z += TILE_HEIGHT; + } + DrawGroundSpriteAt(_cur_dpi->zoom != 2 ? SPR_DOT : SPR_DOT_SMALL, ti->x, ti->y, z); + } else if (_thd.drawstyle & HT_RAIL /*&& _thd.place_mode == VHM_RAIL*/) { + // autorail highlight piece under cursor + uint type = _thd.drawstyle & 0xF; + assert(type <= 5); + image = SPR_AUTORAIL_BASE + _AutorailTilehSprite[ti->tileh][_AutorailType[type][0]]; + + if (_thd.make_square_red) image |= PALETTE_SEL_TILE_RED; + DrawSelectionSprite(image, ti); + + } else if (IsPartOfAutoLine(ti->x, ti->y)) { + // autorail highlighting long line + int dir = _thd.drawstyle & ~0xF0; + uint side; + + if (dir < 2) { + side = 0; + } else { + TileIndex start = TileVirtXY(_thd.selstart.x, _thd.selstart.y); + int diffx = myabs(TileX(start) - TileX(ti->tile)); + int diffy = myabs(TileY(start) - TileY(ti->tile)); + side = myabs(diffx - diffy); + } + + image = SPR_AUTORAIL_BASE + _AutorailTilehSprite[ti->tileh][_AutorailType[dir][side]]; + + if (_thd.make_square_red) image |= PALETTE_SEL_TILE_RED; + DrawSelectionSprite(image, ti); + } + return; + } + + // Check if it's inside the outer area? + if (_thd.outersize.x && + _thd.size.x < _thd.size.x + _thd.outersize.x && + IS_INSIDE_1D(ti->x, _thd.pos.x + _thd.offs.x, _thd.size.x + _thd.outersize.x) && + IS_INSIDE_1D(ti->y, _thd.pos.y + _thd.offs.y, _thd.size.y + _thd.outersize.y)) { + // Draw a blue rect. + DrawSelectionSprite(PALETTE_SEL_TILE_BLUE | (SPR_SELECT_TILE + _tileh_to_sprite[ti->tileh]), ti); + return; + } +} + +static void ViewportAddLandscape(void) +{ + ViewportDrawer *vd = _cur_vd; + int x, y, width, height; + TileInfo ti; + bool direction; + + _cur_ti = &ti; + + // Transform into tile coordinates and round to closest full tile + x = ((vd->dpi.top >> 1) - (vd->dpi.left >> 2)) & ~0xF; + y = ((vd->dpi.top >> 1) + (vd->dpi.left >> 2) - 0x10) & ~0xF; + + // determine size of area + { + Point pt = RemapCoords(x, y, 241); + width = (vd->dpi.left + vd->dpi.width - pt.x + 95) >> 6; + height = (vd->dpi.top + vd->dpi.height - pt.y) >> 5 << 1; + } + + assert(width > 0); + assert(height > 0); + + direction = false; + + do { + int width_cur = width; + int x_cur = x; + int y_cur = y; + + do { + TileType tt; + + ti.x = x_cur; + ti.y = y_cur; + if (0 <= x_cur && x_cur < (int)MapMaxX() * TILE_SIZE && + 0 <= y_cur && y_cur < (int)MapMaxY() * TILE_SIZE) { + TileIndex tile = TileVirtXY(x_cur, y_cur); + + ti.tile = tile; + ti.tileh = GetTileSlope(tile, &ti.z); + tt = GetTileType(tile); + } else { + ti.tileh = SLOPE_FLAT; + ti.tile = 0; + ti.z = 0; + tt = MP_VOID; + } + + y_cur += 0x10; + x_cur -= 0x10; + + _added_tile_sprite = false; + _offset_ground_sprites = false; + + _tile_type_procs[tt]->draw_tile_proc(&ti); + DrawTileSelection(&ti); + } while (--width_cur); + + if ((direction ^= 1) != 0) { + y += 0x10; + } else { + x += 0x10; + } + } while (--height); +} + + +static void ViewportAddTownNames(DrawPixelInfo *dpi) +{ + Town *t; + int left, top, right, bottom; + + if (!(_display_opt & DO_SHOW_TOWN_NAMES) || _game_mode == GM_MENU) + return; + + left = dpi->left; + top = dpi->top; + right = left + dpi->width; + bottom = top + dpi->height; + + switch (dpi->zoom) { + case 0: + FOR_ALL_TOWNS(t) { + if (bottom > t->sign.top && + top < t->sign.top + 12 && + right > t->sign.left && + left < t->sign.left + t->sign.width_1) { + AddStringToDraw(t->sign.left + 1, t->sign.top + 1, + _patches.population_in_label ? STR_TOWN_LABEL_POP : STR_TOWN_LABEL, + t->index, t->population); + } + } + break; + + case 1: + right += 2; + bottom += 2; + + FOR_ALL_TOWNS(t) { + if (bottom > t->sign.top && + top < t->sign.top + 24 && + right > t->sign.left && + left < t->sign.left + t->sign.width_1*2) { + AddStringToDraw(t->sign.left + 1, t->sign.top + 1, + _patches.population_in_label ? STR_TOWN_LABEL_POP : STR_TOWN_LABEL, + t->index, t->population); + } + } + break; + + default: NOT_REACHED(); + case 2: + right += 4; + bottom += 5; + + FOR_ALL_TOWNS(t) { + if (bottom > t->sign.top && + top < t->sign.top + 24 && + right > t->sign.left && + left < t->sign.left + t->sign.width_2*4) { + AddStringToDraw(t->sign.left + 5, t->sign.top + 1, STR_TOWN_LABEL_TINY_BLACK, t->index, 0); + AddStringToDraw(t->sign.left + 1, t->sign.top - 3, STR_TOWN_LABEL_TINY_WHITE, t->index, 0); + } + } + break; + } +} + + +static void AddStation(const Station *st, StringID str, uint16 width) +{ + StringSpriteToDraw *sstd; + + sstd = AddStringToDraw(st->sign.left + 1, st->sign.top + 1, str, st->index, st->facilities); + if (sstd != NULL) { + sstd->color = (st->owner == OWNER_NONE || st->facilities == 0) ? 0xE : _player_colors[st->owner]; + sstd->width = width; + } +} + + +static void ViewportAddStationNames(DrawPixelInfo *dpi) +{ + int left, top, right, bottom; + const Station *st; + + if (!(_display_opt & DO_SHOW_STATION_NAMES) || _game_mode == GM_MENU) + return; + + left = dpi->left; + top = dpi->top; + right = left + dpi->width; + bottom = top + dpi->height; + + switch (dpi->zoom) { + case 0: + FOR_ALL_STATIONS(st) { + if (bottom > st->sign.top && + top < st->sign.top + 12 && + right > st->sign.left && + left < st->sign.left + st->sign.width_1) { + AddStation(st, STR_305C_0, st->sign.width_1); + } + } + break; + + case 1: + right += 2; + bottom += 2; + FOR_ALL_STATIONS(st) { + if (bottom > st->sign.top && + top < st->sign.top + 24 && + right > st->sign.left && + left < st->sign.left + st->sign.width_1*2) { + AddStation(st, STR_305C_0, st->sign.width_1); + } + } + break; + + default: NOT_REACHED(); + case 2: + right += 4; + bottom += 5; + FOR_ALL_STATIONS(st) { + if (bottom > st->sign.top && + top < st->sign.top + 24 && + right > st->sign.left && + left < st->sign.left + st->sign.width_2*4) { + AddStation(st, STR_STATION_SIGN_TINY, st->sign.width_2 | 0x8000); + } + } + break; + } +} + + +static void AddSign(const Sign *si, StringID str, uint16 width) +{ + StringSpriteToDraw *sstd; + + sstd = AddStringToDraw(si->sign.left + 1, si->sign.top + 1, str, si->str, 0); + if (sstd != NULL) { + sstd->color = (si->owner == OWNER_NONE) ? 14 : _player_colors[si->owner]; + sstd->width = width; + } +} + + +static void ViewportAddSigns(DrawPixelInfo *dpi) +{ + const Sign *si; + int left, top, right, bottom; + + if (!(_display_opt & DO_SHOW_SIGNS)) + return; + + left = dpi->left; + top = dpi->top; + right = left + dpi->width; + bottom = top + dpi->height; + + switch (dpi->zoom) { + case 0: + FOR_ALL_SIGNS(si) { + if (bottom > si->sign.top && + top < si->sign.top + 12 && + right > si->sign.left && + left < si->sign.left + si->sign.width_1) { + AddSign(si, STR_2806, si->sign.width_1); + } + } + break; + + case 1: + right += 2; + bottom += 2; + FOR_ALL_SIGNS(si) { + if (bottom > si->sign.top && + top < si->sign.top + 24 && + right > si->sign.left && + left < si->sign.left + si->sign.width_1 * 2) { + AddSign(si, STR_2806, si->sign.width_1); + } + } + break; + + default: NOT_REACHED(); + case 2: + right += 4; + bottom += 5; + FOR_ALL_SIGNS(si) { + if (bottom > si->sign.top && + top < si->sign.top + 24 && + right > si->sign.left && + left < si->sign.left + si->sign.width_2 * 4) { + AddSign(si, STR_2002, si->sign.width_2 | 0x8000); + } + } + break; + } +} + + +static void AddWaypoint(const Waypoint *wp, StringID str, uint16 width) +{ + StringSpriteToDraw *sstd; + + sstd = AddStringToDraw(wp->sign.left + 1, wp->sign.top + 1, str, wp->index, 0); + if (sstd != NULL) { + sstd->color = (wp->deleted ? 0xE : 11); + sstd->width = width; + } +} + + +static void ViewportAddWaypoints(DrawPixelInfo *dpi) +{ + const Waypoint *wp; + int left, top, right, bottom; + + if (!(_display_opt & DO_WAYPOINTS)) + return; + + left = dpi->left; + top = dpi->top; + right = left + dpi->width; + bottom = top + dpi->height; + + switch (dpi->zoom) { + case 0: + FOR_ALL_WAYPOINTS(wp) { + if (bottom > wp->sign.top && + top < wp->sign.top + 12 && + right > wp->sign.left && + left < wp->sign.left + wp->sign.width_1) { + AddWaypoint(wp, STR_WAYPOINT_VIEWPORT, wp->sign.width_1); + } + } + break; + + case 1: + right += 2; + bottom += 2; + FOR_ALL_WAYPOINTS(wp) { + if (bottom > wp->sign.top && + top < wp->sign.top + 24 && + right > wp->sign.left && + left < wp->sign.left + wp->sign.width_1*2) { + AddWaypoint(wp, STR_WAYPOINT_VIEWPORT, wp->sign.width_1); + } + } + break; + + default: NOT_REACHED(); + case 2: + right += 4; + bottom += 5; + FOR_ALL_WAYPOINTS(wp) { + if (bottom > wp->sign.top && + top < wp->sign.top + 24 && + right > wp->sign.left && + left < wp->sign.left + wp->sign.width_2*4) { + AddWaypoint(wp, STR_WAYPOINT_VIEWPORT_TINY, wp->sign.width_2 | 0x8000); + } + } + break; + } +} + +void UpdateViewportSignPos(ViewportSign *sign, int left, int top, StringID str) +{ + char buffer[128]; + uint w; + + sign->top = top; + + GetString(buffer, str, lastof(buffer)); + w = GetStringBoundingBox(buffer).width + 3; + sign->width_1 = w; + sign->left = left - w / 2; + + /* zoomed out version */ + _cur_fontsize = FS_SMALL; + w = GetStringBoundingBox(buffer).width + 3; + _cur_fontsize = FS_NORMAL; + sign->width_2 = w; +} + + +static void ViewportDrawTileSprites(TileSpriteToDraw *ts) +{ + do { + Point pt = RemapCoords(ts->x, ts->y, ts->z); + DrawSprite(ts->image, pt.x, pt.y); + ts = ts->next; + } while (ts != NULL); +} + +static void ViewportSortParentSprites(ParentSpriteToDraw *psd[]) +{ + while (*psd != NULL) { + ParentSpriteToDraw* ps = *psd; + + if (!(ps->unk16 & 1)) { + ParentSpriteToDraw** psd2 = psd; + + ps->unk16 |= 1; + + while (*++psd2 != NULL) { + ParentSpriteToDraw* ps2 = *psd2; + ParentSpriteToDraw** psd3; + + if (ps2->unk16 & 1) continue; + + /* Decide which comparator to use, based on whether the bounding + * boxes overlap + */ + if (ps->xmax > ps2->xmin && ps->xmin < ps2->xmax && // overlap in X? + ps->ymax > ps2->ymin && ps->ymin < ps2->ymax && // overlap in Y? + ps->zmax > ps2->zmin && ps->zmin < ps2->zmax) { // overlap in Z? + /* Use X+Y+Z as the sorting order, so sprites closer to the bottom of + * the screen and with higher Z elevation, are drawn in front. + * Here X,Y,Z are the coordinates of the "center of mass" of the sprite, + * i.e. X=(left+right)/2, etc. + * However, since we only care about order, don't actually divide / 2 + */ + if (ps->xmin + ps->xmax + ps->ymin + ps->ymax + ps->zmin + ps->zmax <= + ps2->xmin + ps2->xmax + ps2->ymin + ps2->ymax + ps2->zmin + ps2->zmax) { + continue; + } + } else { + if (ps->xmax < ps2->xmin || + ps->ymax < ps2->ymin || + ps->zmax < ps2->zmin || ( + ps->xmin < ps2->xmax && + ps->ymin < ps2->ymax && + ps->zmin < ps2->zmax + )) { + continue; + } + } + + // Swap the two sprites ps and ps2 using bubble-sort algorithm. + psd3 = psd; + do { + ParentSpriteToDraw* temp = *psd3; + *psd3 = ps2; + ps2 = temp; + + psd3++; + } while (psd3 <= psd2); + } + } else { + psd++; + } + } +} + +static void ViewportDrawParentSprites(ParentSpriteToDraw *psd[]) +{ + for (; *psd != NULL; psd++) { + const ParentSpriteToDraw* ps = *psd; + Point pt = RemapCoords(ps->xmin, ps->ymin, ps->zmin); + const ChildScreenSpriteToDraw* cs; + + DrawSprite(ps->image, pt.x, pt.y); + + for (cs = ps->child; cs != NULL; cs = cs->next) { + DrawSprite(cs->image, ps->left + cs->x, ps->top + cs->y); + } + } +} + +static void ViewportDrawStrings(DrawPixelInfo *dpi, const StringSpriteToDraw *ss) +{ + DrawPixelInfo dp; + byte zoom; + + _cur_dpi = &dp; + dp = *dpi; + + zoom = dp.zoom; + dp.zoom = 0; + + dp.left >>= zoom; + dp.top >>= zoom; + dp.width >>= zoom; + dp.height >>= zoom; + + do { + uint16 colour; + + if (ss->width != 0) { + int x = (ss->x >> zoom) - 1; + int y = (ss->y >> zoom) - 1; + int bottom = y + 11; + int w = ss->width; + + if (w & 0x8000) { + w &= ~0x8000; + y--; + bottom -= 6; + w -= 3; + } + + /* Draw the rectangle if 'tranparent station signs' is off, + * or if we are drawing a general text sign (STR_2806) */ + if (!(_display_opt & DO_TRANS_SIGNS) || ss->string == STR_2806) + DrawFrameRect( + x, y, x + w, bottom, ss->color, + (_display_opt & DO_TRANS_BUILDINGS) ? FR_TRANSPARENT : 0 + ); + } + + SetDParam(0, ss->params[0]); + SetDParam(1, ss->params[1]); + /* if we didn't draw a rectangle, or if transparant building is on, + * draw the text in the color the rectangle would have */ + if (( + (_display_opt & DO_TRANS_BUILDINGS) || + (_display_opt & DO_TRANS_SIGNS && ss->string != STR_2806) + ) && ss->width != 0) { + /* Real colors need the IS_PALETTE_COLOR flag + * otherwise colors from _string_colormap are assumed. */ + colour = _colour_gradient[ss->color][6] | IS_PALETTE_COLOR; + } else { + colour = 16; + } + DrawString( + ss->x >> zoom, (ss->y >> zoom) - (ss->width & 0x8000 ? 2 : 0), + ss->string, colour + ); + + ss = ss->next; + } while (ss != NULL); +} + +void ViewportDoDraw(const ViewPort *vp, int left, int top, int right, int bottom) +{ + ViewportDrawer vd; + int mask; + int x; + int y; + DrawPixelInfo *old_dpi; + + byte mem[VIEWPORT_DRAW_MEM]; + ParentSpriteToDraw *parent_list[6144]; + + _cur_vd = &vd; + + old_dpi = _cur_dpi; + _cur_dpi = &vd.dpi; + + vd.dpi.zoom = vp->zoom; + mask = (-1) << vp->zoom; + + vd.combine_sprites = 0; + + vd.dpi.width = (right - left) & mask; + vd.dpi.height = (bottom - top) & mask; + vd.dpi.left = left & mask; + vd.dpi.top = top & mask; + vd.dpi.pitch = old_dpi->pitch; + + x = ((vd.dpi.left - (vp->virtual_left&mask)) >> vp->zoom) + vp->left; + y = ((vd.dpi.top - (vp->virtual_top&mask)) >> vp->zoom) + vp->top; + + vd.dpi.dst_ptr = old_dpi->dst_ptr + x - old_dpi->left + (y - old_dpi->top) * old_dpi->pitch; + + vd.parent_list = parent_list; + vd.eof_parent_list = endof(parent_list); + vd.spritelist_mem = mem; + vd.eof_spritelist_mem = endof(mem) - sizeof(LARGEST_SPRITELIST_STRUCT); + vd.last_string = &vd.first_string; + vd.first_string = NULL; + vd.last_tile = &vd.first_tile; + vd.first_tile = NULL; + + ViewportAddLandscape(); + ViewportAddVehicles(&vd.dpi); + DrawTextEffects(&vd.dpi); + + ViewportAddTownNames(&vd.dpi); + ViewportAddStationNames(&vd.dpi); + ViewportAddSigns(&vd.dpi); + ViewportAddWaypoints(&vd.dpi); + + // This assert should never happen (because the length of the parent_list + // is checked) + assert(vd.parent_list <= endof(parent_list)); + + if (vd.first_tile != NULL) ViewportDrawTileSprites(vd.first_tile); + + /* null terminate parent sprite list */ + *vd.parent_list = NULL; + + ViewportSortParentSprites(parent_list); + ViewportDrawParentSprites(parent_list); + + if (vd.first_string != NULL) ViewportDrawStrings(&vd.dpi, vd.first_string); + + _cur_dpi = old_dpi; +} + +// Make sure we don't draw a too big area at a time. +// If we do, the sprite memory will overflow. +static void ViewportDrawChk(const ViewPort *vp, int left, int top, int right, int bottom) +{ + if (((bottom - top) * (right - left) << vp->zoom) > 180000) { + if ((bottom - top) > (right - left)) { + int t = (top + bottom) >> 1; + ViewportDrawChk(vp, left, top, right, t); + ViewportDrawChk(vp, left, t, right, bottom); + } else { + int t = (left + right) >> 1; + ViewportDrawChk(vp, left, top, t, bottom); + ViewportDrawChk(vp, t, top, right, bottom); + } + } else { + ViewportDoDraw(vp, + ((left - vp->left) << vp->zoom) + vp->virtual_left, + ((top - vp->top) << vp->zoom) + vp->virtual_top, + ((right - vp->left) << vp->zoom) + vp->virtual_left, + ((bottom - vp->top) << vp->zoom) + vp->virtual_top + ); + } +} + +static inline void ViewportDraw(const ViewPort *vp, int left, int top, int right, int bottom) +{ + if (right <= vp->left || bottom <= vp->top) return; + + if (left >= vp->left + vp->width) return; + + if (left < vp->left) left = vp->left; + if (right > vp->left + vp->width) right = vp->left + vp->width; + + if (top >= vp->top + vp->height) return; + + if (top < vp->top) top = vp->top; + if (bottom > vp->top + vp->height) bottom = vp->top + vp->height; + + ViewportDrawChk(vp, left, top, right, bottom); +} + +void DrawWindowViewport(const Window *w) +{ + DrawPixelInfo *dpi = _cur_dpi; + + dpi->left += w->left; + dpi->top += w->top; + + ViewportDraw(w->viewport, dpi->left, dpi->top, dpi->left + dpi->width, dpi->top + dpi->height); + + dpi->left -= w->left; + dpi->top -= w->top; +} + +void UpdateViewportPosition(Window *w) +{ + const ViewPort *vp = w->viewport; + + if (WP(w, vp_d).follow_vehicle != INVALID_VEHICLE) { + const Vehicle* veh = GetVehicle(WP(w,vp_d).follow_vehicle); + Point pt = MapXYZToViewport(vp, veh->x_pos, veh->y_pos, veh->z_pos); + + SetViewportPosition(w, pt.x, pt.y); + } else { + int x; + int y; + int vx; + int vy; + + // Center of the viewport is hot spot + x = WP(w,vp_d).scrollpos_x + vp->virtual_width / 2; + y = WP(w,vp_d).scrollpos_y + vp->virtual_height / 2; + // Convert viewport coordinates to map coordinates + // Calculation is scaled by 4 to avoid rounding errors + vx = -x + y * 2; + vy = x + y * 2; + // clamp to size of map + vx = clamp(vx, 0 * 4, MapMaxX() * TILE_SIZE * 4); + vy = clamp(vy, 0 * 4, MapMaxY() * TILE_SIZE * 4); + // Convert map coordinates to viewport coordinates + x = (-vx + vy) / 2; + y = ( vx + vy) / 4; + // Set position + WP(w, vp_d).scrollpos_x = x - vp->virtual_width / 2; + WP(w, vp_d).scrollpos_y = y - vp->virtual_height / 2; + + SetViewportPosition(w, WP(w, vp_d).scrollpos_x, WP(w, vp_d).scrollpos_y); + } +} + +static void MarkViewportDirty(const ViewPort *vp, int left, int top, int right, int bottom) +{ + right -= vp->virtual_left; + if (right <= 0) return; + + bottom -= vp->virtual_top; + if (bottom <= 0) return; + + left = max(0, left - vp->virtual_left); + + if (left >= vp->virtual_width) return; + + top = max(0, top - vp->virtual_top); + + if (top >= vp->virtual_height) return; + + SetDirtyBlocks( + (left >> vp->zoom) + vp->left, + (top >> vp->zoom) + vp->top, + (right >> vp->zoom) + vp->left, + (bottom >> vp->zoom) + vp->top + ); +} + +void MarkAllViewportsDirty(int left, int top, int right, int bottom) +{ + const ViewPort *vp = _viewports; + uint32 act = _active_viewports; + do { + if (act & 1) { + assert(vp->width != 0); + MarkViewportDirty(vp, left, top, right, bottom); + } + } while (vp++,act>>=1); +} + +void MarkTileDirtyByTile(TileIndex tile) +{ + Point pt = RemapCoords(TileX(tile) * TILE_SIZE, TileY(tile) * TILE_SIZE, GetTileZ(tile)); + MarkAllViewportsDirty( + pt.x - 31, + pt.y - 122, + pt.x - 31 + 67, + pt.y - 122 + 154 + ); +} + +void MarkTileDirty(int x, int y) +{ + uint z = 0; + Point pt; + + if (IS_INT_INSIDE(x, 0, MapSizeX() * TILE_SIZE) && + IS_INT_INSIDE(y, 0, MapSizeY() * TILE_SIZE)) + z = GetTileZ(TileVirtXY(x, y)); + pt = RemapCoords(x, y, z); + + MarkAllViewportsDirty( + pt.x - 31, + pt.y - 122, + pt.x - 31 + 67, + pt.y - 122 + 154 + ); +} + +static void SetSelectionTilesDirty(void) +{ + int y_size, x_size; + int x = _thd.pos.x; + int y = _thd.pos.y; + + x_size = _thd.size.x; + y_size = _thd.size.y; + + if (_thd.outersize.x) { + x_size += _thd.outersize.x; + x += _thd.offs.x; + y_size += _thd.outersize.y; + y += _thd.offs.y; + } + + assert(x_size > 0); + assert(y_size > 0); + + x_size += x; + y_size += y; + + do { + int y_bk = y; + do { + MarkTileDirty(x, y); + } while ( (y += TILE_SIZE) != y_size); + y = y_bk; + } while ( (x += TILE_SIZE) != x_size); +} + + +void SetSelectionRed(bool b) +{ + _thd.make_square_red = b; + SetSelectionTilesDirty(); +} + + +static bool CheckClickOnTown(const ViewPort *vp, int x, int y) +{ + const Town *t; + + if (!(_display_opt & DO_SHOW_TOWN_NAMES)) return false; + + switch (vp->zoom) { + case 0: + x = x - vp->left + vp->virtual_left; + y = y - vp->top + vp->virtual_top; + FOR_ALL_TOWNS(t) { + if (y >= t->sign.top && + y < t->sign.top + 12 && + x >= t->sign.left && + x < t->sign.left + t->sign.width_1) { + ShowTownViewWindow(t->index); + return true; + } + } + break; + + case 1: + x = (x - vp->left + 1) * 2 + vp->virtual_left; + y = (y - vp->top + 1) * 2 + vp->virtual_top; + FOR_ALL_TOWNS(t) { + if (y >= t->sign.top && + y < t->sign.top + 24 && + x >= t->sign.left && + x < t->sign.left + t->sign.width_1 * 2) { + ShowTownViewWindow(t->index); + return true; + } + } + break; + + default: + x = (x - vp->left + 3) * 4 + vp->virtual_left; + y = (y - vp->top + 3) * 4 + vp->virtual_top; + FOR_ALL_TOWNS(t) { + if (y >= t->sign.top && + y < t->sign.top + 24 && + x >= t->sign.left && + x < t->sign.left + t->sign.width_2 * 4) { + ShowTownViewWindow(t->index); + return true; + } + } + break; + } + + return false; +} + + +static bool CheckClickOnStation(const ViewPort *vp, int x, int y) +{ + const Station *st; + + if (!(_display_opt & DO_SHOW_STATION_NAMES)) return false; + + switch (vp->zoom) { + case 0: + x = x - vp->left + vp->virtual_left; + y = y - vp->top + vp->virtual_top; + FOR_ALL_STATIONS(st) { + if (y >= st->sign.top && + y < st->sign.top + 12 && + x >= st->sign.left && + x < st->sign.left + st->sign.width_1) { + ShowStationViewWindow(st->index); + return true; + } + } + break; + + case 1: + x = (x - vp->left + 1) * 2 + vp->virtual_left; + y = (y - vp->top + 1) * 2 + vp->virtual_top; + FOR_ALL_STATIONS(st) { + if (y >= st->sign.top && + y < st->sign.top + 24 && + x >= st->sign.left && + x < st->sign.left + st->sign.width_1 * 2) { + ShowStationViewWindow(st->index); + return true; + } + } + break; + + default: + x = (x - vp->left + 3) * 4 + vp->virtual_left; + y = (y - vp->top + 3) * 4 + vp->virtual_top; + FOR_ALL_STATIONS(st) { + if (y >= st->sign.top && + y < st->sign.top + 24 && + x >= st->sign.left && + x < st->sign.left + st->sign.width_2 * 4) { + ShowStationViewWindow(st->index); + return true; + } + } + break; + } + + return false; +} + + +static bool CheckClickOnSign(const ViewPort *vp, int x, int y) +{ + const Sign *si; + + if (!(_display_opt & DO_SHOW_SIGNS)) return false; + + switch (vp->zoom) { + case 0: + x = x - vp->left + vp->virtual_left; + y = y - vp->top + vp->virtual_top; + FOR_ALL_SIGNS(si) { + if (y >= si->sign.top && + y < si->sign.top + 12 && + x >= si->sign.left && + x < si->sign.left + si->sign.width_1) { + ShowRenameSignWindow(si); + return true; + } + } + break; + + case 1: + x = (x - vp->left + 1) * 2 + vp->virtual_left; + y = (y - vp->top + 1) * 2 + vp->virtual_top; + FOR_ALL_SIGNS(si) { + if (y >= si->sign.top && + y < si->sign.top + 24 && + x >= si->sign.left && + x < si->sign.left + si->sign.width_1 * 2) { + ShowRenameSignWindow(si); + return true; + } + } + break; + + default: + x = (x - vp->left + 3) * 4 + vp->virtual_left; + y = (y - vp->top + 3) * 4 + vp->virtual_top; + FOR_ALL_SIGNS(si) { + if (y >= si->sign.top && + y < si->sign.top + 24 && + x >= si->sign.left && + x < si->sign.left + si->sign.width_2 * 4) { + ShowRenameSignWindow(si); + return true; + } + } + break; + } + + return false; +} + + +static bool CheckClickOnWaypoint(const ViewPort *vp, int x, int y) +{ + const Waypoint *wp; + + if (!(_display_opt & DO_WAYPOINTS)) return false; + + switch (vp->zoom) { + case 0: + x = x - vp->left + vp->virtual_left; + y = y - vp->top + vp->virtual_top; + FOR_ALL_WAYPOINTS(wp) { + if (y >= wp->sign.top && + y < wp->sign.top + 12 && + x >= wp->sign.left && + x < wp->sign.left + wp->sign.width_1) { + ShowRenameWaypointWindow(wp); + return true; + } + } + break; + + case 1: + x = (x - vp->left + 1) * 2 + vp->virtual_left; + y = (y - vp->top + 1) * 2 + vp->virtual_top; + FOR_ALL_WAYPOINTS(wp) { + if (y >= wp->sign.top && + y < wp->sign.top + 24 && + x >= wp->sign.left && + x < wp->sign.left + wp->sign.width_1 * 2) { + ShowRenameWaypointWindow(wp); + return true; + } + } + break; + + default: + x = (x - vp->left + 3) * 4 + vp->virtual_left; + y = (y - vp->top + 3) * 4 + vp->virtual_top; + FOR_ALL_WAYPOINTS(wp) { + if (y >= wp->sign.top && + y < wp->sign.top + 24 && + x >= wp->sign.left && + x < wp->sign.left + wp->sign.width_2 * 4) { + ShowRenameWaypointWindow(wp); + return true; + } + } + break; + } + + return false; +} + + +static void CheckClickOnLandscape(const ViewPort *vp, int x, int y) +{ + Point pt = TranslateXYToTileCoord(vp, x, y); + + if (pt.x != -1) ClickTile(TileVirtXY(pt.x, pt.y)); +} + + +static void SafeShowTrainViewWindow(const Vehicle* v) +{ + if (!IsFrontEngine(v)) v = GetFirstVehicleInChain(v); + ShowTrainViewWindow(v); +} + +static void Nop(const Vehicle *v) {} + +typedef void OnVehicleClickProc(const Vehicle *v); +static OnVehicleClickProc* const _on_vehicle_click_proc[] = { + SafeShowTrainViewWindow, + ShowRoadVehViewWindow, + ShowShipViewWindow, + ShowAircraftViewWindow, + Nop, // Special vehicles + Nop // Disaster vehicles +}; + +void HandleViewportClicked(const ViewPort *vp, int x, int y) +{ + const Vehicle *v; + + if (CheckClickOnTown(vp, x, y)) return; + if (CheckClickOnStation(vp, x, y)) return; + if (CheckClickOnSign(vp, x, y)) return; + if (CheckClickOnWaypoint(vp, x, y)) return; + CheckClickOnLandscape(vp, x, y); + + v = CheckClickOnVehicle(vp, x, y); + if (v != NULL) { + DEBUG(misc, 2, "Vehicle %d (index %d) at %p", v->unitnumber, v->index, v); + _on_vehicle_click_proc[v->type - 0x10](v); + } +} + +Vehicle *CheckMouseOverVehicle(void) +{ + const Window *w; + const ViewPort *vp; + + int x = _cursor.pos.x; + int y = _cursor.pos.y; + + w = FindWindowFromPt(x, y); + if (w == NULL) return NULL; + + vp = IsPtInWindowViewport(w, x, y); + return (vp != NULL) ? CheckClickOnVehicle(vp, x, y) : NULL; +} + + + +void PlaceObject(void) +{ + Point pt; + Window *w; + + pt = GetTileBelowCursor(); + if (pt.x == -1) return; + + if (_thd.place_mode == VHM_POINT) { + pt.x += 8; + pt.y += 8; + } + + _tile_fract_coords.x = pt.x & 0xF; + _tile_fract_coords.y = pt.y & 0xF; + + w = GetCallbackWnd(); + if (w != NULL) { + WindowEvent e; + + e.event = WE_PLACE_OBJ; + e.we.place.pt = pt; + e.we.place.tile = TileVirtXY(pt.x, pt.y); + w->wndproc(w, &e); + } +} + + +/* scrolls the viewport in a window to a given location */ +bool ScrollWindowTo(int x , int y, Window *w) +{ + Point pt; + + pt = MapXYZToViewport(w->viewport, x, y, GetSlopeZ(x, y)); + WP(w, vp_d).follow_vehicle = INVALID_VEHICLE; + + if (WP(w, vp_d).scrollpos_x == pt.x && WP(w, vp_d).scrollpos_y == pt.y) + return false; + + WP(w, vp_d).scrollpos_x = pt.x; + WP(w, vp_d).scrollpos_y = pt.y; + return true; +} + + +bool ScrollMainWindowTo(int x, int y) +{ + Window *w; + bool res = ScrollWindowTo(x, y, FindWindowById(WC_MAIN_WINDOW, 0)); + + /* If a user scrolls to a tile (via what way what so ever) and already is on + * that tile (e.g.: pressed twice), move the smallmap to that location, + * so you directly see where you are on the smallmap. */ + + if (res) return res; + + w = FindWindowById(WC_SMALLMAP, 0); + if (w == NULL) return res; + + SmallMapCenterOnCurrentPos(w); + + return res; +} + + +bool ScrollMainWindowToTile(TileIndex tile) +{ + return ScrollMainWindowTo(TileX(tile) * TILE_SIZE + TILE_SIZE / 2, TileY(tile) * TILE_SIZE + TILE_SIZE / 2); +} + +void SetRedErrorSquare(TileIndex tile) +{ + TileIndex old; + + old = _thd.redsq; + _thd.redsq = tile; + + if (tile != old) { + if (tile != 0) MarkTileDirtyByTile(tile); + if (old != 0) MarkTileDirtyByTile(old); + } +} + +void SetTileSelectSize(int w, int h) +{ + _thd.new_size.x = w * TILE_SIZE; + _thd.new_size.y = h * TILE_SIZE; + _thd.new_outersize.x = 0; + _thd.new_outersize.y = 0; +} + +void SetTileSelectBigSize(int ox, int oy, int sx, int sy) +{ + _thd.offs.x = ox * TILE_SIZE; + _thd.offs.y = oy * TILE_SIZE; + _thd.new_outersize.x = sx * TILE_SIZE; + _thd.new_outersize.y = sy * TILE_SIZE; +} + +/* returns the best autorail highlight type from map coordinates */ +static byte GetAutorailHT(int x, int y) +{ + return HT_RAIL | _AutorailPiece[x & 0xF][y & 0xF]; +} + +// called regular to update tile highlighting in all cases +void UpdateTileSelection(void) +{ + int x1; + int y1; + + _thd.new_drawstyle = 0; + + if (_thd.place_mode == VHM_SPECIAL) { + x1 = _thd.selend.x; + y1 = _thd.selend.y; + if (x1 != -1) { + int x2 = _thd.selstart.x; + int y2 = _thd.selstart.y; + x1 &= ~0xF; + y1 &= ~0xF; + + if (x1 >= x2) intswap(x1,x2); + if (y1 >= y2) intswap(y1,y2); + _thd.new_pos.x = x1; + _thd.new_pos.y = y1; + _thd.new_size.x = x2 - x1 + TILE_SIZE; + _thd.new_size.y = y2 - y1 + TILE_SIZE; + _thd.new_drawstyle = _thd.next_drawstyle; + } + } else if (_thd.place_mode != VHM_NONE) { + Point pt = GetTileBelowCursor(); + x1 = pt.x; + y1 = pt.y; + if (x1 != -1) { + switch (_thd.place_mode) { + case VHM_RECT: + _thd.new_drawstyle = HT_RECT; + break; + case VHM_POINT: + _thd.new_drawstyle = HT_POINT; + x1 += 8; + y1 += 8; + break; + case VHM_RAIL: + _thd.new_drawstyle = GetAutorailHT(pt.x, pt.y); // draw one highlighted tile + } + _thd.new_pos.x = x1 & ~0xF; + _thd.new_pos.y = y1 & ~0xF; + } + } + + // redraw selection + if (_thd.drawstyle != _thd.new_drawstyle || + _thd.pos.x != _thd.new_pos.x || _thd.pos.y != _thd.new_pos.y || + _thd.size.x != _thd.new_size.x || _thd.size.y != _thd.new_size.y || + _thd.outersize.x != _thd.new_outersize.x || + _thd.outersize.y != _thd.new_outersize.y) { + // clear the old selection? + if (_thd.drawstyle) SetSelectionTilesDirty(); + + _thd.drawstyle = _thd.new_drawstyle; + _thd.pos = _thd.new_pos; + _thd.size = _thd.new_size; + _thd.outersize = _thd.new_outersize; + _thd.dirty = 0xff; + + // draw the new selection? + if (_thd.new_drawstyle) SetSelectionTilesDirty(); + } +} + +// highlighting tiles while only going over them with the mouse +void VpStartPlaceSizing(TileIndex tile, int user) +{ + _thd.userdata = user; + _thd.selend.x = TileX(tile) * TILE_SIZE; + _thd.selstart.x = TileX(tile) * TILE_SIZE; + _thd.selend.y = TileY(tile) * TILE_SIZE; + _thd.selstart.y = TileY(tile) * TILE_SIZE; + if (_thd.place_mode == VHM_RECT) { + _thd.place_mode = VHM_SPECIAL; + _thd.next_drawstyle = HT_RECT; + } else if (_thd.place_mode == VHM_RAIL) { // autorail one piece + _thd.place_mode = VHM_SPECIAL; + _thd.next_drawstyle = _thd.drawstyle; + } else { + _thd.place_mode = VHM_SPECIAL; + _thd.next_drawstyle = HT_POINT; + } + _special_mouse_mode = WSM_SIZING; +} + +void VpSetPlaceSizingLimit(int limit) +{ + _thd.sizelimit = limit; +} + +/** +* Highlights all tiles between a set of two tiles. Used in dock and tunnel placement +* @param from TileIndex of the first tile to highlight +* @param to TileIndex of the last tile to highlight */ +void VpSetPresizeRange(TileIndex from, TileIndex to) +{ + uint distance = DistanceManhattan(from, to) + 1; + + _thd.selend.x = TileX(to) * TILE_SIZE; + _thd.selend.y = TileY(to) * TILE_SIZE; + _thd.selstart.x = TileX(from) * TILE_SIZE; + _thd.selstart.y = TileY(from) * TILE_SIZE; + _thd.next_drawstyle = HT_RECT; + + /* show measurement only if there is any length to speak of */ + if (distance > 1) GuiShowTooltipsWithArgs(STR_MEASURE_LENGTH, 1, &distance); +} + +static void VpStartPreSizing(void) +{ + _thd.selend.x = -1; + _special_mouse_mode = WSM_PRESIZE; +} + +/* returns information about the 2x1 piece to be build. + * The lower bits (0-3) are the track type. */ +static byte Check2x1AutoRail(int mode) +{ + int fxpy = _tile_fract_coords.x + _tile_fract_coords.y; + int sxpy = (_thd.selend.x & 0xF) + (_thd.selend.y & 0xF); + int fxmy = _tile_fract_coords.x - _tile_fract_coords.y; + int sxmy = (_thd.selend.x & 0xF) - (_thd.selend.y & 0xF); + + switch (mode) { + case 0: // end piece is lower right + if (fxpy >= 20 && sxpy <= 12) { /*SwapSelection(); DoRailroadTrack(0); */return 3; } + if (fxmy < -3 && sxmy > 3) {/* DoRailroadTrack(0); */return 5; } + return 1; + + case 1: + if (fxmy > 3 && sxmy < -3) { /*SwapSelection(); DoRailroadTrack(0); */return 4; } + if (fxpy <= 12 && sxpy >= 20) { /*DoRailroadTrack(0); */return 2; } + return 1; + + case 2: + if (fxmy > 3 && sxmy < -3) { /*DoRailroadTrack(3);*/ return 4; } + if (fxpy >= 20 && sxpy <= 12) { /*SwapSelection(); DoRailroadTrack(0); */return 3; } + return 0; + + case 3: + if (fxmy < -3 && sxmy > 3) { /*SwapSelection(); DoRailroadTrack(3);*/ return 5; } + if (fxpy <= 12 && sxpy >= 20) { /*DoRailroadTrack(0); */return 2; } + return 0; + } + + return 0; // avoids compiler warnings +} + +/** Check if the direction of start and end tile should be swapped based on + * the dragging-style. Default directions are: + * in the case of a line (HT_RAIL, HT_LINE): DIR_NE, DIR_NW, DIR_N, DIR_E + * in the case of a rect (HT_RECT, HT_POINT): DIR_S, DIR_E + * For example dragging a rectangle area from south to north should be swapped to + * north-south (DIR_S) to obtain the same results with less code. This is what + * the return value signifies. + * @param style HighLightStyle dragging style + * @param start_tile, end_tile start and end tile of drag + * @param boolean value which when true means start/end should be swapped */ +static bool SwapDirection(HighLightStyle style, TileIndex start_tile, TileIndex end_tile) +{ + uint start_x = TileX(start_tile); + uint start_y = TileY(start_tile); + uint end_x = TileX(end_tile); + uint end_y = TileY(end_tile); + + switch (style & HT_DRAG_MASK) { + case HT_RAIL: + case HT_LINE: return (end_x > start_x || (end_x == start_x && end_y > start_y)); + + case HT_RECT: + case HT_POINT: return (end_x != start_x && end_y < start_y); + default: NOT_REACHED(); + } + + return false; +} + +/** Calculates height difference between one tile and another +* Multiplies the result to suit the standard given by minimap - 50 meters high +* To correctly get the height difference we need the direction we are dragging +* in, as well as with what kind of tool we are dragging. For example a horizontal +* autorail tool that starts in bottom and ends at the top of a tile will need the +* maximum of SW,S and SE,N corners respectively. This is handled by the lookup table below +* See _tileoffs_by_dir in map.c for the direction enums if you can't figure out +* the values yourself. +* @param style HightlightStyle of drag. This includes direction and style (autorail, rect, etc.) +* @param distance amount of tiles dragged, important for horizontal/vertical drags +* ignored for others +* @param start_tile, end_tile start and end tile of drag operation +* @return height difference between two tiles. Tile measurement tool utilizes +* this value in its tooltips */ +static int CalcHeightdiff(HighLightStyle style, uint distance, TileIndex start_tile, TileIndex end_tile) +{ + bool swap = SwapDirection(style, start_tile, end_tile); + byte style_t; + uint h0, h1, ht; // start heigth, end height, and temp variable + + if (start_tile == end_tile) return 0; + if (swap) swap_tile(&start_tile, &end_tile); + + switch (style & HT_DRAG_MASK) { + case HT_RECT: { + static const TileIndexDiffC heightdiff_area_by_dir[] = { + /* Start */ {1, 0}, /* Dragging east */ {0, 0}, /* Dragging south */ + /* End */ {0, 1}, /* Dragging east */ {1, 1} /* Dragging south */ + }; + + /* In the case of an area we can determine whether we were dragging south or + * east by checking the X-coordinates of the tiles */ + style_t = (byte)(TileX(end_tile) > TileX(start_tile)); + start_tile = TILE_ADD(start_tile, ToTileIndexDiff(heightdiff_area_by_dir[style_t])); + end_tile = TILE_ADD(end_tile, ToTileIndexDiff(heightdiff_area_by_dir[2 + style_t])); + } + /* Fallthrough */ + case HT_POINT: + h0 = TileHeight(start_tile); + h1 = TileHeight(end_tile); + break; + default: { /* All other types, this is mostly only line/autorail */ + static const HighLightStyle flip_style_direction[] = { + HT_DIR_X, HT_DIR_Y, HT_DIR_HL, HT_DIR_HU, HT_DIR_VR, HT_DIR_VL + }; + static const TileIndexDiffC heightdiff_line_by_dir[] = { + /* Start */ {1, 0}, {1, 1}, /* HT_DIR_X */ {0, 1}, {1, 1}, /* HT_DIR_Y */ + /* Start */ {1, 0}, {0, 0}, /* HT_DIR_HU */ {1, 0}, {1, 1}, /* HT_DIR_HL */ + /* Start */ {1, 0}, {1, 1}, /* HT_DIR_VL */ {0, 1}, {1, 1}, /* HT_DIR_VR */ + + /* Start */ {0, 1}, {0, 0}, /* HT_DIR_X */ {1, 0}, {0, 0}, /* HT_DIR_Y */ + /* End */ {0, 1}, {0, 0}, /* HT_DIR_HU */ {1, 1}, {0, 1}, /* HT_DIR_HL */ + /* End */ {1, 0}, {0, 0}, /* HT_DIR_VL */ {0, 0}, {0, 1}, /* HT_DIR_VR */ + }; + + distance %= 2; // we're only interested if the distance is even or uneven + style &= HT_DIR_MASK; + + /* To handle autorail, we do some magic to be able to use a lookup table. + * Firstly if we drag the other way around, we switch start&end, and if needed + * also flip the drag-position. Eg if it was on the left, and the distance is even + * that means the end, which is now the start is on the right */ + if (swap && distance == 0) style = flip_style_direction[style]; + + /* Use lookup table for start-tile based on HighLightStyle direction */ + style_t = style * 2; + assert(style_t < lengthof(heightdiff_line_by_dir) - 13); + h0 = TileHeight(TILE_ADD(start_tile, ToTileIndexDiff(heightdiff_line_by_dir[style_t]))); + ht = TileHeight(TILE_ADD(start_tile, ToTileIndexDiff(heightdiff_line_by_dir[style_t + 1]))); + h0 = maxu(h0, ht); + + /* Use lookup table for end-tile based on HighLightStyle direction + * flip around side (lower/upper, left/right) based on distance */ + if (distance == 0) style_t = flip_style_direction[style] * 2; + assert(style_t < lengthof(heightdiff_line_by_dir) - 13); + h1 = TileHeight(TILE_ADD(end_tile, ToTileIndexDiff(heightdiff_line_by_dir[12 + style_t]))); + ht = TileHeight(TILE_ADD(end_tile, ToTileIndexDiff(heightdiff_line_by_dir[12 + style_t + 1]))); + h1 = maxu(h1, ht); + } break; + } + + if (swap) swap_uint32(&h0, &h1); + /* Minimap shows height in intervals of 50 meters, let's do the same */ + return (int)(h1 - h0) * 50; +} + +static const StringID measure_strings_length[] = {STR_NULL, STR_MEASURE_LENGTH, STR_MEASURE_LENGTH_HEIGHTDIFF}; + +// while dragging +static void CalcRaildirsDrawstyle(TileHighlightData *thd, int x, int y, int method) +{ + HighLightStyle b; + uint w, h; + + int dx = thd->selstart.x - (thd->selend.x & ~0xF); + int dy = thd->selstart.y - (thd->selend.y & ~0xF); + w = myabs(dx) + 16; + h = myabs(dy) + 16; + + if (TileVirtXY(thd->selstart.x, thd->selstart.y) == TileVirtXY(x, y)) { // check if we're only within one tile + if (method == VPM_RAILDIRS) { + b = GetAutorailHT(x, y); + } else { // rect for autosignals on one tile + b = HT_RECT; + } + } else if (h == 16) { // Is this in X direction? + if (dx == 16) { // 2x1 special handling + b = (Check2x1AutoRail(3)) | HT_LINE; + } else if (dx == -16) { + b = (Check2x1AutoRail(2)) | HT_LINE; + } else { + b = HT_LINE | HT_DIR_X; + } + y = thd->selstart.y; + } else if (w == 16) { // Or Y direction? + if (dy == 16) { // 2x1 special handling + b = (Check2x1AutoRail(1)) | HT_LINE; + } else if (dy == -16) { // 2x1 other direction + b = (Check2x1AutoRail(0)) | HT_LINE; + } else { + b = HT_LINE | HT_DIR_Y; + } + x = thd->selstart.x; + } else if (w > h * 2) { // still count as x dir? + b = HT_LINE | HT_DIR_X; + y = thd->selstart.y; + } else if (h > w * 2) { // still count as y dir? + b = HT_LINE | HT_DIR_Y; + x = thd->selstart.x; + } else { // complicated direction + int d = w - h; + thd->selend.x = thd->selend.x & ~0xF; + thd->selend.y = thd->selend.y & ~0xF; + + // four cases. + if (x > thd->selstart.x) { + if (y > thd->selstart.y) { + // south + if (d == 0) { + b = (x & 0xF) > (y & 0xF) ? HT_LINE | HT_DIR_VL : HT_LINE | HT_DIR_VR; + } else if (d >= 0) { + x = thd->selstart.x + h; + b = HT_LINE | HT_DIR_VL; + // return px == py || px == py + 16; + } else { + y = thd->selstart.y + w; + b = HT_LINE | HT_DIR_VR; + } // return px == py || px == py - 16; + } else { + // west + if (d == 0) { + b = (x & 0xF) + (y & 0xF) >= 0x10 ? HT_LINE | HT_DIR_HL : HT_LINE | HT_DIR_HU; + } else if (d >= 0) { + x = thd->selstart.x + h; + b = HT_LINE | HT_DIR_HL; + } else { + y = thd->selstart.y - w; + b = HT_LINE | HT_DIR_HU; + } + } + } else { + if (y > thd->selstart.y) { + // east + if (d == 0) { + b = (x & 0xF) + (y & 0xF) >= 0x10 ? HT_LINE | HT_DIR_HL : HT_LINE | HT_DIR_HU; + } else if (d >= 0) { + x = thd->selstart.x - h; + b = HT_LINE | HT_DIR_HU; + // return px == -py || px == -py - 16; + } else { + y = thd->selstart.y + w; + b = HT_LINE | HT_DIR_HL; + } // return px == -py || px == -py + 16; + } else { + // north + if (d == 0) { + b = (x & 0xF) > (y & 0xF) ? HT_LINE | HT_DIR_VL : HT_LINE | HT_DIR_VR; + } else if (d >= 0) { + x = thd->selstart.x - h; + b = HT_LINE | HT_DIR_VR; + // return px == py || px == py - 16; + } else { + y = thd->selstart.y - w; + b = HT_LINE | HT_DIR_VL; + } //return px == py || px == py + 16; + } + } + } + + if (_patches.measure_tooltip) { + TileIndex t0 = TileVirtXY(thd->selstart.x, thd->selstart.y); + TileIndex t1 = TileVirtXY(x, y); + uint distance = DistanceManhattan(t0, t1) + 1; + byte index = 0; + uint params[2]; + + if (distance != 1) { + int heightdiff = CalcHeightdiff(b, distance, t0, t1); + /* If we are showing a tooltip for horizontal or vertical drags, + * 2 tiles have a length of 1. To bias towards the ceiling we add + * one before division. It feels more natural to count 3 lengths as 2 */ + if ((b & HT_DIR_MASK) != HT_DIR_X && (b & HT_DIR_MASK) != HT_DIR_Y) { + distance = (distance + 1) / 2; + } + + params[index++] = distance; + if (heightdiff != 0) params[index++] = heightdiff; + } + + GuiShowTooltipsWithArgs(measure_strings_length[index], index, params); + } + + thd->selend.x = x; + thd->selend.y = y; + thd->next_drawstyle = b; +} + +/** + * Selects tiles while dragging + * @param x X coordinate of end of selection + * @param y Y coordinate of end of selection + * @param method modifies the way tiles are selected. Possible + * methods are VPM_* in viewport.h */ +void VpSelectTilesWithMethod(int x, int y, int method) +{ + int sx, sy; + HighLightStyle style; + + if (x == -1) { + _thd.selend.x = -1; + return; + } + + /* Special handling of drag in any (8-way) direction */ + if (method == VPM_RAILDIRS || method == VPM_SIGNALDIRS) { + _thd.selend.x = x; + _thd.selend.y = y; + CalcRaildirsDrawstyle(&_thd, x, y, method); + return; + } + + if (_thd.next_drawstyle == HT_POINT) { + x += TILE_SIZE / 2; + y += TILE_SIZE / 2; + } + + sx = _thd.selstart.x; + sy = _thd.selstart.y; + + switch (method) { + case VPM_X_OR_Y: /* drag in X or Y direction */ + if (myabs(sy - y) < myabs(sx - x)) { + y = sy; + style = HT_DIR_X; + } else { + x = sx; + style = HT_DIR_Y; + } + goto calc_heightdiff_single_direction; + case VPM_FIX_X: /* drag in Y direction */ + x = sx; + style = HT_DIR_Y; + goto calc_heightdiff_single_direction; + case VPM_FIX_Y: /* drag in X direction */ + y = sy; + style = HT_DIR_X; + +calc_heightdiff_single_direction:; + if (_patches.measure_tooltip) { + TileIndex t0 = TileVirtXY(sx, sy); + TileIndex t1 = TileVirtXY(x, y); + uint distance = DistanceManhattan(t0, t1) + 1; + byte index = 0; + uint params[2]; + + if (distance != 1) { + /* With current code passing a HT_LINE style to calculate the height + * difference is enough. However if/when a point-tool is created + * with this method, function should be called with new_style (below) + * instead of HT_LINE | style case HT_POINT is handled specially + * new_style := (_thd.next_drawstyle & HT_RECT) ? HT_LINE | style : _thd.next_drawstyle; */ + int heightdiff = CalcHeightdiff(HT_LINE | style, 0, t0, t1); + + params[index++] = distance; + if (heightdiff != 0) params[index++] = heightdiff; + } + + GuiShowTooltipsWithArgs(measure_strings_length[index], index, params); + } break; + + case VPM_X_AND_Y_LIMITED: { /* drag an X by Y constrained rect area */ + int limit = (_thd.sizelimit - 1) * TILE_SIZE; + x = sx + clamp(x - sx, -limit, limit); + y = sy + clamp(y - sy, -limit, limit); + /* Fallthrough */ + case VPM_X_AND_Y: /* drag an X by Y area */ + if (_patches.measure_tooltip) { + static const StringID measure_strings_area[] = { + STR_NULL, STR_NULL, STR_MEASURE_AREA, STR_MEASURE_AREA_HEIGHTDIFF + }; + + TileIndex t0 = TileVirtXY(sx, sy); + TileIndex t1 = TileVirtXY(x, y); + uint dx = abs(TileX(t0) - TileX(t1)) + 1; + uint dy = abs(TileY(t0) - TileY(t1)) + 1; + byte index = 0; + uint params[3]; + + /* If dragging an area (eg dynamite tool) and it is actually a single + * row/column, change the type to 'line' to get proper calculation for height */ + style = _thd.next_drawstyle; + if (style & HT_RECT) { + if (dx == 1) { + style = HT_LINE | HT_DIR_Y; + } else if (dy == 1) { + style = HT_LINE | HT_DIR_X; + } + } + + if (dx != 1 || dy != 1) { + int heightdiff = CalcHeightdiff(style, 0, t0, t1); + + params[index++] = dx; + params[index++] = dy; + if (heightdiff != 0) params[index++] = heightdiff; + } + + GuiShowTooltipsWithArgs(measure_strings_area[index], index, params); + } + break; + + } + default: NOT_REACHED(); + } + + _thd.selend.x = x; + _thd.selend.y = y; +} + +// while dragging +bool VpHandlePlaceSizingDrag(void) +{ + Window *w; + WindowEvent e; + + if (_special_mouse_mode != WSM_SIZING) return true; + + e.we.place.userdata = _thd.userdata; + + // stop drag mode if the window has been closed + w = FindWindowById(_thd.window_class,_thd.window_number); + if (w == NULL) { + ResetObjectToPlace(); + return false; + } + + // while dragging execute the drag procedure of the corresponding window (mostly VpSelectTilesWithMethod() ) + if (_left_button_down) { + e.event = WE_PLACE_DRAG; + e.we.place.pt = GetTileBelowCursor(); + w->wndproc(w, &e); + return false; + } + + // mouse button released.. + // keep the selected tool, but reset it to the original mode. + _special_mouse_mode = WSM_NONE; + if (_thd.next_drawstyle == HT_RECT) { + _thd.place_mode = VHM_RECT; + } else if ((e.we.place.userdata & 0xF) == VPM_SIGNALDIRS) { // some might call this a hack... -- Dominik + _thd.place_mode = VHM_RECT; + } else if (_thd.next_drawstyle & HT_LINE) { + _thd.place_mode = VHM_RAIL; + } else if (_thd.next_drawstyle & HT_RAIL) { + _thd.place_mode = VHM_RAIL; + } else { + _thd.place_mode = VHM_POINT; + } + SetTileSelectSize(1, 1); + + // and call the mouseup event. + e.event = WE_PLACE_MOUSEUP; + e.we.place.pt = _thd.selend; + e.we.place.tile = TileVirtXY(e.we.place.pt.x, e.we.place.pt.y); + e.we.place.starttile = TileVirtXY(_thd.selstart.x, _thd.selstart.y); + w->wndproc(w, &e); + + return false; +} + +void SetObjectToPlaceWnd(CursorID icon, byte mode, Window *w) +{ + SetObjectToPlace(icon, mode, w->window_class, w->window_number); +} + +#include "table/animcursors.h" + +void SetObjectToPlace(CursorID icon, byte mode, WindowClass window_class, WindowNumber window_num) +{ + Window *w; + + // undo clicking on button + if (_thd.place_mode != 0) { + _thd.place_mode = 0; + w = FindWindowById(_thd.window_class, _thd.window_number); + if (w != NULL) CallWindowEventNP(w, WE_ABORT_PLACE_OBJ); + } + + SetTileSelectSize(1, 1); + + _thd.make_square_red = false; + + if (mode == VHM_DRAG) { // mode 4 is for dragdropping trains in the depot window + mode = 0; + _special_mouse_mode = WSM_DRAGDROP; + } else { + _special_mouse_mode = WSM_NONE; + } + + _thd.place_mode = mode; + _thd.window_class = window_class; + _thd.window_number = window_num; + + if (mode == VHM_SPECIAL) // special tools, like tunnels or docks start with presizing mode + VpStartPreSizing(); + + if ( (int)icon < 0) + SetAnimatedMouseCursor(_animcursors[~icon]); + else + SetMouseCursor(icon); +} + +void ResetObjectToPlace(void) +{ + SetObjectToPlace(SPR_CURSOR_MOUSE, VHM_NONE, 0, 0); +}