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

    16

#include "vehicle.h"

    17

#include "articulated_vehicles.h"

    18

#include "gfx.h"

    19

#include "textbuf_gui.h"

    20

#include "station.h"

    22

#include "engine.h"

    23

#include "player.h"

    24

#include "depot.h"

    25

#include "airport.h"

    26

#include "vehicle_gui.h"

    27

#include "newgrf_engine.h"

    28

#include "date.h"

    29

#include "cargotype.h"

    30

#include "group.h"

    31

#include "road_map.h"

    32

#include "strings_func.h"

    33

    34

    35

enum BuildVehicleWidgets {

    36

	BUILD_VEHICLE_WIDGET_CLOSEBOX = 0,

    37

	BUILD_VEHICLE_WIDGET_CAPTION,

    38

	BUILD_VEHICLE_WIDGET_SORT_ASSENDING_DESCENDING,

    39

	BUILD_VEHICLE_WIDGET_SORT_TEXT,

    40

	BUILD_VEHICLE_WIDGET_SORT_DROPDOWN,

    41

	BUILD_VEHICLE_WIDGET_LIST,

    42

	BUILD_VEHICLE_WIDGET_SCROLLBAR,

    43

	BUILD_VEHICLE_WIDGET_PANEL,

    44

	BUILD_VEHICLE_WIDGET_BUILD,

    45

	BUILD_VEHICLE_WIDGET_RENAME,

    46

	BUILD_VEHICLE_WIDGET_RESIZE,

    47

	BUILD_VEHICLE_WIDGET_END

    48

};

    49

    50

static const Widget _build_vehicle_widgets[] = {

    51

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

    52

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

    53

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

    54

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

    55

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

    56

	{     WWT_MATRIX,     RESIZE_RB,    14,     0,   227,    26,    39, 0x101,                   STR_NULL },

    57

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

    58

	{      WWT_PANEL,    RESIZE_RTB,    14,     0,   239,    40,   161, 0x0,                     STR_NULL },

    59

    60

	{ WWT_PUSHTXTBTN,     RESIZE_TB,    14,     0,   114,   162,   173, 0x0,                     STR_NULL },

    61

	{ WWT_PUSHTXTBTN,    RESIZE_RTB,    14,   115,   227,   162,   173, 0x0,                     STR_NULL },

    62

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

    63

	{   WIDGETS_END},

    64

};

    65

    66

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

    67

static void SetupWindowStrings(Window *w, byte type)

    68

{

    69

	switch (type) {

    70

		case VEH_TRAIN:

    71

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

    72

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

    73

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

    74

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

    75

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

    76

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

    77

			break;

    78

		case VEH_ROAD:

    79

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

    80

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

    81

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

    82

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

    83

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

    84

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

    85

			break;

    86

		case VEH_SHIP:

    87

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

    88

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

    89

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

    90

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

    91

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

    92

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

    93

			break;

    94

		case VEH_AIRCRAFT:

    95

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

    96

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

    97

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

    98

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

    99

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

   100

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

   101

			break;

   102

	}

   103

}

   104

   105

static bool _internal_sort_order; // descending/ascending

   106

   107

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

   108

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

   109

   110

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

   111

{

   112

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

   113

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

   114

	int r = va - vb;

   115

   116

	return _internal_sort_order ? -r : r;

   117

}

   118

   119

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

   120

{

   121

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

   122

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

   123

	const int r = va - vb;

   124

   125

	if (r == 0) {

   126

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

   127

		return EngineNumberSorter(a, b);

   128

	}

   129

	return _internal_sort_order ? -r : r;

   130

}

   131

   132

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

   133

{

   134

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

   135

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

   136

   137

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

   138

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

   139

	int r;

   140

   141

	if (va != last_engine[0]) {

   142

		last_engine[0] = va;

   143

		SetDParam(0, va);

   144

		GetString(last_name[0], STR_ENGINE_NAME, lastof(last_name[0]));

   145

	}

   146

   147

	if (vb != last_engine[1]) {

   148

		last_engine[1] = vb;

   149

		SetDParam(0, vb);

   150

		GetString(last_name[1], STR_ENGINE_NAME, lastof(last_name[1]));

   151

	}

   152

   153

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

   154

   155

	if (r == 0) {

   156

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

   157

		return EngineNumberSorter(a, b);

   158

	}

   159

	return _internal_sort_order ? -r : r;

   160

}

   161

   162

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

   163

{

   164

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

   165

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

   166

	const int r = va - vb;

   167

   168

	if (r == 0) {

   169

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

   170

		return EngineNumberSorter(a, b);

   171

	}

   172

	return _internal_sort_order ? -r : r;

   173

}

   174

   175

/* Train sorting functions */

   176

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

   177

{

   178

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

   179

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

   180

	int r = va - vb;

   181

   182

	return _internal_sort_order ? -r : r;

   183

}

   184

   185

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

   186

