1

/* $Id$ */

     2

     3

/** @file build_vehicle_gui.cpp */

     4

     5

#include "stdafx.h"

     6

#include "openttd.h"

     7

#include "train.h"

     8

#include "roadveh.h"

     9

#include "ship.h"

    10

#include "aircraft.h"

    11

#include "debug.h"

    12

#include "functions.h"

    13

#include "table/sprites.h"

    14

#include "table/strings.h"

    15

#include "window.h"

    16

#include "gui.h"

    17

#include "vehicle.h"

    18

#include "gfx.h"

    19

#include "station.h"

    20

#include "command.h"

    21

#include "engine.h"

    22

#include "player.h"

    23

#include "depot.h"

    24

#include "airport.h"

    25

#include "vehicle_gui.h"

    26

#include "newgrf_engine.h"

    27

#include "date.h"

    28

#include "strings.h"

    29

#include "cargotype.h"

    30

#include "group.h"

    31

    32

    33

enum BuildVehicleWidgets {

    34

	BUILD_VEHICLE_WIDGET_CLOSEBOX = 0,

    35

	BUILD_VEHICLE_WIDGET_CAPTION,

    36

	BUILD_VEHICLE_WIDGET_SORT_ASSENDING_DESCENDING,

    37

	BUILD_VEHICLE_WIDGET_SORT_TEXT,

    38

	BUILD_VEHICLE_WIDGET_SORT_DROPDOWN,

    39

	BUILD_VEHICLE_WIDGET_LIST,

    40

	BUILD_VEHICLE_WIDGET_SCROLLBAR,

    41

	BUILD_VEHICLE_WIDGET_PANEL,

    42

	BUILD_VEHICLE_WIDGET_BUILD,

    43

	BUILD_VEHICLE_WIDGET_RENAME,

    44

	BUILD_VEHICLE_WIDGET_RESIZE,

    45

	BUILD_VEHICLE_WIDGET_END

    46

};

    47

    48

static const Widget _build_vehicle_widgets[] = {

    49

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

    50

	{    WWT_CAPTION,  RESIZE_RIGHT,    14,    11,   239,     0,    13, 0x0,                     STR_018C_WINDOW_TITLE_DRAG_THIS },

    51

	{ WWT_PUSHTXTBTN,   RESIZE_NONE,    14,     0,    80,    14,    25, STR_SORT_BY,             STR_SORT_ORDER_TIP},

    52

	{      WWT_PANEL,  RESIZE_RIGHT,    14,    81,   227,    14,    25, 0x0,                     STR_SORT_CRITERIA_TIP},

    53

	{    WWT_TEXTBTN,     RESIZE_LR,    14,   228,   239,    14,    25, STR_0225,                STR_SORT_CRITERIA_TIP},

    54

	{     WWT_MATRIX,     RESIZE_RB,    14,     0,   227,    26,   121, 0x0,                     STR_NULL },

    55

	{  WWT_SCROLLBAR,    RESIZE_LRB,    14,   228,   239,    26,   121, 0x0,                     STR_0190_SCROLL_BAR_SCROLLS_LIST },

    56

	{      WWT_PANEL,    RESIZE_RTB,    14,     0,   239,   122,   243, 0x0,                     STR_NULL },

    57

    58

	{ WWT_PUSHTXTBTN,     RESIZE_TB,    14,     0,   114,   244,   255, 0x0,                     STR_NULL },

    59

	{ WWT_PUSHTXTBTN,    RESIZE_RTB,    14,   115,   227,   244,   255, 0x0,                     STR_NULL },

    60

	{  WWT_RESIZEBOX,   RESIZE_LRTB,    14,   228,   239,   244,   255, 0x0,                     STR_RESIZE_BUTTON },

    61

	{   WIDGETS_END},

    62

};

    63

    64

/* Setup widget strings to fit the different types of vehicles */

    65

static void SetupWindowStrings(Window *w, byte type)

    66

