1

/* $Id$ */

     2

     3

#include "stdafx.h"

     4

#include "openttd.h"

     5

#include "table/sprites.h"

     6

#include "table/strings.h"

     7

#include "functions.h"

     8

#include "window.h"

     9

#include "gui.h"

    10

#include "viewport.h"

    11

#include "gfx.h"

    12

#include "player.h"

    13

#include "command.h"

    14

#include "vehicle.h"

    15

#include "economy.h"

    16

#include "network.h"

    17

#include "variables.h"

    18

#include "train.h"

    19

#include "date.h"

    21

    22

#ifdef ENABLE_NETWORK

    23

#include "network_data.h"

    24

#include "network_client.h"

    25

#endif

    26

    27

static void DoShowPlayerFinances(PlayerID player, bool show_small, bool show_stickied);

    28

    29

    30

static void DrawPlayerEconomyStats(const Player *p, byte mode)

    31

{

    32

	int x,y,i,j,year;

    33

	const int64 (*tbl)[13];

    34

	int64 sum, cost;

    35

	StringID str;

    36

    37

	if (!(mode & 1)) { // normal sized economics window (mode&1) is minimized status

    38

		/* draw categories */

    39

		DrawStringCenterUnderline(61, 15, STR_700F_EXPENDITURE_INCOME, 0);

    40

		for (i = 0; i != 13; i++)

    41

			DrawString(2, 27 + i*10, STR_7011_CONSTRUCTION + i, 0);

    42

		DrawStringRightAligned(111, 27 + 10*13 + 2, STR_7020_TOTAL, 0);

    43

    44

		/* draw the price columns */

    45

		year = _cur_year - 2;

    46

		j = 3;

    47

		x = 215;

    48

		tbl = p->yearly_expenses + 2;

    49

		do {

    50

			if (year >= p->inaugurated_year) {

    51

				SetDParam(0, year);

    52

				DrawStringRightAlignedUnderline(x, 15, STR_7010, 0);

    53

				sum = 0;

    54

				for (i = 0; i != 13; i++) {

    55

					/* draw one row in the price column */

    56

					cost = (*tbl)[i];

    57

					if (cost != 0) {

    58

						sum += cost;

    59

    60

						str = STR_701E;

    61

						if (cost < 0) { cost = -cost; str++; }

    62

						SetDParam64(0, cost);

    63

						DrawStringRightAligned(x, 27+i*10, str, 0);

    64

					}

    65

				}

    66

    67

				str = STR_701E;

    68

				if (sum < 0) { sum = -sum; str++; }

    69

				SetDParam64(0, sum);

    70

				DrawStringRightAligned(x, 27 + 13*10 + 2, str, 0);

    71

    72

				GfxFillRect(x - 75, 27 + 10*13, x, 27 + 10*13, 215);

    73

				x += 95;

    74

			}

    75

			year++;

    76

			tbl--;

    77

		} while (--j != 0);

    78

    79

		y = 171;

    80

    81

		// draw max loan aligned to loan below (y += 10)

    82

		SetDParam64(0, (uint64)_economy.max_loan);

    83

		DrawString(202, y+10, STR_MAX_LOAN, 0);

    84

	} else {

    85

		y = 15;

    86

	}

    87

    88

	DrawString(2, y, STR_7026_BANK_BALANCE, 0);

    89

	SetDParam64(0, p->money64);

    90

	DrawStringRightAligned(182, y, STR_7028, 0);

    91

    92

	y += 10;

    93

    94

	DrawString(2, y, STR_7027_LOAN, 0);

    95

	SetDParam64(0, p->current_loan);

    96

	DrawStringRightAligned(182, y, STR_7028, 0);

    97

    98

	y += 12;

    99

   100

	GfxFillRect(182 - 75, y-2, 182, y-2, 215);

   101

   102

	SetDParam64(0, p->money64 - p->current_loan);

   103

	DrawStringRightAligned(182, y, STR_7028, 0);

   104

}

   105

   106

static const Widget _player_finances_widgets[] = {

   107

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

   108

{    WWT_CAPTION,   RESIZE_NONE,    14,    11,   379,     0,    13, STR_700E_FINANCES, STR_018C_WINDOW_TITLE_DRAG_THIS},

   109

{     WWT_IMGBTN,   RESIZE_NONE,    14,   380,   394,     0,    13, 0x2AA,             STR_7075_TOGGLE_LARGE_SMALL_WINDOW},

   110

{  WWT_STICKYBOX,   RESIZE_NONE,    14,   395,   406,     0,    13, 0x0,               STR_STICKY_BUTTON},

   111

{     WWT_IMGBTN,   RESIZE_NONE,    14,     0,   406,    14,   169, 0x0,               STR_NULL},

   112

{     WWT_IMGBTN,   RESIZE_NONE,    14,     0,   406,   170,   203, 0x0,               STR_NULL},

   113

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    14,     0,   202,   204,   215, STR_7029_BORROW,   STR_7035_INCREASE_SIZE_OF_LOAN},

   114

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    14,   203,   406,   204,   215, STR_702A_REPAY,    STR_7036_REPAY_PART_OF_LOAN},

   115

