1

/* $Id$ */

     2

     3

#include "stdafx.h"

     4

#include "openttd.h"

     5

#include "hal.h"

     6

#include "heightmap.h"

     7

#include "debug.h"

     8

#include "functions.h"

     9

#include "newgrf.h"

    10

#include "saveload.h"

    11

#include "strings.h"

    12

#include "table/sprites.h"

    13

#include "table/strings.h"

    14

#include "table/tree_land.h"

    15

#include "map.h"

    16

#include "window.h"

    17

#include "gui.h"

    18

#include "viewport.h"

    19

#include "gfx.h"

    20

#include "station.h"

    21

#include "command.h"

    22

#include "player.h"

    23

#include "town.h"

    24

#include "sound.h"

    25

#include "network/network.h"

    26

#include "string.h"

    27

#include "variables.h"

    28

#include "vehicle.h"

    29

#include "train.h"

    30

#include "tgp.h"

    31

#include "settings.h"

    32

#include "date.h"

    33

    34

#include "fios.h"

    35

/* Variables to display file lists */

    36

FiosItem *_fios_list;

    37

int _saveload_mode;

    38

    39

extern void GenerateLandscape(byte mode);

    40

extern void SwitchMode(int new_mode);

    41

    42

static bool _fios_path_changed;

    43

static bool _savegame_sort_dirty;

    44

    51

    52

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

    53

{

    54

	if (e->event == WE_PAINT) {

    55

		DrawWindowWidgets(w);

    56

    64

	}

    65

}

    66

    67

static const Widget _land_info_widgets[] = {

    68

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

    69

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

    70

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

    71

{    WIDGETS_END},

    72

};

    73

    74

static const WindowDesc _land_info_desc = {

    75

	WDP_AUTO, WDP_AUTO, 280, 93,

    76

	WC_LAND_INFO,0,

    77

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,

    78

	_land_info_widgets,

    79

	LandInfoWndProc

    80

};

    81

    82

static void Place_LandInfo(TileIndex tile)

    83

{

    84

	Player *p;

    85

	Window *w;

    87

	int64 old_money;

    92

    93

	DeleteWindowById(WC_LAND_INFO, 0);

    94

    95

	w = AllocateWindowDesc(&_land_info_desc);

    97

    98

	p = GetPlayer(IsValidPlayer(_local_player) ? _local_player : 0);

   100

   101

	old_money = p->money64;

   102

	p->money64 = p->player_money = 0x7fffffff;

   104

	p->money64 = old_money;

   105

	UpdatePlayerMoney32(p);

   106

   111

   173

   174

#if defined(_DEBUG)

   175

#	define LANDINFOD_LEVEL 0

   176

#else

   177

#	define LANDINFOD_LEVEL 1

   178

#endif

   179

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

   180

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

   181

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

   182

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

   183

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

   184

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

   185

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

   186

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

   187

#undef LANDINFOD_LEVEL

   188

}

   189

   190

void PlaceLandBlockInfo(void)

   191

{

   192

	if (_cursor.sprite == SPR_CURSOR_QUERY) {

   193

		ResetObjectToPlace();

   194

	} else {

   195

		_place_proc = Place_LandInfo;

   196

		SetObjectToPlace(SPR_CURSOR_QUERY, 1, 1, 0);

   197

	}

   198

}

   199

   200

static const char *credits[] = {

   201

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

   202

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

   203

	"Original design by Chris Sawyer",

   204

	"Original graphics by Simon Foster",

   205

	"",

   206

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

   207

	"  Jean-Francois Claeys (Belugas) - In training, not yet specialized",

   208

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

   209

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

   210

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

   211

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

   212

	"  Loïc Guilloux (glx) - In training, not yet specialized",

   213

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

   214

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

   215

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

   216

	"  Remko Bijker (Rubidium) - Belugas code scrutinizer",

   217

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

   218

	"  Patric Stout (TrueLight) - Coder, network guru, SVN- and website host",

   219

	"",

   220

	"Retired Developers:",

   221

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

   222

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

   223

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

   224

	"  Owen Rudge (orudge) - Forum- and masterserver host, OS/2 port (0.1 - 0.4.8)",

   225

	"",

   226

	"Special thanks go out to:",

   227

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

   228

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

   229

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

   230

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

   231

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

   232

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

   233

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

   234

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

   235

	"",

   236

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

   237

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

   238

	"  Marcin Grzegorczyk - Foundations for Tracks on Slopes",

   239

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

   240

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

   241

	"",

   242

	"",

   243

	"And last but not least:",

   244

	"  Chris Sawyer - For an amazing game!"

   245

};

   246

   247

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

   248

