1

#include "stdafx.h"

     2

#include "ttd.h"

     3

#include "table/strings.h"

     4

#include "map.h"

     5

#include "window.h"

     6

#include "gui.h"

     7

#include "viewport.h"

     8

#include "gfx.h"

     9

#include "station.h"

    10

#include "command.h"

    11

#include "player.h"

    12

#include "town.h"

    13

#include "sound.h"

    14

#include "network.h"

    15

    16

#include "hal.h" // for file list

    17

    18

bool _query_string_active;

    19

void SetFiosType(const byte fiostype);

    20

    21

/* Now this is what I call dirty.. the edit-box needs to be rewritten! */

    22

static bool _do_edit_on_text_even_when_no_change_to_edit_box;

    23

    24

typedef struct LandInfoData {

    25

	Town *town;

    26

	int32 costclear;

    27

	AcceptedCargo ac;

    28

	uint tile;

    29

	TileDesc td;

    30

} LandInfoData;

    31

    32

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

    33

{

    34

	LandInfoData *lid;

    35

	StringID str;

    36

    37

	if (e->event == WE_PAINT) {

    38

		int idx = 0;

    39

		int i;

    40

    41

		DrawWindowWidgets(w);

    42

    43

		lid = WP(w,void_d).data;

    44

    45

		SetDParam(0, lid->td.dparam[0]);

    46

		DrawStringCentered(140, 16, lid->td.str, 13);

    47

    48

		SetDParam(0, STR_01A6_N_A);

    49

		if (lid->td.owner != OWNER_NONE && lid->td.owner != OWNER_WATER)

    50

			GetNameOfOwner(lid->td.owner, lid->tile);

    51

		DrawStringCentered(140, 27, STR_01A7_OWNER, 0);

    52

    53

		str = STR_01A4_COST_TO_CLEAR_N_A;

    54

		if (lid->costclear != CMD_ERROR) {

    55

			SetDParam(0, lid->costclear);

    56

			str = STR_01A5_COST_TO_CLEAR;

    57

		}

    58

		DrawStringCentered(140, 38, str, 0);

    59

    60

		snprintf(_userstring, USERSTRING_LEN, "%.4X", lid->tile);

    61

		SetDParam(0, GET_TILE_X(lid->tile));

    62

		SetDParam(1, GET_TILE_Y(lid->tile));

    63

		SetDParam(2, STR_SPEC_USERSTRING);

    64

		DrawStringCentered(140, 49, STR_LANDINFO_COORDS, 0);

    65

    66

		SetDParam(0, STR_01A9_NONE);

    67

		if (lid->town != NULL) {

    68

			SetDParam(0, lid->town->townnametype);

    69

			SetDParam(1, lid->town->townnameparts);

    70

		}

    71

		DrawStringCentered(140,60, STR_01A8_LOCAL_AUTHORITY, 0);

    72

    73

		str = STR_01CE_CARGO_ACCEPTED - 1;

    74

    75

		/* XXX if a tile accepts more cargo types than there are template strings

    76

		 * this breaks */

    77

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

    78

			if (lid->ac[i] > 0) {

    79

				if (lid->ac[i] < 8) {

    80

					SetDParam(idx++, STR_01D1_8);

    81

					SetDParam(idx++, lid->ac[i]);

    82

				}

    83

				SetDParam(idx++, _cargoc.names_s[i]);

    84

				str++;

    85

			}

    86

		}

    87

    88

		if (str != (STR_01CE_CARGO_ACCEPTED - 1))

    89

			DrawStringMultiCenter(140, 76, str, 276);

    90

    91

		if (lid->td.build_date != 0) {

    92

			SetDParam(0,lid->td.build_date);

    93

			DrawStringCentered(140,71, STR_BUILD_DATE, 0);

    94

		}

    95

	}

    96

}

    97

    98

static const Widget _land_info_widgets[] = {

   102

{    WIDGETS_END},

   103

};

   104

   105

