1

#include "stdafx.h"

     2

#include "ttd.h"

     3

#include "table/strings.h"

     4

#include "town.h"

     5

#include "window.h"

     6

#include "gfx.h"

     7

#include "viewport.h"

     8

#include "gui.h"

     9

#include "command.h"

    10

#include "player.h"

    11

#include "network.h"

    12

    13

static const Widget _town_authority_widgets[] = {

    14

{    WWT_TEXTBTN,   RESIZE_NONE,    13,     0,    10,     0,    13, STR_00C5,				STR_018B_CLOSE_WINDOW},

    15

{    WWT_CAPTION,   RESIZE_NONE,    13,    11,   316,     0,    13, STR_2022_LOCAL_AUTHORITY, STR_018C_WINDOW_TITLE_DRAG_THIS},

    16

{     WWT_IMGBTN,   RESIZE_NONE,    13,     0,   316,    14,   105, 0x0,							STR_NULL},

    17

{     WWT_IMGBTN,   RESIZE_NONE,    13,     0,   306,   106,   157, 0x0,							STR_2043_LIST_OF_THINGS_TO_DO_AT},

    18

{  WWT_SCROLLBAR,   RESIZE_NONE,    13,   305,   316,   106,   157, 0x0,							STR_0190_SCROLL_BAR_SCROLLS_LIST},

    19

{     WWT_IMGBTN,   RESIZE_NONE,    13,     0,   316,   158,   209, 0x0,							STR_NULL},

    20

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,     0,   316,   210,   221, STR_2042_DO_IT,	STR_2044_CARRY_OUT_THE_HIGHLIGHTED},

    21

{   WIDGETS_END},

    22

};

    23

    24

extern const byte _town_action_costs[8];

    25

extern void DrawPlayerIcon(int p, int x, int y);

    26

    27

static uint GetMaskOfTownActions(int *nump, Town *t)

    28

{

    29

	int32 avail, ref;

    30

	int i, num;

    31

	uint avail_buttons = 0x7F; // by default all buttons except bribe are enabled.

    32

	uint buttons;

    33

    34

	if (_local_player != OWNER_SPECTATOR) {

    35

		// bribe option enabled?

    36

		if (_patches.bribe) {

    37

			// if unwanted, disable everything.

    38

			if (t->unwanted[_local_player]) {

    39

				avail_buttons = 0;

    40

			} else if (t->ratings[_local_player] < 600)

    41

				avail_buttons |= (1 << 7); // only bribe if less than excellent

    42

		}

    43

    44

		// Things worth more than this are not shown

    45

		avail = DEREF_PLAYER(_local_player)->player_money + _price.station_value * 200;

    46

		ref = _price.build_industry >> 8;

    47

    48

		for(i=0,buttons=0,num=0; i != lengthof(_town_action_costs); i++,avail_buttons>>=1) {

    49

			if (avail_buttons&1 && avail >= _town_action_costs[i] * ref) {

    50

				SETBIT(buttons, i);

    51

				num++;

    52

			}

    53

		}

    54

    55

		// Disable build statue if already built

    56

		if(HASBIT(t->statues, _local_player))

    57

		{

    58

			CLRBIT(buttons, 4);

    59

			num--;

    60

		}

    61

    62

	} else {

    63

		// no actions available for spectator

    64

		buttons = 0;

    65

		num = 0;

    66

	}

    67

    68

	if (nump) *nump = num;

    69

	return buttons;

    70

}

    71

    72

static int GetNthSetBit(uint32 bits, int n)

    73

{

    74

	int i = 0;

    75

	if (n >= 0) {

    76

		do {

    77

			if (bits&1 && --n < 0) return i;

    78

			i++;

    79

		} while (bits>>=1);

    80

	}

    81

	return -1;

    82

}

    83

    84

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

    85