{   WIDGETS_END},

   116

};

   117

   118

static const Widget _other_player_finances_widgets[] = {

   119

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

   120

{    WWT_CAPTION,   RESIZE_NONE,    14,    11,   379,     0,    13, STR_700E_FINANCES, STR_018C_WINDOW_TITLE_DRAG_THIS},

   121

{     WWT_IMGBTN,   RESIZE_NONE,    14,   380,   394,     0,    13, 0x2AA,             STR_7075_TOGGLE_LARGE_SMALL_WINDOW},

   122

{  WWT_STICKYBOX,   RESIZE_NONE,    14,   395,   406,     0,    13, 0x0,               STR_STICKY_BUTTON},

   123

{     WWT_IMGBTN,   RESIZE_NONE,    14,     0,   406,    14,   169, 0x0,               STR_NULL},

   124

{     WWT_IMGBTN,   RESIZE_NONE,    14,     0,   406,   170,   203, 0x0,               STR_NULL},

   125

{   WIDGETS_END},

   126

};

   127

   128

static const Widget _other_player_finances_small_widgets[] = {

   129

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

   130

{    WWT_CAPTION,   RESIZE_NONE,    14,    11,   253,     0,    13, STR_700E_FINANCES, STR_018C_WINDOW_TITLE_DRAG_THIS},

   131

{     WWT_IMGBTN,   RESIZE_NONE,    14,   254,   267,     0,    13, 0x2AA,             STR_7075_TOGGLE_LARGE_SMALL_WINDOW},

   132

{  WWT_STICKYBOX,   RESIZE_NONE,    14,   268,   279,     0,    13, 0x0,               STR_STICKY_BUTTON},

   133

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

   134

{     WWT_IMGBTN,   RESIZE_NONE,    14,     0,   279,    14,    47, 0x0,               STR_NULL},

   135

{   WIDGETS_END},

   136

};

   137

   138

static const Widget _player_finances_small_widgets[] = {

   139

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

   140

{    WWT_CAPTION,   RESIZE_NONE,    14,    11,   253,     0,    13, STR_700E_FINANCES, STR_018C_WINDOW_TITLE_DRAG_THIS},

   141

{     WWT_IMGBTN,   RESIZE_NONE,    14,   254,   267,     0,    13, 0x2AA,             STR_7075_TOGGLE_LARGE_SMALL_WINDOW},

   142

{  WWT_STICKYBOX,   RESIZE_NONE,    14,   268,   279,     0,    13, 0x0,               STR_STICKY_BUTTON},

   143

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

   144

{     WWT_IMGBTN,   RESIZE_NONE,    14,     0,   279,    14,    47, 0x0,               STR_NULL},

   145

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    14,     0,   139,    48,    59, STR_7029_BORROW,   STR_7035_INCREASE_SIZE_OF_LOAN},

   146

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    14,   140,   279,    48,    59, STR_702A_REPAY,    STR_7036_REPAY_PART_OF_LOAN},

   147

{   WIDGETS_END},

   148

};

   149

   150

   151

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

   152

{

   153

	switch (e->event) {

   154

	case WE_PAINT: {

   155

		PlayerID player = w->window_number;

   156

		const Player *p = GetPlayer(player);

   157

   158

		SetWindowWidgetDisabledState(w, 7, p->current_loan == 0);

   159

   160

		SetDParam(0, p->name_1);

   161

		SetDParam(1, p->name_2);

   162

		SetDParam(2, GetPlayerNameString(player, 3));

   163

		SetDParam(4, 10000);

   164

		DrawWindowWidgets(w);

   165

   166

		DrawPlayerEconomyStats(p, (byte)WP(w,def_d).data_1);

   167

	} break;

   168

   169

	case WE_CLICK:

   170

		switch (e->we.click.widget) {

   171

		case 2: {/* toggle size */

   172

			byte mode = (byte)WP(w,def_d).data_1;

   173

			bool stickied = !!(w->flags4 & WF_STICKY);

   174

			PlayerID player = w->window_number;

   175

			DeleteWindow(w);

   176

			DoShowPlayerFinances(player, !HASBIT(mode, 0), stickied);

   177

		} break;

   178

   179

		case 6: /* increase loan */

   180

			DoCommandP(0, 0, _ctrl_pressed, NULL, CMD_INCREASE_LOAN | CMD_MSG(STR_702C_CAN_T_BORROW_ANY_MORE_MONEY));

   181

			break;

   182

   183

		case 7: /* repay loan */

   184

			DoCommandP(0, 0, _ctrl_pressed, NULL, CMD_DECREASE_LOAN | CMD_MSG(STR_702F_CAN_T_REPAY_LOAN));

   185

			break;

   186

		}

   187

		break;

   188

	}

   189

}

   190

   191