static const WindowDesc _land_info_desc = {

   106

	-1, -1, 280, 93,

   107

	WC_LAND_INFO,0,

   108

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,

   109

	_land_info_widgets,

   110

	LandInfoWndProc

   111

};

   112

   113

static void Place_LandInfo(uint tile)

   114

{

   115

	Player *p;

   116

	static LandInfoData lid;

   117

	Window *w;

   118

	int64 old_money;

   119

   120

	DeleteWindowById(WC_LAND_INFO, 0);

   121

   122

	w = AllocateWindowDesc(&_land_info_desc);

   123

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

   124

   125

	lid.tile = tile;

   126

	lid.town = ClosestTownFromTile(tile, _patches.dist_local_authority);

   127

   128

	if (_local_player >= MAX_PLAYERS)

   129

		p = DEREF_PLAYER(0);

   130

	else

   131

		p = DEREF_PLAYER(_local_player);

   132

   133

	old_money = p->money64;

   134

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

   135

	lid.costclear = DoCommandByTile(tile, 0, 0, 0, CMD_LANDSCAPE_CLEAR);

   136

	p->money64 = old_money;

   137

	UpdatePlayerMoney32(p);

   138

   139

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

   140

	lid.td.build_date = 0;

   141

   142

	GetAcceptedCargo(tile, lid.ac);

   143

	GetTileDesc(tile, &lid.td);

   144

   145

	#if defined(_DEBUG)

   146

		DEBUG(misc, 0) ("TILE: %#x (%i,%i)", tile, GET_TILE_X(tile), GET_TILE_Y(tile));

   147

		DEBUG(misc, 0) ("TILE: %d ", tile);

   148

		DEBUG(misc, 0) ("_map_type_and_height=%#x", _map_type_and_height[tile]);

   149

		DEBUG(misc, 0) ("_map2=%#x", _map2[tile]);

   150

		DEBUG(misc, 0) ("_map3_lo=%#x", _map3_lo[tile]);

   151

		DEBUG(misc, 0) ("_map3_hi=%#x", _map3_hi[tile]);

   152

		DEBUG(misc, 0) ("_map5=%#x", _map5[tile]);

   153

		DEBUG(misc, 0) ("_map_owner=%#x", _map_owner[tile]);

   154

	#endif

   155

}

   156

   157

void PlaceLandBlockInfo()

   158

{

   159

	if (_cursor.sprite == 0x2CF) {

   160

		ResetObjectToPlace();

   161

	} else {

   162

		_place_proc = Place_LandInfo;

   163

		SetObjectToPlace(0x2CF, 1, 1, 0);

   164

	}

   165

}

   166

   167

static const char *credits[] = {

   168

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

   169

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

   170

	"Original design by Chris Sawyer",

   171

	"Original graphics by Simon Foster",

   172

	"",

   173

	"The OpenTTD team:",

   174

	"  Dominik Scherer (dominik81) - Lead coder",

   175

	"  Tamas Farago (Darkvater) - Lead coder",

   176

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

   177

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

   178

	"  Bjarni Corfitzen (Bjarni) - MacOS port",

   179

	"  Kerekes Miham (MiHaMiX) - Translator system, and Nightlies host",

   180

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

   181

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

   182

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

   183

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

   184

	"",

   185

	"Special thanks go out to:",

   186

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

   187

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

   188

	"  Tron - Many patches, suggestions and relentless correcting of the code",

   189

	"  Celestar - For his many patches, suggestions and fixes",

   190

	"  blathijs - For his many patches, suggestions and code documentation",

   191

	"  pasky - Many patches, newgrf support",

   192

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

   193

	"",

   194

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

   195

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

   196

	"  Marcin Grzegorczyk - Foundations for Tracks on Slopes",

   197

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

   198

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

   199

	NULL,

   200

	"",

   201

	"",

   202

	"And finally:",

   203

	"  Chris Sawyer - For an amazing game!"

   204

};

   205

   206

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

   207