{

    86

	uint buttons;

    87

	int numact;

    89

    90

	switch(e->event) {

    91

	case WE_PAINT:

    92

		buttons = GetMaskOfTownActions(&numact, t);

    93

		SetVScrollCount(w, numact + 1);

    94

    95

		if (WP(w,def_d).data_1 != -1 && !HASBIT(buttons, WP(w,def_d).data_1))

    96

			WP(w,def_d).data_1 = -1;

    97

    98

		w->disabled_state = (WP(w,def_d).data_1 == -1) ? (1 << 6) : 0;

    99

   100

		{

   101

			int y;

   102

			Player *p;

   103

			int r;

   104

			StringID str;

   105

   106

			SetDParam(0, w->window_number);

   107

			DrawWindowWidgets(w);

   108

   109

			DrawString(2, 15, STR_2023_TRANSPORT_COMPANY_RATINGS, 0);

   110

   111

			// Draw list of players

   112

			y = 25;

   113

			FOR_ALL_PLAYERS(p) {

   114

				if (p->is_active && (HASBIT(t->have_ratings, p->index) || t->exclusivity==p->index)) {

   115

					DrawPlayerIcon(p->index, 2, y);

   116

   117

					SetDParam(0, p->name_1);

   118

					SetDParam(1, p->name_2);

   119

					SetDParam(2, GetPlayerNameString(p->index, 3));

   120

   121

					r = t->ratings[p->index];

   122

					(str = STR_3035_APPALLING, r <= -400) ||	// Apalling

   123

					(str++, r <= -200) ||											// Very Poor

   124

					(str++, r <= 0) ||												// Poor

   125

					(str++, r <= 200) ||											// Mediocore

   126

					(str++, r <= 400) ||											// Good

   127

					(str++, r <= 600) ||											// Very Good

   128

					(str++, r <= 800) ||											// Excellent

   129

					(str++, true);														// Outstanding

   130

   131

					/*	WARNING ugly hack!

   132

							GetPlayerNameString sets up (Player #) if the player is human in an extra DPARAM16

   133

							It seems that if player is non-human, nothing is set up, so param is 0. GetString doesn't like

   134

							that because there is another param after it.

   135

							So we'll just shift the rating one back if player is AI and all is fine

   136

						*/

   137

					SetDParam((IS_HUMAN_PLAYER(p->index) ? 4 : 3), str);

   138

					if (t->exclusivity == p->index) // red icon for player with exclusive rights

   139

						DrawSprite((SPR_BLOT) | 0x30b8000, 18, y);

   140

   141

					DrawString(28, y, STR_2024, 0);

   142

					y+=10;

   143

				}

   144

			}

   145

		}

   146

   147

		// Draw actions list

   148

		{

   149

			int y = 107, i;

   150

			int pos = w->vscroll.pos;

   151

   152

			if (--pos < 0) {

   153

				DrawString(2, y, STR_2045_ACTIONS_AVAILABLE, 0);

   154

				y+=10;

   155

			}

   156

			for(i=0; buttons; i++,buttons>>=1) {

   157

				if (pos <= -5)

   158

					break;

   159

   160

				if (buttons&1 && --pos < 0) {

   161

					DrawString(3, y, STR_2046_SMALL_ADVERTISING_CAMPAIGN + i, 6);

   162

					y += 10;

   163

				}

   164

			}

   165

		}

   166

   167

		{

   168

			int i;

   169

			if ((i=WP(w,def_d).data_1) != -1) {

   170

				SetDParam(1, (_price.build_industry >> 8) * _town_action_costs[i]);

   171

				SetDParam(0, STR_2046_SMALL_ADVERTISING_CAMPAIGN + i);

   172

				DrawStringMultiLine(2, 159, STR_204D_INITIATE_A_SMALL_LOCAL + i, 313);

   173

			}

   174

		}

   175

   176

		break;

   177

   178

	case WE_CLICK:

   179

		switch(e->click.widget) {

   180

		case 3: { /* listbox */

   181

			int y = (e->click.pt.y - 0x6B) / 10;

   182

			if (!IS_INT_INSIDE(y, 0, 5))

   183

				return;

   184

   185

			y = GetNthSetBit(GetMaskOfTownActions(NULL, t), y + w->vscroll.pos - 1);

   186

			if (y >= 0) {

   187

				WP(w,def_d).data_1 = y;

   188

				SetWindowDirty(w);

   189

			}

   190

			break;

   191

		}

   192

   193

		case 6: { /* carry out the action */

   194

			DoCommandP(t->xy, w->window_number, WP(w,def_d).data_1, NULL, CMD_DO_TOWN_ACTION | CMD_MSG(STR_2054_CAN_T_DO_THIS));

   195

			break;

   196

		}

   197

		}

   198

		break;

   199

   200

	case WE_4:

   201

		SetWindowDirty(w);

   202

		break;

   203

	}

   204

}

   205

   206

