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 "vehicle.h"

     8

#include "gfx.h"

     9

#include "station.h"

    10

#include "command.h"

    11

#include "engine.h"

    12

#include "viewport.h"

    13

#include "player.h"

    14

    15

    16

void Set_DPARAM_Aircraft_Build_Window(uint16 engine_number)

    17

{

    18

	const AircraftVehicleInfo *avi = AircraftVehInfo(engine_number);

    19

	Engine *e;

    20

	YearMonthDay ymd;

    21

    22

	SetDParam(0, avi->base_cost * (_price.aircraft_base>>3)>>5);

    23

	SetDParam(1, avi->max_speed * 8);

    24

	SetDParam(2, avi->passenger_capacity);

    25

	SetDParam(3, avi->mail_capacity);

    26

	SetDParam(4, avi->running_cost * _price.aircraft_running >> 8);

    27

    28

	e = &_engines[engine_number];

    29

	SetDParam(6, e->lifelength);

    30

	SetDParam(7, e->reliability * 100 >> 16);

    31

	ConvertDayToYMD(&ymd, e->intro_date);

    32

	SetDParam(5, ymd.year + 1920);

    33

    34

}

    35

    36

static void DrawAircraftImage(Vehicle *v, int x, int y, VehicleID selection)

    37

{

    38

	int image = GetAircraftImage(v, 6);

    39

	uint32 ormod = SPRITE_PALETTE(PLAYER_SPRITE_COLOR(v->owner));

    40

	if (v->vehstatus & VS_CRASHED) ormod = 0x3248000;

    41

	DrawSprite(image | ormod, x+25, y+10);

    42

	if (v->subtype == 0)

    43

		DrawSprite(0xF3D, x+25, y+5);

    44

	if (v->index == selection) {

    45

		DrawFrameRect(x-1, y-1, x+58, y+21, 0xF, 0x10);

    46

	}

    47

}

    48

    49

void CcBuildAircraft(bool success, uint tile, uint32 p1, uint32 p2)

    50

{

    51

	Vehicle *v;

    52

    53

	if (success) {

    54

		v = GetVehicle(_new_aircraft_id);

    55

		if (v->tile == _backup_orders_tile) {

    56

			_backup_orders_tile = 0;

    57

			RestoreVehicleOrders(v, _backup_orders_data);

    58

		}

    59

		ShowAircraftViewWindow(v);

    60

	}

    61

}

    62

    63

    64

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

    65