{

    67

	switch (type) {

    68

		case VEH_TRAIN:

    69

			w->widget[BUILD_VEHICLE_WIDGET_CAPTION].data    = STR_JUST_STRING;

    70

			w->widget[BUILD_VEHICLE_WIDGET_LIST].tooltips   = STR_8843_TRAIN_VEHICLE_SELECTION;

    71

			w->widget[BUILD_VEHICLE_WIDGET_BUILD].data      = STR_881F_BUILD_VEHICLE;

    72

			w->widget[BUILD_VEHICLE_WIDGET_BUILD].tooltips  = STR_8844_BUILD_THE_HIGHLIGHTED_TRAIN;

    73

			w->widget[BUILD_VEHICLE_WIDGET_RENAME].data     = STR_8820_RENAME;

    74

			w->widget[BUILD_VEHICLE_WIDGET_RENAME].tooltips = STR_8845_RENAME_TRAIN_VEHICLE_TYPE;

    75

			break;

    76

		case VEH_ROAD:

    77

			w->widget[BUILD_VEHICLE_WIDGET_CAPTION].data    = STR_9006_NEW_ROAD_VEHICLES;

    78

			w->widget[BUILD_VEHICLE_WIDGET_LIST].tooltips   = STR_9026_ROAD_VEHICLE_SELECTION;

    79

			w->widget[BUILD_VEHICLE_WIDGET_BUILD].data      = STR_9007_BUILD_VEHICLE;

    80

			w->widget[BUILD_VEHICLE_WIDGET_BUILD].tooltips  = STR_9027_BUILD_THE_HIGHLIGHTED_ROAD;

    81

			w->widget[BUILD_VEHICLE_WIDGET_RENAME].data     = STR_9034_RENAME;

    82

			w->widget[BUILD_VEHICLE_WIDGET_RENAME].tooltips = STR_9035_RENAME_ROAD_VEHICLE_TYPE;

    83

			break;

    84

		case VEH_SHIP:

    85

			w->widget[BUILD_VEHICLE_WIDGET_CAPTION].data    = STR_9808_NEW_SHIPS;

    86

			w->widget[BUILD_VEHICLE_WIDGET_LIST].tooltips   = STR_9825_SHIP_SELECTION_LIST_CLICK;

    87

			w->widget[BUILD_VEHICLE_WIDGET_BUILD].data      = STR_9809_BUILD_SHIP;

    88

			w->widget[BUILD_VEHICLE_WIDGET_BUILD].tooltips  = STR_9826_BUILD_THE_HIGHLIGHTED_SHIP;

    89

			w->widget[BUILD_VEHICLE_WIDGET_RENAME].data     = STR_9836_RENAME;

    90

			w->widget[BUILD_VEHICLE_WIDGET_RENAME].tooltips = STR_9837_RENAME_SHIP_TYPE;

    91

			break;

    92

		case VEH_AIRCRAFT:

    93

			w->widget[BUILD_VEHICLE_WIDGET_CAPTION].data    = STR_A005_NEW_AIRCRAFT;

    94

			w->widget[BUILD_VEHICLE_WIDGET_LIST].tooltips   = STR_A025_AIRCRAFT_SELECTION_LIST;

    95

			w->widget[BUILD_VEHICLE_WIDGET_BUILD].data      = STR_A006_BUILD_AIRCRAFT;

    96

			w->widget[BUILD_VEHICLE_WIDGET_BUILD].tooltips  = STR_A026_BUILD_THE_HIGHLIGHTED_AIRCRAFT;

    97

			w->widget[BUILD_VEHICLE_WIDGET_RENAME].data     = STR_A037_RENAME;

    98

			w->widget[BUILD_VEHICLE_WIDGET_RENAME].tooltips = STR_A038_RENAME_AIRCRAFT_TYPE;

    99

			break;

   100

	}

   101

}

   102

   103

static bool _internal_sort_order; // descending/ascending

   104

   105

static byte _last_sort_criteria[]    = {0, 0, 0, 0};

   106