{

   249

	switch (e->event) {

   250

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

   251

		WP(w, scroller_d).counter = 0;

   252

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

   253

		break;

   254

	case WE_PAINT: {

   255

		uint i;

   256

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

   257

		DrawWindowWidgets(w);

   258

   259

		// Show original copyright and revision version

   260

		DrawStringCentered(210, 17, STR_00B6_ORIGINAL_COPYRIGHT, 0);

   261

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

   262

   263

		// Show all scrolling credits

   264

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

   265

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

   266

				DoDrawString(credits[i], 10, y, 0x10);

   267

			}

   268

			y += 10;

   269

		}

   270

   271

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

   272

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

   273

   274

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

   275

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

   276

	}	break;

   277

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

   278

		if (WP(w, scroller_d).counter++ % 3 == 0) {

   279

			WP(w, scroller_d).height--;

   280

			SetWindowDirty(w);

   281

		}

   282

		break;

   283

	}

   284

}

   285

   286

static const Widget _about_widgets[] = {

   287

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

   288

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

   289

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

   290

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

   291

{    WIDGETS_END},

   292

};

   293

   294

static const WindowDesc _about_desc = {

   295

	WDP_CENTER, WDP_CENTER, 420, 272,

   296

	WC_GAME_OPTIONS,0,

   297

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,

   298

	_about_widgets,

   299

	AboutWindowProc

   300

};

   301

   302

   303

void ShowAboutWindow(void)

   304

{

   305

	DeleteWindowById(WC_GAME_OPTIONS, 0);

   306

	AllocateWindowDesc(&_about_desc);

   307

}

   308

   309

static int _tree_to_plant;

   310

   311

static const uint32 _tree_sprites[] = {

   312

	0x655, 0x663, 0x678, 0x62B, 0x647, 0x639, 0x64E, 0x632, 0x67F, 0x68D, 0x69B, 0x6A9,

   313

	0x6AF, 0x6D2, 0x6D9, 0x6C4, 0x6CB, 0x6B6, 0x6BD, 0x6E0,

   314

	0x72E, 0x734, 0x74A, 0x74F, 0x76B, 0x78F, 0x788, 0x77B, 0x75F, 0x774, 0x720, 0x797,

   315

	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

   316

};

   317

   318

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

   319

{

   320

	switch (e->event) {

   321

	case WE_PAINT: {

   322

		int x,y;

   323

		int i, count;

   324

   325

		DrawWindowWidgets(w);

   326

   327

		WP(w,tree_d).base = i = _tree_base_by_landscape[_opt.landscape];

   328

		WP(w,tree_d).count = count = _tree_count_by_landscape[_opt.landscape];

   329

   330

		x = 18;

   331

		y = 54;

   332

		do {

   333

			DrawSprite(_tree_sprites[i], x, y);

   334

			x += 35;

   335

			if (!(++i & 3)) {

   336

				x -= 35 * 4;

   337

				y += 47;

   338

			}

   339

		} while (--count);

   340

	} break;

   341

   342

	case WE_CLICK: {

   343

		int wid = e->we.click.widget;

   344

   345

		switch (wid) {

   346

		case 0:

   347

			ResetObjectToPlace();

   348

			break;

   349

   350

		case 3: case 4: case 5: case 6:

   351

		case 7: case 8: case 9: case 10:

   352

		case 11:case 12: case 13: case 14:

   353

			if (wid - 3 >= WP(w,tree_d).count) break;

   354

   355

			if (HandlePlacePushButton(w, wid, SPR_CURSOR_TREE, 1, NULL))

   356

				_tree_to_plant = WP(w,tree_d).base + wid - 3;

   357

			break;

   358

   359

		case 15: // tree of random type.

   360

			if (HandlePlacePushButton(w, 15, SPR_CURSOR_TREE, 1, NULL))

   361

				_tree_to_plant = -1;

   362

			break;

   363

   364

		case 16: /* place trees randomly over the landscape*/

   365

			LowerWindowWidget(w, 16);

   366

			w->flags4 |= 5 << WF_TIMEOUT_SHL;

   367

			SndPlayFx(SND_15_BEEP);

   368

			PlaceTreesRandomly();

   369

			MarkWholeScreenDirty();

   370

			break;

   371

		}

   372

	} break;

   373

   374

	case WE_PLACE_OBJ:

   375

		VpStartPlaceSizing(e->we.place.tile, VPM_X_AND_Y_LIMITED);

   376

		VpSetPlaceSizingLimit(20);

   377

		break;

   378

   379

	case WE_PLACE_DRAG:

   380

		VpSelectTilesWithMethod(e->we.place.pt.x, e->we.place.pt.y, e->we.place.userdata);

   381

		return;

   382

   383

	case WE_PLACE_MOUSEUP:

   384

		if (e->we.place.pt.x != -1) {

   385

			DoCommandP(e->we.place.tile, _tree_to_plant, e->we.place.starttile, NULL,

   386

				CMD_PLANT_TREE | CMD_AUTO | CMD_MSG(STR_2805_CAN_T_PLANT_TREE_HERE));

   387

		}

   388

		break;

   389

   390

	case WE_TIMEOUT:

   391

		RaiseWindowWidget(w, 16);

   392

		break;

   393

   394

	case WE_ABORT_PLACE_OBJ:

   395

		RaiseWindowButtons(w);

   396

		break;

   397

	}

   398

}

   399

   400