{

    66

	switch(e->event) {

    67

    68

	case WE_PAINT: {

    69

		if (w->window_number == 0)

    70

			SETBIT(w->disabled_state, 5);

    71

    72

		{

    73

			int count = 0;

    74

			int num = NUM_AIRCRAFT_ENGINES;

    75

			Engine *e = &_engines[AIRCRAFT_ENGINES_INDEX];

    76

			do {

    77

				if (HASBIT(e->player_avail, _local_player))

    78

					count++;

    79

			} while (++e,--num);

    80

			SetVScrollCount(w, count);

    81

		}

    82

    83

		DrawWindowWidgets(w);

    84

    85

		{

    86

			int num = NUM_AIRCRAFT_ENGINES;

    87

			Engine *e = &_engines[AIRCRAFT_ENGINES_INDEX];

    88

			int x = 2;

    89

			int y = 15;

    90

			int sel = WP(w,buildtrain_d).sel_index;

    91

			int pos = w->vscroll.pos;

    92

			int engine_id = AIRCRAFT_ENGINES_INDEX;

    93

			int selected_id = -1;

    94

    95

			do {

    96

				if (HASBIT(e->player_avail, _local_player)) {

    97

					if (sel==0) selected_id = engine_id;

    98

					if (IS_INT_INSIDE(--pos, -w->vscroll.cap, 0)) {

    99

						DrawString(x+62, y+7, GetCustomEngineName(engine_id), sel==0 ? 0xC : 0x10);

   100

						DrawAircraftEngine(x+29, y+10, engine_id, SPRITE_PALETTE(PLAYER_SPRITE_COLOR(_local_player)));

   101

						y += 24;

   102

					}

   103

					sel--;

   104

				}

   105

			} while (++engine_id, ++e,--num);

   106

   107

			WP(w,buildtrain_d).sel_engine = selected_id;

   108

   109

			if (selected_id != -1) {

   110

				Set_DPARAM_Aircraft_Build_Window(selected_id);

   111

   112

				DrawString(2, w->widget[4].top + 1, STR_A007_COST_SPEED_CAPACITY_PASSENGERS, 0);

   113

			}

   114

		}

   115

	} break;

   116

   117

	case WE_CLICK:

   118

		switch(e->click.widget) {

   119

		case 2: { /* listbox */

   120

			uint i = (e->click.pt.y - 14) / 24;

   121

			if (i < w->vscroll.cap) {

   122

				WP(w,buildtrain_d).sel_index = i + w->vscroll.pos;

   123

				SetWindowDirty(w);

   124

			}

   125

		} break;

   126

   127

		case 5: { /* build */

   128

			int sel_eng = WP(w,buildtrain_d).sel_engine;

   129

			if (sel_eng != -1)

   130

				DoCommandP(w->window_number, sel_eng, 0, CcBuildAircraft, CMD_BUILD_AIRCRAFT | CMD_MSG(STR_A008_CAN_T_BUILD_AIRCRAFT));

   131

		} break;

   132

   141

		}

   142

		break;

   143

   144

	case WE_4:

   145

		if (w->window_number != 0 && !FindWindowById(WC_VEHICLE_DEPOT, w->window_number)) {

   146

			DeleteWindow(w);

   147

		}

   148

		break;

   149

   150

	case WE_ON_EDIT_TEXT: {

   151

		byte *b = e->edittext.str;

   152

		if (*b == 0)

   153

			return;

   154

		memcpy(_decode_parameters, b, 32);

   155

		DoCommandP(0, WP(w,buildtrain_d).rename_engine, 0, NULL, CMD_RENAME_ENGINE | CMD_MSG(STR_A03A_CAN_T_RENAME_AIRCRAFT_TYPE));

   156

	} break;

   157

   158

	case WE_RESIZE:

   159

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

   160

		w->widget[2].unkA = (w->vscroll.cap << 8) + 1;

   161

		break;

   162

	}

   163

}

   164

   165

static const Widget _new_aircraft_widgets[] = {

   166

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

   167

{    WWT_CAPTION,   RESIZE_NONE,    14,    11,   239,     0,    13, STR_A005_NEW_AIRCRAFT,		STR_018C_WINDOW_TITLE_DRAG_THIS},

   168

{     WWT_MATRIX, RESIZE_BOTTOM,    14,     0,   227,    14,   109, 0x401,										STR_A025_AIRCRAFT_SELECTION_LIST},

   169

{  WWT_SCROLLBAR, RESIZE_BOTTOM,    14,   228,   239,    14,   109, 0x0,											STR_0190_SCROLL_BAR_SCROLLS_LIST},

   170

{     WWT_IMGBTN,     RESIZE_TB,    14,     0,   239,   110,   161, 0x0,											STR_NULL},

   171

{ WWT_PUSHTXTBTN,     RESIZE_TB,    14,     0,   114,   162,   173, STR_A006_BUILD_AIRCRAFT,	STR_A026_BUILD_THE_HIGHLIGHTED_AIRCRAFT},

   172

{ WWT_PUSHTXTBTN,     RESIZE_TB,    14,   115,   227,   162,   173, STR_A037_RENAME,					STR_A038_RENAME_AIRCRAFT_TYPE},

   173

{  WWT_RESIZEBOX,     RESIZE_TB,    14,   228,   239,   162,   173, 0x0,											STR_RESIZE_BUTTON},

   174

{   WIDGETS_END},

   175

};

   176

   177

static const WindowDesc _new_aircraft_desc = {

   178

	-1, -1, 240, 174,

   179

	WC_BUILD_VEHICLE,0,

   180

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_RESIZABLE,

   181

	_new_aircraft_widgets,

   182

	NewAircraftWndProc

   183

};

   184

   185

static void ShowBuildAircraftWindow(uint tile)

   186

{

   187

	Window *w;

   188

   189

	DeleteWindowById(WC_BUILD_VEHICLE, tile);

   190

   191

	w = AllocateWindowDesc(&_new_aircraft_desc);

   192

	w->window_number = tile;

   193

	w->vscroll.cap = 4;

   194

	w->widget[2].unkA = (w->vscroll.cap << 8) + 1;

   195

   196

	w->resize.step_height = 24;

   197

   198

	if (tile != 0) {

   199

		w->caption_color = _map_owner[tile];

   200

	} else {

   201

		w->caption_color = _local_player;

   202

	}

   203

}

   204

   205