static bool _last_sort_order[]       = {false, false, false, false};

   107

   108

static int CDECL EngineNumberSorter(const void *a, const void *b)

   109

{

   110

	const EngineID va = *(const EngineID*)a;

   111

	const EngineID vb = *(const EngineID*)b;

   112

	int r = va - vb;

   113

   114

	return _internal_sort_order ? -r : r;

   115

}

   116

   117

static int CDECL EngineIntroDateSorter(const void *a, const void *b)

   118

{

   119

	const int va = GetEngine(*(const EngineID*)a)->intro_date;

   120

	const int vb = GetEngine(*(const EngineID*)b)->intro_date;

   121

	const int r = va - vb;

   122

   123

	if (r == 0) {

   124

		/* Use EngineID to sort instead since we want consistent sorting */

   125

		return EngineNumberSorter(a, b);

   126

	}

   127

	return _internal_sort_order ? -r : r;

   128

}

   129

   130

static int CDECL EngineNameSorter(const void *a, const void *b)

   131

{

   132

	static EngineID last_engine[2] = { INVALID_ENGINE, INVALID_ENGINE };

   133

	static char     last_name[2][64] = { "\0", "\0" };

   134

   135

	const EngineID va = *(const EngineID*)a;

   136

	const EngineID vb = *(const EngineID*)b;

   137

	int r;

   138

   139

	if (va != last_engine[0]) {

   140

		last_engine[0] = va;

   141

		GetString(last_name[0], GetCustomEngineName(va), lastof(last_name[0]));

   142

	}

   143

   144

	if (vb != last_engine[1]) {

   145

		last_engine[1] = vb;

   146

		GetString(last_name[1], GetCustomEngineName(vb), lastof(last_name[1]));

   147

	}

   148

   149

	r = strcmp(last_name[0], last_name[1]); // sort by name

   150

   151

	if (r == 0) {

   152

		/* Use EngineID to sort instead since we want consistent sorting */

   153

		return EngineNumberSorter(a, b);

   154

	}

   155

	return _internal_sort_order ? -r : r;

   156

}

   157

   158

static int CDECL EngineReliabilitySorter(const void *a, const void *b)

   159

{

   160

	const int va = GetEngine(*(const EngineID*)a)->reliability;

   161

	const int vb = GetEngine(*(const EngineID*)b)->reliability;

   162

	const int r = va - vb;

   163

   164

	if (r == 0) {

   165

		/* Use EngineID to sort instead since we want consistent sorting */

   166

		return EngineNumberSorter(a, b);

   167

	}

   168

	return _internal_sort_order ? -r : r;

   169

}

   170

   171

/* Train sorting functions */

   172

static int CDECL TrainEngineCostSorter(const void *a, const void *b)

   173

{

   174

	int va = RailVehInfo(*(const EngineID*)a)->base_cost;

   175

	int vb = RailVehInfo(*(const EngineID*)b)->base_cost;

   176

	int r = va - vb;

   177

   178

	return _internal_sort_order ? -r : r;

   179

}

   180

   181

static int CDECL TrainEngineSpeedSorter(const void *a, const void *b)

   182

{

   183

	int va = RailVehInfo(*(const EngineID*)a)->max_speed;

   184

	int vb = RailVehInfo(*(const EngineID*)b)->max_speed;

   185

	int r = va - vb;

   186

   187

	return _internal_sort_order ? -r : r;

   188

}

   189

   190

static int CDECL TrainEnginePowerSorter(const void *a, const void *b)

   191

{

   192

	const RailVehicleInfo *rvi_a = RailVehInfo(*(const EngineID*)a);

   193

	const RailVehicleInfo *rvi_b = RailVehInfo(*(const EngineID*)b);

   194

   195

	int va = rvi_a->power << (rvi_a->railveh_type == RAILVEH_MULTIHEAD ? 1 : 0);

   196

	int vb = rvi_b->power << (rvi_b->railveh_type == RAILVEH_MULTIHEAD ? 1 : 0);

   197

	int r = va - vb;

   198

   199

	return _internal_sort_order ? -r : r;

   200

}

   201

   202

