1

/* $Id$ */

     2

     3

#include "stdafx.h"

     4

#include "openttd.h"

     5

#include "aircraft.h"

     6

#include "debug.h"

     7

#include "functions.h"

     8

#include "station_map.h"

     9

#include "table/sprites.h"

    10

#include "table/strings.h"

    11

#include "map.h"

    12

#include "tile.h"

    13

#include "window.h"

    14

#include "gui.h"

    15

#include "vehicle.h"

    16

#include "gfx.h"

    17

#include "station.h"

    18

#include "command.h"

    19

#include "engine.h"

    20

#include "viewport.h"

    21

#include "player.h"

    22

#include "depot.h"

    23

#include "airport.h"

    24

#include "vehicle_gui.h"

    25

#include "newgrf_engine.h"

    26

    27

/**

    28

 * Draw the purchase info details of an aircraft at a given location.

    29

 * @param x,y location where to draw the info

    30

 * @param engine_number the engine of which to draw the info of

    31

 */

    32

void DrawAircraftPurchaseInfo(int x, int y, EngineID engine_number)

    33

{

    34

	const AircraftVehicleInfo *avi = AircraftVehInfo(engine_number);

    35

	const Engine *e = GetEngine(engine_number);

    36

	CargoID cargo;

    37

	YearMonthDay ymd;

    38

	ConvertDayToYMD(&ymd, e->intro_date);

    39

    40

	/* Purchase cost - Max speed */

    41

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

    42

	SetDParam(1, avi->max_speed * 128 / 10);

    43

	DrawString(x, y, STR_PURCHASE_INFO_COST_SPEED, 0);

    44

	y += 10;

    45

    46

	/* Cargo capacity */

    47

	cargo = FindFirstRefittableCargo(engine_number);

    48

	if (cargo == CT_INVALID || cargo == CT_PASSENGERS) {

    49

		SetDParam(0, avi->passenger_capacity);

    50

		SetDParam(1, avi->mail_capacity);

    51

		DrawString(x, y, STR_PURCHASE_INFO_AIRCRAFT_CAPACITY, 0);

    52

	} else {

    53

		/* Note, if the default capacity is selected by the refit capacity

    54

		 * callback, then the capacity shown is likely to be incorrect. */

    55

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

    56

		SetDParam(1, AircraftDefaultCargoCapacity(cargo, engine_number));

    57

		SetDParam(2, STR_9842_REFITTABLE);

    58

		DrawString(x, y, STR_PURCHASE_INFO_CAPACITY, 0);

    59

	}

    60

	y += 10;

    61

    62

	/* Running cost */

    63

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

    64

	DrawString(x, y, STR_PURCHASE_INFO_RUNNINGCOST, 0);

    65

	y += 10;

    66

    67

	/* Design date - Life length */

    68

	SetDParam(0, ymd.year + 1920);

    69

	SetDParam(1, e->lifelength);

    70

	DrawString(x, y, STR_PURCHASE_INFO_DESIGNED_LIFE, 0);

    71

	y += 10;

    72

    73

	/* Reliability */

    74

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

    75

	DrawString(x, y, STR_PURCHASE_INFO_RELIABILITY, 0);

    76

	y += 10;

    77

    78

	/* Additional text from NewGRF */

    79

	// XXX 227 will become a calculated width...

    80

	y += ShowAdditionalText(x, y, 227, engine_number);

    81

}

    82

    83

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

    84

{

    85

	PalSpriteID pal = (v->vehstatus & VS_CRASHED) ? PALETTE_CRASH : GetVehiclePalette(v);

    86

	DrawSprite(GetAircraftImage(v, DIR_W) | pal, x + 25, y + 10);

    87

	if (v->subtype == 0) {

    88

		SpriteID rotor_sprite = GetCustomRotorSprite(v, true);

    89

		if (rotor_sprite == 0) rotor_sprite = SPR_ROTOR_STOPPED;

    90

		DrawSprite(rotor_sprite, x + 25, y + 5);

    91

	}

    92

	if (v->index == selection) {

    93

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

    94

	}

    95

}

    96

    97

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

    98