#define MAX_REFIT 0xFF

   206

   207

const byte _aircraft_refit_normal[] = { 

   208

	CT_PASSENGERS,

   209

	CT_MAIL,

   210

	CT_GOODS,

   211

	CT_VALUABLES,

   212

	MAX_REFIT 

   213

};

   214

   215

const byte _aircraft_refit_arctic[] = { 

   216

	CT_PASSENGERS,

   217

	CT_MAIL,

   218

	CT_GOODS,

   219

	CT_FOOD,

   220

	MAX_REFIT 

   221

};

   222

   223

const byte _aircraft_refit_desert[] = { 

   224

	CT_PASSENGERS,

   225

	CT_MAIL,

   226

	CT_FRUIT,

   227

	CT_GOODS,

   228

	CT_DIAMONDS,

   229

	MAX_REFIT 

   230

};

   231

   232

const byte _aircraft_refit_candy[] = { 

   233

	CT_PASSENGERS,

   234

	CT_SUGAR,

   235

	CT_TOYS,

   236

	CT_CANDY,

   237

	CT_COLA,

   238

	CT_COTTON_CANDY,

   239

	CT_BUBBLES,

   240

	CT_TOFFEE,

   241

	CT_BATTERIES,

   242

	CT_PLASTIC,

   243

	CT_FIZZY_DRINKS,

   244

	MAX_REFIT

   245

};

   246

   247

const byte * const _aircraft_refit_types[4] = {

   248

	_aircraft_refit_normal, _aircraft_refit_arctic, _aircraft_refit_desert, _aircraft_refit_candy

   249

};

   250

   251

#undef MAX_REFIT

   252

   253

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

   254

{

   255

	switch(e->event) {

   256

	case WE_PAINT: {

   257

		Vehicle *v = GetVehicle(w->window_number);

   258

		const byte *b;

   259

		int sel;

   260

		int x,y;

   261

		byte color;

   262

		int cargo;

   263

   264

		SetDParam(0, v->string_id);

   265

		SetDParam(1, v->unitnumber);

   266

		DrawWindowWidgets(w);

   267

   268

		DrawString(1, 15, STR_A040_SELECT_CARGO_TYPE_TO_CARRY, 0);

   269

   270

		/* TODO: Support for custom GRFSpecial-specified refitting! --pasky */

   271

   272

		cargo = -1;

   273

		x = 6;

   274

		y = 25;

   275

		sel = WP(w,refit_d).sel;

   276

   277

#define show_cargo(ctype) { \

   278

		color = 16; \

   279

		if (sel == 0) { \

   280

			cargo = ctype; \

   281

			color = 12; \

   282

		} \

   283

		sel--; \

   284

		DrawString(x, y, _cargoc.names_s[ctype], color); \

   285

		y += 10; \

   286

		}

   287

   288

		if (_engine_refit_masks[v->engine_type]) {

   289

			uint32 mask = _engine_refit_masks[v->engine_type];

   290

			int cid = 0;

   291

   292

			for (; mask; mask >>= 1, cid++) {

   293

				if (!(mask & 1)) // not this cid

   294

					continue;

   295

				if (!(_local_cargo_id_landscape[cid] & (1 << _opt.landscape))) // not in this landscape

   296

					continue;

   297

   298

				show_cargo(_local_cargo_id_ctype[cid]);

   299

			}

   300

   301

		} else { // generic refit list

   302

			b = _aircraft_refit_types[_opt.landscape];

   303

			do {

   304

				show_cargo(*b);

   305

			} while (*++b != 0xFF);

   306

		}

   307

   308

#undef show_cargo

   309

   310

		WP(w,refit_d).cargo = cargo;

   311

   312

		if (cargo != -1) {

   313

			int32 cost = DoCommandByTile(v->tile, v->index, cargo, DC_QUERY_COST, CMD_REFIT_AIRCRAFT);

   314

			if (cost != CMD_ERROR) {

   315

				SetDParam(2, cost);

   316

				SetDParam(0, _cargoc.names_long_p[cargo]);

   317

				SetDParam(1, _aircraft_refit_capacity);

   318

				DrawString(1, 137, STR_A041_NEW_CAPACITY_COST_OF_REFIT, 0);

   319

			}

   320

		}

   321

   322

		break;

   323

	}

   324

   325

	case WE_CLICK:

   326

		switch(e->click.widget) {

   327

		case 2: { /* listbox */

   328

				int y = e->click.pt.y - 25;

   329

				if (y >= 0) {

   330

					WP(w,refit_d).sel = y / 10;

   331

					SetWindowDirty(w);

   332

				}

   333

			} break;

   334

		case 4: /* refit button */

   335

			if (WP(w,refit_d).cargo != 0xFF) {

   336

				Vehicle *v = GetVehicle(w->window_number);

   337

				if (DoCommandP(v->tile, v->index, WP(w,refit_d).cargo, NULL, CMD_REFIT_AIRCRAFT | CMD_MSG(STR_A042_CAN_T_REFIT_AIRCRAFT)))

   338

					DeleteWindow(w);

   339

			}

   340

		  break;

   341

		}

   342

		break;

   343

	}

   344

}

   345

   346