static const Widget _build_trees_widgets[] = {

   401

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

   402

{    WWT_CAPTION,   RESIZE_NONE,     7,    11,   142,     0,    13, STR_2802_TREES,        STR_018C_WINDOW_TITLE_DRAG_THIS},

   403

{      WWT_PANEL,   RESIZE_NONE,     7,     0,   142,    14,   170, 0x0,                   STR_NULL},

   404

{      WWT_PANEL,   RESIZE_NONE,    14,     2,    35,    16,    61, 0x0,                   STR_280D_SELECT_TREE_TYPE_TO_PLANT},

   405

{      WWT_PANEL,   RESIZE_NONE,    14,    37,    70,    16,    61, 0x0,                   STR_280D_SELECT_TREE_TYPE_TO_PLANT},

   406

{      WWT_PANEL,   RESIZE_NONE,    14,    72,   105,    16,    61, 0x0,                   STR_280D_SELECT_TREE_TYPE_TO_PLANT},

   407

{      WWT_PANEL,   RESIZE_NONE,    14,   107,   140,    16,    61, 0x0,                   STR_280D_SELECT_TREE_TYPE_TO_PLANT},

   408

{      WWT_PANEL,   RESIZE_NONE,    14,     2,    35,    63,   108, 0x0,                   STR_280D_SELECT_TREE_TYPE_TO_PLANT},

   409

{      WWT_PANEL,   RESIZE_NONE,    14,    37,    70,    63,   108, 0x0,                   STR_280D_SELECT_TREE_TYPE_TO_PLANT},

   410

{      WWT_PANEL,   RESIZE_NONE,    14,    72,   105,    63,   108, 0x0,                   STR_280D_SELECT_TREE_TYPE_TO_PLANT},

   411

{      WWT_PANEL,   RESIZE_NONE,    14,   107,   140,    63,   108, 0x0,                   STR_280D_SELECT_TREE_TYPE_TO_PLANT},

   412

{      WWT_PANEL,   RESIZE_NONE,    14,     2,    35,   110,   155, 0x0,                   STR_280D_SELECT_TREE_TYPE_TO_PLANT},

   413

{      WWT_PANEL,   RESIZE_NONE,    14,    37,    70,   110,   155, 0x0,                   STR_280D_SELECT_TREE_TYPE_TO_PLANT},

   414

{      WWT_PANEL,   RESIZE_NONE,    14,    72,   105,   110,   155, 0x0,                   STR_280D_SELECT_TREE_TYPE_TO_PLANT},

   415

{      WWT_PANEL,   RESIZE_NONE,    14,   107,   140,   110,   155, 0x0,                   STR_280D_SELECT_TREE_TYPE_TO_PLANT},

   416

{    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   140,   157,   168, STR_TREES_RANDOM_TYPE, STR_TREES_RANDOM_TYPE_TIP},

   417

{    WIDGETS_END},

   418

};

   419

   420

static const WindowDesc _build_trees_desc = {

   421

	497, 22, 143, 171,

   422

	WC_BUILD_TREES, WC_SCEN_LAND_GEN,

   423

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,

   424

	_build_trees_widgets,

   425

	BuildTreesWndProc

   426

};

   427

   428