{

    99

	if (success) {

   100

		const Vehicle *v = GetVehicle(_new_vehicle_id);

   101

   102

		if (v->tile == _backup_orders_tile) {

   103

			_backup_orders_tile = 0;

   104

			RestoreVehicleOrders(v, _backup_orders_data);

   105

		}

   106

		ShowAircraftViewWindow(v);

   107

	}

   108

}

   109

   110

void CcCloneAircraft(bool success, TileIndex tile, uint32 p1, uint32 p2)

   111

{

   112

	if (success) ShowAircraftViewWindow(GetVehicle(_new_vehicle_id));

   113

}

   114

   115

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

   116

{

   117

	switch (e->event) {

   118

	case WE_PAINT: {

   119

		TileIndex tile = w->window_number;

   120

		byte acc_planes;

   121

   122

		if (tile == 0) {

   123

			SETBIT(w->disabled_state, 5);

   124

			acc_planes = ALL;

   125

		} else {

   126

			acc_planes = GetAirport(GetStationByTile(tile)->airport_type)->acc_planes;

   127

		}

   128

   129

		{

   130

			int count = 0;

   131

			EngineID eid;

   132

   133

			for (eid = AIRCRAFT_ENGINES_INDEX; eid < AIRCRAFT_ENGINES_INDEX + NUM_AIRCRAFT_ENGINES; eid++) {

   134

				const AircraftVehicleInfo *avi;

   135

   136

				if (!HASBIT(GetEngine(eid)->player_avail, _local_player)) continue;

   137

   138

				avi = AircraftVehInfo(eid);

   139

				if ((avi->subtype & AIR_CTOL ? HELICOPTERS_ONLY : AIRCRAFT_ONLY) == acc_planes) continue;

   140

   141

				count++;

   142

			}

   143

			SetVScrollCount(w, count);

   144

		}

   145

   146

		DrawWindowWidgets(w);

   147

   148

		{

   149

			int x = 2;

   150

			int y = 15;

   151

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

   152

			int pos = w->vscroll.pos;

   153

			EngineID selected_id = INVALID_ENGINE;

   154

			EngineID eid;

   155

   156

			for (eid = AIRCRAFT_ENGINES_INDEX; eid < AIRCRAFT_ENGINES_INDEX + NUM_AIRCRAFT_ENGINES; eid++) {

   157

				const AircraftVehicleInfo *avi;

   158

   159

				if (!HASBIT(GetEngine(eid)->player_avail, _local_player)) continue;

   160

   161

				avi = AircraftVehInfo(eid);

   162

				if ((avi->subtype & AIR_CTOL ? HELICOPTERS_ONLY : AIRCRAFT_ONLY) == acc_planes) continue;

   163

   164

				if (sel == 0) selected_id = eid;

   165

   166

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

   167

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

   168

					DrawAircraftEngine(x + 29, y + 10, eid, GetEnginePalette(eid, _local_player));

   169

					y += 24;

   170

				}

   171

   172

				sel--;

   173

			}

   174

   175

			WP(w,buildtrain_d).sel_engine = selected_id;

   176

   177

			if (selected_id != INVALID_ENGINE) {

   178

				DrawAircraftPurchaseInfo(2, w->widget[4].top + 1, selected_id);

   179

			}

   180

		}

   181

	} break;

   182

   183

	case WE_CLICK:

   184

		switch (e->click.widget) {

   185

		case 2: { /* listbox */

   186

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

   187

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

   188

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

   189

				SetWindowDirty(w);

   190

			}

   191

		} break;

   192

   193

		case 5: { /* build */

   194

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

   195

			if (sel_eng != INVALID_ENGINE)

   196

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

   197

		} break;

   198

   199

		case 6:	{ /* rename */

   200

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

   201

			if (sel_eng != INVALID_ENGINE) {

   202

				WP(w,buildtrain_d).rename_engine = sel_eng;

   203

				ShowQueryString(GetCustomEngineName(sel_eng),

   204

					STR_A039_RENAME_AIRCRAFT_TYPE, 31, 160, w->window_class, w->window_number);

   205

			}

   206

		} break;

   207

		}

   208

		break;

   209

   210

	case WE_ON_EDIT_TEXT: {

   211

		if (e->edittext.str[0] != '\0') {

   212

			_cmd_text = e->edittext.str;

   213

			DoCommandP(0, WP(w, buildtrain_d).rename_engine, 0, NULL,

   214

				CMD_RENAME_ENGINE | CMD_MSG(STR_A03A_CAN_T_RENAME_AIRCRAFT_TYPE));

   215

		}

   216

	} break;

   217

   218

	case WE_RESIZE:

   219

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

   220

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

   221

		break;

   222

	}

   223

}

   224

   225

