1

#include "stdafx.h"

     2

#include "ttd.h"

     3

#include "town.h"

     4

#include "window.h"

     5

#include "gfx.h"

     6

#include "viewport.h"

     7

#include "gui.h"

     8

#include "command.h"

     9

#include "player.h"

    10

    11

static const Widget _town_authority_widgets[] = {

    12

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

    13

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

    14

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

    15

{     WWT_IMGBTN,    13,     0,   305,   106,   157, 0x0,							STR_2043_LIST_OF_THINGS_TO_DO_AT},

    16

{  WWT_SCROLLBAR,    13,   306,   316,   106,   157, 0x0,							STR_0190_SCROLL_BAR_SCROLLS_LIST},

    17

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

    18

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

    19

{   WIDGETS_END},

    20

};

    21

    22

extern const byte _town_action_costs[8];

    23

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

    24

    25

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

    26

{

    27

	int32 avail, ref;

    28

	int i, num;

    29

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

    30

	uint buttons;

    31

    32

	if (_local_player != OWNER_SPECTATOR) {

    33

		// bribe option enabled?

    34

		if (_patches.bribe) {

    35

			// if unwanted, disable everything.

    36

			if (t->unwanted[_local_player]) {

    37

				avail_buttons = 0;

    38

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

    39

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

    40

		}

    41

    42

		// Things worth more than this are not shown

    43

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

    44

		ref = _price.build_industry >> 8;

    45

    46

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

    47

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

    48

				SETBIT(buttons, i);

    49

				num++;

    50

			}

    51

		}

    52

    53

		// Disable build statue if already built

    54

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

    55

		{

    56

			CLRBIT(buttons, 4);

    57

			num--;

    58

		}

    59

    60

	} else {

    61

		// no actions available for spectator

    62

		buttons = 0;

    63

		num = 0;

    64

	}

    65

    66

	if (nump) *nump = num;

    67

	return buttons;

    68

}

    69

    70

static int GetNthSetBit(uint32 bits, int n)

    71

{

    72

	int i = 0;

    73

	if (n >= 0) {

    74

		do {

    75

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

    76

			i++;

    77

		} while (bits>>=1);

    78

	}

    79

	return -1;

    80

}

    81

    82

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

    83

{

    84

	uint buttons;

    85

	int numact;

    86

	Town *t = DEREF_TOWN(w->window_number);

    87

    88

	switch(e->event) {

    89

	case WE_PAINT:

    90

		buttons = GetMaskOfTownActions(&numact, t);

    91

		SetVScrollCount(w, numact + 1);

    92

    93

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

    94

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

    95

    96

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

    97

    98

		{

    99

			int y;

   100

			Player *p;

   101

			int r;

   102

			StringID str;

   103

   104

			SET_DPARAM16(0, w->window_number);

   105

			DrawWindowWidgets(w);

   106

   107

			DrawString(2, 15, STR_2023_TRANSPORT_COMPANY_RATINGS, 0);

   108

   109

			// Draw list of players

   110

			y = 25;

   111

			FOR_ALL_PLAYERS(p) {

   112

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

   113

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

   114

   115

					SET_DPARAM16(0, p->name_1);

   116

					SET_DPARAM32(1, p->name_2);

   117

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

   118

   119

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

   120

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

   121

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

   122

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

   123

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

   124

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

   125

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

   126

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

   127

					(str++, true);														// Outstanding

   128

   129

					/*	WARNING ugly hack!

   130

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

   131

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

   132

							that because there is another param after it.

   133

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

   134

						*/

   135

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

   136

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

   137

						DrawSprite((SPR_OPENTTD_BASE + 10) | 0x30b8000, 18, y);

   138

   139

					DrawString(28, y, STR_2024, 0);

   140

					y+=10;

   141

				}

   142

			}

   143

		}

   144

   145

		// Draw actions list

   146

		{

   147

			int y = 107, i;

   148

			int pos = w->vscroll.pos;

   149

   150

			if (--pos < 0) {

   151

				DrawString(2, y, STR_2045_ACTIONS_AVAILABLE, 0);

   152

				y+=10;

   153

			}

   154

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

   155

				if (pos <= -5)

   156

					break;

   157

   158

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

   159

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

   160

					y += 10;

   161

				}

   162

			}

   163

		}

   164

   165

		{

   166

			int i;

   167

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

   168

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

   169

				SET_DPARAM16(0, STR_2046_SMALL_ADVERTISING_CAMPAIGN + i);

   170

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

   171

			}

   172

		}

   173

   174

		break;

   175

   176

	case WE_CLICK:

   177

		switch(e->click.widget) {

   178

		case 3: { /* listbox */

   179

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

   180

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

   181

				return;

   182

   183

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

   184

			if (y >= 0) {

   185

				WP(w,def_d).data_1 = y;

   186

				SetWindowDirty(w);

   187

			}

   188

			break;

   189

		}

   190

   191

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

   192

			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));

   193

			break;

   194

		}

   195

		}

   196

		break;

   197

   198

	case WE_4:

   199

		SetWindowDirty(w);

   200

		break;

   201

	}

   202

}

   203

   204

