1

/* $Id$ */

     2

     3

/** @file misc_gui.cpp GUIs for a number of misc windows. */

     4

     5

#include "stdafx.h"

     6

#include "openttd.h"

     7

#include "heightmap.h"

     8

#include "debug.h"

     9

#include "landscape.h"

    10

#include "newgrf.h"

    11

#include "newgrf_text.h"

    12

#include "saveload.h"

    13

#include "tile_map.h"

    14

#include "gui.h"

    15

#include "window_gui.h"

    16

#include "station_gui.h"

    17

#include "textbuf_gui.h"

    18

#include "viewport_func.h"

    19

#include "gfx_func.h"

    20

#include "station_func.h"

    21

#include "command_func.h"

    22

#include "player_func.h"

    23

#include "player_base.h"

    24

#include "town.h"

    25

#include "network/network.h"

    26

#include "variables.h"

    27

#include "cheat_func.h"

    28

#include "train.h"

    29

#include "tgp.h"

    30

#include "cargotype.h"

    31

#include "player_face.h"

    32

#include "strings_func.h"

    33

#include "fileio.h"

    34

#include "fios.h"

    35

#include "tile_cmd.h"

    36

#include "zoom_func.h"

    37

#include "functions.h"

    38

#include "window_func.h"

    39

#include "date_func.h"

    40

#include "sound_func.h"

    41

#include "string_func.h"

    42

#include "player_gui.h"

    43

#include "settings_type.h"

    44

#include "newgrf_cargo.h"

    45

#include "rail_gui.h"

    46

#include "tilehighlight_func.h"

    47

    48

#include "table/sprites.h"

    49

#include "table/strings.h"

    50

    51

/* Variables to display file lists */

    52

FiosItem *_fios_list;

    53

SaveLoadDialogMode _saveload_mode;

    54

    55

    56

static bool _fios_path_changed;

    57

static bool _savegame_sort_dirty;

    58

    59

enum {

    60

	LAND_INFO_LINES          =   7,

    61

	LAND_INFO_LINE_BUFF_SIZE = 512,

    62

};

    63

    64

static char _landinfo_data[LAND_INFO_LINES][LAND_INFO_LINE_BUFF_SIZE];

    65

    66

static void LandInfoWndProc(Window *w, WindowEvent *e)

    67

{

    68

	if (e->event == WE_PAINT) {

    69

		DrawWindowWidgets(w);

    70

    71

		DoDrawStringCentered(140, 16, _landinfo_data[0], TC_LIGHT_BLUE);

    72

		DoDrawStringCentered(140, 27, _landinfo_data[1], TC_FROMSTRING);

    73

		DoDrawStringCentered(140, 38, _landinfo_data[2], TC_FROMSTRING);

    74

		DoDrawStringCentered(140, 49, _landinfo_data[3], TC_FROMSTRING);

    75

		DoDrawStringCentered(140, 60, _landinfo_data[4], TC_FROMSTRING);

    76

		if (_landinfo_data[5][0] != '\0') DrawStringMultiCenter(140, 76, BindCString(_landinfo_data[5]), w->width - 4);

    77

		if (_landinfo_data[6][0] != '\0') DoDrawStringCentered(140, 71, _landinfo_data[6], TC_FROMSTRING);

    78

	}

    79

}

    80

    81

static const Widget _land_info_widgets[] = {

    82

{   WWT_CLOSEBOX,   RESIZE_NONE,    14,     0,    10,     0,    13, STR_00C5,                       STR_018B_CLOSE_WINDOW},

    83

{    WWT_CAPTION,   RESIZE_NONE,    14,    11,   279,     0,    13, STR_01A3_LAND_AREA_INFORMATION, STR_018C_WINDOW_TITLE_DRAG_THIS},

    84

{      WWT_PANEL,   RESIZE_NONE,    14,     0,   279,    14,    92, 0x0,                            STR_NULL},

    85

{    WIDGETS_END},

    86

};

    87

    88

static const WindowDesc _land_info_desc = {

    89

	WDP_AUTO, WDP_AUTO, 280, 93, 280, 93,

    90

	WC_LAND_INFO, WC_NONE,

    91

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,

    92

	_land_info_widgets,

    93

	LandInfoWndProc

    94

};

    95

    96

