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

#include "date.h"

    27

    28

/**

    29

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

    30

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

    31

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

    32

 */

    33

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

    34

{

    35

	const AircraftVehicleInfo *avi = AircraftVehInfo(engine_number);

    36

	const Engine *e = GetEngine(engine_number);

    37

	CargoID cargo;

    38

	YearMonthDay ymd;

    39

	ConvertDateToYMD(e->intro_date, &ymd);

    40

    41

	/* Purchase cost - Max speed */

    42

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

    43

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

    44

	DrawString(x, y, STR_PURCHASE_INFO_COST_SPEED, 0);

    45

	y += 10;

    46

    47

	/* Cargo capacity */

    48

	cargo = FindFirstRefittableCargo(engine_number);

    49

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

    50

		SetDParam(0, avi->passenger_capacity);

    51

		SetDParam(1, avi->mail_capacity);

    52

		DrawString(x, y, STR_PURCHASE_INFO_AIRCRAFT_CAPACITY, 0);

    53

	} else {

    54

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

    55

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

    56

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

    57

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

    58

		SetDParam(2, STR_9842_REFITTABLE);

    59

		DrawString(x, y, STR_PURCHASE_INFO_CAPACITY, 0);

    60

	}

    61

	y += 10;

    62

    63

	/* Running cost */

    64

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

    65

	DrawString(x, y, STR_PURCHASE_INFO_RUNNINGCOST, 0);

    66

	y += 10;

    67

    68

	/* Design date - Life length */

    69

	SetDParam(0, ymd.year);

    70

	SetDParam(1, e->lifelength);

    71

	DrawString(x, y, STR_PURCHASE_INFO_DESIGNED_LIFE, 0);

    72

	y += 10;

    73

    74

	/* Reliability */

    75

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

    76

	DrawString(x, y, STR_PURCHASE_INFO_RELIABILITY, 0);

    77

	y += 10;

    78

    79

	/* Additional text from NewGRF */

    80

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

    81

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

    82

}

    83

    84

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

    85

{

    86

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

    87

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

    88

	if (v->subtype == 0) {

    89

		SpriteID rotor_sprite = GetCustomRotorSprite(v, true);

    90

		if (rotor_sprite == 0) rotor_sprite = SPR_ROTOR_STOPPED;

    91

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

    92

	}

    93

	if (v->index == selection) {

    94

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

    95

	}

    96

}

    97

    98

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

    99

{

   100

	if (success) {

   101

		const Vehicle *v = GetVehicle(_new_vehicle_id);

   102

   103

		if (v->tile == _backup_orders_tile) {

   104

			_backup_orders_tile = 0;

   105

			RestoreVehicleOrders(v, _backup_orders_data);

   106

		}

   107

		ShowAircraftViewWindow(v);

   108

	}

   109

}

   110

   111

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

   112

{

   113

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

   114

}

   115

   116

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

   117

{

   118

	switch (e->event) {

   119

	case WE_PAINT: {

   120

		TileIndex tile = w->window_number;

   121

		byte acc_planes;

   122

   123

		if (tile == 0) {

   124

			SETBIT(w->disabled_state, 5);

   125

			acc_planes = ALL;

   126

		} else {

   127

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

   128

		}

   129

   130

		{

   131

			int count = 0;

   132

			EngineID eid;

   133

   134

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

   135

				const AircraftVehicleInfo *avi;

   136

   137

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

   138

   139

				avi = AircraftVehInfo(eid);

   140

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

   141

   142

				count++;

   143

			}

   144

			SetVScrollCount(w, count);

   145

		}

   146

   147

		DrawWindowWidgets(w);

   148

   149

		{

   150

			int x = 2;

   151

			int y = 15;

   152

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

   153

			int pos = w->vscroll.pos;

   154

			EngineID selected_id = INVALID_ENGINE;

   155

			EngineID eid;

   156

   157

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

   158

				const AircraftVehicleInfo *avi;

   159

   160

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

   161

   162

				avi = AircraftVehInfo(eid);

   163

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

   164

   165

				if (sel == 0) selected_id = eid;

   166

   167

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

   168

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

   169

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

   170

					y += 24;

   171

				}

   172

   173

				sel--;

   174

			}

   175

   176

			WP(w,buildtrain_d).sel_engine = selected_id;

   177

   178

			if (selected_id != INVALID_ENGINE) {

   179

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

   180

			}

   181

		}

   182

	} break;

   183

   184

	case WE_CLICK:

   185

		switch (e->click.widget) {

   186

		case 2: { /* listbox */

   187

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

   188

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

   189

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

   190

				SetWindowDirty(w);

   191

			}

   192

		} break;

   193

   194

		case 5: { /* build */

   195

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

   196

			if (sel_eng != INVALID_ENGINE)

   197

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

   198

		} break;

   199

   200

		case 6:	{ /* rename */

   201

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

   202

			if (sel_eng != INVALID_ENGINE) {

   203

				WP(w,buildtrain_d).rename_engine = sel_eng;

   204

				ShowQueryString(GetCustomEngineName(sel_eng),

   205

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

   206

			}

   207

		} break;

   208

		}

   209

		break;

   210

   211

	case WE_ON_EDIT_TEXT: {

   212

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

   213

			_cmd_text = e->edittext.str;

   214

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

   215

				CMD_RENAME_ENGINE | CMD_MSG(STR_A03A_CAN_T_RENAME_AIRCRAFT_TYPE));

   216

		}

   217

	} break;

   218

   219

	case WE_RESIZE:

   220

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

   221

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

   222

		break;

   223

	}

   224

}

   225

   226