static const WindowDesc _town_authority_desc = {

   205

	-1, -1, 317, 222,

   206

	WC_TOWN_AUTHORITY,0,

   207

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   208

	_town_authority_widgets,

   209

	TownAuthorityWndProc

   210

};

   211

   213

{

   214

	Window *w;

   215

   216

	w = AllocateWindowDescFront(&_town_authority_desc, town);

   217

	if (w) {

   218

		w->vscroll.cap = 5;

   219

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

   220

	}

   221

}

   222

   223

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

   224

{

   225

	Town *t = DEREF_TOWN(w->window_number);

   226

   227

	switch(e->event) {

   228

	case WE_PAINT:

   229

		SET_DPARAM16(0, t->index);

   230

		DrawWindowWidgets(w);

   231

   232

		SET_DPARAM32(0, t->population);

   233

		SET_DPARAM32(1, t->num_houses);

   234

		DrawString(2,107,STR_2006_POPULATION,0);

   235

   236

		SET_DPARAM16(0, t->act_pass);

   237

		SET_DPARAM16(1, t->max_pass);

   238

		DrawString(2,117,STR_200D_PASSENGERS_LAST_MONTH_MAX,0);

   239

   240

		SET_DPARAM16(0, t->act_mail);

   241

		SET_DPARAM16(1, t->max_mail);

   242

		DrawString(2,127,STR_200E_MAIL_LAST_MONTH_MAX,0);

   243

   244

		DrawWindowViewport(w);

   245

		break;

   246

   247

	case WE_CLICK:

   248

		switch(e->click.widget) {

   249

		case 5: /* scroll to location */

   250

			ScrollMainWindowToTile(t->xy);

   251

			break;

   252

		case 6: /* town authority */

   253

			ShowTownAuthorityWindow(w->window_number);

   254

			break;

   255

		case 7: /* rename */

   256

			SET_DPARAM32(0, t->townnameparts);

   257

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

   258

			break;

   259

		case 8: /* expand town */

   260

			ExpandTown(t);

   261

			break;

   262

		case 9: /* delete town */

   263

			DeleteTown(t);

   264

			break;

   265

		}

   266

		break;

   267

   268

	case WE_ON_EDIT_TEXT: {

   269

		byte *b = e->edittext.str;

   270

		if (*b == 0)

   271

			return;

   272

		memcpy(_decode_parameters, b, 32);

   273

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

   274

	} break;

   275

	}

   276

}

   277

   278

   279

static const Widget _town_view_widgets[] = {

   280

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

   281

{    WWT_CAPTION,    13,    11,   259,     0,    13, STR_2005, STR_018C_WINDOW_TITLE_DRAG_THIS},

   282

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

   283

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

   284

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

   285

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

   286

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

   287

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

   288

{   WIDGETS_END},

   289

};

   290

   291

static const WindowDesc _town_view_desc = {

   292

	-1, -1, 260, 150,

   293

	WC_TOWN_VIEW,0,

   294

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   295

	_town_view_widgets,

   296

	TownViewWndProc

   297

};

   298

   299

static const Widget _town_view_scen_widgets[] = {

   300

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

   301

{    WWT_CAPTION,    13,    11,   184,     0,    13, STR_2005,					STR_018C_WINDOW_TITLE_DRAG_THIS},

   302

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

   303

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

   304

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

   305

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

   306

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

   307

{ WWT_PUSHTXTBTN,    13,   185,   259,     0,    13, STR_0130_RENAME,		STR_200C_CHANGE_TOWN_NAME},

   308

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

   309

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

   310

{   WIDGETS_END},

   311

};

   312

   313

static const WindowDesc _town_view_scen_desc = {

   314

	-1, -1, 260, 150,

   315

	WC_TOWN_VIEW,0,

   316

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   317

	_town_view_scen_widgets,

   318

	TownViewWndProc

   319

};

   320

   321

void ShowTownViewWindow(uint town)

   322

{

   323

	Window *w;

   324

	Town *t;

   325

   326

	if (_game_mode != GM_EDITOR) {

   327

		w = AllocateWindowDescFront(&_town_view_desc, town);

   328

	} else {

   329

		w = AllocateWindowDescFront(&_town_view_scen_desc, town);

   330

	}

   331

   332

	if (w) {

   333

		w->flags4 |= WF_DISABLE_VP_SCROLL;

   334

		t = DEREF_TOWN(w->window_number);

   335

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

   336

	}

   337

}

   338

   339