static void Place_LandInfo(TileIndex tile)

    97

{

    98

	DeleteWindowById(WC_LAND_INFO, 0);

    99

   100

	Window *w = new Window(&_land_info_desc);

   101

	WP(w, void_d).data = &_landinfo_data;

   102

   103

	Player *p = GetPlayer(IsValidPlayer(_local_player) ? _local_player : PLAYER_FIRST);

   104

	Town *t = ClosestTownFromTile(tile, _patches.dist_local_authority);

   105

   106

	Money old_money = p->player_money;

   107

	p->player_money = INT64_MAX;

   108

	CommandCost costclear = DoCommand(tile, 0, 0, 0, CMD_LANDSCAPE_CLEAR);

   109

	p->player_money = old_money;

   110

   111

	/* Because build_date is not set yet in every TileDesc, we make sure it is empty */

   112

	TileDesc td;

   113

	AcceptedCargo ac;

   114

   115

	td.build_date = 0;

   116

	GetAcceptedCargo(tile, ac);

   117

	GetTileDesc(tile, &td);

   118

   119

	SetDParam(0, td.dparam[0]);

   120

	GetString(_landinfo_data[0], td.str, lastof(_landinfo_data[0]));

   121

   122

	SetDParam(0, STR_01A6_N_A);

   123

	if (td.owner != OWNER_NONE && td.owner != OWNER_WATER) GetNameOfOwner(td.owner, tile);

   124

	GetString(_landinfo_data[1], STR_01A7_OWNER, lastof(_landinfo_data[1]));

   125

   126

	StringID str = STR_01A4_COST_TO_CLEAR_N_A;

   127

	if (CmdSucceeded(costclear)) {

   128

		SetDParam(0, costclear.GetCost());

   129

		str = STR_01A5_COST_TO_CLEAR;

   130

	}

   131

	GetString(_landinfo_data[2], str, lastof(_landinfo_data[2]));

   132

   133

	snprintf(_userstring, lengthof(_userstring), "0x%.4X", tile);

   134

	SetDParam(0, TileX(tile));

   135

	SetDParam(1, TileY(tile));

   136

	SetDParam(2, TileHeight(tile));

   137

	SetDParam(3, STR_SPEC_USERSTRING);

   138

	GetString(_landinfo_data[3], STR_LANDINFO_COORDS, lastof(_landinfo_data[3]));

   139

   140

	SetDParam(0, STR_01A9_NONE);

   141

	if (t != NULL && t->IsValid()) {

   142

		SetDParam(0, STR_TOWN);

   143

		SetDParam(1, t->index);

   144

	}

   145

	GetString(_landinfo_data[4], STR_01A8_LOCAL_AUTHORITY, lastof(_landinfo_data[4]));

   146

   147

	char *strp = GetString(_landinfo_data[5], STR_01CE_CARGO_ACCEPTED, lastof(_landinfo_data[5]));

   148

	bool found = false;

   149

   150

	for (CargoID i = 0; i < NUM_CARGO; ++i) {

   151

		if (ac[i] > 0) {

   152

			/* Add a comma between each item. */

   153

			if (found) {

   154

				*strp++ = ',';

   155

				*strp++ = ' ';

   156

			}

   157

			found = true;

   158

   159

			/* If the accepted value is less than 8, show it in 1/8:ths */

   160

			if (ac[i] < 8) {

   161

				SetDParam(0, ac[i]);

   162

				SetDParam(1, GetCargo(i)->name);

   163

				strp = GetString(strp, STR_01D1_8, lastof(_landinfo_data[5]));

   164

			} else {

   165

				strp = GetString(strp, GetCargo(i)->name, lastof(_landinfo_data[5]));

   166

			}

   167

		}

   168

	}

   169

	if (!found) _landinfo_data[5][0] = '\0';

   170

   171

	if (td.build_date != 0) {

   172

		SetDParam(0, td.build_date);

   173

		GetString(_landinfo_data[6], STR_BUILD_DATE, lastof(_landinfo_data[6]));

   174

	} else {

   175

		_landinfo_data[6][0] = '\0';

   176

	}

   177

   178

#if defined(_DEBUG)

   179

#	define LANDINFOD_LEVEL 0

   180

#else

   181

#	define LANDINFOD_LEVEL 1

   182

#endif

   183

	DEBUG(misc, LANDINFOD_LEVEL, "TILE: %#x (%i,%i)", tile, TileX(tile), TileY(tile));

   184

	DEBUG(misc, LANDINFOD_LEVEL, "type_height  = %#x", _m[tile].type_height);

   185

	DEBUG(misc, LANDINFOD_LEVEL, "m1           = %#x", _m[tile].m1);

   186

	DEBUG(misc, LANDINFOD_LEVEL, "m2           = %#x", _m[tile].m2);

   187

	DEBUG(misc, LANDINFOD_LEVEL, "m3           = %#x", _m[tile].m3);

   188

	DEBUG(misc, LANDINFOD_LEVEL, "m4           = %#x", _m[tile].m4);

   189

	DEBUG(misc, LANDINFOD_LEVEL, "m5           = %#x", _m[tile].m5);

   190

	DEBUG(misc, LANDINFOD_LEVEL, "m6           = %#x", _m[tile].m6);

   191

	DEBUG(misc, LANDINFOD_LEVEL, "m7           = %#x", _me[tile].m7);

   192

#undef LANDINFOD_LEVEL

   193

}

   194

   195