static const WindowDesc _town_authority_desc = {

   207

	-1, -1, 317, 222,

   208

	WC_TOWN_AUTHORITY,0,

   209

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   210

	_town_authority_widgets,

   211

	TownAuthorityWndProc

   212

};

   213

   214

static void ShowTownAuthorityWindow(uint town)

   215

{

   216

	Window *w;

   217

   218

	w = AllocateWindowDescFront(&_town_authority_desc, town);

   219

	if (w) {

   220

		w->vscroll.cap = 5;

   221

		WP(w,def_d).data_1 = -1;

   222

	}

   223

}

   224

   225

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

   226

{

   228

   229

	switch(e->event) {

   230

	case WE_PAINT:

   231

		// disable renaming town in network games if you are not the server

   232

		if (_networking && !_network_server) SETBIT(w->disabled_state, 8);

   233

   234

		SetDParam(0, t->index);

   235

		DrawWindowWidgets(w);

   236

   237

		SetDParam(0, t->population);

   238

		SetDParam(1, t->num_houses);

   239

		DrawString(2,107,STR_2006_POPULATION,0);

   240

   241

		SetDParam(0, t->act_pass);

   242

		SetDParam(1, t->max_pass);

   243

		DrawString(2,117,STR_200D_PASSENGERS_LAST_MONTH_MAX,0);

   244

   245

		SetDParam(0, t->act_mail);

   246

		SetDParam(1, t->max_mail);

   247

		DrawString(2,127,STR_200E_MAIL_LAST_MONTH_MAX,0);

   248

   249

		DrawWindowViewport(w);

   250

		break;

   251

   252

	case WE_CLICK:

   253

		switch(e->click.widget) {

   254

		case 6: /* scroll to location */

   255

			ScrollMainWindowToTile(t->xy);

   256

			break;

   257

		case 7: /* town authority */

   258

			ShowTownAuthorityWindow(w->window_number);

   259

			break;

   260

		case 8: /* rename */

   261

			SetDParam(0, t->townnameparts);

   262

			ShowQueryString(t->townnametype, STR_2007_RENAME_TOWN, 31, 130, w->window_class, w->window_number);

   263

			break;

   264

		case 9: /* expand town */

   265

			ExpandTown(t);

   266

			break;

   267

		case 10: /* delete town */

   268

			DeleteTown(t);

   269

			break;

   270

		}

   271

		break;

   272

   273

	case WE_ON_EDIT_TEXT: {

   274

		byte *b = e->edittext.str;

   275

		if (*b == 0)

   276

			return;

   277

		memcpy(_decode_parameters, b, 32);

   278

		DoCommandP(0, w->window_number, 0, NULL, CMD_RENAME_TOWN | CMD_MSG(STR_2008_CAN_T_RENAME_TOWN));

   279

	} break;

   280

	}

   281

}

   282

   283

   284

static const Widget _town_view_widgets[] = {

   285

{    WWT_TEXTBTN,   RESIZE_NONE,    13,     0,    10,     0,    13, STR_00C5, STR_018B_CLOSE_WINDOW},

   286

{    WWT_CAPTION,   RESIZE_NONE,    13,    11,   247,     0,    13, STR_2005, STR_018C_WINDOW_TITLE_DRAG_THIS},

   287

{  WWT_STICKYBOX,   RESIZE_NONE,    13,   248,   259,     0,    13, 0x0,      STR_STICKY_BUTTON},

   288

{     WWT_IMGBTN,   RESIZE_NONE,    13,     0,   259,    14,   105, 0x0,      STR_NULL},

   289

{          WWT_6,   RESIZE_NONE,    13,     2,   257,    16,   103, 0x0,      STR_NULL},

   290

{     WWT_IMGBTN,   RESIZE_NONE,    13,     0,   259,   106,   137, 0x0,      STR_NULL},

   291

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,     0,    85,   138,   149, STR_00E4_LOCATION,				STR_200B_CENTER_THE_MAIN_VIEW_ON},

   292

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,    86,   171,   138,   149, STR_2020_LOCAL_AUTHORITY,STR_2021_SHOW_INFORMATION_ON_LOCAL},

   293

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,   172,   259,   138,   149, STR_0130_RENAME,					STR_200C_CHANGE_TOWN_NAME},

   294

{   WIDGETS_END},

   295

};

   296

   297

static const WindowDesc _town_view_desc = {

   298

	-1, -1, 260, 150,

   299

	WC_TOWN_VIEW,0,

   300

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON,

   301

	_town_view_widgets,

   302

	TownViewWndProc

   303

};

   304

   305