static const Widget _town_directory_widgets[] = {

   340

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

   341

{    WWT_CAPTION,    13,    11,   207,     0,    13, STR_2000_TOWNS, STR_018C_WINDOW_TITLE_DRAG_THIS},

   342

{ WWT_PUSHTXTBTN,    13,     0,    98,    14,    25, STR_SORT_BY_NAME, STR_SORT_TIP},

   343

{ WWT_PUSHTXTBTN,    13,    99,   196,    14,    25, STR_SORT_BY_POPULATION,STR_SORT_TIP},

   344

{     WWT_IMGBTN,    13,     0,   196,    26,   189, 0x0, STR_200A_TOWN_NAMES_CLICK_ON_NAME},

   345

{  WWT_SCROLLBAR,    13,   197,   207,    14,   189, 0x0, STR_0190_SCROLL_BAR_SCROLLS_LIST},

   346

{   WIDGETS_END},

   347

};

   348

   349

   350

// used to get a sorted list of the towns

   351

static byte _town_sort[lengthof(_towns)];

   352

static uint _num_town_sort;

   353

   354

static char _bufcache[64];

   355

static byte _last_town_idx;

   356

   357

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

   358

{

   359

	char buf1[64];

   360

	const Town *t;

   361

	byte val;

   362

	int r;

   363

   364

	t = DEREF_TOWN(*(const byte*)a);

   365

	SET_DPARAM32(0, t->townnameparts);

   366

	GetString(buf1, t->townnametype);

   367

   368

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

   369

		_last_town_idx = val;

   370

		t = DEREF_TOWN(val);

   371

		SET_DPARAM32(0, t->townnameparts);

   372

		GetString(_bufcache, t->townnametype);

   373

	}

   374

   375

	r = strcmp(buf1, _bufcache);

   376

	if (_town_sort_order & 1) r = -r;

   377

	return r;

   378

}

   379

   380

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

   381

{

   382

	const Town *ta = DEREF_TOWN(*(const byte*)a);

   383

	const Town *tb = DEREF_TOWN(*(const byte*)b);

   384

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

   385

	if (_town_sort_order & 1) r = -r;

   386

	return r;

   387

}

   388

   389

static void MakeSortedTownList()

   390

{

   391

	Town *t;

   392

	int n = 0;

   393

	FOR_ALL_TOWNS(t) if(t->xy) _town_sort[n++] = t->index;

   394

	_num_town_sort = n;

   395

   396

	_last_town_idx = 0; // used for "cache"

   397

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

   398

   399

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

   400

}

   401

   402

   403

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

   404

{

   405

	switch(e->event) {

   406

	case WE_PAINT: {

   407

   408

		if (_town_sort_dirty) {

   409

			_town_sort_dirty = false;

   410

			MakeSortedTownList();

   411

		}

   412

   413

		SetVScrollCount(w, _num_town_sort);

   414

   415

		DrawWindowWidgets(w);

   416

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

   417

   418

		{

   419

			Town *t;

   420

			int n = 0;

   421

			uint16 i = w->vscroll.pos;

   422

			int y = 28;

   423

   424

			while (i < _num_town_sort) {

   425

				t = DEREF_TOWN(_town_sort[i]);

   426

   427

				assert(t->xy);

   428

   429

				SET_DPARAM16(0, t->index);

   430

				SET_DPARAM32(1, t->population);

   431

				DrawString(2, y, STR_2057, 0);

   432

   433

				y += 10;

   434

				i++;

   435

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

   436

			}

   437

		}

   438

	} break;

   439

   440

	case WE_CLICK:

   441

		switch(e->click.widget) {

   442

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

   443

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

   444

			_town_sort_dirty = true;

   445

			SetWindowDirty(w);

   446

		} break;

   447

   448

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

   449

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

   450

			_town_sort_dirty = true;

   451

			SetWindowDirty(w);

   452

		} break;

   453

   454

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

   455

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

   456

   457

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

   458

   459

			id_v += w->vscroll.pos;

   460

   461

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

   462

   463

			{

   464

				Town *t = DEREF_TOWN(_town_sort[id_v]);

   465

				assert(t->xy);

   466

   467

				ScrollMainWindowToTile(t->xy);

   468

			}

   469

		}	break;

   470

		}

   471

		break;

   472

   473

	case WE_4:

   474

		SetWindowDirty(w);

   475

		break;

   476

	}

   477

}

   478

   479

static const WindowDesc _town_directory_desc = {

   480

	-1, -1, 208, 190,

   481

	WC_TOWN_DIRECTORY,0,

   482

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   483

	_town_directory_widgets,

   484

	TownDirectoryWndProc

   485

};

   486

   487

   488

void ShowTownDirectory()

   489

{

   490

	Window *w;

   491

   492

	w = AllocateWindowDescFront(&_town_directory_desc, 0);

   493

	if (w) {

   494

		w->vscroll.cap = 16;

   495

	}

   496

}

   497

   498