static int CDECL TrainEngineRunningCostSorter(const void *a, const void *b)

   203

{

   204

	const RailVehicleInfo *rvi_a = RailVehInfo(*(const EngineID*)a);

   205

	const RailVehicleInfo *rvi_b = RailVehInfo(*(const EngineID*)b);

   206

   207

	int va = rvi_a->running_cost_base * _price.running_rail[rvi_a->running_cost_class] * (rvi_a->railveh_type == RAILVEH_MULTIHEAD ? 2 : 1);

   208

	int vb = rvi_b->running_cost_base * _price.running_rail[rvi_b->running_cost_class] * (rvi_b->railveh_type == RAILVEH_MULTIHEAD ? 2 : 1);

   209

	int r = va - vb;

   210

   211

	return _internal_sort_order ? -r : r;

   212

}

   213

   214

static int CDECL TrainEnginePowerVsRunningCostSorter(const void *a, const void *b)

   215

{

   216

	const RailVehicleInfo *rvi_a = RailVehInfo(*(const EngineID*)a);

   217

	const RailVehicleInfo *rvi_b = RailVehInfo(*(const EngineID*)b);

   218

   219

	/* Here we are using a few tricks to get the right sort.

   220

		* We want power/running cost, but since we usually got higher running cost than power and we store the result in an int,

   221

		* we will actually calculate cunning cost/power (to make it more than 1).

   222

		* Because of this, the return value have to be reversed as well and we return b - a instead of a - b.

   223

		* Another thing is that both power and running costs should be doubled for multiheaded engines.

   224

		* Since it would be multipling with 2 in both numerator and denumerator, it will even themselves out and we skip checking for multiheaded. */

   225

	int va = (rvi_a->running_cost_base * _price.running_rail[rvi_a->running_cost_class]) / max((uint16)1, rvi_a->power);

   226

	int vb = (rvi_b->running_cost_base * _price.running_rail[rvi_b->running_cost_class]) / max((uint16)1, rvi_b->power);

   227

	int r = vb - va;

   228

   229

	return _internal_sort_order ? -r : r;

   230

}

   231

   232

static int CDECL TrainEngineNumberSorter(const void *a, const void *b)

   233

{

   234

	const EngineID va = *(const EngineID*)a;

   235

	const EngineID vb = *(const EngineID*)b;

   236

	int r = ListPositionOfEngine(va) - ListPositionOfEngine(vb);

   237

   238

	return _internal_sort_order ? -r : r;

   239

}

   240

   241

static int CDECL TrainEnginesThenWagonsSorter(const void *a, const void *b)

   242

{

   243

	EngineID va = *(const EngineID*)a;

   244

	EngineID vb = *(const EngineID*)b;

   245

	int val_a = (RailVehInfo(va)->railveh_type == RAILVEH_WAGON ? 1 : 0);

   246

	int val_b = (RailVehInfo(vb)->railveh_type == RAILVEH_WAGON ? 1 : 0);

   247

	int r = val_a - val_b;

   248

   249

	/* Use EngineID to sort instead since we want consistent sorting */

   250

	if (r == 0) return EngineNumberSorter(a, b);

   251

   252

	return _internal_sort_order ? -r : r;

   253

}

   254

   255

/* Aircraft sorting functions */

   256

   257

static int CDECL AircraftEngineCostSorter(const void *a, const void *b)

   258

{

   259

	const int va = AircraftVehInfo(*(const EngineID*)a)->base_cost;

   260

	const int vb = AircraftVehInfo(*(const EngineID*)b)->base_cost;

   261

	int r = va - vb;

   262

   263

	return _internal_sort_order ? -r : r;

   264

}

   265

   266

static int CDECL AircraftEngineSpeedSorter(const void *a, const void *b)

   267