static const Widget _new_aircraft_widgets[] = {

   226

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

   227

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

   228

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

   229

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

   230

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

   231

{ WWT_PUSHTXTBTN,     RESIZE_TB,    14,     0,   114,   182,   193, STR_A006_BUILD_AIRCRAFT,	STR_A026_BUILD_THE_HIGHLIGHTED_AIRCRAFT},

   232

{ WWT_PUSHTXTBTN,     RESIZE_TB,    14,   115,   227,   182,   193, STR_A037_RENAME,					STR_A038_RENAME_AIRCRAFT_TYPE},

   233

{  WWT_RESIZEBOX,     RESIZE_TB,    14,   228,   239,   182,   193, 0x0,											STR_RESIZE_BUTTON},

   234

{   WIDGETS_END},

   235

};

   236

   237

static const WindowDesc _new_aircraft_desc = {

   238

	-1, -1, 240, 194,

   239

	WC_BUILD_VEHICLE,0,

   240

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_RESIZABLE,

   241

	_new_aircraft_widgets,

   242

	NewAircraftWndProc

   243

};

   244

   245

static void ShowBuildAircraftWindow(TileIndex tile)

   246

{

   247

	Window *w;

   248

   249

	DeleteWindowById(WC_BUILD_VEHICLE, tile);

   250

   251

	w = AllocateWindowDesc(&_new_aircraft_desc);

   252

	w->window_number = tile;

   253

	w->vscroll.cap = 4;

   254

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

   255

   256

	w->resize.step_height = 24;

   257

   258

	if (tile != 0) {

   259

		w->caption_color = GetTileOwner(tile);

   260

	} else {

   261

		w->caption_color = _local_player;

   262

	}

   263

}

   264

   265

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

   266

{

   267

	switch (e->event) {

   268

	case WE_PAINT: {

   269

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

   270

   271

		SetDParam(0, v->string_id);

   272

		SetDParam(1, v->unitnumber);

   273

		DrawWindowWidgets(w);

   274

   275

		DrawString(1, 15, STR_A040_SELECT_CARGO_TYPE_TO_CARRY, 0);

   276

   277

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

   278

		WP(w,refit_d).cargo = DrawVehicleRefitWindow(v, WP(w, refit_d).sel);

   279

   280

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

   281

			int32 cost = DoCommand(v->tile, v->index, WP(w,refit_d).cargo, DC_QUERY_COST, CMD_REFIT_AIRCRAFT);

   282

			if (!CmdFailed(cost)) {

   283

				SetDParam(2, cost);

   284

				SetDParam(0, _cargoc.names_long[WP(w,refit_d).cargo]);

   285

				SetDParam(1, _returned_refit_capacity);

   286

				DrawString(1, 147, STR_A041_NEW_CAPACITY_COST_OF_REFIT, 0);

   287

			}

   288

		}

   289

	}	break;

   290

   291

	case WE_CLICK:

   292

		switch (e->click.widget) {

   293

		case 2: { /* listbox */

   294

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

   295

			if (y >= 0) {

   296

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

   297

				SetWindowDirty(w);

   298

			}

   299

		} break;

   300

		case 4: /* refit button */

   301

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

   302

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

   303

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

   304

					DeleteWindow(w);

   305

			}

   306

			break;

   307

		}

   308

		break;

   309

	}

   310

}

   311

   312