static const WindowDesc _player_finances_desc = {

   192

	-1,-1, 407, 216,

   193

	WC_FINANCES,0,

   194

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON,

   195

	_player_finances_widgets,

   196

	PlayerFinancesWndProc

   197

};

   198

   199

static const WindowDesc _player_finances_small_desc = {

   200

	-1,-1, 280, 60,

   201

	WC_FINANCES,0,

   202

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON,

   203

	_player_finances_small_widgets,

   204

	PlayerFinancesWndProc

   205

};

   206

   207

static const WindowDesc _other_player_finances_desc = {

   208

	-1,-1, 407, 204,

   209

	WC_FINANCES,0,

   210

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON,

   211

	_other_player_finances_widgets,

   212

	PlayerFinancesWndProc

   213

};

   214

   215

static const WindowDesc _other_player_finances_small_desc = {

   216

	-1,-1, 280, 48,

   217

	WC_FINANCES,0,

   218

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON,

   219

	_other_player_finances_small_widgets,

   220

	PlayerFinancesWndProc

   221

};

   222

   223

static const WindowDesc * const desc_table[2*2] = {

   224

	&_player_finances_desc,&_player_finances_small_desc,

   225

	&_other_player_finances_desc,&_other_player_finances_small_desc,

   226

};

   227

   228

static void DoShowPlayerFinances(PlayerID player, bool show_small, bool show_stickied)

   229

{

   230

	Window *w;

   231

	int mode;

   232

   233

	mode = (player != _local_player) * 2 + show_small;

   234

	w = AllocateWindowDescFront(desc_table[mode], player);

   235

	if (w != NULL) {

   236

		w->caption_color = w->window_number;

   237

		WP(w,def_d).data_1 = mode;

   238

		if (show_stickied) {

   239

			w->flags4 |= WF_STICKY;

   240

		}

   241

	}

   242

}

   243

   244

void ShowPlayerFinances(PlayerID player)

   245

{

   246

	DoShowPlayerFinances(player, false, false);

   247

}

   248

   249

/* List of colours for the livery window */

   250

static const StringID _colour_dropdown[] = {

   251

	STR_00D1_DARK_BLUE,

   252

	STR_00D2_PALE_GREEN,

   253

	STR_00D3_PINK,

   254

	STR_00D4_YELLOW,

   255

	STR_00D5_RED,

   256

	STR_00D6_LIGHT_BLUE,

   257

	STR_00D7_GREEN,

   258

	STR_00D8_DARK_GREEN,

   259

	STR_00D9_BLUE,

   260

	STR_00DA_CREAM,

   261

	STR_00DB_MAUVE,

   262

	STR_00DC_PURPLE,

   263

	STR_00DD_ORANGE,

   264

	STR_00DE_BROWN,

   265

	STR_00DF_GREY,

   266

	STR_00E0_WHITE,

   267

	INVALID_STRING_ID

   268

};

   269

   270

/* Association of liveries to livery classes */

   271

static const LiveryClass livery_class[LS_END] = {

   272

	LC_OTHER,

   273

	LC_RAIL, LC_RAIL, LC_RAIL, LC_RAIL, LC_RAIL, LC_RAIL, LC_RAIL, LC_RAIL, LC_RAIL, LC_RAIL, LC_RAIL,

   274

	LC_ROAD, LC_ROAD,

   275

	LC_SHIP, LC_SHIP,

   276

	LC_AIRCRAFT, LC_AIRCRAFT, LC_AIRCRAFT,

   277

};

   278

   279

/* Number of liveries in each class, used to determine the height of the livery window */

   280

static const byte livery_height[] = {

   281

	1,

   282

	11,

   283

	2,

   284

	2,

   285

	3,

   286

};

   287

   288

typedef struct livery_d {

   289

	uint32 sel;

   290

	LiveryClass livery_class;

   291

} livery_d;

   292

assert_compile(WINDOW_CUSTOM_SIZE >= sizeof(livery_d));

   293

   294