{

   268

	const int va = AircraftVehInfo(*(const EngineID*)a)->max_speed;

   269

	const int vb = AircraftVehInfo(*(const EngineID*)b)->max_speed;

   270

	const int r = va - vb;

   271

   272

	if (r == 0) {

   273

		/* Use EngineID to sort instead since we want consistent sorting */

   274

		return EngineNumberSorter(a, b);

   275

	}

   276

	return _internal_sort_order ? -r : r;

   277

}

   278

   279

static int CDECL AircraftEngineRunningCostSorter(const void *a, const void *b)

   280

{

   281

	const int va = AircraftVehInfo(*(const EngineID*)a)->running_cost;

   282

	const int vb = AircraftVehInfo(*(const EngineID*)b)->running_cost;

   283

	const int r = va - vb;

   284

   285

	if (r == 0) {

   286

		/* Use EngineID to sort instead since we want consistent sorting */

   287

		return EngineNumberSorter(a, b);

   288

	}

   289

	return _internal_sort_order ? -r : r;

   290

}

   291

   292

static int CDECL AircraftEngineCargoSorter(const void *a, const void *b)

   293

{

   294

	const int va = AircraftVehInfo(*(const EngineID*)a)->passenger_capacity;

   295

	const int vb = AircraftVehInfo(*(const EngineID*)b)->passenger_capacity;

   296

	const int r = va - vb;

   297

   298

	if (r == 0) {

   299

		/* Use EngineID to sort instead since we want consistent sorting */

   300

		return EngineNumberSorter(a, b);

   301

	}

   302

	return _internal_sort_order ? -r : r;

   303

}

   304

   305

static EngList_SortTypeFunction * const _sorter[][9] = {{

   306

	/* Trains */

   307

	&TrainEngineNumberSorter,

   308

	&TrainEngineCostSorter,

   309

	&TrainEngineSpeedSorter,

   310

	&TrainEnginePowerSorter,

   311

	&EngineIntroDateSorter,

   312

	&EngineNameSorter,

   313

	&TrainEngineRunningCostSorter,

   314

	&TrainEnginePowerVsRunningCostSorter,

   315

	&EngineReliabilitySorter,

   316

}, {

   317

	/* Road vehicles */

   318

	&EngineNumberSorter,

   319

	&EngineIntroDateSorter,

   320

	&EngineNameSorter,

   321

	&EngineReliabilitySorter,

   322

}, {

   323

	/* Ships */

   324

	&EngineNumberSorter,

   325

	&EngineIntroDateSorter,

   326

	&EngineNameSorter,

   327

	&EngineReliabilitySorter,

   328

}, {

   329

	/* Aircraft */

   330

	&EngineNumberSorter,

   331

	&AircraftEngineCostSorter,

   332

	&AircraftEngineSpeedSorter,

   333

	&EngineIntroDateSorter,

   334

	&EngineNameSorter,

   335

	&AircraftEngineRunningCostSorter,

   336

	&EngineReliabilitySorter,

   337

	&AircraftEngineCargoSorter,

   338

}};

   339

   340