void PlaceLandBlockInfo()

   196

{

   197

	if (_cursor.sprite == SPR_CURSOR_QUERY) {

   198

		ResetObjectToPlace();

   199

	} else {

   200

		_place_proc = Place_LandInfo;

   201

		SetObjectToPlace(SPR_CURSOR_QUERY, PAL_NONE, VHM_RECT, WC_MAIN_TOOLBAR, 0);

   202

	}

   203

}

   204

   205

static const char *credits[] = {

   206

	/*************************************************************************

   207

	 *                      maximum length of string which fits in window   -^*/

   208

	"Original design by Chris Sawyer",

   209

	"Original graphics by Simon Foster",

   210

	"",

   211

	"The OpenTTD team (in alphabetical order):",

   212

	"  Jean-Francois Claeys (Belugas) - GUI, newindustries and more",

   213

	"  Bjarni Corfitzen (Bjarni) - MacOSX port, coder and vehicles",

   214

	"  Matthijs Kooijman (blathijs) - Pathfinder-guru, pool rework",

   215

	"  Loïc Guilloux (glx) - General coding",

   216

	"  Christoph Elsenhans (frosch) - General coding",

   217

	"  Jaroslav Mazanec (KUDr) - YAPG (Yet Another Pathfinder God) ;)",

   218

	"  Jonathan Coome (Maedhros) - High priest of the newGRF Temple",

   219

	"  Attila Bán (MiHaMiX) - WebTranslator, Nightlies, Wiki and bugtracker host",

   220

	"  Owen Rudge (orudge) - Forum host, OS/2 port",

   221

	"  Peter Nelson (peter1138) - Spiritual descendant from newGRF gods",

   222

	"  Remko Bijker (Rubidium) - Lead coder and way more",

   223

	"  Benedikt Brüggemeier (skidd13) - Bug fixer and code reworker",

   224

	"  Zdenek Sojka (SmatZ) - Bug finder and fixer",

   225

	"",

   226

	"Inactive Developers:",

   227

	"  Victor Fischer (Celestar) - Programming everywhere you need him to",

   228

	"  Tamás Faragó (Darkvater) - Ex-Lead coder",

   229

	"  Christoph Mallon (Tron) - Programmer, code correctness police",

   230

	"",

   231

	"Retired Developers:",

   232

	"  Ludvig Strigeus (ludde) - OpenTTD author, main coder (0.1 - 0.3.3)",

   233

	"  Serge Paquet (vurlix) - Assistant project manager, coder (0.1 - 0.3.3)",

   234

	"  Dominik Scherer (dominik81) - Lead programmer, GUI expert (0.3.0 - 0.3.6)",

   235

	"  Patric Stout (TrueLight) - Programmer, webhoster (0.3 - pre0.6)",

   236

	"",

   237

	"Special thanks go out to:",

   238

	"  Josef Drexler - For his great work on TTDPatch",

   239

	"  Marcin Grzegorczyk - For his documentation of TTD internals",

   240

	"  Petr Baudis (pasky) - Many patches, newGRF support",

   241

	"  Stefan Meißner (sign_de) - For his work on the console",

   242

	"  Simon Sasburg (HackyKid) - Many bugfixes he has blessed us with",

   243

	"  Cian Duffy (MYOB) - BeOS port / manual writing",

   244

	"  Christian Rosentreter (tokai) - MorphOS / AmigaOS port",

   245

	"  Richard Kempton (richK) - additional airports, initial TGP implementation",

   246

	"",

   247

	"  Michael Blunck - Pre-Signals and Semaphores © 2003",

   248

	"  George - Canal/Lock graphics © 2003-2004",

   249

	"  David Dallaston - Tram tracks",

   250

	"  Marcin Grzegorczyk - Foundations for Tracks on Slopes",

   251

	"  All Translators - Who made OpenTTD a truly international game",

   252

	"  Bug Reporters - Without whom OpenTTD would still be full of bugs!",

   253

	"",

   254

	"",

   255

	"And last but not least:",

   256

	"  Chris Sawyer - For an amazing game!"

   257

};

   258

   259