static const Widget _aircraft_refit_widgets[] = {

   347

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

   348

{    WWT_CAPTION,   RESIZE_NONE,    14,    11,   239,     0,    13, STR_A03C_REFIT,	STR_018C_WINDOW_TITLE_DRAG_THIS},

   349

{     WWT_IMGBTN,   RESIZE_NONE,    14,     0,   239,    14,   135, 0x0,							STR_A03E_SELECT_TYPE_OF_CARGO_FOR},

   350

{     WWT_IMGBTN,   RESIZE_NONE,    14,     0,   239,   136,   157, 0x0,							STR_NULL},

   351

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    14,     0,   239,   158,   169, STR_A03D_REFIT_AIRCRAFT, STR_A03F_REFIT_AIRCRAFT_TO_CARRY},

   352

{   WIDGETS_END},

   353

};

   354

   355

static const WindowDesc _aircraft_refit_desc = {

   356

	-1,-1, 240, 170,

   357

	WC_VEHICLE_REFIT,WC_VEHICLE_VIEW,

   358

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   359

	_aircraft_refit_widgets,

   360

	AircraftRefitWndProc

   361

};

   362

   363

static void ShowAircraftRefitWindow(Vehicle *v)

   364

{

   365

	Window *w;

   366

   367

	DeleteWindowById(WC_VEHICLE_REFIT, v->index);

   368

   369

	_alloc_wnd_parent_num = v->index;

   370

	w = AllocateWindowDesc(&_aircraft_refit_desc);

   371

	w->window_number = v->index;

   372

	w->caption_color = v->owner;

   373

	WP(w,refit_d).sel = -1;

   374

}

   375

   376

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

   377