static void ShowColourDropDownMenu(Window *w, uint32 widget)

   295

{

   296

	uint32 used_colours = 0;

   297

	const Livery *livery;

   298

	LiveryScheme scheme;

   299

   300

	/* Disallow other player colours for the primary colour */

   301

	if (HASBIT(WP(w, livery_d).sel, LS_DEFAULT) && widget == 10) {

   302

		const Player *p;

   303

		FOR_ALL_PLAYERS(p) {

   304

			if (p->is_active && p->index != _local_player) SETBIT(used_colours, p->player_color);

   305

		}

   306

	}

   307

   308

	/* Get the first selected livery to use as the default dropdown item */

   309

	for (scheme = 0; scheme < LS_END; scheme++) {

   310

		if (HASBIT(WP(w, livery_d).sel, scheme)) break;

   311

	}

   312

	if (scheme == LS_END) scheme = LS_DEFAULT;

   313

	livery = &GetPlayer(w->window_number)->livery[scheme];

   314

   315

	ShowDropDownMenu(w, _colour_dropdown, widget == 10 ? livery->colour1 : livery->colour2, widget, used_colours, 0);

   316

}

   317

   318

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

   319

{

   320

	switch (e->event) {

   328

   329

		case WE_PAINT: {

   330

			const Player *p = GetPlayer(w->window_number);

   331

			LiveryScheme scheme = LS_DEFAULT;

   332

			int y = 51;

   333

   334

			/* Disable dropdown controls if no scheme is selected */

   335

			SetWindowWidgetDisabledState(w,  9, (WP(w, livery_d).sel == 0));

   336

			SetWindowWidgetDisabledState(w, 10, (WP(w, livery_d).sel == 0));

   337

			SetWindowWidgetDisabledState(w, 11, (WP(w, livery_d).sel == 0));

   338

			SetWindowWidgetDisabledState(w, 12, (WP(w, livery_d).sel == 0));

   339

   340

			if (!(WP(w, livery_d).sel == 0)) {

   341

				for (scheme = 0; scheme < LS_END; scheme++) {

   342

					if (HASBIT(WP(w, livery_d).sel, scheme)) break;

   343

				}

   344

				if (scheme == LS_END) scheme = LS_DEFAULT;

   345

			}

   346

   347

			SetDParam(0, STR_00D1_DARK_BLUE + p->livery[scheme].colour1);

   348

			SetDParam(1, STR_00D1_DARK_BLUE + p->livery[scheme].colour2);

   349

   350

			DrawWindowWidgets(w);

   351

   352

			for (scheme = LS_DEFAULT; scheme < LS_END; scheme++) {

   353

				if (livery_class[scheme] == WP(w, livery_d).livery_class) {

   354

					bool sel = HASBIT(WP(w, livery_d).sel, scheme) != 0;

   355

   356

					if (scheme != LS_DEFAULT) {

   357

						DrawSprite(p->livery[scheme].in_use ? SPR_BOX_CHECKED : SPR_BOX_EMPTY, 2, y);

   358

					}

   359

   360

					DrawString(15, y, STR_LIVERY_DEFAULT + scheme, sel ? 0xC : 0x10);

   361

   362

					DrawSprite(SPR_SQUARE | GENERAL_SPRITE_COLOR(p->livery[scheme].colour1) | PALETTE_MODIFIER_COLOR, 152, y);

   364

   369

   370

					y += 14;

   371

				}

   372

			}

   373

			break;

   374

		}

   375

   376

		case WE_CLICK: {

   377

			switch (e->we.click.widget) {

   378

				/* Livery Class buttons */

   379

				case 2:

   380

				case 3:

   381

				case 4:

   382

				case 5:

   383

				case 6: {

   384

					LiveryScheme scheme;

   385

   386

					RaiseWindowWidget(w, WP(w, livery_d).livery_class + 2);

   387

					WP(w, livery_d).livery_class = e->we.click.widget - 2;

   388

					WP(w, livery_d).sel = 0;

   389

					LowerWindowWidget(w, WP(w, livery_d).livery_class + 2);

   390

   391

					/* Select the first item in the list */

   392

					for (scheme = LS_DEFAULT; scheme < LS_END; scheme++) {

   393

						if (livery_class[scheme] == WP(w, livery_d).livery_class) {

   394

							WP(w, livery_d).sel = 1 << scheme;

   395

							break;

   396

						}

   397

					}

   398

					w->height = 49 + livery_height[WP(w, livery_d).livery_class] * 14;

   399

					w->widget[13].bottom = w->height - 1;

   400

					w->widget[13].data = livery_height[WP(w, livery_d).livery_class] << 8 | 1;

   401

					MarkWholeScreenDirty();

   402

					break;

   403

				}

   404

   405

				case 9:

   406

				case 10: // First colour dropdown

   407

					ShowColourDropDownMenu(w, 10);

   408

					break;

   409

   410

				case 11:

   411

				case 12: // Second colour dropdown

   412

					ShowColourDropDownMenu(w, 12);

   413

					break;

   414

   415

				case 13: {

   416

					LiveryScheme scheme;

   417

					LiveryScheme j = (e->we.click.pt.y - 48) / 14;

   418

   419

					for (scheme = 0; scheme <= j; scheme++) {

   420

						if (livery_class[scheme] != WP(w, livery_d).livery_class) j++;

   421

						if (scheme >= LS_END) return;

   422

					}

   423

					if (j >= LS_END) return;

   424

   425

					/* If clicking on the left edge, toggle using the livery */

   426

					if (e->we.click.pt.x < 10) {

   427

						DoCommandP(0, j | (2 << 8), !GetPlayer(w->window_number)->livery[j].in_use, NULL, CMD_SET_PLAYER_COLOR);

   428

					}

   429

   430

					if (_ctrl_pressed) {

   431

						TOGGLEBIT(WP(w, livery_d).sel, j);

   432

					} else {

   433

						WP(w, livery_d).sel = 1 << j;

   434

					}

   435

					SetWindowDirty(w);

   436

					break;

   437

				}

   438

			}

   439

			break;

   440

		}

   441

   442

		case WE_DROPDOWN_SELECT: {

   443

			LiveryScheme scheme;

   444

   445

			for (scheme = LS_DEFAULT; scheme < LS_END; scheme++) {

   446

				if (HASBIT(WP(w, livery_d).sel, scheme)) {

   447

					DoCommandP(0, scheme | (e->we.dropdown.button == 10 ? 0 : 256), e->we.dropdown.index, NULL, CMD_SET_PLAYER_COLOR);

   448

				}

   449

			}

   450

			break;

   451

		}

   452

	}

   453

}

   454

   456

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

   457