static void AboutWindowProc(Window *w, WindowEvent *e)

   260

{

   261

	switch (e->event) {

   262

		case WE_CREATE: // Set up window counter and start position of scroller

   263

			WP(w, scroller_d).counter = 5;

   264

			WP(w, scroller_d).height = w->height - 40;

   265

			break;

   266

   267

		case WE_PAINT: {

   268

			int y = WP(w, scroller_d).height;

   269

			DrawWindowWidgets(w);

   270

   271

			/* Show original copyright and revision version */

   272

			DrawStringCentered(210, 17, STR_00B6_ORIGINAL_COPYRIGHT, TC_FROMSTRING);

   273

			DrawStringCentered(210, 17 + 10, STR_00B7_VERSION, TC_FROMSTRING);

   274

   275

			/* Show all scrolling credits */

   276

			for (uint i = 0; i < lengthof(credits); i++) {

   277

				if (y >= 50 && y < (w->height - 40)) {

   278

					DoDrawString(credits[i], 10, y, TC_BLACK);

   279

				}

   280

				y += 10;

   281

			}

   282

   283

			/* If the last text has scrolled start anew from the start */

   284

			if (y < 50) WP(w, scroller_d).height = w->height - 40;

   285

   286

			DoDrawStringCentered(210, w->height - 25, "Website: http://www.openttd.org", TC_BLACK);

   287

			DrawStringCentered(210, w->height - 15, STR_00BA_COPYRIGHT_OPENTTD, TC_FROMSTRING);

   288

		} break;

   289

   290

		case WE_TICK: // Timer to scroll the text and adjust the new top

   291

			if (--WP(w, scroller_d).counter == 0) {

   292

				WP(w, scroller_d).counter = 5;

   293

				WP(w, scroller_d).height--;

   294

				w->SetDirty();

   295

			}

   296

			break;

   297

	}

   298

}

   299

   300

static const Widget _about_widgets[] = {

   301

{   WWT_CLOSEBOX,   RESIZE_NONE,    14,     0,    10,     0,    13, STR_00C5,         STR_018B_CLOSE_WINDOW},

   302

{    WWT_CAPTION,   RESIZE_NONE,    14,    11,   419,     0,    13, STR_015B_OPENTTD, STR_NULL},

   303

{      WWT_PANEL,   RESIZE_NONE,    14,     0,   419,    14,   271, 0x0,              STR_NULL},

   304

{      WWT_FRAME,   RESIZE_NONE,    14,     5,   414,    40,   245, STR_NULL,         STR_NULL},

   305

{    WIDGETS_END},

   306

};

   307

   308

static const WindowDesc _about_desc = {

   309

	WDP_CENTER, WDP_CENTER, 420, 272, 420, 272,

   310

	WC_GAME_OPTIONS, WC_NONE,

   311

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,

   312

	_about_widgets,

   313

	AboutWindowProc

   314

};

   315

   316

   317