{

   378

	int mod;

   379

	Vehicle *v = GetVehicle(w->window_number), *u;

   380

   381

	switch(e->event) {

   382

	case WE_PAINT:

   383

		w->disabled_state = v->owner == _local_player ? 0 : (1 << 2);

   384

		if (!_patches.servint_aircraft) // disable service-scroller when interval is set to disabled

   385

			w->disabled_state |= (1 << 5) | (1 << 6);

   386

   387

		SetDParam(0, v->string_id);

   388

		SetDParam(1, v->unitnumber);

   389

		DrawWindowWidgets(w);

   390

   391

		/* Draw running cost */

   392

		{

   393

			int year = v->age / 366;

   394

			StringID str;

   395

   396

			SetDParam(1, year);

   397

   398

			str = STR_0199_YEAR;

   399

			if (year != 1) {

   400

				str++;

   401

				if (v->max_age - 366 < v->age)

   402

					str++;

   403

			}

   404

			SetDParam(0, str);

   405

			SetDParam(2, v->max_age / 366);

   406

			SetDParam(3, _price.aircraft_running * AircraftVehInfo(v->engine_type)->running_cost >> 8);

   407

			DrawString(2, 15, STR_A00D_AGE_RUNNING_COST_YR, 0);

   408

		}

   409

   410

		/* Draw max speed */

   411

		{

   412

			SetDParam(0, v->max_speed * 8);

   413

			DrawString(2, 25, STR_A00E_MAX_SPEED, 0);

   414

		}

   415

   416

		/* Draw profit */

   417

		{

   418

			SetDParam(0, v->profit_this_year);

   419

			SetDParam(1, v->profit_last_year);

   420

			DrawString(2, 35, STR_A00F_PROFIT_THIS_YEAR_LAST_YEAR, 0);

   421

		}

   422

   423

		/* Draw breakdown & reliability */

   424

		{

   425

			SetDParam(0, v->reliability * 100 >> 16);

   426

			SetDParam(1, v->breakdowns_since_last_service);

   427

			DrawString(2, 45, STR_A010_RELIABILITY_BREAKDOWNS, 0);

   428

		}

   429

   430

		/* Draw service interval text */

   431

		{

   432

			SetDParam(0, v->service_interval);

   433

			SetDParam(1, v->date_of_last_service);

   434

			DrawString(13, 103, _patches.servint_ispercent?STR_SERVICING_INTERVAL_PERCENT:STR_883C_SERVICING_INTERVAL_DAYS, 0);

   435

		}

   436

   437

		DrawAircraftImage(v, 3, 57, INVALID_VEHICLE);

   438

   439

		{

   440

			int y = 57;

   441

   442

			do {

   443

				if (v->subtype <= 2) {

   444

					SetDParam(0, GetCustomEngineName(v->engine_type));

   445

					SetDParam(1, 1920 + v->build_year);

   446

					SetDParam(2, v->value);

   447

					DrawString(60, y, STR_A011_BUILT_VALUE, 0);

   448

					y += 10;

   449

   450

					SetDParam(0, _cargoc.names_long_p[v->cargo_type]);

   451

					SetDParam(1, v->cargo_cap);

   452

					u = v->next;

   453

					SetDParam(2, _cargoc.names_long_p[u->cargo_type]);

   454

					SetDParam(3, u->cargo_cap);

   455

					DrawString(60, y, STR_A019_CAPACITY + (u->cargo_cap == 0), 0);

   456

					y += 14;

   457

				}

   458

   459

				if (v->cargo_count != 0) {

   460

   461

					/* Cargo names (fix pluralness) */

   462

					SetDParam(0, v->cargo_type);

   463

					SetDParam(1, v->cargo_count);

   464

					SetDParam(2, v->cargo_source);

   465

					DrawString(60, y, STR_8813_FROM, 0);

   466

   467

					y += 10;

   468

				}

   469

			} while ( (v=v->next) != NULL);

   470

		}

   471

		break;

   472

   473

	case WE_CLICK:

   474

		switch(e->click.widget) {

   475

		case 2: /* rename */

   476

			SetDParam(0, v->unitnumber);

   477

			ShowQueryString(v->string_id, STR_A030_NAME_AIRCRAFT, 31, 150, w->window_class, w->window_number);

   478

			break;

   479

   480

		case 5: /* increase int */

   481

			mod = _ctrl_pressed? 5 : 10;

   482

			goto change_int;

   483

		case 6: /* decrease int */

   484

			mod = _ctrl_pressed?- 5 : -10;

   485

change_int:

   486

			mod += v->service_interval;

   487

   488

			/*	%-based service interval max 5%-90%

   489

					day-based service interval max 30-800 days */

   490

			mod = _patches.servint_ispercent ? clamp(mod, MIN_SERVINT_PERCENT, MAX_SERVINT_PERCENT) : clamp(mod, MIN_SERVINT_DAYS, MAX_SERVINT_DAYS+1);

   491

			if (mod == v->service_interval)

   492

				return;

   493

   494

			DoCommandP(v->tile, v->index, mod, NULL,

   495

				CMD_CHANGE_AIRCRAFT_SERVICE_INT | CMD_MSG(STR_018A_CAN_T_CHANGE_SERVICING));

   496

			break;

   497

		}

   498

		break;

   499

   500

	case WE_4:

   501

		if (FindWindowById(WC_VEHICLE_VIEW, w->window_number) == NULL)

   502

			DeleteWindow(w);

   503

		break;

   504

   505

	case WE_ON_EDIT_TEXT: {

   506

		byte *b = e->edittext.str;

   507

		if (*b == 0)

   508

			return;

   509

		memcpy(_decode_parameters, b, 32);

   510

		DoCommandP(0, w->window_number, 0, NULL, CMD_NAME_VEHICLE | CMD_MSG(STR_A031_CAN_T_NAME_AIRCRAFT));

   511

	} break;