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

    79

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

    80

{

    81

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

    82

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

    83

	if (v->subtype == 0) {

    84

		SpriteID rotor_sprite = GetCustomRotorSprite(v, true);

    85

		if (rotor_sprite == 0) rotor_sprite = SPR_ROTOR_STOPPED;

    86

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

    87

	}

    88

	if (v->index == selection) {

    89

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

    90

	}

    91

}

    92

    93

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

    94

{

    95

	if (success) {

    96

		const Vehicle *v = GetVehicle(_new_vehicle_id);

    97

    98

		if (v->tile == _backup_orders_tile) {

    99

			_backup_orders_tile = 0;

   100

			RestoreVehicleOrders(v, _backup_orders_data);

   101

		}

   102

		ShowAircraftViewWindow(v);

   103

	}

   104

}

   105

   106

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

   107

{

   108

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

   109

}

   110

   111

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

   112

{

   113

	switch (e->event) {

   114

	case WE_PAINT: {

   115

		TileIndex tile = w->window_number;

   116

		byte acc_planes;

   117

   118

		if (tile == 0) {

   119

			SETBIT(w->disabled_state, 5);

   120

			acc_planes = ALL;

   121

		} else {

   122

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

   123

		}

   124

   125

		{

   126

			int count = 0;

   127

			EngineID eid;

   128

   129

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

   130

				const AircraftVehicleInfo *avi;

   131

   132

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

   133

   134

				avi = AircraftVehInfo(eid);

   135

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

   136

   137

				count++;

   138

			}

   139

			SetVScrollCount(w, count);

   140

		}

   141

   142

		DrawWindowWidgets(w);

   143

   144

		{

   145

			int x = 2;

   146

			int y = 15;

   147

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

   148

			int pos = w->vscroll.pos;

   149

			EngineID selected_id = INVALID_ENGINE;

   150

			EngineID eid;

   151

   152

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

   153

				const AircraftVehicleInfo *avi;

   154

   155

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

   156

   157

				avi = AircraftVehInfo(eid);

   158

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

   159

   160

				if (sel == 0) selected_id = eid;

   161

   162

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

   163

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

   164

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

   165

					y += 24;

   166

				}

   167

   168

				sel--;

   169

			}

   170

   171

			WP(w,buildtrain_d).sel_engine = selected_id;

   172

   173

			if (selected_id != INVALID_ENGINE) {

   174

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

   175

			}

   176

		}

   177

	} break;

   178

   179

	case WE_CLICK:

   180

		switch (e->click.widget) {

   181

		case 2: { /* listbox */

   182

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

   183

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

   184

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

   185

				SetWindowDirty(w);

   186

			}

   187

		} break;

   188

   189

		case 5: { /* build */

   190

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

   191

			if (sel_eng != INVALID_ENGINE)

   192

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

   193

		} break;

   194

   195

		case 6:	{ /* rename */

   196

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

   197

			if (sel_eng != INVALID_ENGINE) {

   198

				WP(w,buildtrain_d).rename_engine = sel_eng;

   199

				ShowQueryString(GetCustomEngineName(sel_eng),

   200

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

   201

			}

   202

		} break;

   203

		}

   204

		break;

   205

   206

	case WE_ON_EDIT_TEXT: {

   207

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

   208

			_cmd_text = e->edittext.str;

   209

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

   210

				CMD_RENAME_ENGINE | CMD_MSG(STR_A03A_CAN_T_RENAME_AIRCRAFT_TYPE));

   211

		}

   212

	} break;

   213

   214

	case WE_RESIZE:

   215

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

   216

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

   217

		break;

   218

	}

   219

}

   220

   221

static const Widget _new_aircraft_widgets[] = {

   222

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

   223

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

   224

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

   225

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

   226

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

   227

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

   228

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

   229

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

   230

{   WIDGETS_END},

   231

};

   232

   233