void ShowAboutWindow()

   318

{

   319

	DeleteWindowById(WC_GAME_OPTIONS, 0);

   320

	new Window(&_about_desc);

   321

}

   322

   323

static uint64 _errmsg_decode_params[20];

   324

static StringID _errmsg_message_1, _errmsg_message_2;

   325

static uint _errmsg_duration;

   326

   327

   328

static const Widget _errmsg_widgets[] = {

   329

{   WWT_CLOSEBOX,   RESIZE_NONE,     4,     0,    10,     0,    13, STR_00C5,         STR_018B_CLOSE_WINDOW},

   330

{    WWT_CAPTION,   RESIZE_NONE,     4,    11,   239,     0,    13, STR_00B2_MESSAGE, STR_NULL},

   331

{      WWT_PANEL,   RESIZE_NONE,     4,     0,   239,    14,    45, 0x0,              STR_NULL},

   332

{    WIDGETS_END},

   333

};

   334

   335

static const Widget _errmsg_face_widgets[] = {

   336

{   WWT_CLOSEBOX,   RESIZE_NONE,     4,     0,    10,     0,    13, STR_00C5,              STR_018B_CLOSE_WINDOW},

   337

{    WWT_CAPTION,   RESIZE_NONE,     4,    11,   333,     0,    13, STR_00B3_MESSAGE_FROM, STR_NULL},

   338

{      WWT_PANEL,   RESIZE_NONE,     4,     0,   333,    14,   136, 0x0,                   STR_NULL},

   339

{   WIDGETS_END},

   340

};

   341

   342

static void ErrmsgWndProc(Window *w, WindowEvent *e)

   343

{

   344

	switch (e->event) {

   345

		case WE_PAINT:

   346

			CopyInDParam(0, _errmsg_decode_params, lengthof(_errmsg_decode_params));

   347

			DrawWindowWidgets(w);

   348

			CopyInDParam(0, _errmsg_decode_params, lengthof(_errmsg_decode_params));

   349

   350

			/* If the error message comes from a NewGRF, we must use the text ref. stack reserved for error messages.

   351

			* If the message doesn't come from a NewGRF, it won't use the TTDP-style text ref. stack, so we won't hurt anything

   352

			*/

   353

			SwitchToErrorRefStack();

   354

			RewindTextRefStack();

   355

   356

			if (!IsWindowOfPrototype(w, _errmsg_face_widgets)) {

   357

				DrawStringMultiCenter(

   358

					120,

   359

					(_errmsg_message_1 == INVALID_STRING_ID ? 25 : 15),

   360

					_errmsg_message_2,

   361

					w->width - 2);

   362

				if (_errmsg_message_1 != INVALID_STRING_ID) {

   363

					DrawStringMultiCenter(

   364

						120,

   365

						30,

   366

						_errmsg_message_1,

   367

						w->width - 2);

   368

				}

   369

			} else {

   370

				const Player *p = GetPlayer((PlayerID)GetDParamX(_errmsg_decode_params,2));

   371

				DrawPlayerFace(p->face, p->player_color, 2, 16);

   372

   373

				DrawStringMultiCenter(

   374

					214,

   375

					(_errmsg_message_1 == INVALID_STRING_ID ? 65 : 45),

   376

					_errmsg_message_2,

   377

					w->width - 2);

   378

				if (_errmsg_message_1 != INVALID_STRING_ID) {

   379

					DrawStringMultiCenter(

   380

						214,

   381

						90,

   382

						_errmsg_message_1,

   383

						w->width - 2);

   384

				}

   385

			}

   386

   387

			/* Switch back to the normal text ref. stack for NewGRF texts */

   388

			SwitchToNormalRefStack();

   389

			break;

   390

   391

		case WE_MOUSELOOP:

   392

			if (_right_button_down) delete w;

   393

			break;

   394

   395

		case WE_4:

   396

			if (--_errmsg_duration == 0) delete w;

   397

			break;

   398

   399

		case WE_DESTROY:

   400

			SetRedErrorSquare(0);

   401

			extern StringID _switch_mode_errorstr;

   402

			_switch_mode_errorstr = INVALID_STRING_ID;

   403

			break;

   404

   405

		case WE_KEYPRESS:

   406

			if (e->we.keypress.keycode == WKC_SPACE) {

   407

				/* Don't continue. */

   408

				e->we.keypress.cont = false;

   409

				delete w;

   410

			}

   411

			break;

   412

	}

   413

}

   414

   415