static const Widget _new_aircraft_widgets[] = {

   235

{   WIDGETS_END},

   236

};

   237

   238

static const WindowDesc _new_aircraft_desc = {

   239

	-1, -1, 240, 194,

   240

	WC_BUILD_VEHICLE,0,

   241

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_RESIZABLE,

   242

	_new_aircraft_widgets,

   243

	NewAircraftWndProc

   244

};

   245

   246

static void ShowBuildAircraftWindow(TileIndex tile)

   247

{

   248

	Window *w;

   249

   250

	DeleteWindowById(WC_BUILD_VEHICLE, tile);

   251

   252

	w = AllocateWindowDesc(&_new_aircraft_desc);

   253

	w->window_number = tile;

   254

	w->vscroll.cap = 4;

   255

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

   256

   257

	w->resize.step_height = 24;

   258

   259

	if (tile != 0) {

   260

		w->caption_color = GetTileOwner(tile);

   261

	} else {

   262

		w->caption_color = _local_player;

   263

	}

   264

}

   265

   266

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

   267

{

   268

	switch (e->event) {

   269

	case WE_PAINT: {

   270

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

   271

   272

		SetDParam(0, v->string_id);

   273

		SetDParam(1, v->unitnumber);

   274

		DrawWindowWidgets(w);

   275

   276

		DrawString(1, 15, STR_A040_SELECT_CARGO_TYPE_TO_CARRY, 0);

   277

   278

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

   279

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

   280

   281

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

   282

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

   283

			if (!CmdFailed(cost)) {

   284

				SetDParam(2, cost);

   285

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

   286

				SetDParam(1, _returned_refit_capacity);

   287

				DrawString(1, 147, STR_A041_NEW_CAPACITY_COST_OF_REFIT, 0);

   288

			}

   289

		}

   290

	}	break;

   291

   292

	case WE_CLICK:

   293

		switch (e->click.widget) {

   294

		case 2: { /* listbox */

   295

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

   296

			if (y >= 0) {

   297

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

   298

				SetWindowDirty(w);

   299

			}

   300

		} break;

   301

		case 4: /* refit button */

   302

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

   303

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

   304

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

   305

					DeleteWindow(w);

   306

			}

   307

			break;

   308

		}

   309

		break;

   310

	}

   311

}

   312

   313

static const Widget _aircraft_refit_widgets[] = {

   319

{   WIDGETS_END},

   320

};

   321

   322

static const WindowDesc _aircraft_refit_desc = {

   323

	-1,-1, 240, 180,

   324

	WC_VEHICLE_REFIT,WC_VEHICLE_VIEW,

   325

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   326

	_aircraft_refit_widgets,

   327

	AircraftRefitWndProc

   328

};

   329

   330

static void ShowAircraftRefitWindow(const Vehicle *v)

   331

{

   332

	Window *w;

   333

   334

	DeleteWindowById(WC_VEHICLE_REFIT, v->index);

   335

   336

	_alloc_wnd_parent_num = v->index;

   337

	w = AllocateWindowDesc(&_aircraft_refit_desc);

   338

	w->window_number = v->index;

   339

	w->caption_color = v->owner;

   340

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

   341

}

   342

   343

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

   344