{

   208

	switch(e->event) {

   209

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

   210

		WP(w, general_d).i = 0;

   211

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

   212

		break;

   213

	case WE_PAINT: {

   214

		const char *str;

   215

		char buffer[100];

   216

		int i;

   217

		int y = WP(w, general_d).j;

   218

		DrawWindowWidgets(w);

   219

   220

		// Show original copyright and revision version

   221

		DrawStringCentered(200, 17, STR_00B6_ORIGINAL_COPYRIGHT, 0);

   222

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

   223

   224

		// Show all scrolling credits

   225

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

   226

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

   227

				str = credits[i];

   228

				/* Hack-Alert: Translated by is a dynamic string as it changes

   229

				 * with the language chosen. So the special value of NULL is used

   230

				 * to identify this for the moment */

   231

				if (str == NULL) {

   232

					GetString(buffer, STR_TRANSLATED_BY);

   233

					str = buffer;

   234

				}

   235

   236

			 DoDrawString(str, 10, y, 0x10);

   237

			}

   238

			y += 10;

   239

		}

   240

   241

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

   242

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

   243

   244

		DrawStringMultiCenter(200, w->height - 15, STR_00BA_COPYRIGHT_OPENTTD, 398);

   245

	}	break;

   246

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

   247

		if (WP(w, general_d).i++ % 3 == 0) {

   248

			WP(w, general_d).j--;

   249

			SetWindowDirty(w);

   250

		}

   251

		break;

   252

	}

   253

}

   254

   255

static const Widget _about_widgets[] = {

   259

{      WWT_FRAME,    14,     5,   394,    40,   245, STR_NULL,					STR_NULL},

   260

{    WIDGETS_END},

   261

};

   262

   263

static const WindowDesc _about_desc = {

   264

	WDP_CENTER, WDP_CENTER, 400, 272,

   265

	WC_GAME_OPTIONS,0,

   266

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,

   267

	_about_widgets,

   268

	AboutWindowProc

   269

};

   270

   271

   272

void ShowAboutWindow()

   273

{

   274

	DeleteWindowById(WC_GAME_OPTIONS, 0);

   275

	AllocateWindowDesc(&_about_desc);

   276

}

   277

   278

static int _tree_to_plant;

   279

   280

static const byte _tree_base_by_landscape[4] = {0, 12, 20, 32};

   281

static const byte _tree_count_by_landscape[4] = {12, 8, 12, 9};

   282

static const uint32 _tree_sprites[] = {

   283

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

   284

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

   285

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

   286

	0x79E,0x30D87A5,0x30B87AC,0x7B3,0x7BA,0x30B87C1,0x30887C8,0x30A87CF,0x30B87D6

   287

};

   288

   289

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

   290

{

   291

	switch(e->event) {

   292

	case WE_PAINT: {

   293

		int x,y;

   294

		int i, count;

   295

   296

		DrawWindowWidgets(w);

   297

   298

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

   299

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

   300

   301

		x = 18;

   302

		y = 54;

   303

		do {

   304

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

   305

			x += 35;

   306

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

   307

				x -= 35*4;

   308

				y += 47;

   309

			}

   310

		} while (--count);

   311

	} break;

   312

   313

	case WE_CLICK: {

   314

		int wid;

   315

   316

		switch(wid=e->click.widget) {

   317

		case 0:

   318

			ResetObjectToPlace();

   319

			return;

   320

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

   321

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

   322

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

   323

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

   324

				return;

   325

   326

			if (HandlePlacePushButton(w, wid, 0x7DA, 1, NULL))

   327

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

   328

			break;

   329

   330

		case 15: // tree of random type.

   331

			if (HandlePlacePushButton(w, 15, 0x7DA, 1, NULL))

   332

				_tree_to_plant = -1;

   333

			break;

   334

   335

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

   336

			w->click_state |= 1 << 16;

   337

			w->flags4 |= 5 << WF_TIMEOUT_SHL;

   338

			SndPlayFx(SND_15_BEEP);

   339

			PlaceTreesRandomly();

   340

			MarkWholeScreenDirty();

   341

			break;

   342

		}

   343

	} break;

   344

   345

	case WE_PLACE_OBJ:

   346

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

   347

		VpSetPlaceSizingLimit(20);

   348

		break;

   349

   350

	case WE_PLACE_DRAG:

   351

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

   352

		return;

   353

   354

	case WE_PLACE_MOUSEUP:

   355

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

   356

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

   357

				CMD_PLANT_TREE | CMD_AUTO | CMD_MSG(STR_2805_CAN_T_PLANT_TREE_HERE));

   358

		}

   359

		break;

   360

   361

	case WE_TIMEOUT:

   362

		UnclickSomeWindowButtons(w, 1<<16);

   363

		break;

   364

   365

	case WE_ABORT_PLACE_OBJ:

   366

		w->click_state = 0;

   367

		SetWindowDirty(w);

   368

		break;

   369

	}

   370

}

   371

   372