{

   187

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

   188

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

   189

	int r = va - vb;

   190

   191

	return _internal_sort_order ? -r : r;

   192

}

   193

   194

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

   195

{

   196

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

   197

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

   198

   199

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

   200

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

   201

	int r = va - vb;

   202

   203

	return _internal_sort_order ? -r : r;

   204

}

   205

   206

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

   207

{

   208

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

   209

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

   210

   211

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

   212

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

   213

	int r = ClampToI32(va - vb);

   214

   215

	return _internal_sort_order ? -r : r;

   216

}

   217

   218

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

   219

{

   220

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

   221

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

   222

   223

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

   224

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

   225

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

   226

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

   227

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

   228

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

   229

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

   230

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

   231

	int r = ClampToI32(vb - va);

   232

   233

	return _internal_sort_order ? -r : r;

   234

}

   235

   236

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

   237

{

   238

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

   239

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

   240

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

   241

   242

	return _internal_sort_order ? -r : r;

   243

}

   244

   245

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

   246

{

   247

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

   248

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

   249

	int r = va - vb;

   250

   251

	if (r == 0) {

   252

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

   253

		return EngineNumberSorter(a, b);

   254

	}

   255

	return _internal_sort_order ? -r : r;

   256

}

   257

   258

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

   259

{

   260

	EngineID va = *(const EngineID*)a;

   261

	EngineID vb = *(const EngineID*)b;

   262

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

   263

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

   264

	int r = val_a - val_b;

   265

   266

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

   267

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

   268

   269

	return _internal_sort_order ? -r : r;

   270

}

   271

   272

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

   273

{

   274

	int va = RoadVehInfo(*(const EngineID*)a)->capacity;

   275

	int vb = RoadVehInfo(*(const EngineID*)b)->capacity;

   276

	int r = va - vb;

   277

   278

	if (r == 0) {

   279

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

   280

		return EngineNumberSorter(a, b);

   281

	}

   282

	return _internal_sort_order ? -r : r;

   283

}

   284

   285

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

   286

{

   287

	int va = ShipVehInfo(*(const EngineID*)a)->capacity;

   288

	int vb = ShipVehInfo(*(const EngineID*)b)->capacity;

   289

	int r = va - vb;

   290

   291

	if (r == 0) {

   292

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

   293

		return EngineNumberSorter(a, b);

   294

	}

   295

	return _internal_sort_order ? -r : r;

   296

}

   297

   298

/* Aircraft sorting functions */

   299

   300

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

   301

{

   302

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

   303

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

   304

	int r = va - vb;

   305

   306

	return _internal_sort_order ? -r : r;

   307

}

   308

   309

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

   310

{

   311

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

   312

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

   313

	const int r = va - vb;

   314

   315

	if (r == 0) {

   316

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

   317

		return EngineNumberSorter(a, b);

   318

	}

   319

	return _internal_sort_order ? -r : r;

   320

}

   321

   322

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

   323

{

   324

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

   325

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

   326

	const int r = va - vb;

   327

   328

	if (r == 0) {

   329

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

   330

		return EngineNumberSorter(a, b);

   331

	}

   332

	return _internal_sort_order ? -r : r;

   333

}

   334

   335

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

   336