static const StringID _sort_listing[][10] = {{

   341

	/* Trains */

   342

	STR_ENGINE_SORT_ENGINE_ID,

   343

	STR_ENGINE_SORT_COST,

   344

	STR_SORT_BY_MAX_SPEED,

   345

	STR_ENGINE_SORT_POWER,

   346

	STR_ENGINE_SORT_INTRO_DATE,

   347

	STR_SORT_BY_DROPDOWN_NAME,

   348

	STR_ENGINE_SORT_RUNNING_COST,

   349

	STR_ENGINE_SORT_POWER_VS_RUNNING_COST,

   350

	STR_SORT_BY_RELIABILITY,

   351

	INVALID_STRING_ID

   352

}, {

   353

	/* Road vehicles */

   354

	STR_ENGINE_SORT_ENGINE_ID,

   355

	STR_ENGINE_SORT_INTRO_DATE,

   356

	STR_SORT_BY_DROPDOWN_NAME,

   357

	STR_SORT_BY_RELIABILITY,

   358

	INVALID_STRING_ID

   359

}, {

   360

	/* Ships */

   361

	STR_ENGINE_SORT_ENGINE_ID,

   362

	STR_ENGINE_SORT_INTRO_DATE,

   363

	STR_SORT_BY_DROPDOWN_NAME,

   364

	STR_SORT_BY_RELIABILITY,

   365

	INVALID_STRING_ID

   366

}, {

   367

	/* Aircraft */

   368

	STR_ENGINE_SORT_ENGINE_ID,

   369

	STR_ENGINE_SORT_COST,

   370

	STR_SORT_BY_MAX_SPEED,

   371

	STR_ENGINE_SORT_INTRO_DATE,

   372

	STR_SORT_BY_DROPDOWN_NAME,

   373

	STR_ENGINE_SORT_RUNNING_COST,

   374

	STR_SORT_BY_RELIABILITY,

   375

	STR_ENGINE_SORT_CARGO_CAPACITY,

   376

	INVALID_STRING_ID

   377

}};

   378

   379

/* Draw rail wagon specific details */

   380

static int DrawRailWagonPurchaseInfo(int x, int y, EngineID engine_number, const RailVehicleInfo *rvi)

   381

{

   382

	/* Purchase cost */

   383

	SetDParam(0, (GetEngineProperty(engine_number, 0x17, rvi->base_cost) * _price.build_railwagon) >> 8);

   384

	DrawString(x, y, STR_PURCHASE_INFO_COST, 0);

   385

	y += 10;

   386

   387

	/* Wagon weight - (including cargo) */

   388

	uint weight = GetEngineProperty(engine_number, 0x16, rvi->weight);

   389

	SetDParam(0, weight);

   390

	SetDParam(1, (GetCargo(rvi->cargo_type)->weight * GetEngineProperty(engine_number, 0x14, rvi->capacity) >> 4) + weight);

   391

	DrawString(x, y, STR_PURCHASE_INFO_WEIGHT_CWEIGHT, 0);

   392

	y += 10;

   393

   394

	/* Wagon speed limit, displayed if above zero */

   395

	if (_patches.wagon_speed_limits) {

   396

		uint max_speed = GetEngineProperty(engine_number, 0x09, rvi->max_speed);

   397

		if (max_speed > 0) {

   398

			SetDParam(0, max_speed * 10 / 16);

   399

			DrawString(x, y, STR_PURCHASE_INFO_SPEED, 0);

   400

			y += 10;

   401

		}

   402

	}

   403

	return y;

   404

}

   405

   406

/* Draw locomotive specific details */

   407

static int DrawRailEnginePurchaseInfo(int x, int y, EngineID engine_number, const RailVehicleInfo *rvi)

   408

{

   409

	int multihead = (rvi->railveh_type == RAILVEH_MULTIHEAD ? 1 : 0);

   410

	uint weight = GetEngineProperty(engine_number, 0x16, rvi->weight);

   411

   412

	/* Purchase Cost - Engine weight */

   413

	SetDParam(0, GetEngineProperty(engine_number, 0x17, rvi->base_cost) * (_price.build_railvehicle >> 3) >> 5);

   414

	SetDParam(1, weight << multihead);

   415

	DrawString(x, y, STR_PURCHASE_INFO_COST_WEIGHT, 0);

   416

	y += 10;

   417

   418

	/* Max speed - Engine power */

   419

	SetDParam(0, GetEngineProperty(engine_number, 0x09, rvi->max_speed) * 10 / 16);

   420

	SetDParam(1, GetEngineProperty(engine_number, 0x0B, rvi->power) << multihead);

   421

	DrawString(x, y, STR_PURCHASE_INFO_SPEED_POWER, 0);

   422

	y += 10;

   423

   424

	/* Max tractive effort - not applicable if old acceleration or maglev */

   425

	if (_patches.realistic_acceleration && rvi->railtype != RAILTYPE_MAGLEV) {

   426

		SetDParam(0, ((weight << multihead) * 10 * GetEngineProperty(engine_number, 0x1F, rvi->tractive_effort)) / 256);

   427

		DrawString(x, y, STR_PURCHASE_INFO_MAX_TE, 0);

   428

		y += 10;

   429

	}

   430

   431

	/* Running cost */

   432

	SetDParam(0, (GetEngineProperty(engine_number, 0x0D, rvi->running_cost_base) * _price.running_rail[rvi->running_cost_class] >> 8) << multihead);

   433

	DrawString(x, y, STR_PURCHASE_INFO_RUNNINGCOST, 0);

   434

	y += 10;

   435

   436

	/* Powered wagons power - Powered wagons extra weight */

   437

	if (rvi->pow_wag_power != 0) {

   438

		SetDParam(0, rvi->pow_wag_power);

   439

		SetDParam(1, rvi->pow_wag_weight);

   440

		DrawString(x, y, STR_PURCHASE_INFO_PWAGPOWER_PWAGWEIGHT, 0);

   441

		y += 10;

   442

	};

   443

   444

	return y;

   445

}

   446

   447