void ShowErrorMessage(StringID msg_1, StringID msg_2, int x, int y)

   416

{

   417

	DeleteWindowById(WC_ERRMSG, 0);

   418

   419

	if (msg_2 == STR_NULL) msg_2 = STR_EMPTY;

   420

   421

	_errmsg_message_1 = msg_1;

   422

	_errmsg_message_2 = msg_2;

   423

	CopyOutDParam(_errmsg_decode_params, 0, lengthof(_errmsg_decode_params));

   424

	_errmsg_duration = _patches.errmsg_duration;

   425

	if (!_errmsg_duration) return;

   426

   427

	Point pt;

   428

	const ViewPort *vp;

   429

	Window *w;

   430

   431

	if (_errmsg_message_1 != STR_013B_OWNED_BY || GetDParamX(_errmsg_decode_params,2) >= 8) {

   432

		if ((x | y) != 0) {

   433

			pt = RemapCoords2(x, y);

   434

			vp = FindWindowById(WC_MAIN_WINDOW, 0)->viewport;

   435

   436

			/* move x pos to opposite corner */

   437

			pt.x = UnScaleByZoom(pt.x - vp->virtual_left, vp->zoom) + vp->left;

   438

			pt.x = (pt.x < (_screen.width >> 1)) ? _screen.width - 260 : 20;

   439

   440

			/* move y pos to opposite corner */

   441

			pt.y = UnScaleByZoom(pt.y - vp->virtual_top, vp->zoom) + vp->top;

   442

			pt.y = (pt.y < (_screen.height >> 1)) ? _screen.height - 80 : 100;

   443

   444

		} else {

   445

			pt.x = (_screen.width - 240) >> 1;

   446

			pt.y = (_screen.height - 46) >> 1;

   447

		}

   448

		w = new Window(pt.x, pt.y, 240, 46, ErrmsgWndProc, WC_ERRMSG, _errmsg_widgets);

   449

	} else {

   450

		if ((x | y) != 0) {

   451

			pt = RemapCoords2(x, y);

   452

			vp = FindWindowById(WC_MAIN_WINDOW, 0)->viewport;

   453

			pt.x = Clamp(UnScaleByZoom(pt.x - vp->virtual_left, vp->zoom) + vp->left - (334/2), 0, _screen.width - 334);

   454

			pt.y = Clamp(UnScaleByZoom(pt.y - vp->virtual_top, vp->zoom) + vp->top - (137/2), 22, _screen.height - 137);

   455

		} else {

   456

			pt.x = (_screen.width - 334) >> 1;

   457

			pt.y = (_screen.height - 137) >> 1;

   458

		}

   459

		w = new Window(pt.x, pt.y, 334, 137, ErrmsgWndProc, WC_ERRMSG, _errmsg_face_widgets);

   460

	}

   461

   462

	w->desc_flags = WDF_STD_BTN | WDF_DEF_WIDGET;

   463

}

   464

   465

   466

void ShowEstimatedCostOrIncome(Money cost, int x, int y)

   467

{

   468

	StringID msg = STR_0805_ESTIMATED_COST;

   469

   470

	if (cost < 0) {

   471

		cost = -cost;

   472

		msg = STR_0807_ESTIMATED_INCOME;

   473

	}

   474

	SetDParam(0, cost);

   475

	ShowErrorMessage(INVALID_STRING_ID, msg, x, y);

   476

}

   477

   478

void ShowCostOrIncomeAnimation(int x, int y, int z, Money cost)

   479

{

   480

	Point pt = RemapCoords(x,y,z);

   481

	StringID msg = STR_0801_COST;

   482

   483

	if (cost < 0) {

   484

		cost = -cost;

   485

		msg = STR_0803_INCOME;

   486

	}

   487

	SetDParam(0, cost);

   488

	AddTextEffect(msg, pt.x, pt.y, 0x250, TE_RISING);

   489

}