static const WindowDesc _new_aircraft_desc = {

   234

	-1, -1, 240, 174,

   235

	WC_BUILD_VEHICLE,0,

   236

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_RESIZABLE,

   237

	_new_aircraft_widgets,

   238

	NewAircraftWndProc

   239

};

   240

   241

static void ShowBuildAircraftWindow(TileIndex tile)

   242

{

   243

	Window *w;

   244

   245

	DeleteWindowById(WC_BUILD_VEHICLE, tile);

   246

   247

	w = AllocateWindowDesc(&_new_aircraft_desc);

   248

	w->window_number = tile;

   249

	w->vscroll.cap = 4;

   250

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

   251

   252

	w->resize.step_height = 24;

   253

   254

	if (tile != 0) {

   255

		w->caption_color = GetTileOwner(tile);

   256

	} else {

   257

		w->caption_color = _local_player;

   258

	}

   259

}

   260

   261

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

   262

{

   263

	switch (e->event) {

   264

	case WE_PAINT: {

   265

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

   266

   267

		SetDParam(0, v->string_id);

   268

		SetDParam(1, v->unitnumber);

   269

		DrawWindowWidgets(w);

   270

   271

		DrawString(1, 15, STR_A040_SELECT_CARGO_TYPE_TO_CARRY, 0);

   272

   273

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

   274

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

   275

   276

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

   277

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

   278

			if (!CmdFailed(cost)) {

   279

				SetDParam(2, cost);

   280

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

   281

				SetDParam(1, _returned_refit_capacity);

   282

				DrawString(1, 147, STR_A041_NEW_CAPACITY_COST_OF_REFIT, 0);

   283

			}

   284

		}

   285

	}	break;

   286

   287

	case WE_CLICK:

   288

		switch (e->click.widget) {

   289

		case 2: { /* listbox */

   290

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

   291

			if (y >= 0) {

   292

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

   293

				SetWindowDirty(w);

   294

			}

   295

		} break;

   296

		case 4: /* refit button */

   297

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

   298

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

   299

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

   300

					DeleteWindow(w);

   301

			}

   302

			break;

   303

		}

   304

		break;

   305

	}

   306

}

   307

   308

static const Widget _aircraft_refit_widgets[] = {

   309

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

   310

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

   311

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

   312

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

   313

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

   314

{   WIDGETS_END},

   315

};

   316

   317

static const WindowDesc _aircraft_refit_desc = {

   318

	-1,-1, 240, 180,

   319

	WC_VEHICLE_REFIT,WC_VEHICLE_VIEW,

   320

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   321

	_aircraft_refit_widgets,

   322

	AircraftRefitWndProc

   323

};

   324

   325

static void ShowAircraftRefitWindow(const Vehicle *v)

   326

{

   327

	Window *w;

   328

   329

	DeleteWindowById(WC_VEHICLE_REFIT, v->index);

   330

   331

	_alloc_wnd_parent_num = v->index;

   332

	w = AllocateWindowDesc(&_aircraft_refit_desc);

   333

	w->window_number = v->index;

   334

	w->caption_color = v->owner;

   335

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

   336

}

   337

   338

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

   339