{

   345

	switch (e->event) {

   346

	case WE_PAINT: {

   347

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

   348

   349

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

   350

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

   351

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

   352

   353

		SetDParam(0, v->string_id);

   354

		SetDParam(1, v->unitnumber);

   355

		DrawWindowWidgets(w);

   356

   357

		/* Draw running cost */

   358

		{

   359

			int year = v->age / 366;

   360

   361

			SetDParam(1, year);

   362

   363

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

   364

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

   365

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

   366

			DrawString(2, 15, STR_A00D_AGE_RUNNING_COST_YR, 0);

   367

		}

   368

   369

		/* Draw max speed */

   370

		{

   371

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

   372

			DrawString(2, 25, STR_A00E_MAX_SPEED, 0);

   373

		}

   374

   375

		/* Draw profit */

   376

		{

   377

			SetDParam(0, v->profit_this_year);

   378

			SetDParam(1, v->profit_last_year);

   379

			DrawString(2, 35, STR_A00F_PROFIT_THIS_YEAR_LAST_YEAR, 0);

   380

		}

   381

   382

		/* Draw breakdown & reliability */

   383

		{

   384

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

   385

			SetDParam(1, v->breakdowns_since_last_service);

   386

			DrawString(2, 45, STR_A010_RELIABILITY_BREAKDOWNS, 0);

   387

		}

   388

   389

		/* Draw service interval text */

   390

		{

   391

			SetDParam(0, v->service_interval);

   392

			SetDParam(1, v->date_of_last_service);

   393

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

   394

		}

   395

   396

		DrawAircraftImage(v, 3, 57, INVALID_VEHICLE);

   397

   398

		{

   399

			const Vehicle *u;

   400

			int y = 57;

   401

   402

			do {

   403

				if (v->subtype <= 2) {

   404

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

   405

					SetDParam(1, v->build_year);

   406

					SetDParam(2, v->value);

   407

					DrawString(60, y, STR_A011_BUILT_VALUE, 0);

   408

					y += 10;

   409

   410

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

   411

					SetDParam(1, v->cargo_cap);

   412

					u = v->next;

   413

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

   414

					SetDParam(3, u->cargo_cap);

   415

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

   416

					y += 14;

   417

				}

   418

   419

				if (v->cargo_count != 0) {

   420

   421

					/* Cargo names (fix pluralness) */

   422

					SetDParam(0, v->cargo_type);

   423

					SetDParam(1, v->cargo_count);

   424

					SetDParam(2, v->cargo_source);

   425

					DrawString(60, y, STR_8813_FROM, 0);

   426

   427

					y += 10;

   428

				}

   429

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

   430

		}

   431

	} break;

   432

   433

	case WE_CLICK: {

   434

		int mod;

   435

		const Vehicle *v;

   436

		switch (e->click.widget) {

   437

		case 2: /* rename */

   438

			v = GetVehicle(w->window_number);

   439

			SetDParam(0, v->unitnumber);

   440

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

   441

			break;

   442

		case 5: /* increase int */

   443

			mod = _ctrl_pressed? 5 : 10;

   444

			goto do_change_service_int;

   445

		case 6: /* decrease int */

   446

			mod = _ctrl_pressed?- 5 : -10;

   447

do_change_service_int:

   448

			v = GetVehicle(w->window_number);

   449

   450

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

   451

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

   452

   453

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

   454

			break;

   455

		}

   456

	} break;

   457

   458

	case WE_ON_EDIT_TEXT:

   459

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

   460

			_cmd_text = e->edittext.str;

   461

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

   462

				CMD_NAME_VEHICLE | CMD_MSG(STR_A031_CAN_T_NAME_AIRCRAFT));

   463

		}

   464

		break;

   465

	}

   466

}

   467

   468

   469

static const Widget _aircraft_details_widgets[] = {

   478

{   WIDGETS_END},

   479

};

   480

   481

static const WindowDesc _aircraft_details_desc = {

   484

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   485

	_aircraft_details_widgets,

   486

	AircraftDetailsWndProc

   487

};

   488

   489

   490

static void ShowAircraftDetailsWindow(const Vehicle *v)

   491

{

   492

	Window *w;

   493

	VehicleID veh = v->index;

   494

   495

	DeleteWindowById(WC_VEHICLE_ORDERS, veh);

   496

	DeleteWindowById(WC_VEHICLE_DETAILS, veh);

   497