(svn r8033) [cpp] - Prepare for merge from branches/cpp (all .c files renamed to .cpp)

1 files changed, 1140 insertions, 0 deletions

diff --git a/src/settings_gui.cpp b/src/settings_gui.cpp
new file mode 100644
index 000000000..f6806f424
--- /dev/null
+++ b/src/settings_gui.cpp
@@ -0,0 +1,1140 @@
+/* $Id$ */
+
+#include "stdafx.h"
+#include "openttd.h"
+#include "currency.h"
+#include "functions.h"
+#include "string.h"
+#include "strings.h" // XXX GetCurrentCurrencyRate()
+#include "table/sprites.h"
+#include "table/strings.h"
+#include "window.h"
+#include "gui.h"
+#include "gfx.h"
+#include "command.h"
+#include "engine.h"
+#include "screenshot.h"
+#include "newgrf.h"
+#include "network/network.h"
+#include "town.h"
+#include "variables.h"
+#include "settings.h"
+#include "vehicle.h"
+#include "date.h"
+
+static uint32 _difficulty_click_a;
+static uint32 _difficulty_click_b;
+static byte _difficulty_timeout;
+
+static const StringID _units_dropdown[] = {
+	STR_UNITS_IMPERIAL,
+	STR_UNITS_METRIC,
+	STR_UNITS_SI,
+	INVALID_STRING_ID
+};
+
+static const StringID _driveside_dropdown[] = {
+	STR_02E9_DRIVE_ON_LEFT,
+	STR_02EA_DRIVE_ON_RIGHT,
+	INVALID_STRING_ID
+};
+
+static const StringID _autosave_dropdown[] = {
+	STR_02F7_OFF,
+	STR_AUTOSAVE_1_MONTH,
+	STR_02F8_EVERY_3_MONTHS,
+	STR_02F9_EVERY_6_MONTHS,
+	STR_02FA_EVERY_12_MONTHS,
+	INVALID_STRING_ID,
+};
+
+static const StringID _designnames_dropdown[] = {
+	STR_02BE_DEFAULT,
+	STR_02BF_CUSTOM,
+	INVALID_STRING_ID
+};
+
+static StringID *BuildDynamicDropdown(StringID base, int num)
+{
+	static StringID buf[32 + 1];
+	StringID *p = buf;
+	while (--num>=0) *p++ = base++;
+	*p = INVALID_STRING_ID;
+	return buf;
+}
+
+static int GetCurRes(void)
+{
+	int i;
+
+	for (i = 0; i != _num_resolutions; i++) {
+		if (_resolutions[i][0] == _screen.width &&
+				_resolutions[i][1] == _screen.height) {
+			break;
+		}
+	}
+	return i;
+}
+
+static inline bool RoadVehiclesAreBuilt(void)
+{
+	const Vehicle* v;
+
+	FOR_ALL_VEHICLES(v) {
+		if (v->type == VEH_Road) return true;
+	}
+	return false;
+}
+
+
+static void ShowCustCurrency(void);
+
+static void GameOptionsWndProc(Window *w, WindowEvent *e)
+{
+	switch (e->event) {
+	case WE_PAINT: {
+		int i;
+		StringID str = STR_02BE_DEFAULT;
+
+		SetWindowWidgetDisabledState(w, 21, !(_vehicle_design_names & 1));
+		if (!IsWindowWidgetDisabled(w, 21)) str = STR_02BF_CUSTOM;
+		SetDParam(0, str);
+		SetDParam(1, _currency_specs[_opt_ptr->currency].name);
+		SetDParam(2, STR_UNITS_IMPERIAL + _opt_ptr->units);
+		SetDParam(3, STR_02E9_DRIVE_ON_LEFT + _opt_ptr->road_side);
+		SetDParam(4, STR_TOWNNAME_ORIGINAL_ENGLISH + _opt_ptr->town_name);
+		SetDParam(5, _autosave_dropdown[_opt_ptr->autosave]);
+		SetDParam(6, SPECSTR_LANGUAGE_START + _dynlang.curr);
+		i = GetCurRes();
+		SetDParam(7, i == _num_resolutions ? STR_RES_OTHER : SPECSTR_RESOLUTION_START + i);
+		SetDParam(8, SPECSTR_SCREENSHOT_START + _cur_screenshot_format);
+		SetWindowWidgetLoweredState(w, 28, _fullscreen);
+
+		DrawWindowWidgets(w);
+		DrawString(20, 175, STR_OPTIONS_FULLSCREEN, 0); // fullscreen
+	}	break;
+
+	case WE_CLICK:
+		switch (e->we.click.widget) {
+		case 4: case 5: /* Setup currencies dropdown */
+			ShowDropDownMenu(w, BuildCurrencyDropdown(), _opt_ptr->currency, 5, _game_mode == GM_MENU ? 0 : ~GetMaskOfAllowedCurrencies(), 0);;
+			return;
+		case 7: case 8: /* Setup distance unit dropdown */
+			ShowDropDownMenu(w, _units_dropdown, _opt_ptr->units, 8, 0, 0);
+			return;
+		case 10: case 11: { /* Setup road-side dropdown */
+			int i = 0;
+
+			/* You can only change the drive side if you are in the menu or ingame with
+			 * no vehicles present. In a networking game only the server can change it */
+			if ((_game_mode != GM_MENU && RoadVehiclesAreBuilt()) || (_networking && !_network_server))
+				i = (-1) ^ (1 << _opt_ptr->road_side); // disable the other value
+
+			ShowDropDownMenu(w, _driveside_dropdown, _opt_ptr->road_side, 11, i, 0);
+		} return;
+		case 13: case 14: { /* Setup townname dropdown */
+			int i = _opt_ptr->town_name;
+			ShowDropDownMenu(w, BuildDynamicDropdown(STR_TOWNNAME_ORIGINAL_ENGLISH, SPECSTR_TOWNNAME_LAST - SPECSTR_TOWNNAME_START + 1), i, 14, (_game_mode == GM_MENU) ? 0 : (-1) ^ (1 << i), 0);
+			return;
+		}
+		case 16: case 17: /* Setup autosave dropdown */
+			ShowDropDownMenu(w, _autosave_dropdown, _opt_ptr->autosave, 17, 0, 0);
+			return;
+		case 19: case 20: /* Setup customized vehicle-names dropdown */
+			ShowDropDownMenu(w, _designnames_dropdown, (_vehicle_design_names & 1) ? 1 : 0, 20, (_vehicle_design_names & 2) ? 0 : 2, 0);
+			return;
+		case 21: /* Save customized vehicle-names to disk */
+			return;
+		case 23: case 24: /* Setup interface language dropdown */
+			ShowDropDownMenu(w, _dynlang.dropdown, _dynlang.curr, 24, 0, 0);
+			return;
+		case 26: case 27: /* Setup resolution dropdown */
+			ShowDropDownMenu(w, BuildDynamicDropdown(SPECSTR_RESOLUTION_START, _num_resolutions), GetCurRes(), 27, 0, 0);
+			return;
+		case 28: /* Click fullscreen on/off */
+			SetWindowWidgetLoweredState(w, 28, !_fullscreen);
+			ToggleFullScreen(!_fullscreen); // toggle full-screen on/off
+			SetWindowDirty(w);
+			return;
+		case 30: case 31: /* Setup screenshot format dropdown */
+			ShowDropDownMenu(w, BuildDynamicDropdown(SPECSTR_SCREENSHOT_START, _num_screenshot_formats), _cur_screenshot_format, 31, 0, 0);
+			return;
+		}
+		break;
+
+	case WE_DROPDOWN_SELECT:
+		switch (e->we.dropdown.button) {
+		case 20: /* Vehicle design names */
+			if (e->we.dropdown.index == 0) {
+				DeleteCustomEngineNames();
+				MarkWholeScreenDirty();
+			} else if (!(_vehicle_design_names & 1)) {
+				LoadCustomEngineNames();
+				MarkWholeScreenDirty();
+			}
+			break;
+		case 5: /* Currency */
+			if (e->we.dropdown.index == CUSTOM_CURRENCY_ID) ShowCustCurrency();
+			_opt_ptr->currency = e->we.dropdown.index;
+			MarkWholeScreenDirty();
+			break;
+		case 8: /* Measuring units */
+			_opt_ptr->units = e->we.dropdown.index;
+			MarkWholeScreenDirty();
+			break;
+		case 11: /* Road side */
+			if (_opt_ptr->road_side != e->we.dropdown.index) { // only change if setting changed
+				DoCommandP(0, e->we.dropdown.index, 0, NULL, CMD_SET_ROAD_DRIVE_SIDE | CMD_MSG(STR_00B4_CAN_T_DO_THIS));
+				MarkWholeScreenDirty();
+			}
+			break;
+		case 14: /* Town names */
+			if (_game_mode == GM_MENU) {
+				_opt_ptr->town_name = e->we.dropdown.index;
+				InvalidateWindow(WC_GAME_OPTIONS, 0);
+			}
+			break;
+		case 17: /* Autosave options */
+			_opt.autosave = _opt_newgame.autosave = e->we.dropdown.index;
+			SetWindowDirty(w);
+			break;
+		case 24: /* Change interface language */
+			ReadLanguagePack(e->we.dropdown.index);
+			MarkWholeScreenDirty();
+			break;
+		case 27: /* Change resolution */
+			if (e->we.dropdown.index < _num_resolutions && ChangeResInGame(_resolutions[e->we.dropdown.index][0],_resolutions[e->we.dropdown.index][1]))
+				SetWindowDirty(w);
+			break;
+		case 31: /* Change screenshot format */
+			SetScreenshotFormat(e->we.dropdown.index);
+			SetWindowDirty(w);
+			break;
+		}
+		break;
+
+	case WE_DESTROY:
+		DeleteWindowById(WC_CUSTOM_CURRENCY, 0);
+		break;
+	}
+
+}
+
+/** Change the side of the road vehicles drive on (server only).
+ * @param tile unused
+ * @param p1 the side of the road; 0 = left side and 1 = right side
+ * @param p2 unused
+ */
+int32 CmdSetRoadDriveSide(TileIndex tile, uint32 flags, uint32 p1, uint32 p2)
+{
+	/* Check boundaries and you can only change this if NO vehicles have been built yet,
+	 * except in the intro-menu where of course it's always possible to do so. */
+	if (p1 > 1 || (_game_mode != GM_MENU && RoadVehiclesAreBuilt())) return CMD_ERROR;
+
+	if (flags & DC_EXEC) {
+		_opt_ptr->road_side = p1;
+		InvalidateWindow(WC_GAME_OPTIONS,0);
+	}
+	return 0;
+}
+
+static const Widget _game_options_widgets[] = {
+{   WWT_CLOSEBOX,   RESIZE_NONE,    14,     0,    10,     0,    13, STR_00C5,                          STR_018B_CLOSE_WINDOW},
+{    WWT_CAPTION,   RESIZE_NONE,    14,    11,   369,     0,    13, STR_00B1_GAME_OPTIONS,             STR_018C_WINDOW_TITLE_DRAG_THIS},
+{      WWT_PANEL,   RESIZE_NONE,    14,     0,   369,    14,   238, 0x0,                               STR_NULL},
+{      WWT_FRAME,   RESIZE_NONE,    14,    10,   179,    20,    55, STR_02E0_CURRENCY_UNITS,           STR_NULL},
+{      WWT_INSET,   RESIZE_NONE,    14,    20,   169,    34,    45, STR_02E1,                          STR_02E2_CURRENCY_UNITS_SELECTION},
+{    WWT_TEXTBTN,   RESIZE_NONE,    14,   158,   168,    35,    44, STR_0225,                          STR_02E2_CURRENCY_UNITS_SELECTION},
+{      WWT_FRAME,   RESIZE_NONE,    14,   190,   359,    20,    55, STR_MEASURING_UNITS,               STR_NULL},
+{      WWT_INSET,   RESIZE_NONE,    14,   200,   349,    34,    45, STR_02E4,                          STR_MEASURING_UNITS_SELECTION},
+{    WWT_TEXTBTN,   RESIZE_NONE,    14,   338,   348,    35,    44, STR_0225,                          STR_MEASURING_UNITS_SELECTION},
+{      WWT_FRAME,   RESIZE_NONE,    14,    10,   179,    62,    97, STR_02E6_ROAD_VEHICLES,            STR_NULL},
+{      WWT_INSET,   RESIZE_NONE,    14,    20,   169,    76,    87, STR_02E7,                          STR_02E8_SELECT_SIDE_OF_ROAD_FOR},
+{    WWT_TEXTBTN,   RESIZE_NONE,    14,   158,   168,    77,    86, STR_0225,                          STR_02E8_SELECT_SIDE_OF_ROAD_FOR},
+{      WWT_FRAME,   RESIZE_NONE,    14,   190,   359,    62,    97, STR_02EB_TOWN_NAMES,               STR_NULL},
+{      WWT_INSET,   RESIZE_NONE,    14,   200,   349,    76,    87, STR_02EC,                          STR_02ED_SELECT_STYLE_OF_TOWN_NAMES},
+{    WWT_TEXTBTN,   RESIZE_NONE,    14,   338,   348,    77,    86, STR_0225,                          STR_02ED_SELECT_STYLE_OF_TOWN_NAMES},
+{      WWT_FRAME,   RESIZE_NONE,    14,    10,   179,   104,   139, STR_02F4_AUTOSAVE,                 STR_NULL},
+{      WWT_INSET,   RESIZE_NONE,    14,    20,   169,   118,   129, STR_02F5,                          STR_02F6_SELECT_INTERVAL_BETWEEN},
+{    WWT_TEXTBTN,   RESIZE_NONE,    14,   158,   168,   119,   128, STR_0225,                          STR_02F6_SELECT_INTERVAL_BETWEEN},
+
+{      WWT_FRAME,   RESIZE_NONE,    14,    10,   359,   194,   228, STR_02BC_VEHICLE_DESIGN_NAMES,     STR_NULL},
+{      WWT_INSET,   RESIZE_NONE,    14,    20,   119,   207,   218, STR_02BD,                          STR_02C1_VEHICLE_DESIGN_NAMES_SELECTION},
+{    WWT_TEXTBTN,   RESIZE_NONE,    14,   108,   118,   208,   217, STR_0225,                          STR_02C1_VEHICLE_DESIGN_NAMES_SELECTION},
+{    WWT_TEXTBTN,   RESIZE_NONE,    14,   130,   349,   207,   218, STR_02C0_SAVE_CUSTOM_NAMES,        STR_02C2_SAVE_CUSTOMIZED_VEHICLE},
+
+{      WWT_FRAME,   RESIZE_NONE,    14,   190,   359,   104,   139, STR_OPTIONS_LANG,                  STR_NULL},
+{      WWT_INSET,   RESIZE_NONE,    14,   200,   349,   118,   129, STR_OPTIONS_LANG_CBO,              STR_OPTIONS_LANG_TIP},
+{    WWT_TEXTBTN,   RESIZE_NONE,    14,   338,   348,   119,   128, STR_0225,                          STR_OPTIONS_LANG_TIP},
+
+{      WWT_FRAME,   RESIZE_NONE,    14,    10,   179,   146,   190, STR_OPTIONS_RES,                   STR_NULL},
+{      WWT_INSET,   RESIZE_NONE,    14,    20,   169,   160,   171, STR_OPTIONS_RES_CBO,               STR_OPTIONS_RES_TIP},
+{    WWT_TEXTBTN,   RESIZE_NONE,    14,   158,   168,   161,   170, STR_0225,                          STR_OPTIONS_RES_TIP},
+{    WWT_TEXTBTN,   RESIZE_NONE,    14,   149,   169,   176,   184, STR_EMPTY,                         STR_OPTIONS_FULLSCREEN_TIP},
+
+{      WWT_FRAME,   RESIZE_NONE,    14,   190,   359,   146,   190, STR_OPTIONS_SCREENSHOT_FORMAT,     STR_NULL},
+{      WWT_INSET,   RESIZE_NONE,    14,   200,   349,   160,   171, STR_OPTIONS_SCREENSHOT_FORMAT_CBO, STR_OPTIONS_SCREENSHOT_FORMAT_TIP},
+{    WWT_TEXTBTN,   RESIZE_NONE,    14,   338,   348,   161,   170, STR_0225,                          STR_OPTIONS_SCREENSHOT_FORMAT_TIP},
+
+{   WIDGETS_END},
+};
+
+static const WindowDesc _game_options_desc = {
+	WDP_CENTER, WDP_CENTER, 370, 239,
+	WC_GAME_OPTIONS,0,
+	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,
+	_game_options_widgets,
+	GameOptionsWndProc
+};
+
+
+void ShowGameOptions(void)
+{
+	DeleteWindowById(WC_GAME_OPTIONS, 0);
+	AllocateWindowDesc(&_game_options_desc);
+}
+
+typedef struct {
+	int16 min;
+	int16 max;
+	int16 step;
+	StringID str;
+} GameSettingData;
+
+static const GameSettingData _game_setting_info[] = {
+	{  0,   7,  1, STR_NULL},
+	{  0,   3,  1, STR_6830_IMMEDIATE},
+	{  0,   2,  1, STR_6816_LOW},
+	{  0,   3,  1, STR_26816_NONE},
+	{100, 500, 50, STR_NULL},
+	{  2,   4,  1, STR_NULL},
+	{  0,   2,  1, STR_6820_LOW},
+	{  0,   4,  1, STR_681B_VERY_SLOW},
+	{  0,   2,  1, STR_6820_LOW},
+	{  0,   2,  1, STR_6823_NONE},
+	{  0,   3,  1, STR_6826_X1_5},
+	{  0,   2,  1, STR_6820_LOW},
+	{  0,   3,  1, STR_682A_VERY_FLAT},
+	{  0,   3,  1, STR_VERY_LOW},
+	{  0,   1,  1, STR_682E_STEADY},
+	{  0,   1,  1, STR_6834_AT_END_OF_LINE_AND_AT_STATIONS},
+	{  0,   1,  1, STR_6836_OFF},
+	{  0,   2,  1, STR_6839_PERMISSIVE},
+};
+
+static inline bool GetBitAndShift(uint32 *b)
+{
+	uint32 x = *b;
+	*b >>= 1;
+	return HASBIT(x, 0);
+}
+
+/*
+ * A: competitors
+ * B: start time in months / 3
+ * C: town count (2 = high, 0 = low)
+ * D: industry count (3 = high, 0 = none)
+ * E: inital loan / 1000 (in GBP)
+ * F: interest rate
+ * G: running costs (0 = low, 2 = high)
+ * H: construction speed of competitors (0 = very slow, 4 = very fast)
+ * I: intelligence (0-2)
+ * J: breakdowns (0 = off, 2 = normal)
+ * K: subsidy multiplier (0 = 1.5, 3 = 4.0)
+ * L: construction cost (0-2)
+ * M: terrain type (0 = very flat, 3 = mountainous)
+ * N: amount of water (0 = very low, 3 = high)
+ * O: economy (0 = steady, 1 = fluctuating)
+ * P: Train reversing (0 = end of line + stations, 1 = end of line)
+ * Q: disasters
+ * R: area restructuring (0 = permissive, 2 = hostile)
+ */
+static const int16 _default_game_diff[3][GAME_DIFFICULTY_NUM] = { /*
+	 A, B, C, D,   E, F, G, H, I, J, K, L, M, N, O, P, Q, R*/
+	{2, 2, 1, 3, 300, 2, 0, 2, 0, 1, 2, 0, 1, 0, 0, 0, 0, 0}, //easy
+	{4, 1, 1, 2, 150, 3, 1, 3, 1, 2, 1, 1, 2, 1, 1, 1, 1, 1}, //medium
+	{7, 0, 2, 2, 100, 4, 1, 3, 2, 2, 0, 2, 3, 2, 1, 1, 1, 2}, //hard
+};
+
+void SetDifficultyLevel(int mode, GameOptions *gm_opt)
+{
+	int i;
+	assert(mode <= 3);
+
+	gm_opt->diff_level = mode;
+	if (mode != 3) { // not custom
+		for (i = 0; i != GAME_DIFFICULTY_NUM; i++)
+			((int*)&gm_opt->diff)[i] = _default_game_diff[mode][i];
+	}
+}
+
+extern void StartupEconomy(void);
+
+enum {
+	GAMEDIFF_WND_TOP_OFFSET = 45,
+	GAMEDIFF_WND_ROWSIZE    = 9
+};
+
+// Temporary holding place of values in the difficulty window until 'Save' is clicked
+static GameOptions _opt_mod_temp;
+// 0x383E = (1 << 13) | (1 << 12) | (1 << 11) | (1 << 5) | (1 << 4) | (1 << 3) | (1 << 2) | (1 << 1)
+#define DIFF_INGAME_DISABLED_BUTTONS 0x383E
+
+static void GameDifficultyWndProc(Window *w, WindowEvent *e)
+{
+	switch (e->event) {
+	case WE_CREATE: // Setup disabled buttons when creating window
+		/* disable all other difficulty buttons during gameplay except for 'custom' */
+		SetWindowWidgetDisabledState(w,  3, _game_mode == GM_NORMAL);
+		SetWindowWidgetDisabledState(w,  4, _game_mode == GM_NORMAL);
+		SetWindowWidgetDisabledState(w,  5, _game_mode == GM_NORMAL);
+		SetWindowWidgetDisabledState(w,  6, _game_mode == GM_NORMAL);
+		SetWindowWidgetDisabledState(w,  7, _game_mode == GM_EDITOR || _networking); // highscore chart in multiplayer
+		SetWindowWidgetDisabledState(w, 10, _networking && !_network_server); // Save-button in multiplayer (and if client)
+
+		break;
+	case WE_PAINT: {
+		uint32 click_a, click_b, disabled;
+		int i;
+		int y, value;
+
+		DrawWindowWidgets(w);
+
+		click_a = _difficulty_click_a;
+		click_b = _difficulty_click_b;
+
+		/* XXX - Disabled buttons in normal gameplay. Bitshifted for each button to see if
+		 * that bit is set. If it is set, the button is disabled */
+		disabled = (_game_mode == GM_NORMAL) ? DIFF_INGAME_DISABLED_BUTTONS : 0;
+
+		y = GAMEDIFF_WND_TOP_OFFSET;
+		for (i = 0; i != GAME_DIFFICULTY_NUM; i++) {
+			DrawFrameRect( 5, y,  5 + 8, y + 8, 3, GetBitAndShift(&click_a) ? FR_LOWERED : 0);
+			DrawFrameRect(15, y, 15 + 8, y + 8, 3, GetBitAndShift(&click_b) ? FR_LOWERED : 0);
+			if (GetBitAndShift(&disabled) || (_networking && !_network_server)) {
+				int color = PALETTE_MODIFIER_GREYOUT | _colour_gradient[COLOUR_YELLOW][2];
+				GfxFillRect( 6, y + 1,  6 + 8, y + 8, color);
+				GfxFillRect(16, y + 1, 16 + 8, y + 8, color);
+			}
+
+			DrawStringCentered(10, y, STR_6819, 0);
+			DrawStringCentered(20, y, STR_681A, 0);
+
+
+			value = _game_setting_info[i].str + ((int*)&_opt_mod_temp.diff)[i];
+			if (i == 4) value *= 1000; // XXX - handle currency option
+			SetDParam(0, value);
+			DrawString(30, y, STR_6805_MAXIMUM_NO_COMPETITORS + i, 0);
+
+			y += GAMEDIFF_WND_ROWSIZE + 2; // space items apart a bit
+		}
+	} break;
+
+	case WE_CLICK:
+		switch (e->we.click.widget) {
+		case 8: { /* Difficulty settings widget, decode click */
+			const GameSettingData *info;
+			int x, y;
+			uint btn, dis;
+			int val;
+
+			// Don't allow clients to make any changes
+			if  (_networking && !_network_server)
+				return;
+
+			x = e->we.click.pt.x - 5;
+			if (!IS_INT_INSIDE(x, 0, 21)) // Button area
+				return;
+
+			y = e->we.click.pt.y - GAMEDIFF_WND_TOP_OFFSET;
+			if (y < 0)
+				return;
+
+			// Get button from Y coord.
+			btn = y / (GAMEDIFF_WND_ROWSIZE + 2);
+			if (btn >= GAME_DIFFICULTY_NUM || y % (GAMEDIFF_WND_ROWSIZE + 2) >= 9)
+				return;
+
+			// Clicked disabled button?
+			dis = (_game_mode == GM_NORMAL) ? DIFF_INGAME_DISABLED_BUTTONS : 0;
+
+			if (HASBIT(dis, btn))
+				return;
+
+			_difficulty_timeout = 5;
+
+			val = ((int*)&_opt_mod_temp.diff)[btn];
+
+			info = &_game_setting_info[btn]; // get information about the difficulty setting
+			if (x >= 10) {
+				// Increase button clicked
+				val = min(val + info->step, info->max);
+				SETBIT(_difficulty_click_b, btn);
+			} else {
+				// Decrease button clicked
+				val = max(val - info->step, info->min);
+				SETBIT(_difficulty_click_a, btn);
+			}
+
+			// save value in temporary variable
+			((int*)&_opt_mod_temp.diff)[btn] = val;
+			SetDifficultyLevel(3, &_opt_mod_temp); // set difficulty level to custom
+			SetWindowDirty(w);
+		}	break;
+		case 3: case 4: case 5: case 6: /* Easy / Medium / Hard / Custom */
+			// temporarily change difficulty level
+			RaiseWindowWidget(w, _opt_mod_temp.diff_level + 3);
+			SetDifficultyLevel(e->we.click.widget - 3, &_opt_mod_temp);
+			LowerWindowWidget(w, _opt_mod_temp.diff_level + 3);
+			SetWindowDirty(w);
+			break;
+		case 7: /* Highscore Table */
+			ShowHighscoreTable(_opt_mod_temp.diff_level, -1);
+			break;
+		case 10: { /* Save button - save changes */
+			int btn, val;
+			for (btn = 0; btn != GAME_DIFFICULTY_NUM; btn++) {
+				val = ((int*)&_opt_mod_temp.diff)[btn];
+				// if setting has changed, change it
+				if (val != ((int*)&_opt_ptr->diff)[btn])
+					DoCommandP(0, btn, val, NULL, CMD_CHANGE_DIFFICULTY_LEVEL);
+			}
+			DoCommandP(0, -1, _opt_mod_temp.diff_level, NULL, CMD_CHANGE_DIFFICULTY_LEVEL);
+			DeleteWindow(w);
+			// If we are in the editor, we should reload the economy.
+			//  This way when you load a game, the max loan and interest rate
+			//  are loaded correctly.
+			if (_game_mode == GM_EDITOR)
+				StartupEconomy();
+			break;
+		}
+		case 11: /* Cancel button - close window, abandon changes */
+			DeleteWindow(w);
+			break;
+	} break;
+
+	case WE_MOUSELOOP: /* Handle the visual 'clicking' of the buttons */
+		if (_difficulty_timeout != 0 && !--_difficulty_timeout) {
+			_difficulty_click_a = 0;
+			_difficulty_click_b = 0;
+			SetWindowDirty(w);
+		}
+		break;
+	}
+}
+
+#undef DIFF_INGAME_DISABLED_BUTTONS
+
+static const Widget _game_difficulty_widgets[] = {
+{   WWT_CLOSEBOX,   RESIZE_NONE,    10,     0,    10,     0,    13, STR_00C5,                     STR_018B_CLOSE_WINDOW},
+{    WWT_CAPTION,   RESIZE_NONE,    10,    11,   369,     0,    13, STR_6800_DIFFICULTY_LEVEL,    STR_018C_WINDOW_TITLE_DRAG_THIS},
+{      WWT_PANEL,   RESIZE_NONE,    10,     0,   369,    14,    29, 0x0,                          STR_NULL},
+{ WWT_PUSHTXTBTN,   RESIZE_NONE,     3,    10,    96,    16,    27, STR_6801_EASY,                STR_NULL},
+{ WWT_PUSHTXTBTN,   RESIZE_NONE,     3,    97,   183,    16,    27, STR_6802_MEDIUM,              STR_NULL},
+{ WWT_PUSHTXTBTN,   RESIZE_NONE,     3,   184,   270,    16,    27, STR_6803_HARD,                STR_NULL},
+{ WWT_PUSHTXTBTN,   RESIZE_NONE,     3,   271,   357,    16,    27, STR_6804_CUSTOM,              STR_NULL},
+{    WWT_TEXTBTN,   RESIZE_NONE,    10,     0,   369,    30,    41, STR_6838_SHOW_HI_SCORE_CHART, STR_NULL},
+{      WWT_PANEL,   RESIZE_NONE,    10,     0,   369,    42,   262, 0x0,                          STR_NULL},
+{      WWT_PANEL,   RESIZE_NONE,    10,     0,   369,   263,   278, 0x0,                          STR_NULL},
+{ WWT_PUSHTXTBTN,   RESIZE_NONE,     3,   105,   185,   265,   276, STR_OPTIONS_SAVE_CHANGES,     STR_NULL},
+{ WWT_PUSHTXTBTN,   RESIZE_NONE,     3,   186,   266,   265,   276, STR_012E_CANCEL,              STR_NULL},
+{   WIDGETS_END},
+};
+
+static const WindowDesc _game_difficulty_desc = {
+	WDP_CENTER, WDP_CENTER, 370, 279,
+	WC_GAME_OPTIONS,0,
+	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,
+	_game_difficulty_widgets,
+	GameDifficultyWndProc
+};
+
+void ShowGameDifficulty(void)
+{
+	DeleteWindowById(WC_GAME_OPTIONS, 0);
+	/* Copy current settings (ingame or in intro) to temporary holding place
+	 * change that when setting stuff, copy back on clicking 'OK' */
+	_opt_mod_temp = *_opt_ptr;
+	AllocateWindowDesc(&_game_difficulty_desc);
+}
+
+static const char *_patches_ui[] = {
+	"vehicle_speed",
+	"status_long_date",
+	"show_finances",
+	"autoscroll",
+	"reverse_scroll",
+	"errmsg_duration",
+	"toolbar_pos",
+	"measure_tooltip",
+	"window_snap_radius",
+	"invisible_trees",
+	"population_in_label",
+	"link_terraform_toolbar",
+	"liveries",
+	"prefer_teamchat",
+};
+
+static const char *_patches_construction[] = {
+	"build_on_slopes",
+	"extra_dynamite",
+	"longbridges",
+	"signal_side",
+	"always_small_airport",
+	"drag_signals_density",
+	"oil_refinery_limit",
+};
+
+static const char *_patches_stations[] = {
+	"join_stations",
+	"full_load_any",
+	"improved_load",
+	"selectgoods",
+	"new_nonstop",
+	"nonuniform_stations",
+	"station_spread",
+	"serviceathelipad",
+	"modified_catchment",
+	"gradual_loading",
+};
+
+static const char *_patches_economy[] = {
+	"inflation",
+	"build_rawmaterial_ind",
+	"multiple_industry_per_town",
+	"same_industry_close",
+	"bribe",
+	"colored_news_year",
+	"ending_year",
+	"smooth_economy",
+	"allow_shares",
+};
+
+static const char *_patches_ai[] = {
+	"ainew_active",
+	"ai_in_multiplayer",
+	"ai_disable_veh_train",
+	"ai_disable_veh_roadveh",
+	"ai_disable_veh_aircraft",
+	"ai_disable_veh_ship",
+};
+
+static const char *_patches_vehicles[] = {
+	"realistic_acceleration",
+	"forbid_90_deg",
+	"mammoth_trains",
+	"gotodepot",
+	"roadveh_queue",
+	"new_pathfinding_all",
+	"yapf.ship_use_yapf",
+	"yapf.road_use_yapf",
+	"yapf.rail_use_yapf",
+	"train_income_warn",
+	"order_review_system",
+	"never_expire_vehicles",
+	"lost_train_warn",
+	"autorenew",
+	"autorenew_months",
+	"autorenew_money",
+	"max_trains",
+	"max_roadveh",
+	"max_aircraft",
+	"max_ships",
+	"servint_ispercent",
+	"servint_trains",
+	"servint_roadveh",
+	"servint_ships",
+	"servint_aircraft",
+	"no_servicing_if_no_breakdowns",
+	"wagon_speed_limits",
+	"disable_elrails",
+	"freight_trains",
+};
+
+typedef struct PatchEntry {
+	const SettingDesc *setting;
+	uint index;
+} PatchEntry;
+
+typedef struct PatchPage {
+	const char **names;
+	PatchEntry *entries;
+	byte num;
+} PatchPage;
+
+/* PatchPage holds the categories, the number of elements in each category
+ * and (in NULL) a dynamic array of settings based on the string-representations
+ * of the settings. This way there is no worry about indeces, and such */
+static PatchPage _patches_page[] = {
+	{_patches_ui,           NULL, lengthof(_patches_ui)},
+	{_patches_construction, NULL, lengthof(_patches_construction)},
+	{_patches_vehicles,     NULL, lengthof(_patches_vehicles)},
+	{_patches_stations,     NULL, lengthof(_patches_stations)},
+	{_patches_economy,      NULL, lengthof(_patches_economy)},
+	{_patches_ai,           NULL, lengthof(_patches_ai)},
+};
+
+/** The main patches window. Shows a number of categories on top and
+ * a selection of patches in that category.
+ * Uses WP(w, def_d) macro - data_1, data_2, data_3 */
+static void PatchesSelectionWndProc(Window *w, WindowEvent *e)
+{
+	static Patches *patches_ptr;
+
+	switch (e->event) {
+	case WE_CREATE: {
+		static bool first_time = true;
+
+		patches_ptr = (_game_mode == GM_MENU) ? &_patches_newgame : &_patches;
+
+		/* Build up the dynamic settings-array only once per OpenTTD session */
+		if (first_time) {
+			PatchPage *page;
+			for (page = &_patches_page[0]; page != endof(_patches_page); page++) {
+				uint i;
+
+				page->entries = malloc(page->num * sizeof(*page->entries));
+				for (i = 0; i != page->num; i++) {
+					uint index;
+					const SettingDesc *sd = GetPatchFromName(page->names[i], &index);
+					assert(sd != NULL);
+
+					page->entries[i].setting = sd;
+					page->entries[i].index = index;
+				}
+			}
+			first_time = false;
+		}
+		LowerWindowWidget(w, 4);
+	} break;
+
+	case WE_PAINT: {
+		int x, y;
+		const PatchPage *page = &_patches_page[WP(w,def_d).data_1];
+		uint i;
+
+		/* Set up selected category */
+		DrawWindowWidgets(w);
+
+		x = 5;
+		y = 47;
+		for (i = 0; i != page->num; i++) {
+			const SettingDesc *sd = page->entries[i].setting;
+			const SettingDescBase *sdb = &sd->desc;
+			const void *var = GetVariableAddress(patches_ptr, &sd->save);
+			bool editable = true;
+			bool disabled = false;
+
+			// We do not allow changes of some items when we are a client in a networkgame
+			if (!(sd->save.conv & SLF_NETWORK_NO) && _networking && !_network_server) editable = false;
+			if ((sdb->flags & SGF_NETWORK_ONLY) && !_networking) editable = false;
+
+			if (sdb->cmd == SDT_BOOLX) {
+				static const int _bool_ctabs[2][2] = {{9, 4}, {7, 6}};
+				/* Draw checkbox for boolean-value either on/off */
+				bool on = (*(bool*)var);
+
+				DrawFrameRect(x, y, x + 19, y + 8, _bool_ctabs[!!on][!!editable], on ? FR_LOWERED : 0);
+				SetDParam(0, on ? STR_CONFIG_PATCHES_ON : STR_CONFIG_PATCHES_OFF);
+			} else {
+				int32 value;
+
+				value = (int32)ReadValue(var, sd->save.conv);
+
+				/* Draw [<][>] boxes for settings of an integer-type */
+				DrawArrowButtons(x, y, 3, WP(w,def_d).data_2 - (i * 2), (editable && value != sdb->min), (editable && value != sdb->max));
+
+				disabled = (value == 0) && (sdb->flags & SGF_0ISDISABLED);
+				if (disabled) {
+					SetDParam(0, STR_CONFIG_PATCHES_DISABLED);
+				} else {
+					if (sdb->flags & SGF_CURRENCY) {
+						SetDParam(0, STR_CONFIG_PATCHES_CURRENCY);
+					} else if (sdb->flags & SGF_MULTISTRING) {
+						SetDParam(0, sdb->str + value + 1);
+					} else {
+						SetDParam(0, (sdb->flags & SGF_NOCOMMA) ? STR_CONFIG_PATCHES_INT32 : STR_7024);
+					}
+					SetDParam(1, value);
+				}
+			}
+			DrawString(30, y, (sdb->str) + disabled, 0);
+			y += 11;
+		}
+		break;
+	}
+
+	case WE_CLICK:
+		switch (e->we.click.widget) {
+		case 3: {
+			const PatchPage *page = &_patches_page[WP(w,def_d).data_1];
+			const SettingDesc *sd;
+			void *var;
+			int32 value;
+			int x, y;
+			byte btn;
+
+			y = e->we.click.pt.y - 46 - 1;
+			if (y < 0) return;
+
+			x = e->we.click.pt.x - 5;
+			if (x < 0) return;
+
+			btn = y / 11;
+			if (y % 11 > 9) return;
+			if (btn >= page->num) return;
+
+			sd = page->entries[btn].setting;
+
+			/* return if action is only active in network, or only settable by server */
+			if ((sd->desc.flags & SGF_NETWORK_ONLY) && !_networking) return;
+			if (!(sd->save.conv & SLF_NETWORK_NO) && _networking && !_network_server) return;
+
+			var = GetVariableAddress(patches_ptr, &sd->save);
+			value = (int32)ReadValue(var, sd->save.conv);
+
+			/* clicked on the icon on the left side. Either scroller or bool on/off */
+			if (x < 21) {
+				const SettingDescBase *sdb = &sd->desc;
+				int32 oldvalue = value;
+
+				switch (sdb->cmd) {
+				case SDT_BOOLX: value ^= 1; break;
+				case SDT_NUMX: {
+					/* Add a dynamic step-size to the scroller. In a maximum of
+					 * 50-steps you should be able to get from min to max,
+					 * unless specified otherwise in the 'interval' variable
+					 * of the current patch. */
+					uint32 step = (sdb->interval == 0) ? ((sdb->max - sdb->min) / 50) : sdb->interval;
+					if (step == 0) step = 1;
+
+					// don't allow too fast scrolling
+					if ((w->flags4 & WF_TIMEOUT_MASK) > 2 << WF_TIMEOUT_SHL) {
+						_left_button_clicked = false;
+						return;
+					}
+
+					/* Increase or decrease the value and clamp it to extremes */
+					if (x >= 10) {
+						value += step;
+						if (value > sdb->max) value = sdb->max;
+					} else {
+						value -= step;
+						if (value < sdb->min) value = (sdb->flags & SGF_0ISDISABLED) ? 0 : sdb->min;
+					}
+
+					/* Set up scroller timeout */
+					if (value != oldvalue) {
+						WP(w,def_d).data_2 = btn * 2 + 1 + ((x >= 10) ? 1 : 0);
+						w->flags4 |= 5 << WF_TIMEOUT_SHL;
+						_left_button_clicked = false;
+					}
+				} break;
+				default: NOT_REACHED();
+				}
+
+				if (value != oldvalue) {
+					SetPatchValue(page->entries[btn].index, patches_ptr, value);
+					SetWindowDirty(w);
+				}
+			} else {
+				/* only open editbox for types that its sensible for */
+				if (sd->desc.cmd != SDT_BOOLX && !(sd->desc.flags & SGF_MULTISTRING)) {
+					/* Show the correct currency-translated value */
+					if (sd->desc.flags & SGF_CURRENCY) value *= _currency->rate;
+
+					WP(w,def_d).data_3 = btn;
+					SetDParam(0, value);
+					ShowQueryString(STR_CONFIG_PATCHES_INT32, STR_CONFIG_PATCHES_QUERY_CAPT, 10, 100, w, CS_NUMERAL);
+				}
+			}
+
+			break;
+		}
+		case 4: case 5: case 6: case 7: case 8: case 9:
+			RaiseWindowWidget(w, WP(w, def_d).data_1 + 4);
+			WP(w, def_d).data_1 = e->we.click.widget - 4;
+			LowerWindowWidget(w, WP(w, def_d).data_1 + 4);
+			DeleteWindowById(WC_QUERY_STRING, 0);
+			SetWindowDirty(w);
+			break;
+		}
+		break;
+
+	case WE_TIMEOUT:
+		WP(w,def_d).data_2 = 0;
+		SetWindowDirty(w);
+		break;
+
+	case WE_ON_EDIT_TEXT: {
+		if (e->we.edittext.str != NULL) {
+			const PatchEntry *pe = &_patches_page[WP(w,def_d).data_1].entries[WP(w,def_d).data_3];
+			const SettingDesc *sd = pe->setting;
+			int32 value = atoi(e->we.edittext.str);
+
+			/* Save the correct currency-translated value */
+			if (sd->desc.flags & SGF_CURRENCY) value /= _currency->rate;
+
+			SetPatchValue(pe->index, patches_ptr, value);
+			SetWindowDirty(w);
+		}
+		break;
+	}
+
+	case WE_DESTROY:
+		DeleteWindowById(WC_QUERY_STRING, 0);
+		break;
+	}
+}
+
+static const Widget _patches_selection_widgets[] = {
+{   WWT_CLOSEBOX,   RESIZE_NONE,    10,     0,    10,     0,    13, STR_00C5,                        STR_018B_CLOSE_WINDOW},
+{    WWT_CAPTION,   RESIZE_NONE,    10,    11,   369,     0,    13, STR_CONFIG_PATCHES_CAPTION,      STR_018C_WINDOW_TITLE_DRAG_THIS},
+{      WWT_PANEL,   RESIZE_NONE,    10,     0,   369,    14,    41, 0x0,                             STR_NULL},
+{      WWT_PANEL,   RESIZE_NONE,    10,     0,   369,    42,   370, 0x0,                             STR_NULL},
+
+{    WWT_TEXTBTN,   RESIZE_NONE,     3,    10,    96,    16,    27, STR_CONFIG_PATCHES_GUI,          STR_NULL},
+{    WWT_TEXTBTN,   RESIZE_NONE,     3,    97,   183,    16,    27, STR_CONFIG_PATCHES_CONSTRUCTION, STR_NULL},
+{    WWT_TEXTBTN,   RESIZE_NONE,     3,   184,   270,    16,    27, STR_CONFIG_PATCHES_VEHICLES,     STR_NULL},
+{    WWT_TEXTBTN,   RESIZE_NONE,     3,   271,   357,    16,    27, STR_CONFIG_PATCHES_STATIONS,     STR_NULL},
+{    WWT_TEXTBTN,   RESIZE_NONE,     3,    10,    96,    28,    39, STR_CONFIG_PATCHES_ECONOMY,      STR_NULL},
+{    WWT_TEXTBTN,   RESIZE_NONE,     3,    97,   183,    28,    39, STR_CONFIG_PATCHES_AI,           STR_NULL},
+{   WIDGETS_END},
+};
+
+static const WindowDesc _patches_selection_desc = {
+	WDP_CENTER, WDP_CENTER, 370, 371,
+	WC_GAME_OPTIONS,0,
+	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,
+	_patches_selection_widgets,
+	PatchesSelectionWndProc,
+};
+
+void ShowPatchesSelection(void)
+{
+	DeleteWindowById(WC_GAME_OPTIONS, 0);
+	AllocateWindowDesc(&_patches_selection_desc);
+}
+
+
+/**
+ * Draw [<][>] boxes.
+ * @param x the x position to draw
+ * @param y the y position to draw
+ * @param ctab the color of the buttons
+ * @param state 0 = none clicked, 1 = first clicked, 2 = second clicked
+ * @param clickable_left is the left button clickable?
+ * @param clickable_right is the right button clickable?
+ */
+void DrawArrowButtons(int x, int y, int ctab, byte state, bool clickable_left, bool clickable_right)
+{
+	int color = PALETTE_MODIFIER_GREYOUT | _colour_gradient[COLOUR_YELLOW][2];
+
+	DrawFrameRect(x,      y + 1, x +  9, y + 9, ctab, (state == 1) ? FR_LOWERED : 0);
+	DrawFrameRect(x + 10, y + 1, x + 19, y + 9, ctab, (state == 2) ? FR_LOWERED : 0);
+	DrawStringCentered(x +  5, y + 1, STR_6819, 0); // [<]
+	DrawStringCentered(x + 15, y + 1, STR_681A, 0); // [>]
+
+	/* Grey out the buttons that aren't clickable */
+	if (!clickable_left)
+		GfxFillRect(x +  1, y + 1, x +  1 + 8, y + 8, color);
+	if (!clickable_right)
+		GfxFillRect(x + 11, y + 1, x + 11 + 8, y + 8, color);
+}
+
+static char _str_separator[2];
+
+static void CustCurrencyWndProc(Window *w, WindowEvent *e)
+{
+	switch (e->event) {
+		case WE_PAINT: {
+			int x;
+			int y = 20;
+			int clk = WP(w,def_d).data_1;
+			DrawWindowWidgets(w);
+
+			// exchange rate
+			DrawArrowButtons(10, y, 3, GB(clk, 0, 2), true, true);
+			SetDParam(0, 1);
+			SetDParam(1, 1);
+			DrawString(35, y + 1, STR_CURRENCY_EXCHANGE_RATE, 0);
+			y += 12;
+
+			// separator
+			DrawFrameRect(10, y + 1, 29, y + 9, 0, GB(clk, 2, 2) ? FR_LOWERED : 0);
+			x = DrawString(35, y + 1, STR_CURRENCY_SEPARATOR, 0);
+			DoDrawString(_str_separator, x + 4, y + 1, 6);
+			y += 12;
+
+			// prefix
+			DrawFrameRect(10, y + 1, 29, y + 9, 0, GB(clk, 4, 2) ? FR_LOWERED : 0);
+			x = DrawString(35, y + 1, STR_CURRENCY_PREFIX, 0);
+			DoDrawString(_custom_currency.prefix, x + 4, y + 1, 6);
+			y += 12;
+
+			// suffix
+			DrawFrameRect(10, y + 1, 29, y + 9, 0, GB(clk, 6, 2) ? FR_LOWERED : 0);
+			x = DrawString(35, y + 1, STR_CURRENCY_SUFFIX, 0);
+			DoDrawString(_custom_currency.suffix, x + 4, y + 1, 6);
+			y += 12;
+
+			// switch to euro
+			DrawArrowButtons(10, y, 3, GB(clk, 8, 2), true, true);
+			SetDParam(0, _custom_currency.to_euro);
+			DrawString(35, y + 1, (_custom_currency.to_euro != CF_NOEURO) ? STR_CURRENCY_SWITCH_TO_EURO : STR_CURRENCY_SWITCH_TO_EURO_NEVER, 0);
+			y += 12;
+
+			// Preview
+			y += 12;
+			SetDParam(0, 10000);
+			DrawString(35, y + 1, STR_CURRENCY_PREVIEW, 0);
+			break;
+		}
+
+		case WE_CLICK: {
+			int line = (e->we.click.pt.y - 20) / 12;
+			int len = 0;
+			int x = e->we.click.pt.x;
+			StringID str = 0;
+			CharSetFilter afilter = CS_ALPHANUMERAL;
+
+			switch (line) {
+				case 0: // rate
+					if (IS_INT_INSIDE(x, 10, 30)) { // clicked buttons
+						if (x < 20) {
+							if (_custom_currency.rate > 1) _custom_currency.rate--;
+							WP(w,def_d).data_1 = 1 << (line * 2 + 0);
+						} else {
+							if (_custom_currency.rate < 5000) _custom_currency.rate++;
+							WP(w,def_d).data_1 = 1 << (line * 2 + 1);
+						}
+					} else { // enter text
+						SetDParam(0, _custom_currency.rate);
+						str = STR_CONFIG_PATCHES_INT32;
+						len = 4;
+						afilter = CS_NUMERAL;
+					}
+					break;
+
+				case 1: // separator
+					if (IS_INT_INSIDE(x, 10, 30)) { // clicked button
+						WP(w,def_d).data_1 = 1 << (line * 2 + 1);
+					}
+					str = BindCString(_str_separator);
+					len = 1;
+					break;
+
+				case 2: // prefix
+					if (IS_INT_INSIDE(x, 10, 30)) { // clicked button
+						WP(w,def_d).data_1 = 1 << (line * 2 + 1);
+					}
+					str = BindCString(_custom_currency.prefix);
+					len = 12;
+					break;
+
+				case 3: // suffix
+					if (IS_INT_INSIDE(x, 10, 30)) { // clicked button
+						WP(w,def_d).data_1 = 1 << (line * 2 + 1);
+					}
+					str = BindCString(_custom_currency.suffix);
+					len = 12;
+					break;
+
+				case 4: // to euro
+					if (IS_INT_INSIDE(x, 10, 30)) { // clicked buttons
+						if (x < 20) {
+							_custom_currency.to_euro = (_custom_currency.to_euro <= 2000) ?
+								CF_NOEURO : _custom_currency.to_euro - 1;
+							WP(w,def_d).data_1 = 1 << (line * 2 + 0);
+						} else {
+							_custom_currency.to_euro =
+								clamp(_custom_currency.to_euro + 1, 2000, MAX_YEAR);
+							WP(w,def_d).data_1 = 1 << (line * 2 + 1);
+						}
+					} else { // enter text
+						SetDParam(0, _custom_currency.to_euro);
+						str = STR_CONFIG_PATCHES_INT32;
+						len = 4;
+						afilter = CS_NUMERAL;
+					}
+					break;
+			}
+
+			if (len != 0) {
+				WP(w, def_d).data_2 = line;
+				ShowQueryString(str, STR_CURRENCY_CHANGE_PARAMETER, len + 1, 250, w, afilter);
+			}
+
+			w->flags4 |= 5 << WF_TIMEOUT_SHL;
+			SetWindowDirty(w);
+			break;
+		}
+
+		case WE_ON_EDIT_TEXT: {
+				const char *b = e->we.edittext.str;
+
+				switch (WP(w,def_d).data_2) {
+					case 0: /* Exchange rate */
+						_custom_currency.rate = clamp(atoi(b), 1, 5000);
+						break;
+
+					case 1: /* Thousands seperator */
+						_custom_currency.separator = (b[0] == '\0') ? ' ' : b[0];
+						ttd_strlcpy(_str_separator, b, lengthof(_str_separator));
+						break;
+
+					case 2: /* Currency prefix */
+						ttd_strlcpy(_custom_currency.prefix, b, lengthof(_custom_currency.prefix));
+						break;
+
+					case 3: /* Currency suffix */
+						ttd_strlcpy(_custom_currency.suffix, b, lengthof(_custom_currency.suffix));
+						break;
+
+					case 4: { /* Year to switch to euro */
+						int val = atoi(b);
+
+						_custom_currency.to_euro =
+							(val < 2000 ? CF_NOEURO : min(val, MAX_YEAR));
+						break;
+					}
+				}
+			MarkWholeScreenDirty();
+			break;
+		}
+
+		case WE_TIMEOUT:
+			WP(w,def_d).data_1 = 0;
+			SetWindowDirty(w);
+			break;
+
+		case WE_DESTROY:
+			DeleteWindowById(WC_QUERY_STRING, 0);
+			MarkWholeScreenDirty();
+			break;
+	}
+}
+
+static const Widget _cust_currency_widgets[] = {
+{   WWT_CLOSEBOX,   RESIZE_NONE,    14,     0,    10,     0,    13, STR_00C5,            STR_018B_CLOSE_WINDOW},
+{    WWT_CAPTION,   RESIZE_NONE,    14,    11,   229,     0,    13, STR_CURRENCY_WINDOW, STR_018C_WINDOW_TITLE_DRAG_THIS},
+{      WWT_PANEL,   RESIZE_NONE,    14,     0,   229,    14,   119, 0x0,                 STR_NULL},
+{   WIDGETS_END},
+};
+
+static const WindowDesc _cust_currency_desc = {
+	WDP_CENTER, WDP_CENTER, 230, 120,
+	WC_CUSTOM_CURRENCY, 0,
+	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,
+	_cust_currency_widgets,
+	CustCurrencyWndProc,
+};
+
+static void ShowCustCurrency(void)
+{
+	_str_separator[0] = _custom_currency.separator;
+	_str_separator[1] = '\0';
+
+	DeleteWindowById(WC_CUSTOM_CURRENCY, 0);
+	AllocateWindowDesc(&_cust_currency_desc);
+}