/* Draw road vehicle specific details */

   448

static int DrawRoadVehPurchaseInfo(int x, int y, EngineID engine_number, const RoadVehicleInfo *rvi)

   449

{

   450

	bool refittable = (_engine_info[engine_number].refit_mask != 0);

   451

   452

	/* Purchase cost - Max speed */

   453

	SetDParam(0, GetEngineProperty(engine_number, 0x11, rvi->base_cost) * (_price.roadveh_base >> 3) >> 5);

   454

	SetDParam(1, rvi->max_speed * 10 / 32);

   455

	DrawString(x, y, STR_PURCHASE_INFO_COST_SPEED, 0);

   456

	y += 10;

   457

   458

	/* Running cost */

   459

	SetDParam(0, rvi->running_cost * _price.roadveh_running >> 8);

   460

	DrawString(x, y, STR_PURCHASE_INFO_RUNNINGCOST, 0);

   461

	y += 10;

   462

   463

	/* Cargo type + capacity */

   464

	SetDParam(0, rvi->cargo_type);

   465

	SetDParam(1, GetEngineProperty(engine_number, 0x0F, rvi->capacity));

   466

	SetDParam(2, refittable ? STR_9842_REFITTABLE : STR_EMPTY);

   467

	DrawString(x, y, STR_PURCHASE_INFO_CAPACITY, 0);

   468

	y += 10;

   469

   470

	return y;

   471

}

   472

   473

/* Draw ship specific details */

   474

static int DrawShipPurchaseInfo(int x, int y, EngineID engine_number, const ShipVehicleInfo *svi)

   475

{

   476

	/* Purchase cost - Max speed */

   477

	SetDParam(0, GetEngineProperty(engine_number, 0x0A, svi->base_cost) * (_price.ship_base >> 3) >> 5);

   478

	SetDParam(1, GetEngineProperty(engine_number, 0x0B, svi->max_speed) * 10 / 32);

   479

	DrawString(x, y, STR_PURCHASE_INFO_COST_SPEED, 0);

   480

	y += 10;

   481

   482

	/* Cargo type + capacity */

   483

	SetDParam(0, svi->cargo_type);

   484

	SetDParam(1, GetEngineProperty(engine_number, 0x0D, svi->capacity));

   485

	SetDParam(2, svi->refittable ? STR_9842_REFITTABLE : STR_EMPTY);

   486

	DrawString(x, y, STR_PURCHASE_INFO_CAPACITY, 0);

   487

	y += 10;

   488

   489

	/* Running cost */

   490

	SetDParam(0, GetEngineProperty(engine_number, 0x0F, svi->running_cost) * _price.ship_running >> 8);

   491

	DrawString(x, y, STR_PURCHASE_INFO_RUNNINGCOST, 0);

   492

	y += 10;

   493

   494

	return y;

   495

}

   496

   497

/* Draw aircraft specific details */