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

#include "querystring_gui.h"

    48

    49

#include "table/sprites.h"

    50

#include "table/strings.h"

    51

    52

/* Variables to display file lists */

    53

FiosItem *_fios_list;

    54

SaveLoadDialogMode _saveload_mode;

    55

    56

    57

static bool _fios_path_changed;

    58

static bool _savegame_sort_dirty;

    59

    60

static const Widget _land_info_widgets[] = {

    61

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

    62

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

    63

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

    64

{    WIDGETS_END},

    65

};

    66

    67

static const WindowDesc _land_info_desc = {

    68

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

    69

	WC_LAND_INFO, WC_NONE,

    70

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,

    71

	_land_info_widgets,

    72

	NULL

    73

};

    74

    75

class LandInfoWindow : public Window {

    76

	enum {

    77

		LAND_INFO_LINES          =   7,

    78

		LAND_INFO_LINE_BUFF_SIZE = 512,

    79

	};

    80

    81

public:

    82

	char landinfo_data[LAND_INFO_LINES][LAND_INFO_LINE_BUFF_SIZE];

    83

    84

	virtual void OnPaint()

    85

	{

    86

		DrawWindowWidgets(this);

    87

    88

		DoDrawStringCentered(140, 16, this->landinfo_data[0], TC_LIGHT_BLUE);

    89

		DoDrawStringCentered(140, 27, this->landinfo_data[1], TC_FROMSTRING);

    90

		DoDrawStringCentered(140, 38, this->landinfo_data[2], TC_FROMSTRING);

    91

		DoDrawStringCentered(140, 49, this->landinfo_data[3], TC_FROMSTRING);

    92

		DoDrawStringCentered(140, 60, this->landinfo_data[4], TC_FROMSTRING);

    93

		if (!StrEmpty(this->landinfo_data[5])) DrawStringMultiCenter(140, 76, BindCString(this->landinfo_data[5]), this->width - 4);

    94

		if (!StrEmpty(this->landinfo_data[6])) DoDrawStringCentered(140, 71, this->landinfo_data[6], TC_FROMSTRING);

    95

	}

    96

    97

	LandInfoWindow(TileIndex tile) : Window(&_land_info_desc) {

    98

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

    99

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

   100

   101

		Money old_money = p->player_money;

   102

		p->player_money = INT64_MAX;

   103

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

   104

		p->player_money = old_money;

   105

   106

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

   107

		TileDesc td;

   108

		AcceptedCargo ac;

   109

   110

		td.build_date = 0;

   111

		GetAcceptedCargo(tile, ac);

   112

		GetTileDesc(tile, &td);

   113

   114

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

   115

		GetString(this->landinfo_data[0], td.str, lastof(this->landinfo_data[0]));

   116

   117

		SetDParam(0, STR_01A6_N_A);

   118

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

   119

		GetString(this->landinfo_data[1], STR_01A7_OWNER, lastof(this->landinfo_data[1]));

   120

   121

		StringID str = STR_01A4_COST_TO_CLEAR_N_A;

   122

		if (CmdSucceeded(costclear)) {

   123

			SetDParam(0, costclear.GetCost());

   124

			str = STR_01A5_COST_TO_CLEAR;

   125

		}

   126

		GetString(this->landinfo_data[2], str, lastof(this->landinfo_data[2]));

   127

   128

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

   129

		SetDParam(0, TileX(tile));

   130

		SetDParam(1, TileY(tile));

   131

		SetDParam(2, TileHeight(tile));

   132

		SetDParam(3, STR_SPEC_USERSTRING);

   133

		GetString(this->landinfo_data[3], STR_LANDINFO_COORDS, lastof(this->landinfo_data[3]));

   134

   135

		SetDParam(0, STR_01A9_NONE);

   136

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

   137

			SetDParam(0, STR_TOWN);

   138

			SetDParam(1, t->index);

   139

		}

   140

		GetString(this->landinfo_data[4], STR_01A8_LOCAL_AUTHORITY, lastof(this->landinfo_data[4]));

   141

   142

		char *strp = GetString(this->landinfo_data[5], STR_01CE_CARGO_ACCEPTED, lastof(this->landinfo_data[5]));

   143

		bool found = false;

   144

   145

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

   146

			if (ac[i] > 0) {

   147

				/* Add a comma between each item. */

   148

				if (found) {

   149

					*strp++ = ',';

   150

					*strp++ = ' ';

   151

				}

   152

				found = true;

   153

   154

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

   155

				if (ac[i] < 8) {

   156

					SetDParam(0, ac[i]);

   157

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

   158

					strp = GetString(strp, STR_01D1_8, lastof(this->landinfo_data[5]));

   159

				} else {

   160

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

   161

				}

   162

			}

   163

		}

   164

		if (!found) this->landinfo_data[5][0] = '\0';

   165

   166

		if (td.build_date != 0) {

   167

			SetDParam(0, td.build_date);

   168

			GetString(this->landinfo_data[6], STR_BUILD_DATE, lastof(this->landinfo_data[6]));

   169

		} else {

   170

			this->landinfo_data[6][0] = '\0';

   171

		}

   172

   173

#if defined(_DEBUG)

   174

#	define LANDINFOD_LEVEL 0

   175

#else

   176

#	define LANDINFOD_LEVEL 1

   177

#endif

   178

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

   179

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

   180

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

   181

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

   182

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

   183

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

   184

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

   185

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

   186

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

   187