static const Widget _town_view_scen_widgets[] = {

   306

{    WWT_TEXTBTN,   RESIZE_NONE,    13,     0,    10,     0,    13, STR_00C5,					STR_018B_CLOSE_WINDOW},

   307

{    WWT_CAPTION,   RESIZE_NONE,    13,    11,   172,     0,    13, STR_2005,					STR_018C_WINDOW_TITLE_DRAG_THIS},

   308

{  WWT_STICKYBOX,   RESIZE_NONE,    13,   248,   259,     0,    13, 0x0,               STR_STICKY_BUTTON},

   309

{     WWT_IMGBTN,   RESIZE_NONE,    13,     0,   259,    14,   105, 0x0,								STR_NULL},

   310

{          WWT_6,   RESIZE_NONE,    13,     2,   257,    16,   103, 0x0,								STR_NULL},

   311

{     WWT_IMGBTN,   RESIZE_NONE,    13,     0,   259,   106,   137, 0x0,								STR_NULL},

   312

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,     0,    85,   138,   149, STR_00E4_LOCATION,	STR_200B_CENTER_THE_MAIN_VIEW_ON},

   313

{      WWT_EMPTY,   RESIZE_NONE,     0,     0,     0,     0,     0, 0x0,								STR_NULL},

   314

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,   173,   247,     0,    13, STR_0130_RENAME,		STR_200C_CHANGE_TOWN_NAME},

   315

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,    86,   171,   138,   149, STR_023C_EXPAND,		STR_023B_INCREASE_SIZE_OF_TOWN},

   316

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,   172,   259,   138,   149, STR_0290_DELETE,		STR_0291_DELETE_THIS_TOWN_COMPLETELY},

   317

{   WIDGETS_END},

   318

};

   319

   320

static const WindowDesc _town_view_scen_desc = {

   321

	-1, -1, 260, 150,

   322

	WC_TOWN_VIEW,0,

   323

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON,

   324

	_town_view_scen_widgets,

   325

	TownViewWndProc

   326

};

   327

   328

void ShowTownViewWindow(uint town)

   329

{

   330

	Window *w;

   331

	Town *t;

   332

   333

	if (_game_mode != GM_EDITOR) {

   334

		w = AllocateWindowDescFront(&_town_view_desc, town);

   335

	} else {

   336

		w = AllocateWindowDescFront(&_town_view_scen_desc, town);

   337

	}

   338

   339

	if (w) {

   340

		w->flags4 |= WF_DISABLE_VP_SCROLL;

   342

		AssignWindowViewport(w, 3, 17, 0xFE, 0x56, t->xy, 1);

   343

	}

   344

}

   345

   346

static const Widget _town_directory_widgets[] = {

   347

{    WWT_TEXTBTN,   RESIZE_NONE,    13,     0,    10,     0,    13, STR_00C5,								STR_018B_CLOSE_WINDOW},

   348

{    WWT_CAPTION,   RESIZE_NONE,    13,    11,   195,     0,    13, STR_2000_TOWNS,					STR_018C_WINDOW_TITLE_DRAG_THIS},

   349

{  WWT_STICKYBOX,   RESIZE_NONE,    13,   196,   207,     0,    13, 0x0,										STR_STICKY_BUTTON},

   350

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,     0,    98,    14,    25, STR_SORT_BY_NAME,				STR_SORT_ORDER_TIP},

   351

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,    99,   195,    14,    25, STR_SORT_BY_POPULATION,	STR_SORT_ORDER_TIP},

   352

{     WWT_IMGBTN, RESIZE_BOTTOM,    13,     0,   195,    26,   189, 0x0,										STR_200A_TOWN_NAMES_CLICK_ON_NAME},

   353

{  WWT_SCROLLBAR, RESIZE_BOTTOM,    13,   196,   207,    14,   177, 0x0,										STR_0190_SCROLL_BAR_SCROLLS_LIST},

   354

{  WWT_RESIZEBOX,     RESIZE_TB,    13,   196,   207,   178,   189, 0x0,										STR_RESIZE_BUTTON},

   355

{   WIDGETS_END},

   356

};

   357

   358

   359

// used to get a sorted list of the towns

   360

static uint _num_town_sort;

   361

   362

static char _bufcache[64];

   363

static uint16 _last_town_idx;

   364

   365