{  WWT_CAPTION, RESIZE_NONE, 14,  11, 399,   0,  13, STR_7007_NEW_COLOR_SCHEME, STR_018C_WINDOW_TITLE_DRAG_THIS },

   458

{   WWT_IMGBTN, RESIZE_NONE, 14,   0,  21,  14,  35, SPR_IMG_COMPANY_GENERAL,   STR_LIVERY_GENERAL_TIP },

   459

{   WWT_IMGBTN, RESIZE_NONE, 14,  22,  43,  14,  35, SPR_IMG_TRAINLIST,         STR_LIVERY_TRAIN_TIP },

   460

{   WWT_IMGBTN, RESIZE_NONE, 14,  44,  65,  14,  35, SPR_IMG_TRUCKLIST,         STR_LIVERY_ROADVEH_TIP },

   461

{   WWT_IMGBTN, RESIZE_NONE, 14,  66,  87,  14,  35, SPR_IMG_SHIPLIST,          STR_LIVERY_SHIP_TIP },

   462

{   WWT_IMGBTN, RESIZE_NONE, 14,  88, 109,  14,  35, SPR_IMG_AIRPLANESLIST,     STR_LIVERY_AIRCRAFT_TIP },

   463

{    WWT_PANEL, RESIZE_NONE, 14, 110, 399,  14,  35, 0x0,                       STR_NULL },

   464

{    WWT_PANEL, RESIZE_NONE, 14,   0, 149,  36,  47, 0x0,                       STR_NULL },

   465

{  WWT_TEXTBTN, RESIZE_NONE, 14, 150, 262,  36,  47, STR_02BD,                  STR_LIVERY_PRIMARY_TIP },

   466

{  WWT_TEXTBTN, RESIZE_NONE, 14, 263, 274,  36,  47, STR_0225,                  STR_LIVERY_PRIMARY_TIP },

   467

{  WWT_TEXTBTN, RESIZE_NONE, 14, 275, 387,  36,  47, STR_02E1,                  STR_LIVERY_SECONDARY_TIP },

   468

{  WWT_TEXTBTN, RESIZE_NONE, 14, 388, 399,  36,  47, STR_0225,                  STR_LIVERY_SECONDARY_TIP },

   469

{   WWT_MATRIX, RESIZE_NONE, 14,   0, 399,  48,  48 + 1 * 14, (1 << 8) | 1,     STR_LIVERY_PANEL_TIP },

   470

{ WIDGETS_END },

   471

};

   472