{

   337

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

   338

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

   339

	int r = va - vb;

   340

   341

	if (r == 0) {

   342

		/* The planes has the same passenger capacity. Check mail capacity instead */

   343

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

   344

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

   345

		r = va - vb;

   346

   347

		if (r == 0) {

   348

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

   349

			return EngineNumberSorter(a, b);

   350

		}

   351

	}

   352

	return _internal_sort_order ? -r : r;

   353

}

   354

   355

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

   356

	/* Trains */

   357

	&TrainEngineNumberSorter,

   358

	&TrainEngineCostSorter,

   359

	&TrainEngineSpeedSorter,

   360

	&TrainEnginePowerSorter,

   361

	&EngineIntroDateSorter,

   362

	&EngineNameSorter,

   363

	&TrainEngineRunningCostSorter,

   364

	&TrainEnginePowerVsRunningCostSorter,

   365

	&EngineReliabilitySorter,

   366

	&TrainEngineCapacitySorter,

   367

}, {

   368

	/* Road vehicles */

   369

	&EngineNumberSorter,

   370

	&EngineIntroDateSorter,

   371

	&EngineNameSorter,

   372

	&EngineReliabilitySorter,

   373

	&RoadVehEngineCapacitySorter,

   374

}, {

   375

	/* Ships */

   376

	&EngineNumberSorter,

   377

	&EngineIntroDateSorter,

   378

	&EngineNameSorter,

   379

	&EngineReliabilitySorter,

   380

	&ShipEngineCapacitySorter,

   381

}, {

   382

	/* Aircraft */

   383

	&EngineNumberSorter,

   384

	&AircraftEngineCostSorter,

   385

	&AircraftEngineSpeedSorter,

   386

	&EngineIntroDateSorter,

   387

	&EngineNameSorter,

   388

	&AircraftEngineRunningCostSorter,

   389

	&EngineReliabilitySorter,

   390

	&AircraftEngineCargoSorter,

   391

}};

   392

   393

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

   394

	/* Trains */

   395

	STR_ENGINE_SORT_ENGINE_ID,

   396

	STR_ENGINE_SORT_COST,

   397

	STR_SORT_BY_MAX_SPEED,

   398

	STR_ENGINE_SORT_POWER,

   399

	STR_ENGINE_SORT_INTRO_DATE,

   400

	STR_SORT_BY_DROPDOWN_NAME,

   401

	STR_ENGINE_SORT_RUNNING_COST,

   402

	STR_ENGINE_SORT_POWER_VS_RUNNING_COST,

   403

	STR_SORT_BY_RELIABILITY,

   404

	STR_ENGINE_SORT_CARGO_CAPACITY,

   405

	INVALID_STRING_ID

   406

}, {

   407

	/* Road vehicles */

   408

	STR_ENGINE_SORT_ENGINE_ID,

   409

	STR_ENGINE_SORT_INTRO_DATE,

   410

	STR_SORT_BY_DROPDOWN_NAME,

   411

	STR_SORT_BY_RELIABILITY,

   412

	STR_ENGINE_SORT_CARGO_CAPACITY,

   413

	INVALID_STRING_ID

   414

}, {

   415

	/* Ships */

   416

	STR_ENGINE_SORT_ENGINE_ID,

   417

	STR_ENGINE_SORT_INTRO_DATE,

   418

	STR_SORT_BY_DROPDOWN_NAME,

   419

	STR_SORT_BY_RELIABILITY,

   420

	STR_ENGINE_SORT_CARGO_CAPACITY,

   421

	INVALID_STRING_ID

   422

}, {

   423

	/* Aircraft */

   424

	STR_ENGINE_SORT_ENGINE_ID,

   425

	STR_ENGINE_SORT_COST,

   426

	STR_SORT_BY_MAX_SPEED,

   427

	STR_ENGINE_SORT_INTRO_DATE,

   428

	STR_SORT_BY_DROPDOWN_NAME,

   429

	STR_ENGINE_SORT_RUNNING_COST,

   430

	STR_SORT_BY_RELIABILITY,

   431

	STR_ENGINE_SORT_CARGO_CAPACITY,

   432

	INVALID_STRING_ID

   433

}};

   434

   435

/* Draw rail wagon specific details */

   436

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

   437

{

   438

	/* Purchase cost */

   439

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

   440

	DrawString(x, y, STR_PURCHASE_INFO_COST, TC_FROMSTRING);

   441

	y += 10;

   442

   443

	/* Wagon weight - (including cargo) */

   444

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

   445

	SetDParam(0, weight);

   446

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

   447

	DrawString(x, y, STR_PURCHASE_INFO_WEIGHT_CWEIGHT, TC_FROMSTRING);

   448

	y += 10;

   449

   450

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

   451

	if (_patches.wagon_speed_limits) {

   452

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

   453

		if (max_speed > 0) {

   454

			SetDParam(0, max_speed * 10 / 16);

   455

			DrawString(x, y, STR_PURCHASE_INFO_SPEED, TC_FROMSTRING);

   456

			y += 10;

   457

		}

   458

	}

   459

	return y;

   460

}

   461

   462

/* Draw locomotive specific details */

   463

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

   464

{

   465

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

   466

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

   467

   468

	/* Purchase Cost - Engine weight */

   469

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

   470

	SetDParam(1, weight << multihead);

   471

	DrawString(x, y, STR_PURCHASE_INFO_COST_WEIGHT, TC_FROMSTRING);

   472

	y += 10;

   473

   474

	/* Max speed - Engine power */

   475

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

   476

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

   477

	DrawString(x, y, STR_PURCHASE_INFO_SPEED_POWER, TC_FROMSTRING);

   478

	y += 10;

   479

   480

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

   481

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

   482

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

   483

		DrawString(x, y, STR_PURCHASE_INFO_MAX_TE, TC_FROMSTRING);

   484

		y += 10;

   485

	}

   486

   487

	/* Running cost */

   488

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

   489

	DrawString(x, y, STR_PURCHASE_INFO_RUNNINGCOST, TC_FROMSTRING);

   490

	y += 10;

   491

   492

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

   493

	if (rvi->pow_wag_power != 0) {

   494

		SetDParam(0, rvi->pow_wag_power);

   495

		SetDParam(1, rvi->pow_wag_weight);

   496

		DrawString(x, y, STR_PURCHASE_INFO_PWAGPOWER_PWAGWEIGHT, TC_FROMSTRING);

   497