misc_gui.c
changeset 0 29654efe3188
child 3 27d9e9fa999a
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/misc_gui.c	Mon Aug 09 17:04:08 2004 +0000
@@ -0,0 +1,1563 @@
+#include "stdafx.h"
+#include "ttd.h"
+
+#include "window.h"
+#include "gui.h"
+#include "viewport.h"
+#include "gfx.h"
+#include "station.h"
+#include "command.h"
+#include "player.h"
+#include "town.h"
+
+#include "hal.h" // Fios items
+
+bool _query_string_active;
+static void SetFiosType(const byte fiostype);
+
+typedef struct LandInfoData {
+	Town *town;
+	int32 costclear;
+	AcceptedCargo ac;
+	uint tile;
+	TileDesc td;
+} LandInfoData;
+
+
+static void LandInfoWndProc(Window *w, WindowEvent *e)
+{
+	LandInfoData *lid;
+	StringID str;
+	uint32 *b;
+
+	if (e->event == WE_PAINT) {
+		DrawWindowWidgets(w);
+
+		lid = WP(w,void_d).data;
+
+		SET_DPARAM32(0, lid->td.dparam[0]);
+		DrawStringCentered(140, 16, lid->td.str, 13);
+
+		SET_DPARAM16(0, STR_01A6_N_A);
+		if (lid->td.owner != OWNER_NONE && lid->td.owner != OWNER_WATER)
+			GetNameOfOwner(lid->td.owner, lid->tile);
+		DrawStringCentered(140, 27, STR_01A7_OWNER, 0);
+
+		str = STR_01A4_COST_TO_CLEAR_N_A;
+		if (lid->costclear != CMD_ERROR) {
+			SET_DPARAM32(0, lid->costclear);	
+			str = STR_01A5_COST_TO_CLEAR;
+		}
+		DrawStringCentered(140, 38, str, 0);
+
+		sprintf(_userstring, "%.4X", lid->tile);
+		SET_DPARAM16(0, GET_TILE_X(lid->tile));
+		SET_DPARAM16(1, GET_TILE_Y(lid->tile));
+		SET_DPARAM16(2, STR_SPEC_USERSTRING);
+		DrawStringCentered(140, 49, STR_LANDINFO_COORDS, 0);
+
+		SET_DPARAM16(0, STR_01A9_NONE);
+		if (lid->town != NULL) {
+			SET_DPARAM16(0, lid->town->townnametype);
+			SET_DPARAM32(1, lid->town->townnameparts);
+		}
+		DrawStringCentered(140,60, STR_01A8_LOCAL_AUTHORITY, 0);
+
+		b = &GET_DPARAM(0);
+
+		str = STR_01CE_CARGO_ACCEPTED - 1;
+
+		if (lid->ac.amount_1 != 0) {
+			if (lid->ac.amount_1 < 8) {
+				SET_DPARAMX16(b, 0, STR_01D1_8);
+				SET_DPARAMX8(b, 1, lid->ac.amount_1);
+				b += 2;
+			}
+			SET_DPARAMX16(b, 0, _cargoc.names_s[lid->ac.type_1]);
+			b++;
+			str++;
+		}
+
+		if (lid->ac.amount_2 != 0) {
+			if (lid->ac.amount_2 < 8) {
+				SET_DPARAMX16(b, 0, STR_01D1_8);
+				SET_DPARAMX8(b, 1, lid->ac.amount_2);
+				b += 2;
+			}
+			SET_DPARAMX16(b, 0, _cargoc.names_s[lid->ac.type_2]);
+			b++;
+			str++;
+		}
+
+		if (lid->ac.amount_3 != 0) {
+			if (lid->ac.amount_3 < 8) {
+				SET_DPARAMX16(b, 0, STR_01D1_8);
+				SET_DPARAMX8(b, 1, lid->ac.amount_3);
+				b += 2;
+			}
+			SET_DPARAMX16(b, 0, _cargoc.names_s[lid->ac.type_3]);
+			b++;
+			str++;
+		}
+
+		if (str != (STR_01CE_CARGO_ACCEPTED - 1))
+			DrawStringMultiCenter(140, 76, str, 276);
+	}
+}
+
+static const Widget _land_info_widgets[] = {
+{    WWT_TEXTBTN,    14,     0,    10,     0,    13, STR_00C5, STR_018B_CLOSE_WINDOW},
+{    WWT_CAPTION,    14,    11,   279,     0,    13, STR_01A3_LAND_AREA_INFORMATION, STR_018C_WINDOW_TITLE_DRAG_THIS},
+{     WWT_IMGBTN,    14,     0,   279,    14,    92, 0x0, 0},
+{      WWT_LAST},
+};
+
+static const WindowDesc _land_info_desc = {
+	-1, -1, 280, 93,
+	WC_LAND_INFO,0,
+	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,
+	_land_info_widgets,
+	LandInfoWndProc
+};
+
+static void Place_LandInfo(uint tile)
+{
+	Player *p;
+	static LandInfoData lid;
+	Window *w;
+	int64 old_money;
+
+	DeleteWindowById(WC_LAND_INFO, 0);
+
+	w = AllocateWindowDesc(&_land_info_desc);
+	WP(w,void_d).data = &lid;
+	
+	lid.tile = tile;
+	lid.town = ClosestTownFromTile(tile, _patches.dist_local_authority);
+
+	if (_local_player == 255) {
+		lid.costclear = 0;
+	} else {
+		p = DEREF_PLAYER(_local_player);
+		old_money = p->money64;
+		p->money64 = p->player_money = 0x7fffffff;
+		lid.costclear = DoCommandByTile(tile, 0, 0, 0, CMD_LANDSCAPE_CLEAR);
+		p->money64 = old_money;
+		UpdatePlayerMoney32(p);
+	}
+
+	GetAcceptedCargo(tile, &lid.ac);
+	GetTileDesc(tile, &lid.td);
+	
+#if defined(_DEBUG)
+	{
+		printf("TILE: %#x (%i,%i)\n", tile, GET_TILE_X(tile), GET_TILE_Y(tile));
+		printf("_map_type_and_height=%#x\n", _map_type_and_height[tile]);
+		printf("_map2=%#x\n", _map2[tile]);
+		printf("_map3_lo=%#x\n", _map3_lo[tile]);
+		printf("_map3_hi=%#x\n", _map3_hi[tile]);
+		printf("_map5=%#x\n", _map5[tile]);
+		printf("_map_owner=%#x\n", _map_owner[tile]);
+		printf("\n");
+	}
+#endif
+}
+
+void PlaceLandBlockInfo()
+{
+	if (_cursor.sprite == 0x2CF) {
+		ResetObjectToPlace();
+	} else {
+		_place_proc = Place_LandInfo;
+		SetObjectToPlace(0x2CF, 1, 1, 0);
+	}
+}
+
+
+static void AboutWindowProc(Window *w, WindowEvent *e)
+{
+	switch(e->event) {
+	case WE_PAINT: {
+		int x,y;
+		DrawWindowWidgets(w);
+
+		x = 200;
+		y = 0;
+		DrawStringCentered(x, y+=17, STR_00B6_COPYRIGHT_1995_CHRIS_SAWYER, 0);
+		DrawStringCentered(x, y+=10, STR_00B7_VERSION_3_02_011_11TH_OCTOBER, 0);
+		DrawStringCentered(x, y+=15, STR_00B8_DESIGNED_PROGRAMMED_BY, 0);
+		DrawStringCentered(x, y+=10, STR_00B9_GRAPHICS_BY_SIMON_FOSTER, 0);
+		DrawStringMultiCenter(x, y+0x73, STR_00BA_WINDOWS_95_CONVERSION_BY, 0x18E);
+		break;
+		}
+	}
+}
+
+static const Widget _about_widgets[] = {
+{   WWT_CLOSEBOX,    14,     0,    10,     0,    13, STR_00C5},
+{    WWT_CAPTION,    14,    11,   399,     0,    13, STR_015B_TRANSPORT_TYCOON_DELUXE},
+{      WWT_PANEL,    14,     0,   399,    14,   271, 0x0},
+{      WWT_LAST},
+};
+
+static const WindowDesc _about_desc = {
+	WDP_CENTER, WDP_CENTER, 400, 272,
+	WC_GAME_OPTIONS,0,
+	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,
+	_about_widgets,
+	AboutWindowProc
+};
+
+
+void ShowAboutWindow()
+{
+	DeleteWindowById(WC_GAME_OPTIONS, 0);
+	AllocateWindowDesc(&_about_desc);
+}
+
+static int _tree_to_plant;
+
+static const byte _tree_base_by_landscape[4] = {0, 12, 20, 32};
+static const byte _tree_count_by_landscape[4] = {12, 8, 12, 9};
+static const uint32 _tree_sprites[] = {
+	0x655,0x663,0x678,0x62B,0x647,0x639,0x64E,0x632,0x67F,0x68D,0x69B,0x6A9,
+	0x6AF,0x6D2,0x6D9,0x6C4,0x6CB,0x6B6,0x6BD,0x6E0,
+	0x72E,0x734,0x74A,0x74F,0x76B,0x78F,0x788,0x77B,0x75F,0x774,0x720,0x797,
+	0x79E,0x30D87A5,0x30B87AC,0x7B3,0x7BA,0x30B87C1,0x30887C8,0x30A87CF,0x30B87D6
+};
+
+static void BuildTreesWndProc(Window *w, WindowEvent *e)
+{
+	switch(e->event) {
+	case WE_PAINT: {
+		int x,y;
+		int i, count;
+
+		DrawWindowWidgets(w);
+
+		WP(w,tree_d).base = i = _tree_base_by_landscape[_opt.landscape];
+		WP(w,tree_d).count = count = _tree_count_by_landscape[_opt.landscape];
+
+		x = 18;
+		y = 54;
+		do {
+			DrawSprite(_tree_sprites[i], x, y);
+			x += 35;
+			if (!(++i & 3)) {
+				x -= 35*4;
+				y += 47;
+			}
+		} while (--count);
+	} break;
+
+	case WE_CLICK: {
+		int wid;
+
+		switch(wid=e->click.widget) {
+		case 0:
+			ResetObjectToPlace();
+			return;
+		case 3: case 4: case 5: case 6:
+		case 7: case 8: case 9: case 10:
+		case 11:case 12: case 13: case 14:
+			if ( (uint)(wid-3) >= (uint)WP(w,tree_d).count)
+				return;
+		
+			if (HandlePlacePushButton(w, wid, 0x7DA, 1, NULL))
+				_tree_to_plant = WP(w,tree_d).base + wid - 3;
+			break;
+
+		case 15: // tree of random type.
+			if (HandlePlacePushButton(w, 15, 0x7DA, 1, NULL))
+				_tree_to_plant = -1;
+			break;
+
+		case 16: /* place trees randomly over the landscape*/
+			w->click_state |= 1 << 16;
+			w->flags4 |= 5 << WF_TIMEOUT_SHL;
+			SndPlayFx(0x13);
+			PlaceTreesRandomly();
+			MarkWholeScreenDirty();
+			break;
+		}
+	} break;
+		
+	case WE_PLACE_OBJ:
+		VpStartPlaceSizing(e->place.tile, VPM_X_AND_Y_LIMITED);
+		VpSetPlaceSizingLimit(20);
+		break;
+
+	case WE_PLACE_DRAG:
+		VpSelectTilesWithMethod(e->place.pt.x, e->place.pt.y, e->place.userdata);
+		return;
+
+	case WE_PLACE_MOUSEUP:
+		if (e->click.pt.x != -1) {
+			DoCommandP(e->place.tile, _tree_to_plant, e->place.starttile, NULL, 
+				CMD_PLANT_TREE | CMD_AUTO | CMD_MSG(STR_2805_CAN_T_PLANT_TREE_HERE));
+		}
+		break;
+
+	case WE_TIMEOUT:
+		UnclickSomeWindowButtons(w, 1<<16);
+		break;
+
+	case WE_ABORT_PLACE_OBJ:
+		w->click_state = 0;
+		SetWindowDirty(w);
+		break;
+	}
+}
+
+static const Widget _build_trees_widgets[] = {
+{   WWT_CLOSEBOX,     7,     0,    10,     0,    13, STR_00C5,				STR_018B_CLOSE_WINDOW},
+{    WWT_CAPTION,     7,    11,   142,     0,    13, STR_2802_TREES,	STR_018C_WINDOW_TITLE_DRAG_THIS},
+{      WWT_PANEL,     7,     0,   142,    14,   170, 0x0,							0},
+{      WWT_PANEL,    14,     2,    35,    16,    61, 0x0,							STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{      WWT_PANEL,    14,    37,    70,    16,    61, 0x0,							STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{      WWT_PANEL,    14,    72,   105,    16,    61, 0x0,							STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{      WWT_PANEL,    14,   107,   140,    16,    61, 0x0,							STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{      WWT_PANEL,    14,     2,    35,    63,   108, 0x0,							STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{      WWT_PANEL,    14,    37,    70,    63,   108, 0x0,							STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{      WWT_PANEL,    14,    72,   105,    63,   108, 0x0,							STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{      WWT_PANEL,    14,   107,   140,    63,   108, 0x0,							STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{      WWT_PANEL,    14,     2,    35,   110,   155, 0x0,							STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{      WWT_PANEL,    14,    37,    70,   110,   155, 0x0,							STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{      WWT_PANEL,    14,    72,   105,   110,   155, 0x0,							STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{      WWT_PANEL,    14,   107,   140,   110,   155, 0x0,							STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{		WWT_CLOSEBOX,    14,   2,   140,   157,   168, STR_TREES_RANDOM_TYPE, STR_TREES_RANDOM_TYPE_TIP},
+{      WWT_LAST},
+};
+
+static const WindowDesc _build_trees_desc = {
+	497, 22, 143, 171,
+	WC_BUILD_TOOLBAR,0,
+	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,
+	_build_trees_widgets,
+	BuildTreesWndProc
+};
+
+static const Widget _build_trees_scen_widgets[] = {
+{   WWT_CLOSEBOX,     7,     0,    10,     0,    13, STR_00C5,				STR_018B_CLOSE_WINDOW},
+{    WWT_CAPTION,     7,    11,   142,     0,    13, STR_2802_TREES,	STR_018C_WINDOW_TITLE_DRAG_THIS},
+{      WWT_PANEL,     7,     0,   142,    14,   183, 0x0,							0},
+{      WWT_PANEL,    14,     2,    35,    16,    61, 0x0,							STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{      WWT_PANEL,    14,    37,    70,    16,    61, 0x0,							STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{      WWT_PANEL,    14,    72,   105,    16,    61, 0x0,							STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{      WWT_PANEL,    14,   107,   140,    16,    61, 0x0,							STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{      WWT_PANEL,    14,     2,    35,    63,   108, 0x0,							STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{      WWT_PANEL,    14,    37,    70,    63,   108, 0x0,							STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{      WWT_PANEL,    14,    72,   105,    63,   108, 0x0,							STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{      WWT_PANEL,    14,   107,   140,    63,   108, 0x0,							STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{      WWT_PANEL,    14,     2,    35,   110,   155, 0x0,							STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{      WWT_PANEL,    14,    37,    70,   110,   155, 0x0,							STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{      WWT_PANEL,    14,    72,   105,   110,   155, 0x0,							STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{      WWT_PANEL,    14,   107,   140,   110,   155, 0x0,							STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{		WWT_CLOSEBOX,    14,		 2,   140,   157,   168, STR_TREES_RANDOM_TYPE, STR_TREES_RANDOM_TYPE_TIP},
+{   WWT_CLOSEBOX,    14,     2,   140,   170,   181, STR_028A_RANDOM_TREES,STR_028B_PLANT_TREES_RANDOMLY_OVER},
+{      WWT_LAST},
+};
+
+static const WindowDesc _build_trees_scen_desc = {
+	-1, -1, 143, 184,
+	WC_SCEN_BUILD_TREES,0,
+	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,
+	_build_trees_scen_widgets,
+	BuildTreesWndProc
+};
+
+	
+void ShowBuildTreesToolbar()
+{
+	DeleteWindowById(WC_BUILD_TOOLBAR, 0);
+	AllocateWindowDesc(&_build_trees_desc);
+}
+
+void ShowBuildTreesScenToolbar()
+{
+	AllocateWindowDescFront(&_build_trees_scen_desc, 0);
+}
+
+static uint32 _errmsg_decode_params[10];
+static StringID _errmsg_message_1, _errmsg_message_2;
+static uint _errmsg_duration;
+
+
+static const Widget _errmsg_widgets[] = {
+{   WWT_CLOSEBOX,     4,     0,    10,     0,    13, STR_00C5},
+{    WWT_CAPTION,     4,    11,   239,     0,    13, STR_00B2_MESSAGE},
+{      WWT_PANEL,     4,     0,   239,    14,    45, 0x0},
+{      WWT_LAST},
+};
+
+static const Widget _errmsg_face_widgets[] = {
+{   WWT_CLOSEBOX,     4,     0,    10,     0,    13, STR_00C5},
+{    WWT_CAPTION,     4,    11,   333,     0,    13, STR_00B3_MESSAGE_FROM},
+{      WWT_PANEL,     4,     0,   333,    14,   136, 0x0},
+{      WWT_LAST},
+};
+
+static void ErrmsgWndProc(Window *w, WindowEvent *e)
+{
+	switch(e->event) {
+	case WE_PAINT:
+		COPY_IN_DPARAM(0, _errmsg_decode_params, lengthof(_errmsg_decode_params));
+		DrawWindowWidgets(w);
+		COPY_IN_DPARAM(0, _errmsg_decode_params, lengthof(_errmsg_decode_params));
+		if (w->widget != _errmsg_face_widgets) {
+			DrawStringMultiCenter(
+				120,
+				(_errmsg_message_1 == INVALID_STRING_ID ? 25 : 15), 
+				_errmsg_message_2,
+				238);
+			if (_errmsg_message_1 != INVALID_STRING_ID)
+				DrawStringMultiCenter(
+					120,
+					30,
+					_errmsg_message_1,
+					238);
+		} else {
+			Player *p = DEREF_PLAYER(_errmsg_decode_params[2]);
+			DrawPlayerFace(p->face, p->player_color, 2, 16);
+
+			DrawStringMultiCenter(
+				214,
+				(_errmsg_message_1 == INVALID_STRING_ID ? 65 : 45), 
+				_errmsg_message_2,
+				238);
+			if (_errmsg_message_1 != INVALID_STRING_ID)
+				DrawStringMultiCenter(
+					214,
+					90,
+					_errmsg_message_1,
+					238);
+		}
+		break;
+
+	case WE_MOUSELOOP:
+		if (_right_button_down)
+			DeleteWindow(w);
+		break;
+	case WE_4:
+		if (!--_errmsg_duration)
+			DeleteWindow(w);
+		break;
+	case WE_DESTROY: {
+		TileHighlightData *thd = _thd_ptr;
+		TileIndex tile = thd->redsq;
+		thd->redsq = 0;
+		if (tile != 0)
+			MarkTileDirtyByTile(tile);
+		break;
+		}
+
+	case WE_KEYPRESS:
+		if (e->keypress.keycode == WKC_SPACE) {
+			// Don't continue.
+			e->keypress.cont = false;
+			DeleteWindow(w);
+		}
+		break;
+	}
+}
+
+void ShowErrorMessage(StringID msg_1, StringID msg_2, int x, int y)
+{
+	Window *w;
+	ViewPort *vp;
+	Point pt;
+
+	DeleteWindowById(WC_ERRMSG, 0);
+
+	//assert(msg_2);
+	if (msg_2 == 0) msg_2 = STR_EMPTY;
+
+	_errmsg_message_1 = msg_1;
+	_errmsg_message_2 = msg_2;
+	COPY_OUT_DPARAM(_errmsg_decode_params, 0, lengthof(_errmsg_decode_params));
+	_errmsg_duration = _patches.errmsg_duration;
+	if (!_errmsg_duration)
+		return;
+	
+	if (_errmsg_message_1 != STR_013B_OWNED_BY || GET_DPARAMX8(_errmsg_decode_params,2) >= 8) {
+
+		if ( (x|y) != 0) {
+			pt = RemapCoords2(x, y);
+			for(w=_windows; w->window_class != WC_MAIN_WINDOW; w++) {}
+			vp = w->viewport;
+
+			// move x pos to opposite corner
+			pt.x = ((pt.x - vp->virtual_left) >> vp->zoom) + vp->left;
+			pt.x = (pt.x < (_screen.width >> 1)) ? _screen.width - 260 : 20;
+			
+			// move y pos to opposite corner
+			pt.y = ((pt.y - vp->virtual_top) >> vp->zoom) + vp->top;
+			pt.y = (pt.y < (_screen.height >> 1)) ? _screen.height - 80 : 100;
+			
+		} else {
+			pt.x = (_screen.width - 240) >> 1;
+			pt.y = (_screen.height - 46) >> 1;
+		}
+		w = AllocateWindow(pt.x, pt.y, 240, 46, ErrmsgWndProc, WC_ERRMSG, _errmsg_widgets);
+	} else {
+		if ( (x|y) != 0) {
+			pt = RemapCoords2(x, y);
+			for(w=_windows; w->window_class != WC_MAIN_WINDOW; w++) {}
+			vp = w->viewport;
+			pt.x = clamp(((pt.x - vp->virtual_left) >> vp->zoom) + vp->left - (334/2), 0, _screen.width - 334);
+			pt.y = clamp(((pt.y - vp->virtual_top) >> vp->zoom) + vp->top - (137/2), 22, _screen.height - 137);
+		} else {
+			pt.x = (_screen.width - 334) >> 1;
+			pt.y = (_screen.height - 137) >> 1;
+		}
+		w = AllocateWindow(pt.x, pt.y, 334, 137, ErrmsgWndProc, WC_ERRMSG, _errmsg_face_widgets);
+	}
+
+	w->desc_flags = WDF_STD_BTN | WDF_DEF_WIDGET;
+}
+
+
+void ShowEstimatedCostOrIncome(int32 cost, int x, int y)
+{
+	int msg = STR_0805_ESTIMATED_COST;
+
+	if (cost < 0) {
+		cost = -cost;
+		msg = STR_0807_ESTIMATED_INCOME;
+	}
+	SET_DPARAM32(0, cost);
+	ShowErrorMessage(-1, msg, x, y);
+}
+
+void ShowCostOrIncomeAnimation(int x, int y, int z, int32 cost)
+{
+	int msg;
+	Point pt = RemapCoords(x,y,z);
+
+	msg = STR_0801_COST;
+	if (cost < 0) {
+		cost = -cost;
+		msg = STR_0803_INCOME;
+	}
+	SET_DPARAM32(0, cost);
+	AddTextEffect(msg, pt.x, pt.y, 0x250);
+}
+
+static Widget _tooltips_widgets[] = {
+{      WWT_PANEL,    14,     0,   199,     0,    31, 0x0},
+{      WWT_LAST},
+};
+
+
+static void TooltipsWndProc(Window *w, WindowEvent *e)
+{
+
+	switch(e->event) {
+	case WE_PAINT: {
+		GfxFillRect(0, 0, w->width - 1, w->height - 1, 0);	
+		GfxFillRect(1, 1, w->width - 2, w->height - 2, 0x44);
+		DrawStringMultiCenter((w->width>>1), (w->height>>1)-5, WP(w,tooltips_d).string_id, 197);
+		break;
+	}
+	case WE_MOUSELOOP:
+		if (!_right_button_down)
+			DeleteWindow(w);
+		break;
+	}
+}
+
+void GuiShowTooltips(StringID string_id)
+{
+	Window *w;
+	int right,bottom;
+	int x,y;
+	
+	if (string_id == 0)
+		return;
+
+	w = FindWindowById(WC_TOOLTIPS, 0);
+	if (w != NULL) {
+		if (WP(w,tooltips_d).string_id == string_id)
+			return;
+		DeleteWindow(w);
+	}
+
+	GetString(str_buffr, string_id);
+	assert(strlen(str_buffr) < sizeof(str_buffr) - 1);
+
+	right = GetStringWidth(str_buffr) + 4;
+
+	bottom = 14;
+	if (right > 200) {
+		bottom += ((right - 4) / 176) * 10;
+		right = 200;
+	}
+
+	_tooltips_widgets[0].right = right;
+	_tooltips_widgets[0].bottom = bottom;
+
+	y = _cursor.pos.y + 30;
+	if (y < 22) y = 22;
+
+	if (y > (_screen.height - 44) && (y-=52) > (_screen.height - 44))
+		y = (_screen.height - 44);
+
+	x = _cursor.pos.x - (right >> 1);
+	if (x < 0) x = 0;
+	if (x > (_screen.width - right)) x = _screen.width - right;
+
+	w = AllocateWindow(x, y, right, bottom, TooltipsWndProc, WC_TOOLTIPS, _tooltips_widgets);
+	WP(w,tooltips_d).string_id = string_id;
+	w->flags4 &= ~WF_WHITE_BORDER_MASK;
+}
+
+
+static void DrawStationCoverageText(const uint *accepts, int str_x, int str_y, uint mask)
+{
+	int i;
+	byte *b;
+	
+	b = _userstring;
+	b[0] = 0x81;
+	b[1] = STR_000D_ACCEPTS;
+	b[2] = STR_000D_ACCEPTS >> 8;
+	b += 3;
+
+	for(i=0; i!=NUM_CARGO; i++,mask>>=1) {
+		if (accepts[i] >= 8 && (mask&1) ) {
+			StringID id = _cargoc.names_s[i];
+			b[0] = 0x81;
+			b[1] = (byte)(id & 255);
+			b[2] = (byte)(id >> 8);
+			b[3] = ',';
+			b[4] = ' ';
+			b += 5;
+		}
+	}
+
+	if (b == (byte*)&_userstring[3]) {
+		b[0] = 0x81;
+		b[1] = STR_00D0_NOTHING;
+		b[2] = STR_00D0_NOTHING >> 8;
+		b[3] = 0;
+	} else {
+		b[-2] = 0;
+	}
+
+	DrawStringMultiLine(str_x, str_y, STR_SPEC_USERSTRING, 144);
+}
+
+void DrawStationCoverageAreaText(int sx, int sy, uint mask) {
+	int x = _thd.pos.x;
+	int y = _thd.pos.y;
+	uint accepts[NUM_CARGO];
+	if (x != -1) {
+		GetAcceptanceAroundTiles(accepts, TILE_FROM_XY(x,y), _thd.new_size.x >> 4, _thd.new_size.y >> 4);
+		DrawStationCoverageText(accepts, sx, sy, mask);
+	}
+}
+
+void CheckRedrawStationCoverage(Window *w)
+{
+	if (_thd.dirty&1) {
+		_thd.dirty&=~1;
+		SetWindowDirty(w);
+	}
+}
+
+
+void UnclickSomeWindowButtons(Window *w, uint32 mask)
+{
+	uint32 x = w->click_state & mask;
+	int i = 0;
+	w->click_state ^= x;
+	do {
+		if (x&1) InvalidateWidget(w,i);
+	} while(i++,x>>=1);
+}
+
+
+void UnclickWindowButtons(Window *w)
+{
+	UnclickSomeWindowButtons(w, (uint32)-1);
+}
+
+
+void SetVScrollCount(Window *w, int num)
+{
+	w->vscroll.count = num;
+	num -= w->vscroll.cap;
+	if (num < 0) num = 0;
+	if (num < w->vscroll.pos) w->vscroll.pos = num;
+}
+
+void SetHScrollCount(Window *w, int num)
+{
+	w->hscroll.count = num;
+	num -= w->hscroll.cap;
+	if (num < 0) num = 0;
+	if (num < w->hscroll.pos) w->hscroll.pos = num;
+}
+
+
+int HandleEditBoxKey(Window *w, int wid, WindowEvent *we)
+{
+	byte *p;
+	int width,count;
+	int key = we->keypress.ascii;
+
+	we->keypress.cont = false;
+
+	if (we->keypress.keycode == WKC_ESC) {
+		return 2;
+	} else if (we->keypress.keycode == WKC_RETURN) {
+		return 1;
+	} else {
+		width = -1;
+		p = WP(w,querystr_d).buf - 1;
+		count = 0;
+		do {
+			if (*++p == 0)
+				break;
+			count++;
+			width += _stringwidth_table[*p - 32];
+		} while (1);
+		
+		if (we->keypress.keycode == WKC_BACKSPACE) {
+			if (count != 0) {
+				WP(w,querystr_d).buf[count-1] = 0;
+				InvalidateWidget(w, wid);
+			}
+		} else if (IS_INT_INSIDE((key = we->keypress.ascii), 32, 256)) {
+			if (count < WP(w,querystr_d).maxlen && width + _stringwidth_table[key-32] <= WP(w,querystr_d).maxwidth) {
+				WP(w,querystr_d).buf[count] = key;
+				WP(w,querystr_d).buf[count+1] = 0;
+				InvalidateWidget(w, wid);
+			}
+		} else {
+			// key wasn't caught
+			we->keypress.cont = true;
+		}
+	}
+
+	return 0;
+}
+
+void HandleEditBox(Window *w, int wid)
+{
+	bool b;
+
+	/* caret changed? */
+	b = !!(_caret_timer & 0x20);
+	if (b != WP(w,querystr_d).caret) {
+		WP(w,querystr_d).caret = b;
+		InvalidateWidget(w, wid);
+	}
+}
+
+void DrawEditBox(Window *w, int wid)
+{
+	const Widget *wi = w->widget + wid;
+	int x;
+
+	GfxFillRect(wi->left+1, wi->top+1, wi->right-1, wi->bottom-1, 215);
+	x = DoDrawString(WP(w,querystr_d).buf, wi->left+2, wi->top+1, 8);
+	if (WP(w,querystr_d).caret)
+		DoDrawString("_", x, wi->top+1, 12);
+}
+
+
+#define MAX_QUERYSTR_LEN 64
+
+static void QueryStringWndProc(Window *w, WindowEvent *e)
+{
+	switch(e->event) {
+	case WE_PAINT: {
+//		int x;
+
+		SET_DPARAM16(0, WP(w,querystr_d).caption);
+		DrawWindowWidgets(w);
+
+		DrawEditBox(w, 5);
+	} break;
+
+	case WE_CLICK:
+		switch(e->click.widget) {
+		case 3: DeleteWindow(w); break;
+		case 4:
+press_ok:;
+			if (str_eq(WP(w,querystr_d).buf, WP(w,querystr_d).buf + MAX_QUERYSTR_LEN)) {
+				DeleteWindow(w);
+			} else {
+				Window *parent = FindWindowById(WP(w,querystr_d).wnd_class, WP(w,querystr_d).wnd_num);
+				byte *buf = WP(w,querystr_d).buf;
+				DeleteWindow(w);
+				if (parent != NULL) {
+					WindowEvent e;
+					e.event = WE_ON_EDIT_TEXT;
+					e.edittext.str = buf;
+					parent->wndproc(parent, &e);
+				}
+			}
+			break;
+		}
+		break;
+
+	case WE_MOUSELOOP: {
+		if (!FindWindowById(WP(w,querystr_d).wnd_class, WP(w,querystr_d).wnd_num)) {
+			DeleteWindow(w);
+			return;
+		}
+		HandleEditBox(w, 5);
+	} break;
+
+	case WE_KEYPRESS: {
+		switch(HandleEditBoxKey(w, 5, e)) {
+		case 1: // Return
+			goto press_ok;
+		case 2: // Escape
+			DeleteWindow(w);
+			break;
+		}
+	} break;
+
+	case WE_DESTROY:
+		_query_string_active = false;
+		break;
+	}
+}
+
+static const Widget _query_string_widgets[] = {
+{    WWT_TEXTBTN,    14,     0,    10,     0,    13, STR_00C5},
+{    WWT_CAPTION,    14,    11,   259,     0,    13, STR_012D},
+{     WWT_IMGBTN,    14,     0,   259,    14,    29, 0x0},
+{    WWT_TEXTBTN,    14,     0,   129,    30,    41, STR_012E_CANCEL},
+{    WWT_TEXTBTN,    14,   130,   259,    30,    41, STR_012F_OK},
+{     WWT_IMGBTN,    14,     2,   257,    16,    27, 0x0},
+{      WWT_LAST},
+};
+
+static const WindowDesc _query_string_desc = {
+	190, 219, 260, 42,
+	WC_QUERY_STRING,0,
+	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,
+	_query_string_widgets,
+	QueryStringWndProc
+};
+
+static byte _edit_str_buf[MAX_QUERYSTR_LEN*2];
+
+void ShowQueryString(StringID str, StringID caption, int maxlen, int maxwidth, byte window_class, uint16 window_number)
+{
+	Window *w;
+
+#define _orig_edit_str_buf (_edit_str_buf+MAX_QUERYSTR_LEN)
+
+	if (_pause != 0 && !_patches.build_in_pause)
+		return;
+
+	DeleteWindowById(WC_QUERY_STRING, 0);
+	DeleteWindowById(WC_SAVELOAD, 0);
+
+	if (str == 0xFFFF) {
+		memcpy(_orig_edit_str_buf, str_buffr, MAX_QUERYSTR_LEN);
+	} else {
+		GetString(_orig_edit_str_buf, str);
+	}
+	_orig_edit_str_buf[maxlen] = 0;
+
+	memcpy(_edit_str_buf, _orig_edit_str_buf, MAX_QUERYSTR_LEN);
+
+	w = AllocateWindowDesc(&_query_string_desc);
+
+	w->click_state = 1 << 5;
+	WP(w,querystr_d).caption = caption;
+	WP(w,querystr_d).wnd_class = window_class;
+	WP(w,querystr_d).wnd_num = window_number;
+	WP(w,querystr_d).caret = 0;
+	WP(w,querystr_d).maxlen = maxlen;
+	WP(w,querystr_d).maxwidth = maxwidth;
+	WP(w,querystr_d).buf = _edit_str_buf;
+
+	_query_string_active = true;
+}
+
+static const Widget _load_dialog_1_widgets[] = {
+{    WWT_TEXTBTN,    14,     0,    10,     0,    13, STR_00C5, STR_018B_CLOSE_WINDOW},
+{    WWT_CAPTION,    14,    11,   256,     0,    13, STR_4001_LOAD_GAME, STR_018C_WINDOW_TITLE_DRAG_THIS},
+{ WWT_PUSHTXTBTN,    14,     0,   127,    14,    25, STR_SORT_BY_NAME, STR_SORT_TIP},
+{ WWT_PUSHTXTBTN,    14,   128,   256,    14,    25, STR_SORT_BY_DATE,STR_SORT_TIP},
+{     WWT_IMGBTN,    14,     0,   256,    26,    47, 0x0},
+{     WWT_IMGBTN,    14,     0,   256,    48,   293, 0x0},
+{          WWT_6,    14,     2,   243,    50,   291, 0x0, STR_400A_LIST_OF_DRIVES_DIRECTORIES},
+{  WWT_SCROLLBAR,    14,   246,   256,    48,   293, 0x0, STR_0190_SCROLL_BAR_SCROLLS_LIST},
+{      WWT_LAST},
+};
+
+static const Widget _load_dialog_2_widgets[] = {
+{    WWT_TEXTBTN,    14,     0,    10,     0,    13, STR_00C5, STR_018B_CLOSE_WINDOW},
+{    WWT_CAPTION,    14,    11,   256,     0,    13, STR_0298_LOAD_SCENARIO, STR_018C_WINDOW_TITLE_DRAG_THIS},
+{ WWT_PUSHTXTBTN,    14,     0,   127,    14,    25, STR_SORT_BY_NAME, STR_SORT_TIP},
+{ WWT_PUSHTXTBTN,    14,   128,   256,    14,    25, STR_SORT_BY_DATE,STR_SORT_TIP},
+{     WWT_IMGBTN,    14,     0,   256,    26,    47, 0x0},
+{     WWT_IMGBTN,    14,     0,   256,    48,   293, 0x0},
+{          WWT_6,    14,     2,   243,    50,   291, 0x0, STR_400A_LIST_OF_DRIVES_DIRECTORIES},
+{  WWT_SCROLLBAR,    14,   246,   256,    48,   293, 0x0, STR_0190_SCROLL_BAR_SCROLLS_LIST},
+{      WWT_LAST},
+};
+
+static const Widget _save_dialog_widgets[] = {
+{    WWT_TEXTBTN,    14,     0,    10,     0,    13, STR_00C5, STR_018B_CLOSE_WINDOW},
+{    WWT_CAPTION,    14,    11,   256,     0,    13, STR_4000_SAVE_GAME, STR_018C_WINDOW_TITLE_DRAG_THIS},
+{ WWT_PUSHTXTBTN,    14,     0,   127,    14,    25, STR_SORT_BY_NAME, STR_SORT_TIP},
+{ WWT_PUSHTXTBTN,    14,   128,   256,    14,    25, STR_SORT_BY_DATE,STR_SORT_TIP},
+{     WWT_IMGBTN,    14,     0,   256,    26,    47, 0x0},
+{     WWT_IMGBTN,    14,     0,   256,    48,   291, 0x0},
+{          WWT_6,    14,     2,   243,    50,   289, 0x0, STR_400A_LIST_OF_DRIVES_DIRECTORIES},
+{  WWT_SCROLLBAR,    14,   246,   256,    48,   291, 0x0, STR_0190_SCROLL_BAR_SCROLLS_LIST},
+{     WWT_IMGBTN,    14,     0,   256,   292,   307, 0x0},
+{     WWT_IMGBTN,    14,     2,   254,   294,   305, 0x0, STR_400B_CURRENTLY_SELECTED_NAME},
+{ WWT_PUSHTXTBTN,    14,     0,   127,   308,   319, STR_4003_DELETE, STR_400C_DELETE_THE_CURRENTLY_SELECTED},
+{ WWT_PUSHTXTBTN,    14,   128,   256,   308,   319, STR_4002_SAVE, STR_400D_SAVE_THE_CURRENT_GAME_USING},
+{      WWT_LAST},
+};
+
+static const Widget _save_dialog_scen_widgets[] = {
+{    WWT_TEXTBTN,    14,     0,    10,     0,    13, STR_00C5, STR_018B_CLOSE_WINDOW},
+{    WWT_CAPTION,    14,    11,   256,     0,    13, STR_0299_SAVE_SCENARIO, STR_018C_WINDOW_TITLE_DRAG_THIS},
+{ WWT_PUSHTXTBTN,    14,     0,   127,    14,    25, STR_SORT_BY_NAME, STR_SORT_TIP},
+{ WWT_PUSHTXTBTN,    14,   128,   256,    14,    25, STR_SORT_BY_DATE,STR_SORT_TIP},
+{     WWT_IMGBTN,    14,     0,   256,    26,    47, 0x0},
+{     WWT_IMGBTN,    14,     0,   256,    48,   291, 0x0},
+{          WWT_6,    14,     2,   243,    50,   289, 0x0, STR_400A_LIST_OF_DRIVES_DIRECTORIES},
+{  WWT_SCROLLBAR,    14,   246,   256,    48,   291, 0x0, STR_0190_SCROLL_BAR_SCROLLS_LIST},
+{     WWT_IMGBTN,    14,     0,   256,   292,   307, 0x0},
+{     WWT_IMGBTN,    14,     2,   254,   294,   305, 0x0, STR_400B_CURRENTLY_SELECTED_NAME},
+{ WWT_PUSHTXTBTN,    14,     0,   127,   308,   319, STR_4003_DELETE, STR_400C_DELETE_THE_CURRENTLY_SELECTED},
+{ WWT_PUSHTXTBTN,    14,   128,   256,   308,   319, STR_4002_SAVE, STR_400D_SAVE_THE_CURRENT_GAME_USING},
+{      WWT_LAST},
+};
+
+
+static FiosItem *_fios_list;
+static int _fios_num;
+static int _saveload_mode;
+
+static void BuildFileList()
+{
+	FiosFreeSavegameList();
+	if(_saveload_mode==SLD_NEW_GAME || _saveload_mode==SLD_LOAD_SCENARIO || _saveload_mode==SLD_SAVE_SCENARIO)
+		_fios_list = FiosGetScenarioList(&_fios_num, _saveload_mode);
+	else
+		_fios_list = FiosGetSavegameList(&_fios_num, _saveload_mode);
+}
+
+static void DrawFiosTexts()
+{
+	char *path;
+	StringID str;
+
+	str = FiosGetDescText(&path);
+	if (str != 0)
+		DrawString(2, 37, str, 0);
+	DoDrawString(path, 2, 27, 16);
+}
+
+/*	FIOS_TYPE_FILE, FIOS_TYPE_OLDFILE etc. different colours */
+static const byte _fios_colors[] = {13, 9, 9, 6, 5, 6, 5};
+
+#if defined(_WIN32)
+	extern int CDECL compare_FiosItems (const void *a, const void *b);
+#else
+	extern int compare_FiosItems (const void *a, const void *b);
+#endif
+
+
+static void MakeSortedSaveGameList()
+{
+	/*	Directories are always above the files (FIOS_TYPE_DIR)
+	 *	Drives (A:\ (windows only) are always under the files (FIOS_TYPE_DRIVE)
+	 *	Only sort savegames/scenarios, not directories
+	 */
+
+	int i, sort_start, sort_end, s_amount;
+	i = sort_start = sort_end = 0;
+
+	while (i < _fios_num) {
+		if (_fios_list[i].type == FIOS_TYPE_DIR || _fios_list[i].type == FIOS_TYPE_PARENT)
+			sort_start++;
+
+		if (_fios_list[i].type == FIOS_TYPE_DRIVE)
+			sort_end++;
+
+		i++;
+	}
+
+	s_amount = _fios_num - sort_start - sort_end;
+	if ((bool)s_amount)
+		qsort(_fios_list + sort_start, s_amount, sizeof(FiosItem), compare_FiosItems);
+}
+
+static void SaveLoadDlgWndProc(Window *w, WindowEvent *e)
+{
+	const int list_start = 51;
+
+	switch(e->event) {
+	case WE_PAINT: {
+		int y,pos;
+		const FiosItem *item;
+
+		SetVScrollCount(w, _fios_num);
+		DrawWindowWidgets(w);
+		DrawFiosTexts();
+
+		if (_savegame_sort_dirty) {
+			_savegame_sort_dirty = false;
+			MakeSortedSaveGameList();
+		}
+
+		GfxFillRect(3, list_start, 3+239, list_start+239, 0xD7);
+		DoDrawString(_savegame_sort_order & 1 ? "\xAA" : "\xA0", _savegame_sort_order <= 1 ? 248 : 118, 15, 0x10);
+
+		y = list_start;
+		pos = w->vscroll.pos;
+		while (pos < _fios_num) {
+			item = _fios_list + pos;
+			DoDrawString(item->title[0] ? item->title : item->name, 4, y, _fios_colors[item->type] );
+			pos++;
+			y+=10;
+			if (y >= w->vscroll.cap*10+list_start)
+				break;
+		}
+
+		if (_saveload_mode == SLD_SAVE_GAME || _saveload_mode == SLD_SAVE_SCENARIO) {
+			DrawEditBox(w, 9);
+		}
+		break;
+	}
+	case WE_CLICK:
+		switch(e->click.widget) {
+		case 2: /* Sort save names by name */
+			_savegame_sort_order = (_savegame_sort_order == 2) ? 3 : 2;
+			_savegame_sort_dirty = true;
+			SetWindowDirty(w);
+			break;
+
+		case 3: /* Sort save names by date */
+			_savegame_sort_order = (_savegame_sort_order == 0) ? 1 : 0;
+			_savegame_sort_dirty = true;
+			SetWindowDirty(w);
+			break;
+
+		case 6: { /* Click the listbox */
+			int y = (e->click.pt.y - list_start) / 10;
+			char *name;
+			const FiosItem *file;
+
+			if (y < 0 || (y += w->vscroll.pos) >= w->vscroll.count)
+				return;
+
+			file = _fios_list + y;
+			
+			if ((name = FiosBrowseTo(file)) != NULL) {
+				if (_saveload_mode == SLD_LOAD_GAME) {
+					_switch_mode = SM_LOAD;
+					SetFiosType(file->type);
+					strcpy(_file_to_saveload.name, name);
+					DeleteWindow(w);
+				} else if (_saveload_mode == SLD_LOAD_SCENARIO) {
+					_switch_mode = SM_LOAD_SCENARIO;
+					SetFiosType(file->type);
+					strcpy(_file_to_saveload.name, name);
+					DeleteWindow(w);
+				} else {
+					// SLD_SAVE_GAME, SLD_SAVE_SCENARIO copy clicked name to editbox
+					strcpy(WP(w,querystr_d).buf, file->title[0] ? file->title : file->name);
+					InvalidateWidget(w, 9);
+				}
+			} else {
+				// Changed directory, need repaint.
+				SetWindowDirty(w);
+				BuildFileList();
+			}
+			break;
+		}
+		case 10: case 11: /* Delete, Save game */
+			break;
+		}
+		break;
+	case WE_MOUSELOOP:
+		HandleEditBox(w, 9);
+		break;
+	case WE_KEYPRESS:
+		switch (HandleEditBoxKey(w, 9, e)) {
+		case 1:
+			HandleButtonClick(w, 11);
+			break;
+		}
+		break;
+	case WE_TIMEOUT:
+		if (HASBIT(w->click_state, 10)) { /* Delete button clicked */
+			FiosDelete(WP(w,querystr_d).buf);
+			SetWindowDirty(w);
+			BuildFileList();
+		} else if (HASBIT(w->click_state, 11)) { /* Save button clicked */
+			_switch_mode = SM_SAVE;
+			FiosMakeSavegameName(_file_to_saveload.name, WP(w,querystr_d).buf);
+		}
+		break;
+	case WE_DESTROY:
+		DoCommandP(0, 0, 0, NULL, CMD_PAUSE);
+		_query_string_active = false;
+		FiosFreeSavegameList();
+		break;
+	}	
+}
+
+static const WindowDesc _load_dialog_desc = {
+	WDP_CENTER, WDP_CENTER, 257, 294,
+	WC_SAVELOAD,0,
+	WDF_STD_TOOLTIPS | WDF_DEF_WIDGET | WDF_STD_BTN | WDF_UNCLICK_BUTTONS,
+	_load_dialog_1_widgets,
+	SaveLoadDlgWndProc,
+};
+
+static const WindowDesc _load_dialog_scen_desc = {
+	WDP_CENTER, WDP_CENTER, 257, 294,
+	WC_SAVELOAD,0,
+	WDF_STD_TOOLTIPS | WDF_DEF_WIDGET | WDF_STD_BTN | WDF_UNCLICK_BUTTONS,
+	_load_dialog_2_widgets,
+	SaveLoadDlgWndProc,
+};
+
+static const WindowDesc _save_dialog_desc = {
+	WDP_CENTER, WDP_CENTER, 257, 320,
+	WC_SAVELOAD,0,
+	WDF_STD_TOOLTIPS | WDF_DEF_WIDGET | WDF_STD_BTN | WDF_UNCLICK_BUTTONS,
+	_save_dialog_widgets,
+	SaveLoadDlgWndProc,
+};
+
+static const WindowDesc _save_dialog_scen_desc = {
+	WDP_CENTER, WDP_CENTER, 257, 320,
+	WC_SAVELOAD,0,
+	WDF_STD_TOOLTIPS | WDF_DEF_WIDGET | WDF_STD_BTN | WDF_UNCLICK_BUTTONS,
+	_save_dialog_scen_widgets,
+	SaveLoadDlgWndProc,
+};
+
+static const WindowDesc * const _saveload_dialogs[] = {
+	&_load_dialog_desc,
+	&_load_dialog_scen_desc,
+	&_save_dialog_desc,
+	&_save_dialog_scen_desc,
+};
+
+void ShowSaveLoadDialog(int mode)
+{
+	Window *w;
+
+	SetObjectToPlace(1, 0, 0, 0);
+	DeleteWindowById(WC_QUERY_STRING, 0);
+	DeleteWindowById(WC_SAVELOAD, 0);
+
+	_saveload_mode = mode;
+
+	w = AllocateWindowDesc(_saveload_dialogs[mode]);
+	w->vscroll.cap = 24;
+	w->click_state |= (1 << 6);
+	WP(w,querystr_d).caret = 0;
+	WP(w,querystr_d).maxlen = MAX_QUERYSTR_LEN;
+	WP(w,querystr_d).maxwidth = 240;
+	WP(w,querystr_d).buf = _edit_str_buf;
+
+	if (mode == SLD_SAVE_GAME) {
+		Player *p = &_players[_local_player];
+		SET_DPARAM16(0, p->name_1);
+		SET_DPARAM32(1, p->name_2);
+		SET_DPARAM16(2, _date);
+		GetString(_edit_str_buf, STR_4004);
+	} else if (mode == SLD_SAVE_SCENARIO) {
+		strcpy(_edit_str_buf, "UNNAMED");
+	}
+
+	if (_game_mode != GM_MENU)
+		DoCommandP(0, 1, 0, NULL, CMD_PAUSE);
+
+	BuildFileList();
+
+	ResetObjectToPlace();
+}
+
+void RedrawAutosave()
+{
+	SetWindowDirty(FindWindowById(WC_STATUS_BAR, 0));
+}
+
+static const Widget _select_scenario_widgets[] = {
+{    WWT_TEXTBTN,     7,     0,    10,     0,    13, STR_00C5, STR_018B_CLOSE_WINDOW},
+{    WWT_CAPTION,     7,    11,   256,     0,    13, STR_400E_SELECT_NEW_GAME_TYPE, STR_018C_WINDOW_TITLE_DRAG_THIS},
+{ WWT_PUSHTXTBTN,     7,     0,   127,    14,    25, STR_SORT_BY_NAME, STR_SORT_TIP},
+{ WWT_PUSHTXTBTN,     7,   128,   256,    14,    25, STR_SORT_BY_DATE, STR_SORT_TIP},
+{     WWT_IMGBTN,     7,     0,   245,    26,   319, 0x0},
+{          WWT_6,     7,     2,   243,    28,   317, 0x0, STR_400F_SELECT_SCENARIO_GREEN_PRE},
+{  WWT_SCROLLBAR,     7,   246,   256,    26,   319, 0x0, STR_0190_SCROLL_BAR_SCROLLS_LIST},
+{      WWT_LAST},
+};
+
+static void SelectScenarioWndProc(Window *w, WindowEvent *e) {
+	const int list_start = 45;
+	switch(e->event) {
+	case WE_PAINT:
+	{
+		int y,pos;
+		const FiosItem *item;
+
+		if (_savegame_sort_dirty) {
+			_savegame_sort_dirty = false;
+			MakeSortedSaveGameList();
+		}
+		
+		SetVScrollCount(w, _fios_num);
+
+		DrawWindowWidgets(w);
+		DoDrawString(_savegame_sort_order & 1 ? "\xAA" : "\xA0", _savegame_sort_order <= 1 ? 248 : 118, 15, 0x10);
+		DrawString(4, 32, STR_4010_GENERATE_RANDOM_NEW_GAME, 9);
+
+		y = list_start;
+		pos = w->vscroll.pos;
+		while (pos < _fios_num) {
+			item = _fios_list + pos;
+			DoDrawString(item->title[0] ? item->title : item->name, 4, y, _fios_colors[item->type] );
+			pos++;
+			y+=10;
+			if (y >= w->vscroll.cap*10+list_start)
+				break;
+		}
+	}
+		break;
+
+	case WE_CLICK:
+		switch(e->click.widget) {
+		case 2: /* Sort scenario names by name */
+			_savegame_sort_order = (_savegame_sort_order == 2) ? 3 : 2;
+			_savegame_sort_dirty = true;
+			SetWindowDirty(w);
+			break;
+
+		case 3: /* Sort scenario names by date */
+			_savegame_sort_order = (_savegame_sort_order == 0) ? 1 : 0;
+			_savegame_sort_dirty = true;
+			SetWindowDirty(w);
+			break;
+
+		case 5: /* Click the listbox */
+			if(e->click.pt.y < list_start)
+				DoCommandP(0, Random(), InteractiveRandom(), NULL, CMD_GEN_RANDOM_NEW_GAME);
+			else {
+				char *name;
+				int y = (e->click.pt.y - list_start) / 10;
+				const FiosItem *file;
+
+				if (y < 0 || (y += w->vscroll.pos) >= w->vscroll.count)
+					return;
+
+				file = _fios_list + y;
+			
+				if ((name = FiosBrowseTo(file)) != NULL) {
+					SetFiosType(file->type);
+					strcpy(_file_to_saveload.name, name);
+					DeleteWindow(w);
+					DoCommandP(0, Random(), InteractiveRandom(), NULL, CMD_START_SCENARIO);
+				}
+			}
+			break;
+		}
+	case WE_DESTROY:
+		break;
+	}
+}
+
+static void SetFiosType(const byte fiostype)
+{
+	switch (fiostype) {
+	case FIOS_TYPE_FILE: case FIOS_TYPE_SCENARIO:
+		_file_to_saveload.mode = SL_LOAD;
+		break;
+	case FIOS_TYPE_OLDFILE: case FIOS_TYPE_OLD_SCENARIO:
+		_file_to_saveload.mode = SL_OLD_LOAD;
+		break;
+	default:
+		_file_to_saveload.mode = SL_INVALID;
+	}
+}
+
+static const WindowDesc _select_scenario_desc = {
+	WDP_CENTER, WDP_CENTER, 257, 320,
+	WC_SAVELOAD,0,
+	WDF_STD_TOOLTIPS | WDF_DEF_WIDGET | WDF_STD_BTN | WDF_UNCLICK_BUTTONS,
+	_select_scenario_widgets,
+	SelectScenarioWndProc
+};
+
+void AskForNewGameToStart()
+{
+	Window *w;
+
+	DeleteWindowById(WC_QUERY_STRING, 0);
+	DeleteWindowById(WC_SAVELOAD, 0);
+
+	_saveload_mode = SLD_NEW_GAME;
+	BuildFileList();
+
+	w = AllocateWindowDesc(&_select_scenario_desc);
+	w->vscroll.cap = 27;
+}
+
+
+
+
+int32 ClickMoneyCheat(int32 p1, int32 p2)
+{
+		DoCommandP(0, -10000000, 0, NULL, CMD_MONEY_CHEAT);
+		return true;
+}
+
+// p1 player to set to, p2 is -1 or +1 (down/up)
+int32 ClickChangePlayerCheat(int32 p1, int32 p2)
+{
+	while(p1 >= 0 && p1 < MAX_PLAYERS)
+	{
+		if (_players[p1].is_active)
+		{
+			_local_player = p1;
+			return _local_player;
+		}
+		p1 += p2;
+	}
+return _local_player;
+}
+
+typedef int32 CheckButtonClick(int32, int32);
+static CheckButtonClick * const _cheat_button_proc[] = {
+	ClickMoneyCheat,
+	ClickChangePlayerCheat,
+};
+
+
+typedef struct CheatEntry {
+	byte type;    // type of selector
+	byte flags;		// selector flags
+	StringID str; // string with descriptive text
+	void *variable; // pointer to the variable
+	bool *been_used; // has this cheat been used before?
+	CheckButtonClick *click_proc; // procedure
+	int16 min,max; // range for spinbox setting
+	uint16 step;   // step for spinbox
+} CheatEntry;
+
+enum {
+	CE_BOOL = 0,
+	CE_UINT8 = 1,
+	CE_INT16 = 2,
+	CE_UINT16 = 3,
+	CE_INT32 = 4,
+	CE_BYTE = 5,
+	CE_CLICK = 6,
+
+	CF_0ISDIS = 1,
+	CF_NOCOMMA = 2,
+};
+
+static int32 ReadCE(const CheatEntry*ce)
+{
+	switch(ce->type) {
+	case CE_BOOL:   return *(bool*)ce->variable;
+	case CE_UINT8:  return *(uint8*)ce->variable;
+	case CE_INT16:  return *(int16*)ce->variable;
+	case CE_UINT16: return *(uint16*)ce->variable;
+	case CE_INT32:  return *(int32*)ce->variable;
+	case CE_BYTE:   return *(byte*)ce->variable;
+	case CE_CLICK:  return 0;
+	default:
+		NOT_REACHED();
+	}
+  
+	/* useless, but avoids compiler warning this way */
+	return 0;
+}
+
+static void WriteCE(const CheatEntry *ce, int32 val)
+{
+	switch(ce->type) {
+	case CE_BOOL: *(bool*)ce->variable = (bool)val; break;
+	case CE_BYTE: *(byte*)ce->variable = (byte)val; break;
+	case CE_UINT8: *(uint8*)ce->variable = (uint8)val; break;
+	case CE_INT16: *(int16*)ce->variable = (int16)val; break;
+	case CE_UINT16: *(uint16*)ce->variable = (uint16)val; break;
+	case CE_INT32: *(int32*)ce->variable = val; break;
+	case CE_CLICK: break;
+	default:
+		NOT_REACHED();
+	}
+}
+
+
+static const CheatEntry _cheats_ui[] = {
+	{CE_CLICK, 0, STR_CHEAT_MONEY, 					&_cheats.money.value, 					&_cheats.money.been_used, 				&ClickMoneyCheat},
+	{CE_UINT8, 0, STR_CHEAT_CHANGE_PLAYER, 	&_local_player, 								&_cheats.switch_player.been_used,	&ClickChangePlayerCheat, 0, 11, 1},
+	{CE_BOOL, 0, STR_CHEAT_EXTRA_DYNAMITE,	&_cheats.magic_bulldozer.value,	&_cheats.magic_bulldozer.been_used},
+	{CE_BOOL, 0, STR_CHEAT_CROSSINGTUNNELS,	&_cheats.crossing_tunnels.value,&_cheats.crossing_tunnels.been_used},
+};
+
+
+static const Widget _cheat_widgets[] = {
+{   WWT_CLOSEBOX,    14,     0,    10,     0,    13, STR_00C5,			STR_018B_CLOSE_WINDOW},
+{    WWT_CAPTION,    14,    11,   399,     0,    13, STR_CHEATS,	STR_018C_WINDOW_TITLE_DRAG_THIS},
+{      WWT_PANEL,    14,     0,   399,    14,   147, 0x0},
+
+{     WWT_IMGBTN,    14,     0,   399,    14,   147, 0x0, STR_CHEATS_TIP},
+{      WWT_LAST},
+};
+
+extern void DrawPlayerIcon(int p, int x, int y);
+
+static void CheatsWndProc(Window *w, WindowEvent *e)
+{
+	switch(e->event) {
+	case WE_PAINT: {
+		int clk = WP(w,def_d).data_1;
+		const CheatEntry *ce = &_cheats_ui[0];
+		int32 val;
+		int x, y;
+		int i;
+
+		DrawWindowWidgets(w);
+
+		DrawStringMultiCenter(200, 25, STR_CHEATS_WARNING, 350);
+
+		x=0;
+		y=45;
+
+		for(i=0; i!=lengthof(_cheats_ui); i++,ce++) {
+
+			DrawSprite((SPR_OPENTTD_BASE + ((*ce->been_used)?67:66)), x+5, y+2);
+
+			if (ce->type == CE_BOOL) {
+				DrawFrameRect(x+20, y+1, x+30+9, y+9, (*(bool*)ce->variable)?6:4, (*(bool*)ce->variable)?0x20:0);
+				SET_DPARAM16(0, *(bool*)ce->variable ? STR_CONFIG_PATCHES_ON : STR_CONFIG_PATCHES_OFF);
+
+			}	else if (ce->type == CE_CLICK) {
+				DrawFrameRect(x+20, y+1, x+30+9, y+9, 0, (WP(w,def_d).data_1==i*2+1)?0x20:0x00);
+				if(i==0)
+					SET_DPARAM64(0, (int64) 10000000);
+				else
+					SET_DPARAM16(0, false);
+
+			} else {
+				DrawFrameRect(x+20, y+1, x+20+9, y+9, 3, clk == i*2+1 ? 0x20 : 0);
+				DrawFrameRect(x+30, y+1, x+30+9, y+9, 3, clk == i*2+2 ? 0x20 : 0);
+				DrawStringCentered(x+25, y+1, STR_6819, 0);
+				DrawStringCentered(x+35, y+1, STR_681A, 0);
+				
+				val = ReadCE(ce);
+				SET_DPARAM16(0, val);
+				
+				// draw colored flag for change player cheat
+				if(ce->str==STR_CHEAT_CHANGE_PLAYER)
+					DrawPlayerIcon(_current_player, 156, y+2);
+
+				
+			}
+
+		DrawString(50, y+1, ce->str, 0);
+
+		y+=12;
+		}
+		break;
+	}
+	case WE_CLICK: {
+			const CheatEntry *ce;
+			uint btn = (e->click.pt.y - 46) / 12;
+			int32 val, oval;
+			uint x = e->click.pt.x;
+
+			// not clicking a button?
+			if(!IS_INT_INSIDE(x, 20, 40) || btn>=lengthof(_cheats_ui))
+				break;
+
+			ce = &_cheats_ui[btn];
+			oval = val = ReadCE(ce);
+
+			*ce->been_used = true;
+
+			switch(ce->type) {
+				case CE_BOOL:	{
+					val ^= 1;
+					if (ce->click_proc != NULL)
+						ce->click_proc(val, 0);
+					break;
+				}
+
+				case CE_CLICK:	{
+					ce->click_proc(val, 0);
+					WP(w,def_d).data_1 = btn * 2 + 1;
+					break;
+				}
+
+				default:	{
+					if (x >= 30) {
+						//increase
+						val += ce->step;
+						if (val > ce->max) val = ce->max;
+					} else {
+						// decrease
+						val -= ce->step;
+						if (val < ce->min) val = ce->min;
+					}
+
+					// take whatever the function returns
+					val = ce->click_proc(val, (x>=30) ? 1 : -1);
+
+					if (val != oval)
+						WP(w,def_d).data_1 = btn * 2 + 1 + ((x>=30) ? 1 : 0);
+
+					break;
+				}
+			}
+
+			if (val != oval) {
+				WriteCE(ce, val);
+				SetWindowDirty(w);
+			}
+
+			w->flags4 |= 5 << WF_TIMEOUT_SHL;
+
+			SetWindowDirty(w);
+		}
+		break;
+	case WE_TIMEOUT:
+		WP(w,def_d).data_1 = 0;
+		SetWindowDirty(w);
+		break;
+	}	
+}
+static const WindowDesc _cheats_desc = {
+	240, 22, 400, 148,
+	WC_CHEATS,0,
+	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,
+	_cheat_widgets,
+	CheatsWndProc
+};
+
+
+void ShowCheatWindow()
+{
+	Window *w;
+	
+	DeleteWindowById(WC_CHEATS, 0);
+	w = AllocateWindowDesc(&_cheats_desc);
+
+	if (w)
+		SetWindowDirty(w);
+}