static const Widget _build_trees_scen_widgets[] = {

   429

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

   430

{    WWT_CAPTION,   RESIZE_NONE,     7,    11,   142,     0,    13, STR_2802_TREES,        STR_018C_WINDOW_TITLE_DRAG_THIS},

   431

{      WWT_PANEL,   RESIZE_NONE,     7,     0,   142,    14,   183, 0x0,                   STR_NULL},

   432

{      WWT_PANEL,   RESIZE_NONE,    14,     2,    35,    16,    61, 0x0,                   STR_280D_SELECT_TREE_TYPE_TO_PLANT},

   433

{      WWT_PANEL,   RESIZE_NONE,    14,    37,    70,    16,    61, 0x0,                   STR_280D_SELECT_TREE_TYPE_TO_PLANT},

   434

{      WWT_PANEL,   RESIZE_NONE,    14,    72,   105,    16,    61, 0x0,                   STR_280D_SELECT_TREE_TYPE_TO_PLANT},

   435

{      WWT_PANEL,   RESIZE_NONE,    14,   107,   140,    16,    61, 0x0,                   STR_280D_SELECT_TREE_TYPE_TO_PLANT},

   436

{      WWT_PANEL,   RESIZE_NONE,    14,     2,    35,    63,   108, 0x0,                   STR_280D_SELECT_TREE_TYPE_TO_PLANT},

   437

{      WWT_PANEL,   RESIZE_NONE,    14,    37,    70,    63,   108, 0x0,                   STR_280D_SELECT_TREE_TYPE_TO_PLANT},

   438

{      WWT_PANEL,   RESIZE_NONE,    14,    72,   105,    63,   108, 0x0,                   STR_280D_SELECT_TREE_TYPE_TO_PLANT},

   439

{      WWT_PANEL,   RESIZE_NONE,    14,   107,   140,    63,   108, 0x0,                   STR_280D_SELECT_TREE_TYPE_TO_PLANT},

   440

{      WWT_PANEL,   RESIZE_NONE,    14,     2,    35,   110,   155, 0x0,                   STR_280D_SELECT_TREE_TYPE_TO_PLANT},

   441

{      WWT_PANEL,   RESIZE_NONE,    14,    37,    70,   110,   155, 0x0,                   STR_280D_SELECT_TREE_TYPE_TO_PLANT},

   442

{      WWT_PANEL,   RESIZE_NONE,    14,    72,   105,   110,   155, 0x0,                   STR_280D_SELECT_TREE_TYPE_TO_PLANT},

   443

{      WWT_PANEL,   RESIZE_NONE,    14,   107,   140,   110,   155, 0x0,                   STR_280D_SELECT_TREE_TYPE_TO_PLANT},

   444

{    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   140,   157,   168, STR_TREES_RANDOM_TYPE, STR_TREES_RANDOM_TYPE_TIP},

   445

{    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   140,   170,   181, STR_028A_RANDOM_TREES, STR_028B_PLANT_TREES_RANDOMLY_OVER},

   446

{    WIDGETS_END},

   447

};

   448

   449

static const WindowDesc _build_trees_scen_desc = {

   450

	WDP_AUTO, WDP_AUTO, 143, 184,

   451

	WC_BUILD_TREES,0,

   452

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,

   453

	_build_trees_scen_widgets,

   454

	BuildTreesWndProc

   455

};

   456

   457

   458

void ShowBuildTreesToolbar(void)

   459

{

   460

	if (!IsValidPlayer(_current_player)) return;

   461

	AllocateWindowDescFront(&_build_trees_desc, 0);

   462

}

   463

   464

void ShowBuildTreesScenToolbar(void)

   465

{

   466

	AllocateWindowDescFront(&_build_trees_scen_desc, 0);

   467

}

   468

   469

static uint32 _errmsg_decode_params[20];

   470

static StringID _errmsg_message_1, _errmsg_message_2;

   471

static uint _errmsg_duration;

   472

   473

   474

static const Widget _errmsg_widgets[] = {

   475

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

   476

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

   477

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

   478

{    WIDGETS_END},

   479

};

   480

   481

static const Widget _errmsg_face_widgets[] = {

   482

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

   483

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

   484

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

   485

{   WIDGETS_END},

   486

};

   487

   488

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

   489

{

   490

	switch (e->event) {

   491

	case WE_PAINT:

   492

		COPY_IN_DPARAM(0, _errmsg_decode_params, lengthof(_errmsg_decode_params));

   493

		DrawWindowWidgets(w);

   494

		COPY_IN_DPARAM(0, _errmsg_decode_params, lengthof(_errmsg_decode_params));

   495

		if (!IsWindowOfPrototype(w, _errmsg_face_widgets)) {

   496

			DrawStringMultiCenter(