{

   340

	switch (e->event) {

   341

	case WE_PAINT: {

   342

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

   343

   344

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

   345

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

   346

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

   347

   348

		SetDParam(0, v->string_id);

   349

		SetDParam(1, v->unitnumber);

   350

		DrawWindowWidgets(w);

   351

   352

		/* Draw running cost */

   353

		{

   354

			int year = v->age / 366;

   355

   356

			SetDParam(1, year);

   357

   358

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

   359

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

   360

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

   361

			DrawString(2, 15, STR_A00D_AGE_RUNNING_COST_YR, 0);

   362

		}

   363

   364

		/* Draw max speed */

   365

		{

   366

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

   367

			DrawString(2, 25, STR_A00E_MAX_SPEED, 0);

   368

		}

   369

   370

		/* Draw profit */

   371

		{

   372

			SetDParam(0, v->profit_this_year);

   373

			SetDParam(1, v->profit_last_year);

   374

			DrawString(2, 35, STR_A00F_PROFIT_THIS_YEAR_LAST_YEAR, 0);

   375

		}

   376

   377

		/* Draw breakdown & reliability */

   378

		{

   379

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

   380

			SetDParam(1, v->breakdowns_since_last_service);

   381

			DrawString(2, 45, STR_A010_RELIABILITY_BREAKDOWNS, 0);

   382

		}

   383

   384

		/* Draw service interval text */

   385

		{

   386

			SetDParam(0, v->service_interval);

   387

			SetDParam(1, v->date_of_last_service);

   388

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

   389

		}

   390

   391

		DrawAircraftImage(v, 3, 57, INVALID_VEHICLE);

   392

   393

		{

   394

			const Vehicle *u;

   395

			int y = 57;

   396

   397

			do {

   398

				if (v->subtype <= 2) {

   399

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

   400

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

   401

					SetDParam(2, v->value);

   402

					DrawString(60, y, STR_A011_BUILT_VALUE, 0);

   403

					y += 10;

   404

   405

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

   406

					SetDParam(1, v->cargo_cap);

   407

					u = v->next;

   408

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

   409

					SetDParam(3, u->cargo_cap);

   410

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

   411

					y += 14;

   412

				}

   413

   414

				if (v->cargo_count != 0) {

   415

   416

					/* Cargo names (fix pluralness) */

   417

					SetDParam(0, v->cargo_type);

   418

					SetDParam(1, v->cargo_count);

   419

					SetDParam(2, v->cargo_source);

   420

					DrawString(60, y, STR_8813_FROM, 0);

   421

   422

					y += 10;

   423

				}

   424

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

   425

		}

   426

	} break;

   427

   428

	case WE_CLICK: {

   429

		int mod;

   430

		const Vehicle *v;

   431

		switch (e->click.widget) {

   432

		case 2: /* rename */

   433

			v = GetVehicle(w->window_number);

   434

			SetDParam(0, v->unitnumber);

   435

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

   436

			break;

   437

		case 5: /* increase int */

   438

			mod = _ctrl_pressed? 5 : 10;

   439

			goto do_change_service_int;

   440

		case 6: /* decrease int */

   441

			mod = _ctrl_pressed?- 5 : -10;

   442

do_change_service_int:

   443

			v = GetVehicle(w->window_number);

   444

   445

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

   446

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

   447

   448

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

   449

			break;

   450

		}

   451

	} break;

   452

   453

	case WE_ON_EDIT_TEXT:

   454

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

   455

			_cmd_text = e->edittext.str;

   456

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

   457

				CMD_NAME_VEHICLE | CMD_MSG(STR_A031_CAN_T_NAME_AIRCRAFT));

   458

		}

   459

		break;

   460

	}

   461

}

   462

   463

   464

static const Widget _aircraft_details_widgets[] = {

   465

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

   466

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

   467

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

   468

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

   469

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

   470

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

   471

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

   472

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

   473

{   WIDGETS_END},

   474

};

   475

   476

static const WindowDesc _aircraft_details_desc = {

   477

	-1,-1, 390, 114,

   478

	WC_VEHICLE_DETAILS,WC_VEHICLE_VIEW,

   479

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   480

	_aircraft_details_widgets,

   481

	AircraftDetailsWndProc

   482

};

   483

   484

   485

static void ShowAircraftDetailsWindow(const Vehicle *v)

   486

{

   487

	Window *w;

   488

	VehicleID veh = v->index;

   489

   490

	DeleteWindowById(WC_VEHICLE_ORDERS, veh);

   491

	DeleteWindowById(WC_VEHICLE_DETAILS, veh);

   492

   493

	_alloc_wnd_parent_num = veh;

   494

	w = AllocateWindowDesc(&_aircraft_details_desc);

   495

	w->window_number = veh;

   496

	w->caption_color = v->owner;

   497

//	w->vscroll.cap = 6;

   498

//	w->traindetails_d.tab = 0;