static const Widget _build_trees_widgets[] = {

   389

{    WIDGETS_END},

   390

};

   391

   392

static const WindowDesc _build_trees_desc = {

   393

	497, 22, 143, 171,

   394

	WC_BUILD_TREES, WC_SCEN_LAND_GEN,

   395

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,

   396

	_build_trees_widgets,

   397

	BuildTreesWndProc

   398

};

   399

   400

static const Widget _build_trees_scen_widgets[] = {

   418

{    WIDGETS_END},

   419

};

   420

   421

static const WindowDesc _build_trees_scen_desc = {

   422

	-1, -1, 143, 184,

   423

	WC_BUILD_TREES,0,

   424

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,

   425

	_build_trees_scen_widgets,

   426

	BuildTreesWndProc

   427

};

   428

   429

   430

void ShowBuildTreesToolbar()

   431

{

   432

	AllocateWindowDesc(&_build_trees_desc);

   433

}

   434

   435

void ShowBuildTreesScenToolbar()

   436

{

   437

	AllocateWindowDescFront(&_build_trees_scen_desc, 0);

   438

}

   439

   440

static uint32 _errmsg_decode_params[20];

   441

static StringID _errmsg_message_1, _errmsg_message_2;

   442

static uint _errmsg_duration;

   443

   444

   445

static const Widget _errmsg_widgets[] = {

   449

{    WIDGETS_END},

   450

};

   451

   452

static const Widget _errmsg_face_widgets[] = {

   456

{   WIDGETS_END},

   457

};

   458

   459

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

   460

{

   461

	switch(e->event) {

   462

	case WE_PAINT:

   463

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

   464

		DrawWindowWidgets(w);

   465

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

   467

			DrawStringMultiCenter(

   468

				120,

   469

				(_errmsg_message_1 == INVALID_STRING_ID ? 25 : 15),

   470

				_errmsg_message_2,

   471

				238);

   472

			if (_errmsg_message_1 != INVALID_STRING_ID)

   473

				DrawStringMultiCenter(

   474

					120,

   475

					30,

   476

					_errmsg_message_1,

   477

					238);

   478

		} else {

   479

			Player *p = DEREF_PLAYER(GetDParamX(_errmsg_decode_params,2));

   480

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

   481

   482

			DrawStringMultiCenter(

   483

				214,

   484

				(_errmsg_message_1 == INVALID_STRING_ID ? 65 : 45),

   485

				_errmsg_message_2,

   486

				238);

   487

			if (_errmsg_message_1 != INVALID_STRING_ID)

   488

				DrawStringMultiCenter(

   489

					214,

   490

					90,

   491

					_errmsg_message_1,

   492

					238);

   493

		}

   494

		break;

   495

   496

	case WE_MOUSELOOP:

   497

		if (_right_button_down)

   498

			DeleteWindow(w);

   499

		break;

   500

	case WE_4:

   501

		if (!--_errmsg_duration)

   502

			DeleteWindow(w);

   503

		break;

   504

	case WE_DESTROY: {

   505

		TileHighlightData *thd = _thd_ptr;

   506

		TileIndex tile = thd->redsq;

   507

		thd->redsq = 0;

   508

		_switch_mode_errorstr = INVALID_STRING_ID;

   509