--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/viewport.c Mon Aug 09 17:04:08 2004 +0000
@@ -0,0 +1,2040 @@
+#include "stdafx.h"
+#include "ttd.h"
+#include "viewport.h"
+#include "window.h"
+#include "vehicle.h"
+#include "station.h"
+#include "gfx.h"
+#include "town.h"
+
+#define VIEWPORT_DRAW_MEM (65536)
+
+static bool _added_tile_sprite;
+static bool _offset_ground_sprites;
+
+typedef struct StringSpriteToDraw {
+ uint16 string;
+ uint16 color;
+ struct StringSpriteToDraw *next;
+ int16 x;
+ int16 y;
+ uint32 params[2];
+ uint16 width;
+} StringSpriteToDraw;
+
+typedef struct TileSpriteToDraw {
+ uint32 image;
+ struct TileSpriteToDraw *next;
+ int16 x, y;
+ byte z;
+} TileSpriteToDraw;
+
+typedef struct ChildScreenSpriteToDraw {
+ uint32 image;
+ int16 x,y;
+ struct ChildScreenSpriteToDraw *next;
+} ChildScreenSpriteToDraw;
+
+typedef struct ParentSpriteToDraw {
+ uint32 image;
+ int16 left, top, right, bottom;
+ int16 tile_x, tile_y;
+ int16 tile_right, tile_bottom;
+ ChildScreenSpriteToDraw *child;
+ byte unk16;
+ byte tile_z;
+ byte tile_z_bottom;
+} ParentSpriteToDraw;
+
+typedef struct ViewportDrawer {
+ DrawPixelInfo dpi;
+
+ byte *spritelist_mem, *eof_spritelist_mem;
+
+ StringSpriteToDraw **last_string, *first_string;
+ TileSpriteToDraw **last_tile, *first_tile;
+
+ ChildScreenSpriteToDraw **last_child;
+
+ ParentSpriteToDraw **parent_list;
+
+ byte combine_sprites;
+
+ int offs_x, offs_y; // used when drawing ground sprites relative
+ bool ground_child;
+} ViewportDrawer;
+
+static ViewportDrawer *_cur_vd;
+
+TileHighlightData * const _thd_ptr = &_thd;
+static TileInfo *_cur_ti;
+
+
+Point MapXYZToViewport(ViewPort *vp, uint x, uint y, uint z)
+{
+ Point p = RemapCoords(x, y, z);
+ p.x -= (vp->virtual_width>>1);
+ p.y -= (vp->virtual_height>>1);
+ return p;
+}
+
+void AssignWindowViewport(Window *w, int x, int y,
+ int width, int height, uint32 follow_flags, byte zoom)
+{
+ ViewPort *vp;
+ Point pt;
+ byte z;
+ uint32 bit;
+
+ for(vp=_viewports,bit=1; ; vp++, bit<<=1) {
+ assert(vp!=endof(_viewports));
+ if (vp->width == 0)
+ break;
+ }
+ _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) {
+ Vehicle *veh;
+ WP(w,vp_d).follow_vehicle = (VehicleID)(follow_flags & 0xFFFF);
+ veh = &_vehicles[WP(w,vp_d).follow_vehicle];
+ pt = MapXYZToViewport(vp, veh->x_pos, veh->y_pos, veh->z_pos);
+ } else {
+ int x = GET_TILE_X(follow_flags) * 16;
+ int y = GET_TILE_Y(follow_flags) * 16;
+ WP(w,vp_d).follow_vehicle = 0xFFFF;
+ z = GetSlopeZ(x,y);
+ pt = MapXYZToViewport(vp, x,y, z);
+ }
+
+ 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 *w, int left, int top, int width, int height)
+{
+ for (; w < _last_window; w++) {
+ if (left + width > w->left &&
+ w->left+w->width > left &&
+ top + height > w->top &&
+ w->top+w->height > top) {
+
+ if (left < w->left) {
+ DoSetViewportPosition(w, left, top, w->left - left, height);
+ DoSetViewportPosition(w, left + (w->left - left), top, width - (w->left - left), height);
+ return;
+ }
+
+ if (left + width > w->left + w->width) {
+ DoSetViewportPosition(w, left, top, (w->left + w->width - left), height);
+ DoSetViewportPosition(w, left + (w->left + w->width - left), top, width - (w->left + w->width - left) , height);
+ return;
+ }
+
+ if (top < w->top) {
+ DoSetViewportPosition(w, left, top, width, (w->top - top));
+ DoSetViewportPosition(w, left, top + (w->top - top), width, height - (w->top - top));
+ return;
+ }
+
+ if (top + height > w->top + w->height) {
+ DoSetViewportPosition(w, left, top, width, (w->top + w->height - top));
+ DoSetViewportPosition(w, 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);
+ }
+ }
+}
+
+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;
+ }
+
+ if ( (i=(left + width - _screen.width)) >= 0)
+ width -= i;
+
+ if (width > 0) {
+ if (top < 0) {
+ height += top;
+ top = 0;
+ }
+
+ if ( (i=(top + height - _screen.height)) >= 0) {
+ height -= i;
+ }
+
+ if (height > 0)
+ DoSetViewportPosition(w+1, left, top, width, height);
+ }
+}
+
+
+ViewPort *IsPtInWindowViewport(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;
+}
+
+Point TranslateXYToTileCoord(ViewPort *vp, int x, int y) {
+ int z;
+ Point pt;
+ int a,b;
+
+ 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;
+
+#if !defined(NEW_ROTATION)
+ a = y-x;
+ b = y+x;
+#else
+ a = x+y;
+ b = x-y;
+#endif
+ z = GetSlopeZ(a, b) >> 1;
+ z = GetSlopeZ(a+z, b+z) >> 1;
+ z = GetSlopeZ(a+z, b+z) >> 1;
+ z = GetSlopeZ(a+z, b+z) >> 1;
+ z = GetSlopeZ(a+z, b+z) >> 1;
+
+ pt.x = a+z;
+ pt.y = b+z;
+
+ if ((uint)pt.x >= TILE_X_MAX*16 || (uint)pt.y >= TILE_Y_MAX*16) {
+ pt.x = pt.y = -1;
+ }
+
+ return pt;
+}
+
+static Point GetTileFromScreenXY(int x, int y)
+{
+ Window *w;
+ ViewPort *vp;
+ Point pt;
+
+ if ( (w = FindWindowFromPt(x, y)) != NULL &&
+ (vp = IsPtInWindowViewport(w, x, y)) != NULL)
+ return TranslateXYToTileCoord(vp, x, y);
+
+ pt.y = pt.x = -1;
+ return pt;
+}
+
+Point GetTileBelowCursor()
+{
+ return GetTileFromScreenXY(_cursor.pos.x, _cursor.pos.y);
+}
+
+Point GetTileZoomCenter(bool in)
+{
+ int x, y;
+
+ if (in) {
+ x = (_cursor.pos.x >> 1) + (_screen.width >> 2);
+ y = (_cursor.pos.y >> 1) + (_screen.height >> 2);
+ }
+ else {
+ x = _screen.width - _cursor.pos.x;
+ y = _screen.height - _cursor.pos.y;
+ }
+ return GetTileFromScreenXY(x, y);
+}
+
+void DrawGroundSpriteAt(uint32 image, int x, int y, byte z)
+{
+ ViewportDrawer *vd = _cur_vd;
+ TileSpriteToDraw *ts;
+
+ assert( (image & 0x3fff) < NUM_SPRITES);
+
+ ts = (TileSpriteToDraw*)vd->spritelist_mem;
+ if ((byte*)ts >= vd->eof_spritelist_mem) {
+ DEBUG(misc, 0) ("Out of sprite mem\n");
+ return;
+ }
+
+ 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)
+{
+ ViewportDrawer *vd = _cur_vd;
+ int t;
+ uint32 image_org = image;
+ const SpriteDimension *sd;
+ Point pt = RemapCoords(x, y, z);
+
+ sd = GetSpriteDimension(image & 0x3FFF);
+
+ if ((t = pt.x + sd->xoffs) >= vd->dpi.left + vd->dpi.width ||
+ (t + sd->xsize) <= vd->dpi.left ||
+ (t = pt.y + sd->yoffs) >= vd->dpi.top + vd->dpi.height ||
+ (t + sd->ysize) <= vd->dpi.top)
+ return;
+
+ AddChildSpriteScreen(image_org, 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 SpriteDimension *sd;
+ Point pt;
+
+ assert( (image & 0x3fff) < NUM_SPRITES);
+
+ if (vd->combine_sprites == 2) {
+ AddCombinedSprite(image, x, y, z);
+ return;
+ }
+
+ vd->last_child = NULL;
+
+ ps = (ParentSpriteToDraw*)vd->spritelist_mem;
+ if ((byte*)ps >= vd->eof_spritelist_mem) {
+ DEBUG(misc, 0) ("Out of sprite mem\n");
+ return;
+ }
+
+ ps->image = image;
+ ps->tile_x = x;
+ ps->tile_right = x + w - 1;
+
+ ps->tile_y = y;
+ ps->tile_bottom = y + h - 1;
+
+ ps->tile_z = z;
+ ps->tile_z_bottom = z + dz - 1;
+
+ pt = RemapCoords(x, y, z);
+
+ sd = GetSpriteDimension(image & 0x3FFF);
+ if ((ps->left = (pt.x += sd->xoffs)) >= vd->dpi.left + vd->dpi.width ||
+ (ps->right = (pt.x + sd->xsize)) <= vd->dpi.left ||
+ (ps->top = (pt.y += sd->yoffs)) >= vd->dpi.top + vd->dpi.height ||
+ (ps->bottom = (pt.y + sd->ysize)) <= vd->dpi.top) {
+ return;
+ }
+
+ ps->unk16 = 0;
+ ps->child = NULL;
+ vd->last_child = &ps->child;
+
+ vd->spritelist_mem += sizeof(ParentSpriteToDraw);
+ *vd->parent_list++ = ps;
+
+ if (vd->combine_sprites == 1) {
+ vd->combine_sprites = 2;
+ }
+}
+
+void StartSpriteCombine()
+{
+ _cur_vd->combine_sprites = 1;
+}
+
+void EndSpriteCombine()
+{
+ _cur_vd->combine_sprites = 0;
+}
+
+void AddChildSpriteScreen(uint32 image, int x, int y)
+{
+ ViewportDrawer *vd = _cur_vd;
+ ChildScreenSpriteToDraw *cs;
+
+ cs = (ChildScreenSpriteToDraw*) vd->spritelist_mem;
+ if ((byte*)cs >= vd->eof_spritelist_mem) {
+ DEBUG(misc,0) ("Out of sprite mem\n");
+ return;
+ }
+
+ if (vd->last_child == NULL)
+ return;
+
+ *vd->last_child = cs;
+ vd->last_child = &cs->next;
+
+ vd->spritelist_mem += sizeof(ChildScreenSpriteToDraw);
+
+ 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;
+
+ ss = (StringSpriteToDraw*)vd->spritelist_mem;
+ if ((byte*)ss >= vd->eof_spritelist_mem) {
+ DEBUG(misc, 0) ("Out of sprite mem\n");
+ return NULL;
+ }
+
+ 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;
+}
+
+/* Debugging code */
+
+#ifdef DEBUG_TILE_PUSH
+static int _num_push;
+static uint _pushed_tile[200];
+static int _pushed_track[200];
+
+static uint _stored_tile[200];
+static int _stored_track[200];
+static int _num_stored;
+
+void dbg_store_path()
+{
+ memcpy(_stored_tile, _pushed_tile, sizeof(_stored_tile));
+ memcpy(_stored_track, _pushed_track, sizeof(_stored_tile));
+ _num_stored = _num_push;
+ MarkWholeScreenDirty();
+}
+
+void dbg_push_tile(uint tile, int track)
+{
+ _pushed_tile[_num_push] = tile;
+ _pushed_track[_num_push++] = track;
+ dbg_store_path();
+}
+
+void dbg_pop_tile()
+{
+ _num_push--;
+}
+
+static const uint16 _dbg_track_sprite[] = {
+ 0x3F4,
+ 0x3F3,
+ 0x3F5,
+ 0x3F6,
+ 0x3F8,
+ 0x3F7,
+};
+
+int dbg_draw_pushed(const TileInfo *ti)
+{
+ int i;
+ if (ti->tile==0)
+ return 0;
+ for(i=0; i!=_num_stored; i++)
+ if (_stored_tile[i] == ti->tile) {
+ DrawGroundSpriteAt(_dbg_track_sprite[_stored_track[i]&7], ti->x, ti->y, ti->z);
+ }
+ return -1;
+}
+
+#endif
+
+static void DrawSelectionSprite(uint32 image, const TileInfo *ti)
+{
+ if (_added_tile_sprite) {
+ DrawGroundSpriteAt(image, ti->x, ti->y, ti->z + 7);
+ } else {
+ AddSortableSpriteToDraw(image, ti->x, ti->y, 0x10, 0x10, 1, ti->z + 7);
+ }
+}
+
+static bool IsPartOfAutoLine(int px, int py)
+{
+ const TileHighlightData *thd = _thd_ptr;
+
+ px -= thd->selstart.x;
+ py -= thd->selstart.y;
+
+ switch(thd->drawstyle) {
+ case HT_LINE | 0: return px == py || px == py + 16;
+ case HT_LINE | 1: return px == py || px == py - 16;
+ case HT_LINE | 2: return px == -py || px == -py + 16;
+ case HT_LINE | 3: return px == -py || px == -py - 16;
+ default:
+ NOT_REACHED();
+ }
+
+ /* useless, but avoids compiler warning this way */
+ return 0;
+}
+
+static void DrawTileSelection(const TileInfo *ti)
+{
+ uint32 image;
+ const TileHighlightData *thd = _thd_ptr;
+
+#ifdef DEBUG_TILE_PUSH
+ dbg_draw_pushed(ti);
+#endif
+
+ // Draw a red error square?
+ if (thd->redsq != 0 && thd->redsq == (TileIndex)ti->tile) {
+ DrawSelectionSprite(0x030382F0 | _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 = 0x2F0 + _tileh_to_sprite[ti->tileh];
+ if (thd->make_square_red) image |= 0x3048000;
+ 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 & 8) {
+ z += 8;
+ if (!(ti->tileh & 2) && (ti->tileh & 0x10)) {
+ z += 8;
+ }
+ }
+ DrawGroundSpriteAt(_cur_dpi->zoom != 2 ? 0x306 : 0xFEE,ti->x, ti->y, z);
+ } else {
+ if (IsPartOfAutoLine(ti->x, ti->y)) {
+ image = 0x2F0 + _tileh_to_sprite[ti->tileh];
+ if (thd->make_square_red) image |= 0x3048000;
+ 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(0x30582F0 + _tileh_to_sprite[ti->tileh], ti);
+ return;
+ }
+}
+
+void ViewportAddLandscape()
+{
+ 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
+#if !defined(NEW_ROTATION)
+ x = ((vd->dpi.top >> 1) - (vd->dpi.left >> 2)) & ~0xF;
+ y = ((vd->dpi.top >> 1) + (vd->dpi.left >> 2) - 0x10) & ~0xF;
+#else
+ x = ((vd->dpi.top >> 1) + (vd->dpi.left >> 2) - 0x10) & ~0xF;
+ y = ((vd->dpi.left >> 2) - (vd->dpi.top >> 1)) & ~0xF;
+#endif
+ // 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 {
+ FindLandscapeHeight(&ti, x_cur, y_cur);
+#if !defined(NEW_ROTATION)
+ y_cur += 0x10;
+ x_cur -= 0x10;
+#else
+ y_cur += 0x10;
+ x_cur += 0x10;
+#endif
+ _added_tile_sprite = false;
+ _offset_ground_sprites = false;
+
+ DrawTile(&ti);
+ DrawTileSelection(&ti);
+ } while (--width_cur);
+
+#if !defined(NEW_ROTATION)
+ if ( (direction^=1) != 0)
+ y += 0x10;
+ else
+ x += 0x10;
+#else
+ if ( (direction^=1) != 0)
+ x += 0x10;
+ else
+ y -= 0x10;
+#endif
+ } while (--height);
+}
+
+
+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;
+
+ if (dpi->zoom < 1) {
+ FOR_ALL_TOWNS(t) {
+ if (t->xy &&
+ 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, STR_2001, t->townnametype, t->townnameparts);
+ }
+ }
+ } else if (dpi->zoom == 1) {
+ right += 2;
+ bottom += 2;
+
+ FOR_ALL_TOWNS(t) {
+ if (t->xy &&
+ 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, STR_2001, t->townnametype, t->townnameparts);
+ }
+ }
+ } else {
+ right += 4;
+ bottom += 5;
+
+ assert(dpi->zoom == 2);
+ FOR_ALL_TOWNS(t) {
+ if (t->xy &&
+ 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_2002, t->townnametype, t->townnameparts);
+ AddStringToDraw(t->sign.left + 1, t->sign.top - 3, STR_2003, t->townnametype, t->townnameparts);
+ }
+ }
+ }
+}
+
+void ViewportAddStationNames(DrawPixelInfo *dpi)
+{
+ int left, top, right, bottom;
+ Station *st;
+ StringSpriteToDraw *sstd;
+
+ 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;
+
+ if (dpi->zoom < 1) {
+ FOR_ALL_STATIONS(st) {
+ if (st->xy &&
+ bottom > st->sign.top &&
+ top < st->sign.top + 12 &&
+ right > st->sign.left &&
+ left < st->sign.left + st->sign.width_1) {
+
+ sstd=AddStringToDraw(st->sign.left + 1, st->sign.top + 1, STR_305C_0, st->index, st->facilities);
+ if (sstd != NULL) {
+ sstd->color = (st->owner == OWNER_NONE || !st->facilities) ? 0xE : _player_colors[st->owner];
+ sstd->width = st->sign.width_1;
+ }
+ }
+ }
+ } else if (dpi->zoom == 1) {
+ right += 2;
+ bottom += 2;
+
+ FOR_ALL_STATIONS(st) {
+ if (st->xy &&
+ bottom > st->sign.top &&
+ top < st->sign.top + 24 &&
+ right > st->sign.left &&
+ left < st->sign.left + st->sign.width_1*2) {
+
+ sstd=AddStringToDraw(st->sign.left + 1, st->sign.top + 1, STR_305C_0, st->index, st->facilities);
+ if (sstd != NULL) {
+ sstd->color = (st->owner == OWNER_NONE || !st->facilities) ? 0xE : _player_colors[st->owner];
+ sstd->width = st->sign.width_1;
+ }
+ }
+ }
+
+ } else {
+ assert(dpi->zoom == 2);
+
+ right += 4;
+ bottom += 5;
+
+ FOR_ALL_STATIONS(st) {
+ if (st->xy &&
+ bottom > st->sign.top &&
+ top < st->sign.top + 24 &&
+ right > st->sign.left &&
+ left < st->sign.left + st->sign.width_2*4) {
+
+ sstd=AddStringToDraw(st->sign.left + 1, st->sign.top + 1, STR_305D_0, st->index, st->facilities);
+ if (sstd != NULL) {
+ sstd->color = (st->owner == OWNER_NONE || !st->facilities) ? 0xE : _player_colors[st->owner];
+ sstd->width = st->sign.width_2 | 0x8000;
+ }
+ }
+ }
+ }
+}
+
+void ViewportAddSigns(DrawPixelInfo *dpi)
+{
+ SignStruct *ss;
+ int left, top, right, bottom;
+ StringSpriteToDraw *sstd;
+
+ if (!(_display_opt & DO_SHOW_SIGNS))
+ return;
+
+ left = dpi->left;
+ top = dpi->top;
+ right = left + dpi->width;
+ bottom = top + dpi->height;
+
+ if (dpi->zoom < 1) {
+ for(ss=_sign_list; ss != endof(_sign_list); ss++) {
+ if (ss->str &&
+ bottom > ss->sign.top &&
+ top < ss->sign.top + 12 &&
+ right > ss->sign.left &&
+ left < ss->sign.left + ss->sign.width_1) {
+
+ sstd=AddStringToDraw(ss->sign.left + 1, ss->sign.top + 1, STR_2806, ss->str, 0);
+ if (sstd != NULL) {
+ sstd->width = ss->sign.width_1;
+ sstd->color = 14;
+ }
+ }
+ }
+ } else if (dpi->zoom == 1) {
+ right += 2;
+ bottom += 2;
+ for(ss=_sign_list; ss != endof(_sign_list); ss++) {
+ if (ss->str &&
+ bottom > ss->sign.top &&
+ top < ss->sign.top + 24 &&
+ right > ss->sign.left &&
+ left < ss->sign.left + ss->sign.width_1*2) {
+
+ sstd=AddStringToDraw(ss->sign.left + 1, ss->sign.top + 1, STR_2806, ss->str, 0);
+ if (sstd != NULL) {
+ sstd->width = ss->sign.width_1;
+ sstd->color = 14;
+ }
+ }
+ }
+ } else {
+ right += 4;
+ bottom += 5;
+
+ for(ss=_sign_list; ss != endof(_sign_list); ss++) {
+ if (ss->str &&
+ bottom > ss->sign.top &&
+ top < ss->sign.top + 24 &&
+ right > ss->sign.left &&
+ left < ss->sign.left + ss->sign.width_2*4) {
+
+ sstd=AddStringToDraw(ss->sign.left + 1, ss->sign.top + 1, STR_2807, ss->str, 0);
+ if (sstd != NULL) {
+ sstd->width = ss->sign.width_2 | 0x8000;
+ sstd->color = 14;
+ }
+ }
+ }
+ }
+}
+
+void ViewportAddCheckpoints(DrawPixelInfo *dpi)
+{
+ Checkpoint *cp;
+
+ int left, top, right, bottom;
+ StringSpriteToDraw *sstd;
+
+ if (!(_display_opt & DO_CHECKPOINTS))
+ return;
+
+ left = dpi->left;
+ top = dpi->top;
+ right = left + dpi->width;
+ bottom = top + dpi->height;
+
+ if (dpi->zoom < 1) {
+ for(cp=_checkpoints; cp != endof(_checkpoints); cp++) {
+ if (cp->xy &&
+ bottom > cp->sign.top &&
+ top < cp->sign.top + 12 &&
+ right > cp->sign.left &&
+ left < cp->sign.left + cp->sign.width_1) {
+
+ sstd=AddStringToDraw(cp->sign.left + 1, cp->sign.top + 1, STR_CHECKPOINT_VIEWPORT, cp - _checkpoints, 0);
+ if (sstd != NULL) {
+ sstd->width = cp->sign.width_1;
+ sstd->color = (cp->deleted ? 0xE : 11);
+ }
+ }
+ }
+ } else if (dpi->zoom == 1) {
+ right += 2;
+ bottom += 2;
+ for(cp=_checkpoints; cp != endof(_checkpoints); cp++) {
+ if (cp->xy &&
+ bottom > cp->sign.top &&
+ top < cp->sign.top + 24 &&
+ right > cp->sign.left &&
+ left < cp->sign.left + cp->sign.width_1*2) {
+
+ sstd=AddStringToDraw(cp->sign.left + 1, cp->sign.top + 1, STR_CHECKPOINT_VIEWPORT, cp - _checkpoints, 0);
+ if (sstd != NULL) {
+ sstd->width = cp->sign.width_1;
+ sstd->color = (cp->deleted ? 0xE : 11);
+ }
+ }
+ }
+ } else {
+ right += 4;
+ bottom += 5;
+
+ for(cp=_checkpoints; cp != endof(_checkpoints); cp++) {
+ if (cp->xy &&
+ bottom > cp->sign.top &&
+ top < cp->sign.top + 24 &&
+ right > cp->sign.left &&
+ left < cp->sign.left + cp->sign.width_2*4) {
+
+ sstd=AddStringToDraw(cp->sign.left + 1, cp->sign.top + 1, STR_CHECKPOINT_VIEWPORT_TINY, cp - _checkpoints, 0);
+ if (sstd != NULL) {
+ sstd->width = cp->sign.width_2 | 0x8000;
+ sstd->color = (cp->deleted ? 0xE : 11);
+ }
+ }
+ }
+ }
+}
+
+void UpdateViewportSignPos(ViewportSign *sign, int left, int top, StringID str)
+{
+ char buffer[128];
+ int w;
+
+ sign->top = top;
+
+ GetString(buffer, str);
+ w = GetStringWidth(buffer) + 3;
+ sign->width_1 = w;
+ sign->left = left - (w >> 1);
+
+ _stringwidth_base = 0xE0;
+ w = GetStringWidth(buffer);
+ _stringwidth_base = 0;
+ sign->width_2 = w + 1;
+}
+
+
+void ViewportDrawTileSprites(TileSpriteToDraw *ts)
+{
+ do {
+ Point pt = RemapCoords(ts->x, ts->y, ts->z);
+ DrawSprite(ts->image, pt.x, pt.y);
+ } while ( (ts = ts->next) != NULL);
+}
+
+void ViewportSortParentSprites(ParentSpriteToDraw **psd)
+{
+ ParentSpriteToDraw *ps, *ps2,*ps3, **psd2, **psd3;
+
+ while((ps=*psd) != NULL) {
+ if (!(ps->unk16 & 1)) {
+ ps->unk16 |= 1;
+ psd2 = psd;
+
+ while ( (ps2=*++psd2) != NULL) {
+ if (ps2->unk16 & 1)
+ continue;
+
+ if (ps->tile_right >= ps2->tile_x &&
+ ps->tile_bottom >= ps2->tile_y &&
+ ps->tile_z_bottom >= ps2->tile_z && (
+ ps->tile_x >= ps2->tile_right ||
+ ps->tile_y >= ps2->tile_bottom ||
+ ps->tile_z >= ps2->tile_z_bottom
+ )) {
+ psd3 = psd;
+ do {
+ ps3 = *psd3;
+ *psd3 = ps2;
+ ps2 = ps3;
+
+ psd3++;
+ } while (psd3 <= psd2);
+ }
+ }
+ } else {
+ psd++;
+ }
+ }
+}
+
+void ViewportDrawParentSprites(ParentSpriteToDraw **psd)
+{
+ ParentSpriteToDraw *ps;
+ ChildScreenSpriteToDraw *cs;
+
+ for (;(ps=*psd) != NULL;psd++) {
+ Point pt = RemapCoords(ps->tile_x, ps->tile_y, ps->tile_z);
+ DrawSprite(ps->image, pt.x, pt.y);
+
+ cs = ps->child;
+ while (cs) {
+ DrawSprite(cs->image, ps->left + cs->x, ps->top + cs->y);
+ cs = cs->next;
+ }
+ }
+}
+
+void ViewportDrawStrings(DrawPixelInfo *dpi, StringSpriteToDraw *ss)
+{
+ DrawPixelInfo dp;
+ byte zoom;
+
+ _cur_dpi = &dp;
+ dp = *dpi;
+
+ zoom = (byte)dp.zoom;
+ dp.zoom = 0;
+
+ dp.left >>= zoom;
+ dp.top >>= zoom;
+ dp.width >>= zoom;
+ dp.height >>= zoom;
+
+ do {
+ if (ss->width != 0) {
+ int x, y, w, bottom;
+
+ x = (ss->x >> zoom) - 1;
+ y = (ss->y >> zoom) - 1;
+
+ bottom = y + 11;
+
+ w = ss->width;
+ if (w & 0x8000) {
+ w &= ~0x8000;
+ y--;
+ bottom -= 6;
+ w -= 3;
+ }
+
+ DrawFrameRect(x,y, x+w, bottom, ss->color, (_display_opt & DO_TRANS_BUILDINGS) ? 0 : 0x9);
+ }
+
+ SET_DPARAM32(0, ss->params[0]);
+ SET_DPARAM32(1, ss->params[1]);
+ if (!(_display_opt & DO_TRANS_BUILDINGS) && ss->width != 0) {
+ /* This is such a frustrating mess - I need to convert
+ * from real color codes to string color codes and guess
+ * what, they are completely different. --pasky */
+ static const byte ci2sci[17] = {
+ /* 0 */ 16, /* 1 */ 0, /* 2 */ 5,
+ /* 3X*/ 2, /* 4 */ 8, /* 5 */ 3,
+ /* 6X*/ 14, /* 7 */ 7, /* 8 */ 9,
+ /* 9 */ 13, /* 10 */ 10, /* 11 */ 15,
+ /* 12 */ 4, /* 13 */ 6, /* 14 */ 11,
+ /* 15 */ 1, /* 16 */ 12
+ };
+ byte color = ci2sci[ss->color + 1];
+
+ DrawString(ss->x >> zoom, (ss->y >> zoom) - (ss->width&0x8000?2:0), ss->string, color);
+ } else {
+ DrawString(ss->x >> zoom, (ss->y >> zoom) - (ss->width&0x8000?2:0), ss->string, 16);
+ }
+ } while ( (ss = ss->next) != NULL);
+
+ _cur_dpi = dpi;
+}
+
+void ViewportDoDraw(ViewPort *vp, int left, int top, int right, int bottom)
+{
+ ViewportDrawer vd;
+ int mask;
+ int x,y;
+ DrawPixelInfo *old_dpi;
+
+ byte mem[VIEWPORT_DRAW_MEM];
+ ParentSpriteToDraw *parent_list[750];
+
+ _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.ground_child = 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.spritelist_mem = mem;
+ vd.eof_spritelist_mem = &mem[sizeof(mem) - 0x40];
+ vd.last_string = &vd.first_string;
+ vd.first_string = NULL;
+ vd.last_tile = &vd.first_tile;
+ vd.first_tile = NULL;
+
+ ViewportAddLandscape();
+#if !defined(NEW_ROTATION)
+ ViewportAddVehicles(&vd.dpi);
+ DrawTextEffects(&vd.dpi);
+
+ ViewportAddTownNames(&vd.dpi);
+ ViewportAddStationNames(&vd.dpi);
+ ViewportAddSigns(&vd.dpi);
+ ViewportAddCheckpoints(&vd.dpi);
+#endif
+
+ if (vd.first_tile != NULL)
+ ViewportDrawTileSprites(vd.first_tile);
+
+ assert(vd.parent_list - parent_list <= lengthof(parent_list));
+
+ /* 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(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 void INLINE ViewportDraw(ViewPort *vp, int left, int top, int right, int bottom)
+{
+ int t;
+
+ if (right <= vp->left ||
+ bottom <= vp->top)
+ return;
+
+ if (left >= (t=vp->left + vp->width))
+ return;
+
+ if (left < vp->left) left = vp->left;
+ if (right > t) right = t;
+
+ if (top >= (t = vp->top + vp->height))
+ return;
+
+ if (top < vp->top) top = vp->top;
+ if (bottom > t) bottom = t;
+
+ ViewportDrawChk(vp, left, top, right, bottom);
+}
+
+void DrawWindowViewport(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)
+{
+ ViewPort *vp = w->viewport;
+
+ if (WP(w,vp_d).follow_vehicle != 0xFFFF) {
+ Vehicle *veh;
+ Point pt;
+
+ veh = &_vehicles[WP(w,vp_d).follow_vehicle];
+ pt = MapXYZToViewport(vp, veh->x_pos, veh->y_pos, veh->z_pos);
+ SetViewportPosition(w, pt.x, pt.y);
+ } else {
+ int x,y,t;
+ int err;
+
+ x = WP(w,vp_d).scrollpos_x >> 2;
+ y = WP(w,vp_d).scrollpos_y >> 1;
+
+#if !defined(NEW_ROTATION)
+ t = x;
+ x = y - t;
+ y = y + t;
+
+ // check if inside bounds?
+ t = (-130) << vp->zoom;
+ err = 0;
+ if (y < t || y > (t += TILE_Y_MAX*16-1)) { y = t; err++; }
+ if (x < (t=0) || x > (t=TILE_X_MAX*16-1) ) { x = t; err++; }
+#else
+ t = x;
+ x = x + y;
+ y = x - y;
+ err= 0;
+#endif
+
+ if (err != 0) {
+ /* coordinate remap */
+ Point pt = RemapCoords(x, y, 0);
+ t = (-1) << vp->zoom;
+ WP(w,vp_d).scrollpos_x = pt.x & t;
+ WP(w,vp_d).scrollpos_y = pt.y & t;
+ }
+ SetViewportPosition(w, WP(w,vp_d).scrollpos_x, WP(w,vp_d).scrollpos_y);
+ }
+}
+
+void MarkViewportDirty(ViewPort *vp, int left, int top, int right, int bottom)
+{
+ if ( (right -= vp->virtual_left) <= 0)
+ return;
+
+ if ( (bottom -= vp->virtual_top) <= 0)
+ return;
+
+ if ( (left -= vp->virtual_left) < 0)
+ left = 0;
+
+ if ((uint)left >= (uint)vp->virtual_width)
+ return;
+
+ if ( (top -= vp->virtual_top) < 0)
+ top = 0;
+
+ if ((uint)top >= (uint)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)
+{
+ 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(GET_TILE_X(tile) * 16, GET_TILE_Y(tile) * 16, GetTileZ(tile));
+ MarkAllViewportsDirty(
+ pt.x - 31,
+ pt.y - 122,
+ pt.x - 31 + 67,
+ pt.y - 122 + 154
+ );
+}
+
+void MarkTileDirty(int x, int y)
+{
+ int z = 0;
+ Point pt;
+ if (IS_INT_INSIDE(x, 0, TILES_X*16) && IS_INT_INSIDE(y, 0, TILES_Y*16))
+ z = GetTileZ(TILE_FROM_XY(x,y));
+ pt = RemapCoords(x, y, z);
+
+ MarkAllViewportsDirty(
+ pt.x - 31,
+ pt.y - 122,
+ pt.x - 31 + 67,
+ pt.y - 122 + 154
+ );
+}
+
+void SetSelectionTilesDirty()
+{
+ int y_size, x_size;
+ TileHighlightData *thd = _thd_ptr;
+ 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+=16) != y_size);
+ y = y_bk;
+ } while ( (x+=16) != x_size);
+}
+
+
+static bool CheckClickOnTown(ViewPort *vp, int x, int y)
+{
+ Town *t;
+
+ if (!(_display_opt & DO_SHOW_TOWN_NAMES))
+ return false;
+
+ if (vp->zoom < 1) {
+ x = x - vp->left + vp->virtual_left;
+ y = y - vp->top + vp->virtual_top;
+
+ FOR_ALL_TOWNS(t) {
+ if (t->xy &&
+ 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;
+ }
+ }
+ } else if (vp->zoom == 1) {
+ x = (x - vp->left + 1) * 2 + vp->virtual_left;
+ y = (y - vp->top + 1) * 2 + vp->virtual_top;
+ FOR_ALL_TOWNS(t) {
+ if (t->xy &&
+ 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;
+ }
+ }
+ } else {
+ x = (x - vp->left + 3) * 4 + vp->virtual_left;
+ y = (y - vp->top + 3) * 4 + vp->virtual_top;
+ FOR_ALL_TOWNS(t) {
+ if (t->xy &&
+ 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;
+ }
+ }
+ }
+
+ return false;
+}
+
+static bool CheckClickOnStation(ViewPort *vp, int x, int y)
+{
+ Station *st;
+
+ if (!(_display_opt & DO_SHOW_STATION_NAMES))
+ return false;
+
+ if (vp->zoom < 1) {
+ x = x - vp->left + vp->virtual_left;
+ y = y - vp->top + vp->virtual_top;
+
+ FOR_ALL_STATIONS(st) {
+ if (st->xy &&
+ 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;
+ }
+ }
+ } else if (vp->zoom == 1) {
+ x = (x - vp->left + 1) * 2 + vp->virtual_left;
+ y = (y - vp->top + 1) * 2 + vp->virtual_top;
+ FOR_ALL_STATIONS(st) {
+ if (st->xy &&
+ 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;
+ }
+ }
+ } else {
+ x = (x - vp->left + 3) * 4 + vp->virtual_left;
+ y = (y - vp->top + 3) * 4 + vp->virtual_top;
+ FOR_ALL_STATIONS(st) {
+ if (st->xy &&
+ 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;
+ }
+ }
+ }
+
+ return false;
+}
+
+static bool CheckClickOnSign(ViewPort *vp, int x, int y)
+{
+ SignStruct *ss;
+
+ if (!(_display_opt & DO_SHOW_SIGNS))
+ return false;
+
+ if (vp->zoom < 1) {
+ x = x - vp->left + vp->virtual_left;
+ y = y - vp->top + vp->virtual_top;
+
+ for(ss = _sign_list; ss != endof(_sign_list); ss++) {
+ if (ss->str &&
+ y >= ss->sign.top &&
+ y < ss->sign.top + 12 &&
+ x >= ss->sign.left &&
+ x < ss->sign.left + ss->sign.width_1) {
+ ShowRenameSignWindow(ss);
+ return true;
+ }
+ }
+ } else if (vp->zoom == 1) {
+ x = (x - vp->left + 1) * 2 + vp->virtual_left;
+ y = (y - vp->top + 1) * 2 + vp->virtual_top;
+ for(ss = _sign_list; ss != endof(_sign_list); ss++) {
+ if (ss->str &&
+ y >= ss->sign.top &&
+ y < ss->sign.top + 24 &&
+ x >= ss->sign.left &&
+ x < ss->sign.left + ss->sign.width_1 * 2) {
+ ShowRenameSignWindow(ss);
+ return true;
+ }
+ }
+ } else {
+ x = (x - vp->left + 3) * 4 + vp->virtual_left;
+ y = (y - vp->top + 3) * 4 + vp->virtual_top;
+ for(ss = _sign_list; ss != endof(_sign_list); ss++) {
+ if (ss->str &&
+ y >= ss->sign.top &&
+ y < ss->sign.top + 24 &&
+ x >= ss->sign.left &&
+ x < ss->sign.left + ss->sign.width_2 * 4) {
+ ShowRenameSignWindow(ss);
+ return true;
+ }
+ }
+ }
+
+ return false;
+}
+
+static bool CheckClickOnCheckpoint(ViewPort *vp, int x, int y)
+{
+ Checkpoint *cp;
+
+ if (!(_display_opt & DO_CHECKPOINTS))
+ return false;
+
+ if (vp->zoom < 1) {
+ x = x - vp->left + vp->virtual_left;
+ y = y - vp->top + vp->virtual_top;
+
+ for(cp = _checkpoints; cp != endof(_checkpoints); cp++) {
+ if (cp->xy &&
+ y >= cp->sign.top &&
+ y < cp->sign.top + 12 &&
+ x >= cp->sign.left &&
+ x < cp->sign.left + cp->sign.width_1) {
+ ShowRenameCheckpointWindow(cp);
+ return true;
+ }
+ }
+ } else if (vp->zoom == 1) {
+ x = (x - vp->left + 1) * 2 + vp->virtual_left;
+ y = (y - vp->top + 1) * 2 + vp->virtual_top;
+ for(cp = _checkpoints; cp != endof(_checkpoints); cp++) {
+ if (cp->xy &&
+ y >= cp->sign.top &&
+ y < cp->sign.top + 24 &&
+ x >= cp->sign.left &&
+ x < cp->sign.left + cp->sign.width_1 * 2) {
+ ShowRenameCheckpointWindow(cp);
+ return true;
+ }
+ }
+ } else {
+ x = (x - vp->left + 3) * 4 + vp->virtual_left;
+ y = (y - vp->top + 3) * 4 + vp->virtual_top;
+ for(cp = _checkpoints; cp != endof(_checkpoints); cp++) {
+ if (cp->xy &&
+ y >= cp->sign.top &&
+ y < cp->sign.top + 24 &&
+ x >= cp->sign.left &&
+ x < cp->sign.left + cp->sign.width_2 * 4) {
+ ShowRenameCheckpointWindow(cp);
+ return true;
+ }
+ }
+ }
+
+ return false;
+}
+
+
+static void CheckClickOnLandscape(ViewPort *vp, int x, int y)
+{
+ Point pt = TranslateXYToTileCoord(vp,x,y);
+ if (pt.x != -1) {
+ uint tile = TILE_FROM_XY(pt.x, pt.y);
+ ClickTile(tile);
+ }
+}
+
+void HandleClickOnTrain(Vehicle *v);
+void HandleClickOnRoadVeh(Vehicle *v);
+void HandleClickOnAircraft(Vehicle *v);
+void HandleClickOnShip(Vehicle *v);
+void HandleClickOnSpecialVeh(Vehicle *v) {}
+void HandleClickOnDisasterVeh(Vehicle *v);
+typedef void OnVehicleClickProc(Vehicle *v);
+static OnVehicleClickProc * const _on_vehicle_click_proc[6] = {
+ HandleClickOnTrain,
+ HandleClickOnRoadVeh,
+ HandleClickOnShip,
+ HandleClickOnAircraft,
+ HandleClickOnSpecialVeh,
+ HandleClickOnDisasterVeh,
+};
+
+void HandleViewportClicked(ViewPort *vp, int x, int y)
+{
+ if (CheckClickOnTown(vp, x, y))
+ return;
+
+ if (CheckClickOnStation(vp, x, y))
+ return;
+
+ if (CheckClickOnSign(vp, x, y))
+ return;
+
+ if (CheckClickOnCheckpoint(vp, x, y))
+ return;
+
+ CheckClickOnLandscape(vp, x, y);
+
+ {
+ Vehicle *v = CheckClickOnVehicle(vp, x, y);
+ if (v) _on_vehicle_click_proc[v->type - 0x10](v);
+ }
+}
+
+Vehicle *CheckMouseOverVehicle()
+{
+ Window *w;
+ 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);
+ if (vp) {
+ return CheckClickOnVehicle(vp, x, y);
+ } else {
+ return NULL;
+ }
+}
+
+
+
+void PlaceObject()
+{
+ Point pt;
+ Window *w;
+ WindowEvent e;
+
+ pt = GetTileBelowCursor();
+ if (pt.x == -1)
+ return;
+
+ if (_thd.place_mode == 2) {
+ pt.x += 8;
+ pt.y += 8;
+ }
+
+ _tile_fract_coords.x = pt.x & 0xF;
+ _tile_fract_coords.y = pt.y & 0xF;
+
+ if ((w = GetCallbackWnd()) != NULL) {
+ e.event = WE_PLACE_OBJ;
+ e.place.pt = pt;
+ e.place.tile = TILE_FROM_XY(pt.x, pt.y);
+ w->wndproc(w, &e);
+ }
+}
+
+bool ScrollMainWindowTo(int x, int y)
+{
+ Window *w = FindWindowById(WC_MAIN_WINDOW, 0);
+ Point pt;
+
+ pt = MapXYZToViewport(w->viewport, x, y, GetSlopeZ(x, y));
+ WP(w,vp_d).follow_vehicle = -1;
+
+ 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 ScrollMainWindowToTile(TileIndex tile)
+{
+ return ScrollMainWindowTo(GET_TILE_X(tile)*16+8, GET_TILE_Y(tile)*16+8);
+}
+
+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)
+{
+ TileHighlightData *thd = _thd_ptr;
+ thd->new_size.x = w * 16;
+ thd->new_size.y = h * 16;
+ thd->new_outersize.x = 0;
+ thd->new_outersize.y = 0;
+}
+
+void SetTileSelectBigSize(int ox, int oy, int sx, int sy) {
+ TileHighlightData *thd = _thd_ptr;
+ thd->offs.x = ox * 16;
+ thd->offs.y = oy * 16;
+ thd->new_outersize.x = sx * 16;
+ thd->new_outersize.y = sy * 16;
+}
+
+
+void UpdateTileSelection()
+{
+ TileHighlightData *thd = _thd_ptr;
+ Point pt;
+ int x1,y1;
+
+ thd->new_drawstyle = 0;
+
+ if (thd->place_mode == 3) {
+ 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 + 16;
+ thd->new_size.y = y2 - y1 + 16;
+ thd->new_drawstyle = thd->next_drawstyle;
+ }
+ } else if (thd->place_mode != 0) {
+ pt = GetTileBelowCursor();
+ x1 = pt.x;
+ y1 = pt.y;
+ if (x1 != -1) {
+ if (thd->place_mode == 1) {
+ thd->new_drawstyle = HT_RECT;
+ } else {
+ thd->new_drawstyle = HT_POINT;
+ x1 += 8;
+ y1 += 8;
+ }
+ thd->new_pos.x = x1 & ~0xF;
+ thd->new_pos.y = y1 & ~0xF;
+ }
+ }
+
+ 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) {
+
+ // 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();
+ }
+}
+
+void VpStartPlaceSizing(uint tile, int user)
+{
+ TileHighlightData *thd;
+
+ thd = _thd_ptr;
+ thd->userdata = user;
+ thd->selend.x = GET_TILE_X(tile)*16;
+ thd->selstart.x = GET_TILE_X(tile)*16;
+ thd->selend.y = GET_TILE_Y(tile)*16;
+ thd->selstart.y = GET_TILE_Y(tile)*16;
+ if (thd->place_mode == 1) {
+ thd->place_mode = 3;
+ thd->next_drawstyle = HT_RECT;
+ } else {
+ thd->place_mode = 3;
+ thd->next_drawstyle = HT_POINT;
+ }
+ _special_mouse_mode = WSM_SIZING;
+}
+
+void VpSetPlaceSizingLimit(int limit)
+{
+ _thd.sizelimit = limit;
+}
+
+void VpSetPresizeRange(uint from, uint to)
+{
+ TileHighlightData *thd = _thd_ptr;
+ thd->selend.x = GET_TILE_X(to)*16;
+ thd->selend.y = GET_TILE_Y(to)*16;
+ thd->selstart.x = GET_TILE_X(from)*16;
+ thd->selstart.y = GET_TILE_Y(from)*16;
+ thd->next_drawstyle = HT_RECT;
+}
+
+void VpStartPreSizing()
+{
+ _thd.selend.x = -1;
+ _special_mouse_mode = WSM_PRESIZE;
+}
+
+static void CalcRaildirsDrawstyle(TileHighlightData *thd, int x, int y)
+{
+ int d;
+ bool b;
+ uint w,h;
+
+ w = myabs((x & ~0xF) - thd->selstart.x) + 16;
+ h = myabs((y & ~0xF) - thd->selstart.y) + 16;
+
+ // vertical and horizontal lines are really simple
+ if (w == 16 || h == 16) {
+ b = HT_RECT;
+ } else if (w * 2 < h) { // see if we're closer to rect?
+ x = thd->selstart.x;
+ b = HT_RECT;
+ } else if (w > h * 2) {
+ y = thd->selstart.y;
+ b = HT_RECT;
+ } else {
+ d = w - h;
+
+ // four cases.
+ if (x > thd->selstart.x) {
+ if (y > thd->selstart.y) {
+ // south
+ if (d ==0) b = (x & 0xF) > (y & 0xF) ? HT_LINE | 0 : HT_LINE | 1;
+ else if (d >= 0) { x = thd->selstart.x + h; b = HT_LINE | 0; } // return px == py || px == py + 16;
+ else { y = thd->selstart.y + w; b = HT_LINE | 1; } // return px == py || px == py - 16;
+ } else {
+ // west
+ if (d ==0) b = (x & 0xF) + (y & 0xF) >= 0x10 ? HT_LINE | 2 : HT_LINE | 3;
+ else if (d >= 0) { x = thd->selstart.x + h; b = HT_LINE | 2; }
+ else { y = thd->selstart.y - w; b = HT_LINE | 3; }
+ }
+ } else {
+ if (y > thd->selstart.y) {
+ // east
+ if (d ==0) b = (x & 0xF) + (y & 0xF) >= 0x10 ? HT_LINE | 2 : HT_LINE | 3;
+ else if (d >= 0) { x = thd->selstart.x - h; b = HT_LINE | 3; } // return px == -py || px == -py - 16;
+ else { y = thd->selstart.y + w; b = HT_LINE | 2; } // return px == -py || px == -py + 16;
+ } else {
+ // north
+ if (d ==0) b = (x & 0xF) > (y & 0xF) ? HT_LINE | 0 : HT_LINE | 1;
+ else if (d >= 0) { x = thd->selstart.x - h; b = HT_LINE | 1; } // return px == py || px == py - 16;
+ else { y = thd->selstart.y - w; b = HT_LINE | 0; } //return px == py || px == py + 16;
+ }
+ }
+ }
+ thd->selend.x = x;
+ thd->selend.y = y;
+ thd->next_drawstyle = b;
+}
+
+void VpSelectTilesWithMethod(int x, int y, int method)
+{
+ TileHighlightData *thd = _thd_ptr;
+ int sx,sy;
+
+ if (x == -1) {
+ thd->selend.x = -1;
+ return;
+ }
+
+ // allow drag in any rail direction
+ if (method == VPM_RAILDIRS) {
+ CalcRaildirsDrawstyle(thd, x, y);
+ return;
+ }
+
+ if (_thd.next_drawstyle == HT_POINT) { x += 8; y += 8; }
+
+ //thd->next_drawstyle = HT_RECT;
+
+ sx = thd->selstart.x;
+ sy = thd->selstart.y;
+
+ switch(method) {
+ case VPM_FIX_X:
+ x = sx;
+ break;
+
+ case VPM_FIX_Y:
+ y = sy;
+ break;
+
+ case VPM_X_OR_Y:
+ if (myabs(sy - y) < myabs(sx - x)) y = sy; else x = sx;
+ break;
+
+ case VPM_X_AND_Y:
+ break;
+
+ // limit the selected area to a 10x10 rect.
+ case VPM_X_AND_Y_LIMITED: {
+ int limit = (thd->sizelimit-1) * 16;
+ x = sx + clamp(x - sx, -limit, limit);
+ y = sy + clamp(y - sy, -limit, limit);
+ break;
+ }
+ }
+
+ thd->selend.x = x;
+ thd->selend.y = y;
+}
+
+bool VpHandlePlaceSizingDrag()
+{
+ Window *w;
+ WindowEvent e;
+
+ if (_special_mouse_mode != WSM_SIZING)
+ return true;
+
+ e.place.userdata = _thd.userdata;
+
+ w = FindWindowById(_thd.window_class,_thd.window_number);
+ if (w == NULL) {
+ ResetObjectToPlace();
+ return false;
+ }
+
+ // while dragging...
+ if (_left_button_down) {
+ e.event = WE_PLACE_DRAG;
+ e.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;
+ _thd.place_mode = (_thd.next_drawstyle == HT_RECT || _thd.next_drawstyle & HT_LINE) ? 1 : 2;
+
+ SetTileSelectSize(1, 1);
+
+ // and call the mouseup event.
+ e.event = WE_PLACE_MOUSEUP;
+ e.place.pt = _thd.selend;
+ e.place.tile = TILE_FROM_XY(e.place.pt.x, e.place.pt.y);
+ e.place.starttile = TILE_FROM_XY(_thd.selstart.x, _thd.selstart.y);
+ w->wndproc(w, &e);
+
+ return false;
+}
+
+void SetObjectToPlaceWnd(int icon, byte mode, Window *w)
+{
+ SetObjectToPlace(icon,mode,w->window_class, w->window_number);
+}
+
+#include "table/animcursors.h"
+
+void SetObjectToPlace(int icon, byte mode, byte window_class, uint16 window_num)
+{
+ TileHighlightData *thd = _thd_ptr;
+ Window *w;
+
+ 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 == 4) {
+ 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 == 3)
+ VpStartPreSizing();
+
+ if ( (int)icon < 0)
+ SetAnimatedMouseCursor(_animcursors[~icon]);
+ else
+ SetMouseCursor(icon);
+}
+
+void ResetObjectToPlace(){
+ SetObjectToPlace(0,0,0,0);
+}