summaryrefslogtreecommitdiff
path: root/src/misc_gui.c
diff options
context:
space:
mode:
authorrubidium <rubidium@openttd.org>2007-01-02 19:19:48 +0000
committerrubidium <rubidium@openttd.org>2007-01-02 19:19:48 +0000
commit66bbf336c6af7353ef0aeed58002c46543b30635 (patch)
treead4a63860df2626b22f77e7dac712e958bea54cb /src/misc_gui.c
parentccc0a3f4dbf58c005b22341ac8874252924690cd (diff)
downloadopenttd-66bbf336c6af7353ef0aeed58002c46543b30635.tar.xz
(svn r7759) -Merge: makefile rewrite. This merge features:
- A proper ./configure, so everything needs to be configured only once, not for every make. - Usage of makedepend when available. This greatly reduces the time needed for generating the dependencies. - A generator for all project files. There is a single file with sources, which is used to generate Makefiles and the project files for MSVC. - Proper support for OSX universal binaries. - Object files for non-MSVC compiles are also placed in separate directories, making is faster to switch between debug and release compiles and it does not touch the directory with the source files. - Functionality to make a bundle of all needed files for for example a nightly or distribution of a binary with all needed GRFs and language files. Note: as this merge moves almost all files, it is recommended to make a backup of your working copy before updating your working copy.
Diffstat (limited to 'src/misc_gui.c')
-rw-r--r--src/misc_gui.c1912
1 files changed, 1912 insertions, 0 deletions
diff --git a/src/misc_gui.c b/src/misc_gui.c
new file mode 100644
index 000000000..693272c2f
--- /dev/null
+++ b/src/misc_gui.c
@@ -0,0 +1,1912 @@
+/* $Id$ */
+
+#include "stdafx.h"
+#include "openttd.h"
+#include "hal.h"
+#include "heightmap.h"
+#include "debug.h"
+#include "functions.h"
+#include "newgrf.h"
+#include "saveload.h"
+#include "strings.h"
+#include "table/sprites.h"
+#include "table/strings.h"
+#include "table/tree_land.h"
+#include "map.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 "sound.h"
+#include "network/network.h"
+#include "string.h"
+#include "variables.h"
+#include "vehicle.h"
+#include "train.h"
+#include "tgp.h"
+#include "settings.h"
+#include "date.h"
+
+#include "fios.h"
+/* Variables to display file lists */
+FiosItem *_fios_list;
+int _saveload_mode;
+
+extern void GenerateLandscape(byte mode);
+extern void SwitchMode(int new_mode);
+
+static bool _fios_path_changed;
+static bool _savegame_sort_dirty;
+
+typedef struct LandInfoData {
+ Town *town;
+ int32 costclear;
+ AcceptedCargo ac;
+ TileIndex tile;
+ TileDesc td;
+} LandInfoData;
+
+static void LandInfoWndProc(Window *w, WindowEvent *e)
+{
+ if (e->event == WE_PAINT) {
+ const LandInfoData *lid;
+ StringID str;
+ int i;
+
+ DrawWindowWidgets(w);
+
+ lid = WP(w,void_d).data;
+
+ SetDParam(0, lid->td.dparam[0]);
+ DrawStringCentered(140, 16, lid->td.str, 13);
+
+ SetDParam(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 (!CmdFailed(lid->costclear)) {
+ SetDParam(0, lid->costclear);
+ str = STR_01A5_COST_TO_CLEAR;
+ }
+ DrawStringCentered(140, 38, str, 0);
+
+ snprintf(_userstring, lengthof(_userstring), "0x%.4X", lid->tile);
+ SetDParam(0, TileX(lid->tile));
+ SetDParam(1, TileY(lid->tile));
+ SetDParam(2, STR_SPEC_USERSTRING);
+ DrawStringCentered(140, 49, STR_LANDINFO_COORDS, 0);
+
+ SetDParam(0, STR_01A9_NONE);
+ if (lid->town != NULL) {
+ SetDParam(0, STR_TOWN);
+ SetDParam(1, lid->town->index);
+ }
+ DrawStringCentered(140,60, STR_01A8_LOCAL_AUTHORITY, 0);
+
+ {
+ char buf[512];
+ char *p = GetString(buf, STR_01CE_CARGO_ACCEPTED, lastof(buf));
+ bool found = false;
+
+ for (i = 0; i < NUM_CARGO; ++i) {
+ if (lid->ac[i] > 0) {
+ // Add a comma between each item.
+ if (found) {
+ *p++ = ',';
+ *p++ = ' ';
+ }
+ found = true;
+
+ // If the accepted value is less than 8, show it in 1/8:ths
+ if (lid->ac[i] < 8) {
+ SetDParam(0, lid->ac[i]);
+ SetDParam(1, _cargoc.names_s[i]);
+ p = GetString(p, STR_01D1_8, lastof(buf));
+ } else {
+ p = GetString(p, _cargoc.names_s[i], lastof(buf));
+ }
+ }
+ }
+
+ if (found) DrawStringMultiCenter(140, 76, BindCString(buf), 276);
+ }
+
+ if (lid->td.build_date != 0) {
+ SetDParam(0,lid->td.build_date);
+ DrawStringCentered(140,71, STR_BUILD_DATE, 0);
+ }
+ }
+}
+
+static const Widget _land_info_widgets[] = {
+{ WWT_CLOSEBOX, RESIZE_NONE, 14, 0, 10, 0, 13, STR_00C5, STR_018B_CLOSE_WINDOW},
+{ WWT_CAPTION, RESIZE_NONE, 14, 11, 279, 0, 13, STR_01A3_LAND_AREA_INFORMATION, STR_018C_WINDOW_TITLE_DRAG_THIS},
+{ WWT_PANEL, RESIZE_NONE, 14, 0, 279, 14, 92, 0x0, STR_NULL},
+{ WIDGETS_END},
+};
+
+static const WindowDesc _land_info_desc = {
+ WDP_AUTO, WDP_AUTO, 280, 93,
+ WC_LAND_INFO,0,
+ WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,
+ _land_info_widgets,
+ LandInfoWndProc
+};
+
+static void Place_LandInfo(TileIndex 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);
+
+ p = GetPlayer(IsValidPlayer(_local_player) ? _local_player : 0);
+
+ old_money = p->money64;
+ p->money64 = p->player_money = 0x7fffffff;
+ lid.costclear = DoCommand(tile, 0, 0, 0, CMD_LANDSCAPE_CLEAR);
+ p->money64 = old_money;
+ UpdatePlayerMoney32(p);
+
+ // Becuase build_date is not set yet in every TileDesc, we make sure it is empty
+ lid.td.build_date = 0;
+
+ GetAcceptedCargo(tile, lid.ac);
+ GetTileDesc(tile, &lid.td);
+
+#if defined(_DEBUG)
+# define LANDINFOD_LEVEL 0
+#else
+# define LANDINFOD_LEVEL 1
+#endif
+ DEBUG(misc, LANDINFOD_LEVEL, "TILE: %#x (%i,%i)", tile, TileX(tile), TileY(tile));
+ DEBUG(misc, LANDINFOD_LEVEL, "type_height = %#x", _m[tile].type_height);
+ DEBUG(misc, LANDINFOD_LEVEL, "m1 = %#x", _m[tile].m1);
+ DEBUG(misc, LANDINFOD_LEVEL, "m2 = %#x", _m[tile].m2);
+ DEBUG(misc, LANDINFOD_LEVEL, "m3 = %#x", _m[tile].m3);
+ DEBUG(misc, LANDINFOD_LEVEL, "m4 = %#x", _m[tile].m4);
+ DEBUG(misc, LANDINFOD_LEVEL, "m5 = %#x", _m[tile].m5);
+ DEBUG(misc, LANDINFOD_LEVEL, "extra = %#x", _m[tile].extra);
+#undef LANDINFOD_LEVEL
+}
+
+void PlaceLandBlockInfo(void)
+{
+ if (_cursor.sprite == SPR_CURSOR_QUERY) {
+ ResetObjectToPlace();
+ } else {
+ _place_proc = Place_LandInfo;
+ SetObjectToPlace(SPR_CURSOR_QUERY, 1, 1, 0);
+ }
+}
+
+static const char *credits[] = {
+ /*************************************************************************
+ * maximum length of string which fits in window -^*/
+ "Original design by Chris Sawyer",
+ "Original graphics by Simon Foster",
+ "",
+ "The OpenTTD team (in alphabetical order):",
+ " Jean-Francois Claeys (Belugas) - In training, not yet specialized",
+ " Bjarni Corfitzen (Bjarni) - MacOSX port, coder",
+ " Matthijs Kooijman (blathijs) - Pathfinder-guru",
+ " Victor Fischer (Celestar) - Programming everywhere you need him to",
+ " Tamás Faragó (Darkvater) - Lead coder",
+ " Loïc Guilloux (glx) - In training, not yet specialized",
+ " Jaroslav Mazanec (KUDr) - YAPG (Yet Another Pathfinder God) ;)",
+ " Attila Bán (MiHaMiX) - WebTranslator, Nightlies, Wiki and bugtracker host",
+ " Peter Nelson (peter1138) - Spiritual descendant from newgrf gods",
+ " Remko Bijker (Rubidium) - Belugas code scrutinizer",
+ " Christoph Mallon (Tron) - Programmer, code correctness police",
+ " Patric Stout (TrueLight) - Coder, network guru, SVN- and website host",
+ "",
+ "Retired Developers:",
+ " Ludvig Strigeus (ludde) - OpenTTD author, main coder (0.1 - 0.3.3)",
+ " Serge Paquet (vurlix) - Assistant project manager, coder (0.1 - 0.3.3)",
+ " Dominik Scherer (dominik81) - Lead programmer, GUI expert (0.3.0 - 0.3.6)",
+ " Owen Rudge (orudge) - Forum- and masterserver host, OS/2 port (0.1 - 0.4.8)",
+ "",
+ "Special thanks go out to:",
+ " Josef Drexler - For his great work on TTDPatch",
+ " Marcin Grzegorczyk - For his documentation of TTD internals",
+ " Petr Baudis (pasky) - Many patches, newgrf support",
+ " Stefan Meißner (sign_de) - For his work on the console",
+ " Simon Sasburg (HackyKid) - Many bugfixes he has blessed us with (and PBS)",
+ " Cian Duffy (MYOB) - BeOS port / manual writing",
+ " Christian Rosentreter (tokai) - MorphOS / AmigaOS port",
+ " Richard Kempton (richK) - additional airports, initial TGP implementation",
+ "",
+ " Michael Blunck - Pre-Signals and Semaphores © 2003",
+ " George - Canal/Lock graphics © 2003-2004",
+ " Marcin Grzegorczyk - Foundations for Tracks on Slopes",
+ " All Translators - Who made OpenTTD a truly international game",
+ " Bug Reporters - Without whom OpenTTD would still be full of bugs!",
+ "",
+ "",
+ "And last but not least:",
+ " Chris Sawyer - For an amazing game!"
+};
+
+static void AboutWindowProc(Window *w, WindowEvent *e)
+{
+ switch (e->event) {
+ case WE_CREATE: /* Set up window counter and start position of scroller */
+ WP(w, scroller_d).counter = 0;
+ WP(w, scroller_d).height = w->height - 40;
+ break;
+ case WE_PAINT: {
+ uint i;
+ int y = WP(w, scroller_d).height;
+ DrawWindowWidgets(w);
+
+ // Show original copyright and revision version
+ DrawStringCentered(210, 17, STR_00B6_ORIGINAL_COPYRIGHT, 0);
+ DrawStringCentered(210, 17 + 10, STR_00B7_VERSION, 0);
+
+ // Show all scrolling credits
+ for (i = 0; i < lengthof(credits); i++) {
+ if (y >= 50 && y < (w->height - 40)) {
+ DoDrawString(credits[i], 10, y, 0x10);
+ }
+ y += 10;
+ }
+
+ // If the last text has scrolled start anew from the start
+ if (y < 50) WP(w, scroller_d).height = w->height - 40;
+
+ DoDrawStringCentered(210, w->height - 25, "Website: http://www.openttd.org", 16);
+ DrawStringCentered(210, w->height - 15, STR_00BA_COPYRIGHT_OPENTTD, 0);
+ } break;
+ case WE_MOUSELOOP: /* Timer to scroll the text and adjust the new top */
+ if (WP(w, scroller_d).counter++ % 3 == 0) {
+ WP(w, scroller_d).height--;
+ SetWindowDirty(w);
+ }
+ break;
+ }
+}
+
+static const Widget _about_widgets[] = {
+{ WWT_CLOSEBOX, RESIZE_NONE, 14, 0, 10, 0, 13, STR_00C5, STR_018B_CLOSE_WINDOW},
+{ WWT_CAPTION, RESIZE_NONE, 14, 11, 419, 0, 13, STR_015B_OPENTTD, STR_NULL},
+{ WWT_PANEL, RESIZE_NONE, 14, 0, 419, 14, 271, 0x0, STR_NULL},
+{ WWT_FRAME, RESIZE_NONE, 14, 5, 414, 40, 245, STR_NULL, STR_NULL},
+{ WIDGETS_END},
+};
+
+static const WindowDesc _about_desc = {
+ WDP_CENTER, WDP_CENTER, 420, 272,
+ WC_GAME_OPTIONS,0,
+ WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,
+ _about_widgets,
+ AboutWindowProc
+};
+
+
+void ShowAboutWindow(void)
+{
+ DeleteWindowById(WC_GAME_OPTIONS, 0);
+ AllocateWindowDesc(&_about_desc);
+}
+
+static int _tree_to_plant;
+
+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, 0x7A5 | PALETTE_TO_GREEN, 0x7AC | PALETTE_TO_RED, 0x7B3, 0x7BA, 0x7C1 | PALETTE_TO_RED, 0x7C8 | PALETTE_TO_PALE_GREEN, 0x7CF | PALETTE_TO_YELLOW, 0x7D6 | PALETTE_TO_RED
+};
+
+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 = e->we.click.widget;
+
+ switch (wid) {
+ case 0:
+ ResetObjectToPlace();
+ break;
+
+ 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 (wid - 3 >= WP(w,tree_d).count) break;
+
+ if (HandlePlacePushButton(w, wid, SPR_CURSOR_TREE, 1, NULL))
+ _tree_to_plant = WP(w,tree_d).base + wid - 3;
+ break;
+
+ case 15: // tree of random type.
+ if (HandlePlacePushButton(w, 15, SPR_CURSOR_TREE, 1, NULL))
+ _tree_to_plant = -1;
+ break;
+
+ case 16: /* place trees randomly over the landscape*/
+ LowerWindowWidget(w, 16);
+ w->flags4 |= 5 << WF_TIMEOUT_SHL;
+ SndPlayFx(SND_15_BEEP);
+ PlaceTreesRandomly();
+ MarkWholeScreenDirty();
+ break;
+ }
+ } break;
+
+ case WE_PLACE_OBJ:
+ VpStartPlaceSizing(e->we.place.tile, VPM_X_AND_Y_LIMITED);
+ VpSetPlaceSizingLimit(20);
+ break;
+
+ case WE_PLACE_DRAG:
+ VpSelectTilesWithMethod(e->we.place.pt.x, e->we.place.pt.y, e->we.place.userdata);
+ return;
+
+ case WE_PLACE_MOUSEUP:
+ if (e->we.place.pt.x != -1) {
+ DoCommandP(e->we.place.tile, _tree_to_plant, e->we.place.starttile, NULL,
+ CMD_PLANT_TREE | CMD_AUTO | CMD_MSG(STR_2805_CAN_T_PLANT_TREE_HERE));
+ }
+ break;
+
+ case WE_TIMEOUT:
+ RaiseWindowWidget(w, 16);
+ break;
+
+ case WE_ABORT_PLACE_OBJ:
+ RaiseWindowButtons(w);
+ break;
+ }
+}
+
+static const Widget _build_trees_widgets[] = {
+{ WWT_CLOSEBOX, RESIZE_NONE, 7, 0, 10, 0, 13, STR_00C5, STR_018B_CLOSE_WINDOW},
+{ WWT_CAPTION, RESIZE_NONE, 7, 11, 142, 0, 13, STR_2802_TREES, STR_018C_WINDOW_TITLE_DRAG_THIS},
+{ WWT_PANEL, RESIZE_NONE, 7, 0, 142, 14, 170, 0x0, STR_NULL},
+{ WWT_PANEL, RESIZE_NONE, 14, 2, 35, 16, 61, 0x0, STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{ WWT_PANEL, RESIZE_NONE, 14, 37, 70, 16, 61, 0x0, STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{ WWT_PANEL, RESIZE_NONE, 14, 72, 105, 16, 61, 0x0, STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{ WWT_PANEL, RESIZE_NONE, 14, 107, 140, 16, 61, 0x0, STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{ WWT_PANEL, RESIZE_NONE, 14, 2, 35, 63, 108, 0x0, STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{ WWT_PANEL, RESIZE_NONE, 14, 37, 70, 63, 108, 0x0, STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{ WWT_PANEL, RESIZE_NONE, 14, 72, 105, 63, 108, 0x0, STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{ WWT_PANEL, RESIZE_NONE, 14, 107, 140, 63, 108, 0x0, STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{ WWT_PANEL, RESIZE_NONE, 14, 2, 35, 110, 155, 0x0, STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{ WWT_PANEL, RESIZE_NONE, 14, 37, 70, 110, 155, 0x0, STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{ WWT_PANEL, RESIZE_NONE, 14, 72, 105, 110, 155, 0x0, STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{ WWT_PANEL, RESIZE_NONE, 14, 107, 140, 110, 155, 0x0, STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{ WWT_TEXTBTN, RESIZE_NONE, 14, 2, 140, 157, 168, STR_TREES_RANDOM_TYPE, STR_TREES_RANDOM_TYPE_TIP},
+{ WIDGETS_END},
+};
+
+static const WindowDesc _build_trees_desc = {
+ 497, 22, 143, 171,
+ WC_BUILD_TREES, WC_SCEN_LAND_GEN,
+ WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,
+ _build_trees_widgets,
+ BuildTreesWndProc
+};
+
+static const Widget _build_trees_scen_widgets[] = {
+{ WWT_CLOSEBOX, RESIZE_NONE, 7, 0, 10, 0, 13, STR_00C5, STR_018B_CLOSE_WINDOW},
+{ WWT_CAPTION, RESIZE_NONE, 7, 11, 142, 0, 13, STR_2802_TREES, STR_018C_WINDOW_TITLE_DRAG_THIS},
+{ WWT_PANEL, RESIZE_NONE, 7, 0, 142, 14, 183, 0x0, STR_NULL},
+{ WWT_PANEL, RESIZE_NONE, 14, 2, 35, 16, 61, 0x0, STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{ WWT_PANEL, RESIZE_NONE, 14, 37, 70, 16, 61, 0x0, STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{ WWT_PANEL, RESIZE_NONE, 14, 72, 105, 16, 61, 0x0, STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{ WWT_PANEL, RESIZE_NONE, 14, 107, 140, 16, 61, 0x0, STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{ WWT_PANEL, RESIZE_NONE, 14, 2, 35, 63, 108, 0x0, STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{ WWT_PANEL, RESIZE_NONE, 14, 37, 70, 63, 108, 0x0, STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{ WWT_PANEL, RESIZE_NONE, 14, 72, 105, 63, 108, 0x0, STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{ WWT_PANEL, RESIZE_NONE, 14, 107, 140, 63, 108, 0x0, STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{ WWT_PANEL, RESIZE_NONE, 14, 2, 35, 110, 155, 0x0, STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{ WWT_PANEL, RESIZE_NONE, 14, 37, 70, 110, 155, 0x0, STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{ WWT_PANEL, RESIZE_NONE, 14, 72, 105, 110, 155, 0x0, STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{ WWT_PANEL, RESIZE_NONE, 14, 107, 140, 110, 155, 0x0, STR_280D_SELECT_TREE_TYPE_TO_PLANT},
+{ WWT_TEXTBTN, RESIZE_NONE, 14, 2, 140, 157, 168, STR_TREES_RANDOM_TYPE, STR_TREES_RANDOM_TYPE_TIP},
+{ WWT_TEXTBTN, RESIZE_NONE, 14, 2, 140, 170, 181, STR_028A_RANDOM_TREES, STR_028B_PLANT_TREES_RANDOMLY_OVER},
+{ WIDGETS_END},
+};
+
+static const WindowDesc _build_trees_scen_desc = {
+ WDP_AUTO, WDP_AUTO, 143, 184,
+ WC_BUILD_TREES,0,
+ WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,
+ _build_trees_scen_widgets,
+ BuildTreesWndProc
+};
+
+
+void ShowBuildTreesToolbar(void)
+{
+ if (!IsValidPlayer(_current_player)) return;
+ AllocateWindowDescFront(&_build_trees_desc, 0);
+}
+
+void ShowBuildTreesScenToolbar(void)
+{
+ AllocateWindowDescFront(&_build_trees_scen_desc, 0);
+}
+
+static uint32 _errmsg_decode_params[20];
+static StringID _errmsg_message_1, _errmsg_message_2;
+static uint _errmsg_duration;
+
+
+static const Widget _errmsg_widgets[] = {
+{ WWT_CLOSEBOX, RESIZE_NONE, 4, 0, 10, 0, 13, STR_00C5, STR_018B_CLOSE_WINDOW},
+{ WWT_CAPTION, RESIZE_NONE, 4, 11, 239, 0, 13, STR_00B2_MESSAGE, STR_NULL},
+{ WWT_PANEL, RESIZE_NONE, 4, 0, 239, 14, 45, 0x0, STR_NULL},
+{ WIDGETS_END},
+};
+
+static const Widget _errmsg_face_widgets[] = {
+{ WWT_CLOSEBOX, RESIZE_NONE, 4, 0, 10, 0, 13, STR_00C5, STR_018B_CLOSE_WINDOW},
+{ WWT_CAPTION, RESIZE_NONE, 4, 11, 333, 0, 13, STR_00B3_MESSAGE_FROM, STR_NULL},
+{ WWT_PANEL, RESIZE_NONE, 4, 0, 333, 14, 136, 0x0, STR_NULL},
+{ WIDGETS_END},
+};
+
+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 (!IsWindowOfPrototype(w, _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 {
+ const Player *p = GetPlayer(GetDParamX(_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 == 0) DeleteWindow(w);
+ break;
+
+ case WE_DESTROY:
+ SetRedErrorSquare(0);
+ _switch_mode_errorstr = INVALID_STRING_ID;
+ break;
+
+ case WE_KEYPRESS:
+ if (e->we.keypress.keycode == WKC_SPACE) {
+ // Don't continue.
+ e->we.keypress.cont = false;
+ DeleteWindow(w);
+ }
+ break;
+ }
+}
+
+void ShowErrorMessage(StringID msg_1, StringID msg_2, int x, int y)
+{
+ Window *w;
+ const 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 || GetDParamX(_errmsg_decode_params,2) >= 8) {
+
+ if ( (x|y) != 0) {
+ pt = RemapCoords2(x, y);
+ vp = FindWindowById(WC_MAIN_WINDOW, 0)->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);
+ vp = FindWindowById(WC_MAIN_WINDOW, 0)->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)
+{
+ StringID msg = STR_0805_ESTIMATED_COST;
+
+ if (cost < 0) {
+ cost = -cost;
+ msg = STR_0807_ESTIMATED_INCOME;
+ }
+ SetDParam(0, cost);
+ ShowErrorMessage(INVALID_STRING_ID, msg, x, y);
+}
+
+void ShowCostOrIncomeAnimation(int x, int y, int z, int32 cost)
+{
+ StringID msg;
+ Point pt = RemapCoords(x,y,z);
+
+ msg = STR_0801_COST;
+ if (cost < 0) {
+ cost = -cost;
+ msg = STR_0803_INCOME;
+ }
+ SetDParam(0, cost);
+ AddTextEffect(msg, pt.x, pt.y, 0x250);
+}
+
+void ShowFeederIncomeAnimation(int x, int y, int z, int32 cost)
+{
+ Point pt = RemapCoords(x,y,z);
+
+ SetDParam(0, cost);
+ AddTextEffect(STR_FEEDER, pt.x, pt.y, 0x250);
+}
+
+static const Widget _tooltips_widgets[] = {
+{ WWT_PANEL, RESIZE_NONE, 14, 0, 199, 0, 31, 0x0, STR_NULL},
+{ WIDGETS_END},
+};
+
+
+static void TooltipsWndProc(Window *w, WindowEvent *e)
+{
+ switch (e->event) {
+ case WE_PAINT: {
+ uint arg;
+ GfxFillRect(0, 0, w->width - 1, w->height - 1, 0);
+ GfxFillRect(1, 1, w->width - 2, w->height - 2, 0x44);
+
+ for (arg = 0; arg < WP(w, tooltips_d).paramcount; arg++) {
+ SetDParam(arg, WP(w, tooltips_d).params[arg]);
+ }
+ DrawStringMultiCenter((w->width >> 1), (w->height >> 1) - 5, WP(w, tooltips_d).string_id, 197);
+ break;
+ }
+
+ case WE_MOUSELOOP:
+ /* We can show tooltips while dragging tools. These are shown as long as
+ * we are dragging the tool. Normal tooltips work with rmb */
+ if (WP(w, tooltips_d).paramcount == 0 ) {
+ if (!_right_button_down) DeleteWindow(w);
+ } else {
+ if (!_left_button_down) DeleteWindow(w);
+ }
+
+ break;
+ }
+}
+
+/** Shows a tooltip
+* @param str String to be displayed
+* @param params (optional) up to 5 pieces of additional information that may be
+* added to a tooltip; currently only supports parameters of {NUM} (integer) */
+void GuiShowTooltipsWithArgs(StringID str, uint paramcount, const uint32 params[])
+{
+ char buffer[512];
+ BoundingRect br;
+ Window *w;
+ uint i;
+ int x, y;
+
+ DeleteWindowById(WC_TOOLTIPS, 0);
+
+ /* We only show measurement tooltips with patch setting on */
+ if (str == STR_NULL || (paramcount != 0 && !_patches.measure_tooltip)) return;
+
+ for (i = 0; i != paramcount; i++) SetDParam(i, params[i]);
+ GetString(buffer, str, lastof(buffer));
+
+ br = GetStringBoundingBox(buffer);
+ br.width += 6; br.height += 4; // increase slightly to have some space around the box
+
+ /* Cut tooltip length to 200 pixels max, wrap to new line if longer */
+ if (br.width > 200) {
+ br.height += ((br.width - 4) / 176) * 10;
+ br.width = 200;
+ }
+
+ /* Correctly position the tooltip position, watch out for window and cursor size
+ * Clamp value to below main toolbar and above statusbar. If tooltip would
+ * go below window, flip it so it is shown above the cursor */
+ y = clamp(_cursor.pos.y + _cursor.size.y + _cursor.offs.y + 5, 22, _screen.height - 12);
+ if (y + br.height > _screen.height - 12) y = _cursor.pos.y + _cursor.offs.y - br.height - 5;
+ x = clamp(_cursor.pos.x - (br.width >> 1), 0, _screen.width - br.width);
+
+ w = AllocateWindow(x, y, br.width, br.height, TooltipsWndProc, WC_TOOLTIPS, _tooltips_widgets);
+
+ WP(w, tooltips_d).string_id = str;
+ assert(sizeof(WP(w, tooltips_d).params[0]) == sizeof(params[0]));
+ memcpy(WP(w, tooltips_d).params, params, sizeof(WP(w, tooltips_d).params[0]) * paramcount);
+ WP(w, tooltips_d).paramcount = paramcount;
+
+ w->flags4 &= ~WF_WHITE_BORDER_MASK; // remove white-border from tooltip
+ w->widget[0].right = br.width;
+ w->widget[0].bottom = br.height;
+}
+
+
+static void DrawStationCoverageText(const AcceptedCargo accepts,
+ int str_x, int str_y, uint mask)
+{
+ char *b = _userstring;
+ bool first = true;
+ int i;
+
+ b = InlineString(b, STR_000D_ACCEPTS);
+
+ for (i = 0; i != NUM_CARGO; i++, mask >>= 1) {
+ if (b >= lastof(_userstring) - 5) break;
+ if (accepts[i] >= 8 && mask & 1) {
+ if (first) {
+ first = false;
+ } else {
+ /* Add a comma if this is not the first item */
+ *b++ = ',';
+ *b++ = ' ';
+ }
+ b = InlineString(b, _cargoc.names_s[i]);
+ }
+ }
+
+ /* If first is still true then no cargo is accepted */
+ if (first) b = InlineString(b, STR_00D0_NOTHING);
+
+ *b = '\0';
+ DrawStringMultiLine(str_x, str_y, STR_SPEC_USERSTRING, 144);
+}
+
+void DrawStationCoverageAreaText(int sx, int sy, uint mask, int rad) {
+ TileIndex tile = TileVirtXY(_thd.pos.x, _thd.pos.y);
+ AcceptedCargo accepts;
+ if (tile < MapSize()) {
+ GetAcceptanceAroundTiles(accepts, tile, _thd.size.x / TILE_SIZE, _thd.size.y / TILE_SIZE , rad);
+ DrawStationCoverageText(accepts, sx, sy, mask);
+ }
+}
+
+void CheckRedrawStationCoverage(const Window *w)
+{
+ if (_thd.dirty & 1) {
+ _thd.dirty &= ~1;
+ SetWindowDirty(w);
+ }
+}
+
+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 SetVScroll2Count(Window *w, int num)
+{
+ w->vscroll2.count = num;
+ num -= w->vscroll2.cap;
+ if (num < 0) num = 0;
+ if (num < w->vscroll2.pos) w->vscroll2.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;
+}
+
+/* Delete a character at the caret position in a text buf.
+ * If backspace is set, delete the character before the caret,
+ * else delete the character after it. */
+static void DelChar(Textbuf *tb, bool backspace)
+{
+ WChar c;
+ uint width;
+ size_t len;
+
+ if (backspace) {
+ do {
+ tb->caretpos--;
+ } while (IsUtf8Part(*(tb->buf + tb->caretpos)));
+ }
+
+ len = Utf8Decode(&c, tb->buf + tb->caretpos);
+ width = GetCharacterWidth(FS_NORMAL, c);
+
+ tb->width -= width;
+ if (backspace) tb->caretxoffs -= width;
+
+ /* Move the remaining characters over the marker */
+ memmove(tb->buf + tb->caretpos, tb->buf + tb->caretpos + len, tb->length - tb->caretpos - len + 1);
+ tb->length -= len;
+}
+
+/**
+ * Delete a character from a textbuffer, either with 'Delete' or 'Backspace'
+ * The character is delete from the position the caret is at
+ * @param tb @Textbuf type to be changed
+ * @param delmode Type of deletion, either @WKC_BACKSPACE or @WKC_DELETE
+ * @return Return true on successfull change of Textbuf, or false otherwise
+ */
+bool DeleteTextBufferChar(Textbuf *tb, int delmode)
+{
+ if (delmode == WKC_BACKSPACE && tb->caretpos != 0) {
+ DelChar(tb, true);
+ return true;
+ } else if (delmode == WKC_DELETE && tb->caretpos < tb->length) {
+ DelChar(tb, false);
+ return true;
+ }
+
+ return false;
+}
+
+/**
+ * Delete every character in the textbuffer
+ * @param tb @Textbuf buffer to be emptied
+ */
+void DeleteTextBufferAll(Textbuf *tb)
+{
+ memset(tb->buf, 0, tb->maxlength);
+ tb->length = tb->width = 0;
+ tb->caretpos = tb->caretxoffs = 0;
+}
+
+/**
+ * Insert a character to a textbuffer. If maxwidth of the Textbuf is zero,
+ * we don't care about the visual-length but only about the physical
+ * length of the string
+ * @param tb @Textbuf type to be changed
+ * @param key Character to be inserted
+ * @return Return true on successfull change of Textbuf, or false otherwise
+ */
+bool InsertTextBufferChar(Textbuf *tb, WChar key)
+{
+ const byte charwidth = GetCharacterWidth(FS_NORMAL, key);
+ size_t len = Utf8CharLen(key);
+ if (tb->length < (tb->maxlength - len) && (tb->maxwidth == 0 || tb->width + charwidth <= tb->maxwidth)) {
+ memmove(tb->buf + tb->caretpos + len, tb->buf + tb->caretpos, tb->length - tb->caretpos + 1);
+ Utf8Encode(tb->buf + tb->caretpos, key);
+ tb->length += len;
+ tb->width += charwidth;
+
+ tb->caretpos += len;
+ tb->caretxoffs += charwidth;
+ return true;
+ }
+ return false;
+}
+
+/**
+ * Handle text navigation with arrow keys left/right.
+ * This defines where the caret will blink and the next characer interaction will occur
+ * @param tb @Textbuf type where navigation occurs
+ * @param navmode Direction in which navigation occurs @WKC_LEFT, @WKC_RIGHT, @WKC_END, @WKC_HOME
+ * @return Return true on successfull change of Textbuf, or false otherwise
+ */
+bool MoveTextBufferPos(Textbuf *tb, int navmode)
+{
+ switch (navmode) {
+ case WKC_LEFT:
+ if (tb->caretpos != 0) {
+ WChar c;
+
+ do {
+ tb->caretpos--;
+ } while (IsUtf8Part(*(tb->buf + tb->caretpos)));
+
+ Utf8Decode(&c, tb->buf + tb->caretpos);
+ tb->caretxoffs -= GetCharacterWidth(FS_NORMAL, c);
+
+ return true;
+ }
+ break;
+ case WKC_RIGHT:
+ if (tb->caretpos < tb->length) {
+ WChar c;
+
+ tb->caretpos += Utf8Decode(&c, tb->buf + tb->caretpos);
+ tb->caretxoffs += GetCharacterWidth(FS_NORMAL, c);
+
+ return true;
+ }
+ break;
+ case WKC_HOME:
+ tb->caretpos = 0;
+ tb->caretxoffs = 0;
+ return true;
+ case WKC_END:
+ tb->caretpos = tb->length;
+ tb->caretxoffs = tb->width;
+ return true;
+ }
+
+ return false;
+}
+
+/**
+ * Initialize the textbuffer by supplying it the buffer to write into
+ * and the maximum length of this buffer
+ * @param tb @Textbuf type which is getting initialized
+ * @param buf the buffer that will be holding the data for input
+ * @param maxlength maximum length in characters of this buffer
+ * @param maxwidth maximum length in pixels of this buffer. If reached, buffer
+ * cannot grow, even if maxlength would allow because there is space. A length
+ * of zero '0' means the buffer is only restricted by maxlength */
+void InitializeTextBuffer(Textbuf *tb, const char *buf, uint16 maxlength, uint16 maxwidth)
+{
+ tb->buf = (char*)buf;
+ tb->maxlength = maxlength;
+ tb->maxwidth = maxwidth;
+ tb->caret = true;
+ UpdateTextBufferSize(tb);
+}
+
+/**
+ * Update @Textbuf type with its actual physical character and screenlength
+ * Get the count of characters in the string as well as the width in pixels.
+ * Useful when copying in a larger amount of text at once
+ * @param tb @Textbuf type which length is calculated
+ */
+void UpdateTextBufferSize(Textbuf *tb)
+{
+ const char *buf = tb->buf;
+ WChar c = Utf8Consume(&buf);
+
+ tb->width = 0;
+ tb->length = 0;
+
+ for (; c != '\0' && tb->length < (tb->maxlength - 1); c = Utf8Consume(&buf)) {
+ tb->width += GetCharacterWidth(FS_NORMAL, c);
+ tb->length += Utf8CharLen(c);
+ }
+
+ tb->caretpos = tb->length;
+ tb->caretxoffs = tb->width;
+}
+
+int HandleEditBoxKey(Window *w, querystr_d *string, int wid, WindowEvent *e)
+{
+ e->we.keypress.cont = false;
+
+ switch (e->we.keypress.keycode) {
+ case WKC_ESC: return 2;
+ case WKC_RETURN: case WKC_NUM_ENTER: return 1;
+ case (WKC_CTRL | 'V'):
+ if (InsertTextBufferClipboard(&string->text))
+ InvalidateWidget(w, wid);
+ break;
+ case (WKC_CTRL | 'U'):
+ DeleteTextBufferAll(&string->text);
+ InvalidateWidget(w, wid);
+ break;
+ case WKC_BACKSPACE: case WKC_DELETE:
+ if (DeleteTextBufferChar(&string->text, e->we.keypress.keycode))
+ InvalidateWidget(w, wid);
+ break;
+ case WKC_LEFT: case WKC_RIGHT: case WKC_END: case WKC_HOME:
+ if (MoveTextBufferPos(&string->text, e->we.keypress.keycode))
+ InvalidateWidget(w, wid);
+ break;
+ default:
+ if (IsValidChar(e->we.keypress.key, string->afilter)) {
+ if (InsertTextBufferChar(&string->text, e->we.keypress.key)) {
+ InvalidateWidget(w, wid);
+ }
+ } else { // key wasn't caught. Continue only if standard entry specified
+ e->we.keypress.cont = (string->afilter == CS_ALPHANUMERAL);
+ }
+ }
+
+ return 0;
+}
+
+bool HandleCaret(Textbuf *tb)
+{
+ /* caret changed? */
+ bool b = !!(_caret_timer & 0x20);
+
+ if (b != tb->caret) {
+ tb->caret = b;
+ return true;
+ }
+ return false;
+}
+
+void HandleEditBox(Window *w, querystr_d *string, int wid)
+{
+ if (HandleCaret(&string->text)) InvalidateWidget(w, wid);
+}
+
+void DrawEditBox(Window *w, querystr_d *string, int wid)
+{
+ DrawPixelInfo dpi, *old_dpi;
+ int delta;
+ const Widget *wi = &w->widget[wid];
+ const Textbuf *tb = &string->text;
+
+ /* Limit the drawing of the string inside the widget boundaries */
+ if (!FillDrawPixelInfo(&dpi,
+ wi->left + 4,
+ wi->top + 1,
+ wi->right - wi->left - 4,
+ wi->bottom - wi->top - 1)
+ ) return;
+
+ GfxFillRect(wi->left + 1, wi->top + 1, wi->right - 1, wi->bottom - 1, 215);
+
+ old_dpi = _cur_dpi;
+ _cur_dpi = &dpi;
+
+ /* We will take the current widget length as maximum width, with a small
+ * space reserved at the end for the caret to show */
+ delta = (wi->right - wi->left) - tb->width - 10;
+ if (delta > 0) delta = 0;
+
+ if (tb->caretxoffs + delta < 0) delta = -tb->caretxoffs;
+
+ DoDrawString(tb->buf, delta, 0, 8);
+ if (tb->caret) DoDrawString("_", tb->caretxoffs + delta, 0, 12);
+
+ _cur_dpi = old_dpi;
+}
+
+enum QueryStringWidgets {
+ QUERY_STR_WIDGET_TEXT = 3,
+ QUERY_STR_WIDGET_CANCEL,
+ QUERY_STR_WIDGET_OK
+};
+
+
+static void QueryStringWndProc(Window *w, WindowEvent *e)
+{
+ querystr_d *qs = &WP(w, querystr_d);
+
+ switch (e->event) {
+ case WE_CREATE:
+ SETBIT(_no_scroll, SCROLL_EDIT);
+ break;
+
+ case WE_PAINT:
+ SetDParam(0, qs->caption);
+ DrawWindowWidgets(w);
+
+ DrawEditBox(w, qs, QUERY_STR_WIDGET_TEXT);
+ break;
+
+ case WE_CLICK:
+ switch (e->we.click.widget) {
+ case QUERY_STR_WIDGET_OK:
+ press_ok:;
+ if (qs->orig == NULL || strcmp(qs->text.buf, qs->orig) != 0) {
+ Window *parent = w->parent;
+ qs->handled = true;
+
+ /* If the parent is NULL, the editbox is handled by general function
+ * HandleOnEditText */
+ if (parent != NULL) {
+ WindowEvent e;
+ e.event = WE_ON_EDIT_TEXT;
+ e.we.edittext.str = qs->text.buf;
+ parent->wndproc(parent, &e);
+ } else {
+ HandleOnEditText(qs->text.buf);
+ }
+ }
+ /* Fallthrough */
+ case QUERY_STR_WIDGET_CANCEL:
+ DeleteWindow(w);
+ break;
+ }
+ break;
+
+ case WE_MOUSELOOP:
+ HandleEditBox(w, qs, QUERY_STR_WIDGET_TEXT);
+ break;
+
+ case WE_KEYPRESS:
+ switch (HandleEditBoxKey(w, qs, QUERY_STR_WIDGET_TEXT, e)) {
+ case 1: goto press_ok; /* Enter pressed, confirms change */
+ case 2: DeleteWindow(w); break; /* ESC pressed, closes window, abandons changes */
+ }
+ break;
+
+ case WE_DESTROY: /* Call cancellation of query, if we have not handled it before */
+ if (!qs->handled && w->parent != NULL) {
+ WindowEvent e;
+ Window *parent = w->parent;
+
+ qs->handled = true;
+ e.event = WE_ON_EDIT_TEXT_CANCEL;
+ parent->wndproc(parent, &e);
+ }
+ CLRBIT(_no_scroll, SCROLL_EDIT);
+ break;
+ }
+}
+
+static const Widget _query_string_widgets[] = {
+{ WWT_CLOSEBOX, RESIZE_NONE, 14, 0, 10, 0, 13, STR_00C5, STR_018B_CLOSE_WINDOW},
+{ WWT_CAPTION, RESIZE_NONE, 14, 11, 259, 0, 13, STR_012D, STR_NULL},
+{ WWT_PANEL, RESIZE_NONE, 14, 0, 259, 14, 29, 0x0, STR_NULL},
+{ WWT_PANEL, RESIZE_NONE, 14, 2, 257, 16, 27, 0x0, STR_NULL},
+{ WWT_TEXTBTN, RESIZE_NONE, 14, 0, 129, 30, 41, STR_012E_CANCEL, STR_NULL},
+{ WWT_TEXTBTN, RESIZE_NONE, 14, 130, 259, 30, 41, STR_012F_OK, STR_NULL},
+{ WIDGETS_END},
+};
+
+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 char _edit_str_buf[64];
+
+/** Show a query popup window with a textbox in it.
+ * @param str StringID for the text shown in the textbox
+ * @param caption StringID of text shown in caption of querywindow
+ * @param maxlen maximum length in characters allowed. If bit 12 is set we
+ * will not check the resulting string against to original string to return success
+ * @param maxwidth maximum width in pixels allowed
+ * @param parent pointer to a Window that will handle the events (ok/cancel) of this
+ * window. If NULL, results are handled by global function HandleOnEditText
+ * @param afilter filters out unwanted character input */
+void ShowQueryString(StringID str, StringID caption, uint maxlen, uint maxwidth, Window *parent, CharSetFilter afilter)
+{
+ static char orig_str_buf[lengthof(_edit_str_buf)];
+ Window *w;
+ uint realmaxlen = maxlen & ~0x1000;
+
+ assert(realmaxlen < lengthof(_edit_str_buf));
+
+ DeleteWindowById(WC_QUERY_STRING, 0);
+ DeleteWindowById(WC_SAVELOAD, 0);
+
+ w = AllocateWindowDesc(&_query_string_desc);
+ w->parent = parent;
+
+ GetString(_edit_str_buf, str, lastof(_edit_str_buf));
+ _edit_str_buf[realmaxlen - 1] = '\0';
+
+ if (maxlen & 0x1000) {
+ WP(w, querystr_d).orig = NULL;
+ } else {
+ strecpy(orig_str_buf, _edit_str_buf, lastof(orig_str_buf));
+ WP(w, querystr_d).orig = orig_str_buf;
+ }
+
+ LowerWindowWidget(w, QUERY_STR_WIDGET_TEXT);
+ WP(w, querystr_d).caption = caption;
+ WP(w, querystr_d).afilter = afilter;
+ InitializeTextBuffer(&WP(w, querystr_d).text, _edit_str_buf, realmaxlen, maxwidth);
+}
+
+
+enum QueryWidgets {
+ QUERY_WIDGET_CAPTION = 1,
+ QUERY_WIDGET_NO = 3,
+ QUERY_WIDGET_YES
+};
+
+
+typedef struct query_d {
+ void (*proc)(Window*, bool); ///< callback function executed on closing of popup. Window* points to parent, bool is true if 'yes' clicked, false otherwise
+ StringID message; ///< message shown for query window
+ uint32 params[20]; ///< local copy of _decode_parameters
+ bool calledback; ///< has callback been executed already (internal usage for WE_DESTROY event)
+} query_d;
+assert_compile(WINDOW_CUSTOM_SIZE >= sizeof(query_d));
+
+
+static void QueryWndProc(Window *w, WindowEvent *e)
+{
+ query_d *q = &WP(w, query_d);
+
+ switch (e->event) {
+ case WE_PAINT:
+ COPY_IN_DPARAM(0, q->params, lengthof(q->params));
+ DrawWindowWidgets(w);
+ COPY_IN_DPARAM(0, q->params, lengthof(q->params));
+
+ DrawStringMultiCenter(w->width / 2, (w->height / 2) - 10, q->message, w->width);
+ break;
+
+ case WE_CLICK:
+ switch (e->we.click.widget) {
+ case QUERY_WIDGET_YES:
+ q->calledback = true;
+ if (q->proc != NULL) q->proc(w->parent, true);
+ /* Fallthrough */
+ case QUERY_WIDGET_NO:
+ DeleteWindow(w);
+ break;
+ }
+ break;
+
+ case WE_KEYPRESS: /* ESC closes the window, Enter confirms the action */
+ switch (e->we.keypress.keycode) {
+ case WKC_RETURN:
+ case WKC_NUM_ENTER:
+ q->calledback = true;
+ if (q->proc != NULL) q->proc(w->parent, true);
+ /* Fallthrough */
+ case WKC_ESC:
+ e->we.keypress.cont = false;
+ DeleteWindow(w);
+ break;
+ }
+ break;
+
+ case WE_DESTROY: /* Call callback function (if any) on window close if not yet called */
+ if (!q->calledback && q->proc != NULL) {
+ q->calledback = true;
+ q->proc(w->parent, false);
+ }
+ break;
+ }
+}
+
+
+static const Widget _query_widgets[] = {
+{ WWT_CLOSEBOX, RESIZE_NONE, 4, 0, 10, 0, 13, STR_00C5, STR_018B_CLOSE_WINDOW},
+{ WWT_CAPTION, RESIZE_NONE, 4, 11, 209, 0, 13, STR_NULL, STR_NULL},
+{ WWT_PANEL, RESIZE_NONE, 4, 0, 209, 14, 81, 0x0, /*OVERRIDE*/STR_NULL},
+{WWT_PUSHTXTBTN, RESIZE_NONE, 3, 20, 90, 62, 73, STR_00C9_NO, STR_NULL},
+{WWT_PUSHTXTBTN, RESIZE_NONE, 3, 120, 190, 62, 73, STR_00C8_YES, STR_NULL},
+{ WIDGETS_END },
+};
+
+static const WindowDesc _query_desc = {
+ WDP_CENTER, WDP_CENTER, 210, 82,
+ WC_CONFIRM_POPUP_QUERY, 0,
+ WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_UNCLICK_BUTTONS | WDF_DEF_WIDGET | WDF_MODAL,
+ _query_widgets,
+ QueryWndProc
+};
+
+/** Show a modal confirmation window with standard 'yes' and 'no' buttons
+ * The window is aligned to the centre of its parent.
+ * NOTE: You cannot use BindCString as parameter for this window!
+ * @param caption string shown as window caption
+ * @param message string that will be shown for the window
+ * @param parent pointer to parent window, if this pointer is NULL the parent becomes
+ * the main window WC_MAIN_WINDOW
+ * @param x,y coordinates to show the window at
+ * @param yes_no_callback callback function called when window is closed through any button */
+void ShowQuery(StringID caption, StringID message, Window *parent, void (*callback)(Window*, bool))
+{
+ Window *w = AllocateWindowDesc(&_query_desc);
+ if (w == NULL) return;
+
+ if (parent == NULL) parent = FindWindowById(WC_MAIN_WINDOW, 0);
+ w->parent = parent;
+ w->left = parent->left + (parent->width / 2) - (w->width / 2);
+ w->top = parent->top + (parent->height / 2) - (w->height / 2);
+
+ /* Create a backup of the variadic arguments to strings because it will be
+ * overridden pretty often. We will copy these back for drawing */
+ COPY_OUT_DPARAM(WP(w, query_d).params, 0, lengthof(WP(w, query_d).params));
+ w->widget[QUERY_WIDGET_CAPTION].data = caption;
+ WP(w, query_d).message = message;
+ WP(w, query_d).proc = callback;
+ WP(w, query_d).calledback = false;
+}
+
+
+static const Widget _load_dialog_widgets[] = {
+{ WWT_CLOSEBOX, RESIZE_NONE, 14, 0, 10, 0, 13, STR_00C5, STR_018B_CLOSE_WINDOW},
+{ WWT_CAPTION, RESIZE_RIGHT, 14, 11, 256, 0, 13, STR_NULL, STR_018C_WINDOW_TITLE_DRAG_THIS},
+{ WWT_PUSHTXTBTN, RESIZE_NONE, 14, 0, 127, 14, 25, STR_SORT_BY_NAME, STR_SORT_ORDER_TIP},
+{ WWT_PUSHTXTBTN, RESIZE_NONE, 14, 128, 256, 14, 25, STR_SORT_BY_DATE, STR_SORT_ORDER_TIP},
+{ WWT_PANEL, RESIZE_RIGHT, 14, 0, 256, 26, 47, 0x0, STR_NULL},
+{ WWT_PANEL, RESIZE_RB, 14, 0, 256, 48, 293, 0x0, STR_NULL},
+{ WWT_PUSHIMGBTN, RESIZE_LR, 14, 245, 256, 48, 59, SPR_HOUSE_ICON, STR_SAVELOAD_HOME_BUTTON},
+{ WWT_INSET, RESIZE_RB, 14, 2, 243, 50, 291, 0x0, STR_400A_LIST_OF_DRIVES_DIRECTORIES},
+{ WWT_SCROLLBAR, RESIZE_LRB, 14, 245, 256, 60, 281, 0x0, STR_0190_SCROLL_BAR_SCROLLS_LIST},
+{ WWT_RESIZEBOX, RESIZE_LRTB, 14, 245, 256, 282, 293, 0x0, STR_RESIZE_BUTTON},
+{ WIDGETS_END},
+};
+
+static const Widget _save_dialog_widgets[] = {
+{ WWT_CLOSEBOX, RESIZE_NONE, 14, 0, 10, 0, 13, STR_00C5, STR_018B_CLOSE_WINDOW},
+{ WWT_CAPTION, RESIZE_RIGHT, 14, 11, 256, 0, 13, STR_NULL, STR_018C_WINDOW_TITLE_DRAG_THIS},
+{ WWT_PUSHTXTBTN, RESIZE_NONE, 14, 0, 127, 14, 25, STR_SORT_BY_NAME, STR_SORT_ORDER_TIP},
+{ WWT_PUSHTXTBTN, RESIZE_NONE, 14, 128, 256, 14, 25, STR_SORT_BY_DATE, STR_SORT_ORDER_TIP},
+{ WWT_PANEL, RESIZE_RIGHT, 14, 0, 256, 26, 47, 0x0, STR_NULL},
+{ WWT_PANEL, RESIZE_RB, 14, 0, 256, 48, 291, 0x0, STR_NULL},
+{ WWT_PUSHIMGBTN, RESIZE_LR, 14, 245, 256, 48, 59, SPR_HOUSE_ICON, STR_SAVELOAD_HOME_BUTTON},
+{ WWT_INSET, RESIZE_RB, 14, 2, 243, 50, 290, 0x0, STR_400A_LIST_OF_DRIVES_DIRECTORIES},
+{ WWT_SCROLLBAR, RESIZE_LRB, 14, 245, 256, 60, 291, 0x0, STR_0190_SCROLL_BAR_SCROLLS_LIST},
+{ WWT_PANEL, RESIZE_RTB, 14, 0, 256, 292, 307, 0x0, STR_NULL},
+{ WWT_PANEL, RESIZE_RTB, 14, 2, 254, 294, 305, 0x0, STR_400B_CURRENTLY_SELECTED_NAME},
+{ WWT_PUSHTXTBTN, RESIZE_TB, 14, 0, 127, 308, 319, STR_4003_DELETE, STR_400C_DELETE_THE_CURRENTLY_SELECTED},
+{ WWT_PUSHTXTBTN, RESIZE_TB, 14, 128, 244, 308, 319, STR_4002_SAVE, STR_400D_SAVE_THE_CURRENT_GAME_USING},
+{ WWT_RESIZEBOX, RESIZE_LRTB, 14, 245, 256, 308, 319, 0x0, STR_RESIZE_BUTTON},
+{ WIDGETS_END},
+};
+
+// Colors for fios types
+const byte _fios_colors[] = {13, 9, 9, 6, 5, 6, 5, 6, 6, 8};
+
+void BuildFileList(void)
+{
+ _fios_path_changed = true;
+ FiosFreeSavegameList();
+
+ switch (_saveload_mode) {
+ case SLD_NEW_GAME:
+ case SLD_LOAD_SCENARIO:
+ case SLD_SAVE_SCENARIO:
+ _fios_list = FiosGetScenarioList(_saveload_mode); break;
+ case SLD_LOAD_HEIGHTMAP:
+ _fios_list = FiosGetHeightmapList(_saveload_mode); break;
+
+ default: _fios_list = FiosGetSavegameList(_saveload_mode); break;
+ }
+}
+
+static void DrawFiosTexts(uint maxw)
+{
+ static const char *path = NULL;
+ static StringID str = STR_4006_UNABLE_TO_READ_DRIVE;
+ static uint32 tot = 0;
+
+ if (_fios_path_changed) {
+ str = FiosGetDescText(&path, &tot);
+ _fios_path_changed = false;
+ }
+
+ if (str != STR_4006_UNABLE_TO_READ_DRIVE) SetDParam(0, tot);
+ DrawString(2, 37, str, 0);
+ DoDrawStringTruncated(path, 2, 27, 16, maxw);
+}
+
+static void MakeSortedSaveGameList(void)
+{
+ uint sort_start = 0;
+ uint sort_end = 0;
+ uint s_amount;
+ int i;
+
+ /* 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
+ */
+ for (i = 0; i < _fios_num; i++) {
+ switch (_fios_list[i].type) {
+ case FIOS_TYPE_DIR: sort_start++; break;
+ case FIOS_TYPE_PARENT: sort_start++; break;
+ case FIOS_TYPE_DRIVE: sort_end++; break;
+ }
+ }
+
+ s_amount = _fios_num - sort_start - sort_end;
+ if (s_amount > 0)
+ qsort(_fios_list + sort_start, s_amount, sizeof(FiosItem), compare_FiosItems);
+}
+
+static void GenerateFileName(void)
+{
+ /* Check if we are not a specatator who wants to generate a name..
+ Let's use the name of player #0 for now. */
+ const Player *p = GetPlayer(IsValidPlayer(_local_player) ? _local_player : 0);
+
+ SetDParam(0, p->name_1);
+ SetDParam(1, p->name_2);
+ SetDParam(2, _date);
+ GetString(_edit_str_buf, STR_4004, lastof(_edit_str_buf));
+}
+
+extern void StartupEngines(void);
+
+static void SaveLoadDlgWndProc(Window *w, WindowEvent *e)
+{
+ static FiosItem o_dir;
+
+ switch (e->event) {
+ case WE_CREATE: { /* Set up OPENTTD button */
+ o_dir.type = FIOS_TYPE_DIRECT;
+ switch (_saveload_mode) {
+ case SLD_SAVE_GAME:
+ case SLD_LOAD_GAME:
+ ttd_strlcpy(&o_dir.name[0], _paths.save_dir, sizeof(o_dir.name));
+ break;
+
+ case SLD_SAVE_SCENARIO:
+ case SLD_LOAD_SCENARIO:
+ ttd_strlcpy(&o_dir.name[0], _paths.scenario_dir, sizeof(o_dir.name));
+ break;
+
+ case SLD_LOAD_HEIGHTMAP:
+ ttd_strlcpy(&o_dir.name[0], _paths.heightmap_dir, sizeof(o_dir.name));
+ break;
+
+ default:
+ ttd_strlcpy(&o_dir.name[0], _paths.personal_dir, sizeof(o_dir.name));
+ }
+ break;
+ }
+
+ case WE_PAINT: {
+ int pos;
+ int y;
+
+ SetVScrollCount(w, _fios_num);
+ DrawWindowWidgets(w);
+ DrawFiosTexts(w->width);
+
+ if (_savegame_sort_dirty) {
+ _savegame_sort_dirty = false;
+ MakeSortedSaveGameList();
+ }
+
+ GfxFillRect(w->widget[7].left + 1, w->widget[7].top + 1, w->widget[7].right, w->widget[7].bottom, 0xD7);
+ DoDrawString(
+ _savegame_sort_order & SORT_DESCENDING ? DOWNARROW : UPARROW,
+ _savegame_sort_order & SORT_BY_NAME ? w->widget[2].right - 9 : w->widget[3].right - 9,
+ 15, 16
+ );
+
+ y = w->widget[7].top + 1;
+ for (pos = w->vscroll.pos; pos < _fios_num; pos++) {
+ const FiosItem *item = _fios_list + pos;
+
+ DoDrawStringTruncated(item->title, 4, y, _fios_colors[item->type], w->width - 18);
+ y += 10;
+ if (y >= w->vscroll.cap * 10 + w->widget[7].top + 1) break;
+ }
+
+ if (_saveload_mode == SLD_SAVE_GAME || _saveload_mode == SLD_SAVE_SCENARIO) {
+ DrawEditBox(w, &WP(w,querystr_d), 10);
+ }
+ break;
+ }
+
+ case WE_CLICK:
+ switch (e->we.click.widget) {
+ case 2: /* Sort save names by name */
+ _savegame_sort_order = (_savegame_sort_order == SORT_BY_NAME) ?
+ SORT_BY_NAME | SORT_DESCENDING : SORT_BY_NAME;
+ _savegame_sort_dirty = true;
+ SetWindowDirty(w);
+ break;
+
+ case 3: /* Sort save names by date */
+ _savegame_sort_order = (_savegame_sort_order == SORT_BY_DATE) ?
+ SORT_BY_DATE | SORT_DESCENDING : SORT_BY_DATE;
+ _savegame_sort_dirty = true;
+ SetWindowDirty(w);
+ break;
+
+ case 6: /* OpenTTD 'button', jumps to OpenTTD directory */
+ FiosBrowseTo(&o_dir);
+ SetWindowDirty(w);
+ BuildFileList();
+ break;
+
+ case 7: { /* Click the listbox */
+ int y = (e->we.click.pt.y - w->widget[e->we.click.widget].top - 1) / 10;
+ char *name;
+ const FiosItem *file;
+
+ if (y < 0 || (y += w->vscroll.pos) >= w->vscroll.count) return;
+
+ file = _fios_list + y;
+
+ name = FiosBrowseTo(file);
+ if (name != NULL) {
+ if (_saveload_mode == SLD_LOAD_GAME || _saveload_mode == SLD_LOAD_SCENARIO) {
+ _switch_mode = (_game_mode == GM_EDITOR) ? SM_LOAD_SCENARIO : SM_LOAD;
+
+ SetFiosType(file->type);
+ ttd_strlcpy(_file_to_saveload.name, name, sizeof(_file_to_saveload.name));
+ ttd_strlcpy(_file_to_saveload.title, file->title, sizeof(_file_to_saveload.title));
+
+ DeleteWindow(w);
+ } else if (_saveload_mode == SLD_LOAD_HEIGHTMAP) {
+ SetFiosType(file->type);
+ ttd_strlcpy(_file_to_saveload.name, name, sizeof(_file_to_saveload.name));
+ ttd_strlcpy(_file_to_saveload.title, file->title, sizeof(_file_to_saveload.title));
+
+ DeleteWindow(w);
+ ShowHeightmapLoad();
+ } else {
+ // SLD_SAVE_GAME, SLD_SAVE_SCENARIO copy clicked name to editbox
+ ttd_strlcpy(WP(w, querystr_d).text.buf, file->title, WP(w, querystr_d).text.maxlength);
+ UpdateTextBufferSize(&WP(w, querystr_d).text);
+ InvalidateWidget(w, 10);
+ }
+ } else {
+ // Changed directory, need repaint.
+ SetWindowDirty(w);
+ BuildFileList();
+ }
+ break;
+ }
+
+ case 11: case 12: /* Delete, Save game */
+ break;
+ }
+ break;
+ case WE_MOUSELOOP:
+ if (_saveload_mode == SLD_SAVE_GAME || _saveload_mode == SLD_SAVE_SCENARIO) {
+ HandleEditBox(w, &WP(w, querystr_d), 10);
+ }
+ break;
+ case WE_KEYPRESS:
+ if (e->we.keypress.keycode == WKC_ESC) {
+ DeleteWindow(w);
+ return;
+ }
+
+ if (_saveload_mode == SLD_SAVE_GAME || _saveload_mode == SLD_SAVE_SCENARIO) {
+ if (HandleEditBoxKey(w, &WP(w, querystr_d), 10, e) == 1) /* Press Enter */
+ HandleButtonClick(w, 12);
+ }
+ break;
+ case WE_TIMEOUT:
+ /* This test protects against using widgets 11 and 12 which are only available
+ * in those two saveload mode */
+ if (!(_saveload_mode == SLD_SAVE_GAME || _saveload_mode == SLD_SAVE_SCENARIO)) break;
+
+ if (IsWindowWidgetLowered(w, 11)) { /* Delete button clicked */
+ if (!FiosDelete(WP(w,querystr_d).text.buf)) {
+ ShowErrorMessage(INVALID_STRING_ID, STR_4008_UNABLE_TO_DELETE_FILE, 0, 0);
+ } else {
+ BuildFileList();
+ /* Reset file name to current date on successfull delete */
+ if (_saveload_mode == SLD_SAVE_GAME) GenerateFileName();
+ }
+
+ UpdateTextBufferSize(&WP(w, querystr_d).text);
+ SetWindowDirty(w);
+ } else if (IsWindowWidgetLowered(w, 12)) { /* Save button clicked */
+ _switch_mode = SM_SAVE;
+ FiosMakeSavegameName(_file_to_saveload.name, WP(w,querystr_d).text.buf, sizeof(_file_to_saveload.name));
+
+ /* In the editor set up the vehicle engines correctly (date might have changed) */
+ if (_game_mode == GM_EDITOR) StartupEngines();
+ }
+ break;
+ case WE_DESTROY:
+ // pause is only used in single-player, non-editor mode, non menu mode
+ if (!_networking && _game_mode != GM_EDITOR && _game_mode != GM_MENU) {
+ DoCommandP(0, 0, 0, NULL, CMD_PAUSE);
+ }
+ FiosFreeSavegameList();
+ CLRBIT(_no_scroll, SCROLL_SAVE);
+ break;
+ case WE_RESIZE: {
+ /* Widget 2 and 3 have to go with halve speed, make it so obiwan */
+ uint diff = e->we.sizing.diff.x / 2;
+ w->widget[2].right += diff;
+ w->widget[3].left += diff;
+ w->widget[3].right += e->we.sizing.diff.x;
+
+ /* Same for widget 11 and 12 in save-dialog */
+ if (_saveload_mode == SLD_SAVE_GAME || _saveload_mode == SLD_SAVE_SCENARIO) {
+ w->widget[11].right += diff;
+ w->widget[12].left += diff;
+ w->widget[12].right += e->we.sizing.diff.x;
+ }
+
+ w->vscroll.cap += e->we.sizing.diff.y / 10;
+ } 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 | WDF_RESIZABLE,
+ _load_dialog_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 | WDF_RESIZABLE,
+ _save_dialog_widgets,
+ SaveLoadDlgWndProc,
+};
+
+void ShowSaveLoadDialog(int mode)
+{
+ static const StringID saveload_captions[] = {
+ STR_4001_LOAD_GAME,
+ STR_0298_LOAD_SCENARIO,
+ STR_4000_SAVE_GAME,
+ STR_0299_SAVE_SCENARIO,
+ STR_4011_LOAD_HEIGHTMAP,
+ };
+
+ Window *w;
+ const WindowDesc *sld = &_save_dialog_desc;
+
+
+ SetObjectToPlace(SPR_CURSOR_ZZZ, 0, 0, 0);
+ DeleteWindowById(WC_QUERY_STRING, 0);
+ DeleteWindowById(WC_SAVELOAD, 0);
+
+ _saveload_mode = mode;
+ SETBIT(_no_scroll, SCROLL_SAVE);
+
+ switch (mode) {
+ case SLD_SAVE_GAME: GenerateFileName(); break;
+ case SLD_SAVE_SCENARIO: strcpy(_edit_str_buf, "UNNAMED"); break;
+ default: sld = &_load_dialog_desc; break;
+ }
+
+ assert((uint)mode < lengthof(saveload_captions));
+ w = AllocateWindowDesc(sld);
+ w->widget[1].data = saveload_captions[mode];
+ w->vscroll.cap = 24;
+ w->resize.step_width = 2;
+ w->resize.step_height = 10;
+ w->resize.height = w->height - 14 * 10; // Minimum of 10 items
+ LowerWindowWidget(w, 7);
+
+ WP(w, querystr_d).afilter = CS_ALPHANUMERAL;
+ InitializeTextBuffer(&WP(w, querystr_d).text, _edit_str_buf, lengthof(_edit_str_buf), 240);
+
+ // pause is only used in single-player, non-editor mode, non-menu mode. It
+ // will be unpaused in the WE_DESTROY event handler.
+ if (_game_mode != GM_MENU && !_networking && _game_mode != GM_EDITOR) {
+ DoCommandP(0, 1, 0, NULL, CMD_PAUSE);
+ }
+
+ BuildFileList();
+
+ ResetObjectToPlace();
+}
+
+void RedrawAutosave(void)
+{
+ SetWindowDirty(FindWindowById(WC_STATUS_BAR, 0));
+}
+
+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;
+
+#ifdef WITH_PNG
+ case FIOS_TYPE_PNG:
+ _file_to_saveload.mode = SL_PNG;
+ break;
+#endif /* WITH_PNG */
+
+ case FIOS_TYPE_BMP:
+ _file_to_saveload.mode = SL_BMP;
+ break;
+
+ default:
+ _file_to_saveload.mode = SL_INVALID;
+ break;
+ }
+}
+
+static 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)
+static int32 ClickChangePlayerCheat(int32 p1, int32 p2)
+{
+ while (IsValidPlayer((PlayerID)p1)) {
+ if (_players[p1].is_active) {
+ SetLocalPlayer((PlayerID)p1);
+
+ MarkWholeScreenDirty();
+ return _local_player;
+ }
+ p1 += p2;
+ }
+
+ return _local_player;
+}
+
+// p1 -1 or +1 (down/up)
+static int32 ClickChangeClimateCheat(int32 p1, int32 p2)
+{
+ if (p1 == -1) p1 = 3;
+ if (p1 == 4) p1 = 0;
+ _opt.landscape = p1;
+ ReloadNewGRFData();
+ return _opt.landscape;
+}
+
+extern void EnginesMonthlyLoop(void);
+
+// p2 1 (increase) or -1 (decrease)
+static int32 ClickChangeDateCheat(int32 p1, int32 p2)
+{
+ YearMonthDay ymd;
+ ConvertDateToYMD(_date, &ymd);
+
+ if ((ymd.year == MIN_YEAR && p2 == -1) || (ymd.year == MAX_YEAR && p2 == 1)) return _cur_year;
+
+ SetDate(ConvertYMDToDate(_cur_year + p2, ymd.month, ymd.day));
+ EnginesMonthlyLoop();
+ SetWindowDirty(FindWindowById(WC_STATUS_BAR, 0));
+ return _cur_year;
+}
+
+typedef int32 CheckButtonClick(int32, int32);
+
+enum ce_flags {CE_CLICK = 1 << 0};
+
+typedef byte ce_flags;
+
+typedef struct CheatEntry {
+ VarType type; // type of selector
+ ce_flags 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 *proc;// procedure
+ int16 min, max; // range for spinbox setting
+} CheatEntry;
+
+static const CheatEntry _cheats_ui[] = {
+ {SLE_BOOL,CE_CLICK, STR_CHEAT_MONEY, &_cheats.money.value, &_cheats.money.been_used, &ClickMoneyCheat, 0, 0},
+ {SLE_UINT8, 0, STR_CHEAT_CHANGE_PLAYER, &_local_player, &_cheats.switch_player.been_used, &ClickChangePlayerCheat, 0, 11},
+ {SLE_BOOL, 0, STR_CHEAT_EXTRA_DYNAMITE, &_cheats.magic_bulldozer.value, &_cheats.magic_bulldozer.been_used, NULL, 0, 0},
+ {SLE_BOOL, 0, STR_CHEAT_CROSSINGTUNNELS,&_cheats.crossing_tunnels.value,&_cheats.crossing_tunnels.been_used,NULL, 0, 0},
+ {SLE_BOOL, 0, STR_CHEAT_BUILD_IN_PAUSE, &_cheats.build_in_pause.value, &_cheats.build_in_pause.been_used, NULL, 0, 0},
+ {SLE_BOOL, 0, STR_CHEAT_NO_JETCRASH, &_cheats.no_jetcrash.value, &_cheats.no_jetcrash.been_used, NULL, 0, 0},
+ {SLE_BOOL, 0, STR_CHEAT_SETUP_PROD, &_cheats.setup_prod.value, &_cheats.setup_prod.been_used, NULL, 0, 0},
+ {SLE_UINT8, 0, STR_CHEAT_SWITCH_CLIMATE, &_opt.landscape, &_cheats.switch_climate.been_used, &ClickChangeClimateCheat,-1, 4},
+ {SLE_INT32, 0, STR_CHEAT_CHANGE_DATE, &_cur_year, &_cheats.change_date.been_used, &ClickChangeDateCheat, -1, 1},
+};
+
+
+static const Widget _cheat_widgets[] = {
+{ WWT_CLOSEBOX, RESIZE_NONE, 14, 0, 10, 0, 13, STR_00C5, STR_018B_CLOSE_WINDOW},
+{ WWT_CAPTION, RESIZE_NONE, 14, 11, 399, 0, 13, STR_CHEATS, STR_018C_WINDOW_TITLE_DRAG_THIS},
+{ WWT_PANEL, RESIZE_NONE, 14, 0, 399, 14, 169, 0x0, STR_NULL},
+{ WWT_PANEL, RESIZE_NONE, 14, 0, 399, 14, 169, 0x0, STR_CHEATS_TIP},
+{ WIDGETS_END},
+};
+
+extern void DrawPlayerIcon(PlayerID pid, 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;
+ 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++) {
+ const CheatEntry *ce = &_cheats_ui[i];
+
+ DrawSprite((*ce->been_used) ? SPR_BOX_CHECKED : SPR_BOX_EMPTY, x + 5, y + 2);
+
+ switch (ce->type) {
+ case SLE_BOOL: {
+ bool on = (*(bool*)ce->variable);
+
+ if (ce->flags & CE_CLICK) {
+ DrawFrameRect(x + 20, y + 1, x + 30 + 9, y + 9, 0, (clk - (i * 2) == 1) ? FR_LOWERED : 0);
+ if (i == 0) { // XXX - hack/hack for first element which is increase money. Told ya it's a mess
+ SetDParam64(0, 10000000);
+ } else {
+ SetDParam(0, false);
+ }
+ } else {
+ DrawFrameRect(x + 20, y + 1, x + 30 + 9, y + 9, on ? 6 : 4, on ? FR_LOWERED : 0);
+ SetDParam(0, on ? STR_CONFIG_PATCHES_ON : STR_CONFIG_PATCHES_OFF);
+ }
+ } break;
+ default: {
+ int32 val = (int32)ReadValue(ce->variable, ce->type);
+ char buf[512];
+
+ /* Draw [<][>] boxes for settings of an integer-type */
+ DrawArrowButtons(x + 20, y, 3, clk - (i * 2), true, true);
+
+ switch (ce->str) {
+ /* Display date for change date cheat */
+ case STR_CHEAT_CHANGE_DATE: SetDParam(0, _date); break;
+ /* Draw colored flag for change player cheat */
+ case STR_CHEAT_CHANGE_PLAYER:
+ SetDParam(0, val);
+ GetString(buf, STR_CHEAT_CHANGE_PLAYER, lastof(buf));
+ DrawPlayerIcon(_current_player, 60 + GetStringBoundingBox(buf).width, y + 2);
+ break;
+ /* Set correct string for switch climate cheat */
+ case STR_CHEAT_SWITCH_CLIMATE: val += STR_TEMPERATE_LANDSCAPE;
+ /* Fallthrough */
+ default: SetDParam(0, val);
+ }
+ } break;
+ }
+
+ DrawString(50, y + 1, ce->str, 0);
+
+ y += 12;
+ }
+ break;
+ }
+
+ case WE_CLICK: {
+ const CheatEntry *ce;
+ uint btn = (e->we.click.pt.y - 46) / 12;
+ int32 value, oldvalue;
+ uint x = e->we.click.pt.x;
+
+ // not clicking a button?
+ if (!IS_INT_INSIDE(x, 20, 40) || btn >= lengthof(_cheats_ui)) break;
+
+ ce = &_cheats_ui[btn];
+ oldvalue = value = (int32)ReadValue(ce->variable, ce->type);
+
+ *ce->been_used = true;
+
+ switch (ce->type) {
+ case SLE_BOOL:
+ if (ce->flags & CE_CLICK) WP(w,def_d).data_1 = btn * 2 + 1;
+ value ^= 1;
+ if (ce->proc != NULL) ce->proc(value, 0);
+ break;
+ default: {
+ /* Add a dynamic step-size to the scroller. In a maximum of
+ * 50-steps you should be able to get from min to max */
+ uint16 step = ((ce->max - ce->min) / 20);
+ if (step == 0) step = 1;
+
+ /* Increase or decrease the value and clamp it to extremes */
+ value += (x >= 30) ? step : -step;
+ clamp(value, ce->min, ce->max);
+
+ // take whatever the function returns
+ value = ce->proc(value, (x >= 30) ? 1 : -1);
+
+ if (value != oldvalue) {
+ WP(w,def_d).data_1 = btn * 2 + 1 + ((x >= 30) ? 1 : 0);
+ }
+ } break;
+ }
+
+ if (value != oldvalue) {
+ WriteValue(ce->variable, ce->type, (int64)value);
+ 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, 170,
+ WC_CHEATS,0,
+ WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,
+ _cheat_widgets,
+ CheatsWndProc
+};
+
+
+void ShowCheatWindow(void)
+{
+ DeleteWindowById(WC_CHEATS, 0);
+ AllocateWindowDesc(&_cheats_desc);
+}