static int CDECL TownNameSorter(const void *a, const void *b)

   366

{

   367

	char buf1[64];

   368

	const Town *t;

   369

	byte val;

   370

	int r;

   371

   373

	SetDParam(0, t->townnameparts);

   374

	GetString(buf1, t->townnametype);

   375

   376

	if ( (val=*(const uint16*)b) != _last_town_idx) {

   377

		_last_town_idx = val;

   379

		SetDParam(0, t->townnameparts);

   380

		GetString(_bufcache, t->townnametype);

   381

	}

   382

   383

	r = strcmp(buf1, _bufcache);

   384

	if (_town_sort_order & 1) r = -r;

   385

	return r;

   386

}

   387

   388

static int CDECL TownPopSorter(const void *a, const void *b)

   389

{

   392

	int r = ta->population - tb->population;

   393

	if (_town_sort_order & 1) r = -r;

   394

	return r;

   395

}

   396

   397

static void MakeSortedTownList()

   398

{

   399

	Town *t;

   400

	int n = 0;

   407

	FOR_ALL_TOWNS(t)

   408

		if(t->xy)

   409

			_town_sort[n++] = t->index;

   410

   411

	_num_town_sort = n;

   412

   413

	_last_town_idx = 0; // used for "cache"

   414

	qsort(_town_sort, n, sizeof(_town_sort[0]), _town_sort_order & 2 ? TownPopSorter : TownNameSorter);

   415

   416

	DEBUG(misc, 1) ("Resorting Towns list...");

   417

}

   418

   419

   420

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

   421

{

   422

	switch(e->event) {

   423

	case WE_PAINT: {

   424

   425

		if (_town_sort_dirty) {

   426

			_town_sort_dirty = false;

   427

			MakeSortedTownList();

   428

		}

   429

   430

		SetVScrollCount(w, _num_town_sort);

   431

   432

		DrawWindowWidgets(w);

   433

		DoDrawString(_town_sort_order & 1 ? "\xAA" : "\xA0", (_town_sort_order <= 1) ? 88 : 187, 15, 0x10);

   434

   435

		{

   436

			Town *t;

   437

			int n = 0;

   438

			uint16 i = w->vscroll.pos;

   439

			int y = 28;

   440

   441

			while (i < _num_town_sort) {

   443

   444

				assert(t->xy);

   445

   446

				SetDParam(0, t->index);

   447

				SetDParam(1, t->population);

   448

				DrawString(2, y, STR_2057, 0);

   449

   450

				y += 10;

   451

				i++;

   452

				if (++n == w->vscroll.cap) { break;} // max number of towns in 1 window

   453

			}

   454

		}

   455

	} break;

   456

   457

	case WE_CLICK:

   458

		switch(e->click.widget) {

   459

		case 3: { /* Sort by Name ascending/descending */

   460

			_town_sort_order = (_town_sort_order == 0) ? 1 : 0;

   461

			_town_sort_dirty = true;

   462

			SetWindowDirty(w);

   463

		} break;

   464

   465

		case 4: { /* Sort by Population ascending/descending */

   466

			_town_sort_order = (_town_sort_order == 2) ? 3 : 2;

   467

			_town_sort_dirty = true;

   468

			SetWindowDirty(w);

   469

		} break;

   470

   471

		case 5: { /* Click on Town Matrix */

   472

			uint16 id_v = (e->click.pt.y - 28) / 10;

   473

   474

			if (id_v >= w->vscroll.cap) { return;} // click out of bounds

   475

   476

			id_v += w->vscroll.pos;

   477

   478

			if (id_v >= _num_town_sort) { return;} // click out of town bounds

   479

   480

			{

   482

				assert(t->xy);

   483

   484

				ScrollMainWindowToTile(t->xy);

   485

			}

   486

		}	break;

   487

		}

   488

		break;

   489

   490

	case WE_4:

   491

		SetWindowDirty(w);

   492

		break;

   493

   494

	case WE_RESIZE:

   495

		w->vscroll.cap += e->sizing.diff.y / 10;

   496

		break;

   497

	}

   498

}

   499

   500

static const WindowDesc _town_directory_desc = {

   501

	-1, -1, 208, 190,

   502

	WC_TOWN_DIRECTORY,0,

   503

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON | WDF_RESIZABLE,

   504

	_town_directory_widgets,

   505

	TownDirectoryWndProc

   506

};

   507

   508