static const Widget _aircraft_refit_widgets[] = {

   313

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

   314

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

   315

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

   316

{     WWT_IMGBTN,   RESIZE_NONE,    14,     0,   239,   146,   167, 0x0,							STR_NULL},

   317

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    14,     0,   239,   168,   179, STR_A03D_REFIT_AIRCRAFT, STR_A03F_REFIT_AIRCRAFT_TO_CARRY},

   318

{   WIDGETS_END},

   319

};

   320

   321

static const WindowDesc _aircraft_refit_desc = {

   322

	-1,-1, 240, 180,

   323

	WC_VEHICLE_REFIT,WC_VEHICLE_VIEW,

   324

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   325

	_aircraft_refit_widgets,

   326

	AircraftRefitWndProc

   327

};

   328

   329

static void ShowAircraftRefitWindow(const Vehicle *v)

   330

{

   331

	Window *w;

   332

   333

	DeleteWindowById(WC_VEHICLE_REFIT, v->index);

   334

   335

	_alloc_wnd_parent_num = v->index;

   336

	w = AllocateWindowDesc(&_aircraft_refit_desc);

   337

	w->window_number = v->index;

   338

	w->caption_color = v->owner;

   339

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

   340

}

   341

   342

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

   343

{

   344

	switch (e->event) {

   345

	case WE_PAINT: {

   346

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

   347

   348

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

   349

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

   350

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

   351

   352

		SetDParam(0, v->string_id);

   353

		SetDParam(1, v->unitnumber);

   354

		DrawWindowWidgets(w);

   355

   356

		/* Draw running cost */

   357

		{

   358

			int year = v->age / 366;

   359

   360

			SetDParam(1, year);

   361

   362

			SetDParam(0, (v->age + 365 < v->max_age) ? STR_AGE : STR_AGE_RED);

   363

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

   364

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

   365

			DrawString(2, 15, STR_A00D_AGE_RUNNING_COST_YR, 0);

   366

		}

   367

   368

		/* Draw max speed */

   369

		{

   370

			SetDParam(0, v->max_speed * 128 / 10);

   371

			DrawString(2, 25, STR_A00E_MAX_SPEED, 0);

   372

		}

   373

   374

		/* Draw profit */

   375

		{

   376

			SetDParam(0, v->profit_this_year);

   377

			SetDParam(1, v->profit_last_year);

   378

			DrawString(2, 35, STR_A00F_PROFIT_THIS_YEAR_LAST_YEAR, 0);

   379

		}

   380

   381

		/* Draw breakdown & reliability */

   382

		{

   383

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

   384

			SetDParam(1, v->breakdowns_since_last_service);

   385

			DrawString(2, 45, STR_A010_RELIABILITY_BREAKDOWNS, 0);

   386

		}

   387

   388

		/* Draw service interval text */

   389

		{

   390

			SetDParam(0, v->service_interval);

   391

			SetDParam(1, v->date_of_last_service);

   392

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

   393

		}

   394

   395

		DrawAircraftImage(v, 3, 57, INVALID_VEHICLE);

   396

   397

		{

   398

			const Vehicle *u;

   399

			int y = 57;

   400

   401

			do {

   402

				if (v->subtype <= 2) {

   403

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

   404

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

   405

					SetDParam(2, v->value);

   406

					DrawString(60, y, STR_A011_BUILT_VALUE, 0);

   407

					y += 10;

   408

   409

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

   410

					SetDParam(1, v->cargo_cap);

   411

					u = v->next;

   412

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

   413

					SetDParam(3, u->cargo_cap);

   414

					DrawString(60, y, (u->cargo_cap != 0) ? STR_A019_CAPACITY : STR_A01A_CAPACITY, 0);

   415

					y += 14;

   416

				}

   417

   418

				if (v->cargo_count != 0) {

   419

   420

					/* Cargo names (fix pluralness) */

   421

					SetDParam(0, v->cargo_type);

   422

					SetDParam(1, v->cargo_count);

   423

					SetDParam(2, v->cargo_source);

   424

					DrawString(60, y, STR_8813_FROM, 0);

   425

   426

					y += 10;

   427

				}

   428

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

   429

		}

   430

	} break;

   431

   432

	case WE_CLICK: {

   433

		int mod;

   434

		const Vehicle *v;

   435

		switch (e->click.widget) {

   436

		case 2: /* rename */

   437

			v = GetVehicle(w->window_number);

   438

			SetDParam(0, v->unitnumber);

   439

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

   440

			break;

   441

		case 5: /* increase int */

   442

			mod = _ctrl_pressed? 5 : 10;

   443

			goto do_change_service_int;

   444

		case 6: /* decrease int */

   445

			mod = _ctrl_pressed?- 5 : -10;

   446

do_change_service_int:

   447

			v = GetVehicle(w->window_number);

   448

   449

			mod = GetServiceIntervalClamped(mod + v->service_interval);

   450

			if (mod == v->service_interval) return;

   451

   452

			DoCommandP(v->tile, v->index, mod, NULL, CMD_CHANGE_SERVICE_INT | CMD_MSG(STR_018A_CAN_T_CHANGE_SERVICING));

   453

			break;

   454

		}

   455

	} break;

   456

   457

	case WE_ON_EDIT_TEXT:

   458

		if (e->edittext.str[0] != '\0') {

   459

			_cmd_text = e->edittext.str;

   460

			DoCommandP(0, w->window_number, 0, NULL,

   461

				CMD_NAME_VEHICLE | CMD_MSG(STR_A031_CAN_T_NAME_AIRCRAFT));

   462

		}

   463

		break;

   464

	}

   465

}

   466

   467

   468

static const Widget _aircraft_details_widgets[] = {

   469

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

   470

{    WWT_CAPTION,   RESIZE_NONE,    14,    11,   349,     0,    13, STR_A00C_DETAILS,	STR_018C_WINDOW_TITLE_DRAG_THIS},

   471

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    14,   350,   389,     0,    13, STR_01AA_NAME,			STR_A032_NAME_AIRCRAFT},

   472

{     WWT_IMGBTN,   RESIZE_NONE,    14,     0,   389,    14,    55, 0x0,								STR_NULL},

   473

{     WWT_IMGBTN,   RESIZE_NONE,    14,     0,   389,    56,   101, 0x0,								STR_NULL},

   474

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    14,     0,    10,   102,   107, STR_0188,					STR_884D_INCREASE_SERVICING_INTERVAL},

   475

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    14,     0,    10,   108,   113, STR_0189,					STR_884E_DECREASE_SERVICING_INTERVAL},

   476

{     WWT_IMGBTN,   RESIZE_NONE,    14,    11,   389,   102,   113, 0x0,								STR_NULL},

   477

{   WIDGETS_END},

   478

};

   479

   480

static const WindowDesc _aircraft_details_desc = {

   481

	-1,-1, 390, 114,

   482

	WC_VEHICLE_DETAILS,WC_VEHICLE_VIEW,

   483

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   484

	_aircraft_details_widgets,

   485

	AircraftDetailsWndProc

   486

};

   487

   488

   489

static void ShowAircraftDetailsWindow(const Vehicle *v)

   490

{

   491

	Window *w;

   492

	VehicleID veh = v->index;

   493

   494

	DeleteWindowById(WC_VEHICLE_ORDERS, veh);

   495

	DeleteWindowById(WC_VEHICLE_DETAILS, veh);

   496

   497

	_alloc_wnd_parent_num = veh;

   498