#undef LANDINFOD_LEVEL

   188

   189

		this->FindWindowPlacementAndResize(&_land_info_desc);

   190

	}

   191

};

   192

   193

static void Place_LandInfo(TileIndex tile)

   194

{

   195

	DeleteWindowById(WC_LAND_INFO, 0);

   196

	new LandInfoWindow(tile);

   197

}

   198

   199

void PlaceLandBlockInfo()

   200

{

   201

	if (_cursor.sprite == SPR_CURSOR_QUERY) {

   202

		ResetObjectToPlace();

   203

	} else {

   204

		_place_proc = Place_LandInfo;

   205

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

   206

	}

   207

}

   208

   209

static const Widget _about_widgets[] = {

   210

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

   211

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

   212

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

   213

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

   214

{    WIDGETS_END},

   215

};

   216

   217

static const WindowDesc _about_desc = {

   218

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

   219

	WC_GAME_OPTIONS, WC_NONE,

   220

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,

   221

	_about_widgets,

   222

	NULL

   223

};

   224

   225

struct AboutWindow : public Window {

   226

	int scroll_height;

   227

	uint16 counter;

   228

   229

	AboutWindow() : Window(&_about_desc)

   230

	{

   231

		this->counter = 5;

   232

		this->scroll_height = this->height - 40;

   233

		this->FindWindowPlacementAndResize(&_about_desc);

   234

	}

   235

   236

	virtual void OnPaint()

   237

	{

   238

		static const char *credits[] = {

   239

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

   240

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

   241

			"Original design by Chris Sawyer",

   242

			"Original graphics by Simon Foster",

   243

			"",

   244

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

   245

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

   246

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

   247

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

   248

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

   249

			"  Christoph Elsenhans (frosch) - General coding",

   250

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

   251

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

   252

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

   253

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

   254

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

   255

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

   256

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

   257

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

   258

			"",

   259

			"Inactive Developers:",

   260

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

   261

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

   262

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

   263

			"",

   264

			"Retired Developers:",

   265

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

   266

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

   267

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

   268

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

   269

			"",

   270

			"Special thanks go out to:",

   271

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

   272

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

   273

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

   274

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

   275

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

   276

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

   277

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

   278

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

   279

			"",

   280

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

   281

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

   282

			"  David Dallaston - Tram tracks",

   283

			"  Marcin Grzegorczyk - Foundations for Tracks on Slopes",

   284

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

   285

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

   286

			"",

   287

			"",

   288

			"And last but not least:",

   289

			"  Chris Sawyer - For an amazing game!"

   290

		};

   291

   292

		DrawWindowWidgets(this);

   293

   294

		/* Show original copyright and revision version */

   295

		DrawStringCentered(210, 17, STR_00B6_ORIGINAL_COPYRIGHT, TC_FROMSTRING);

   296

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

   297

   298

		int y = this->scroll_height;

   299

   300

		/* Show all scrolling credits */

   301

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

   302

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

   303

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

   304

			}

   305

			y += 10;

   306

		}

   307

   308

		/* If the last text has scrolled start a new from the start */

   309

		if (y < 50) this->scroll_height = this->height - 40;

   310

   311

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

   312

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

   313

	}

   314

   315

	virtual void OnTick()

   316

	{

   317

		if (--this->counter == 0) {

   318

			this->counter = 5;

   319

			this->scroll_height--;

   320

			this->SetDirty();

   321

		}

   322

	}

   323

};

   324

   325

void ShowAboutWindow()

   326

{

   327

	DeleteWindowById(WC_GAME_OPTIONS, 0);

   328

	new AboutWindow();

   329

}

   330

   331

static const Widget _errmsg_widgets[] = {

   332

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

   333

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

   334

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

   335

{    WIDGETS_END},

   336

};

   337

   338

static const Widget _errmsg_face_widgets[] = {

   339

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

   340

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

   341

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

   342

{   WIDGETS_END},

   343

};

   344

   351

   362

   369

   373

   395

	}

   421

   422

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

   423

{

   424

	DeleteWindowById(WC_ERRMSG, 0);

   425

   427

   429

   430

	Point pt;

   431

	const ViewPort *vp;

   432

   434

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

   435

			pt = RemapCoords2(x, y);

   436

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

   437

   438

			/* move x pos to opposite corner */

   439

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

   440

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

   441

   442

			/* move y pos to opposite corner */

   443

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

   444

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

   445

   446

		} else {

   447

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

   448

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

   449

		}

   451

	} else {

   452

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

   453

			pt = RemapCoords2(x, y);

   454

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

   455

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

   456

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

   457

		} else {

   458

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

   459

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

   460

		}

   462

	}

   463

}

   464

   465

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

   466

{

   467

	StringID msg = STR_0805_ESTIMATED_COST;

   468

   469

	if (cost < 0) {

   470

		cost = -cost;

   471

		msg = STR_0807_ESTIMATED_INCOME;

   472

	}

   473

	SetDParam(0, cost);

   474

	ShowErrorMessage(INVALID_STRING_ID, msg, x, y);

   475

}

   476

   477

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

   478

{

   479

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

   480

	StringID msg = STR_0801_COST;

   481

   482

	if (cost < 0) {

   483

		cost = -cost;

   484

		msg = STR_0803_INCOME;

   485

	}

   486

	SetDParam(0, cost);

   487

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

   488

}

   489

   490

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

   491

{