1

/* $Id$ */

     2

     3

/** @file depot_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 "gui.h"

    16

#include "depot.h"

    17

#include "vehicle_gui.h"

    18

#include "station_map.h"

    19

#include "newgrf_engine.h"

    20

#include "spritecache.h"

    28

    29

/*

    30

 * Since all depot window sizes aren't the same, we need to modify sizes a little.

    31

 * It's done with the following arrays of widget indexes. Each of them tells if a widget side should be moved and in what direction.

    32

 * How long they should be moved and for what window types are controlled in ShowDepotWindow()

    33

 */

    34

    35

/* Names of the widgets. Keep them in the same order as in the widget array */

    36

enum DepotWindowWidgets {

    37

	DEPOT_WIDGET_CLOSEBOX = 0,

    38

	DEPOT_WIDGET_CAPTION,

    39

	DEPOT_WIDGET_STICKY,

    40

	DEPOT_WIDGET_SELL,

    41

	DEPOT_WIDGET_SELL_CHAIN,

    42

	DEPOT_WIDGET_SELL_ALL,

    43

	DEPOT_WIDGET_AUTOREPLACE,

    44

	DEPOT_WIDGET_MATRIX,

    45

	DEPOT_WIDGET_V_SCROLL, ///< Vertical scrollbar

    46

	DEPOT_WIDGET_H_SCROLL, ///< Horizontal scrollbar

    47

	DEPOT_WIDGET_BUILD,

    48

	DEPOT_WIDGET_CLONE,

    49

	DEPOT_WIDGET_LOCATION,

    50

	DEPOT_WIDGET_VEHICLE_LIST,

    51

	DEPOT_WIDGET_STOP_ALL,

    52

	DEPOT_WIDGET_START_ALL,

    53

	DEPOT_WIDGET_RESIZE,

    54

};

    55

    56

/* Widget array for all depot windows.

    57

 * If a widget is needed in some windows only (like train specific), add it for all windows

    58

 * and use HideWindowWidget in ShowDepotWindow() to remove it in the windows where it should not be

    59

 * Keep the widget numbers in sync with the enum or really bad stuff will happen!!! */

    60

    61

/* When adding widgets, place them as you would place them for the ship depot and define how you want it to move in widget_moves[]

    62

 * If you want a widget for one window only, set it to be hidden in ShowDepotWindow() for the windows where you don't want it

    63

 * NOTE: the train only widgets are moved/resized in ShowDepotWindow() so they follow certain other widgets if they are moved to ensure that they stick together.

    64

 *    Changing the size of those here will not have an effect at all. It should be done in ShowDepotWindow()

    65

 */

    66

    67

/*

    68

 * Some of the widgets are placed outside the window (negative coordinates).

    69

 * The reason is that they are placed relatively to the matrix and the matrix is just one pixel (in 0, 14).

    70

 * The matrix and the rest of the window will be resized when the size of the boxes is set and then all the widgets will be inside the window.

    71

 */

    72

static const Widget _depot_widgets[] = {

    73

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

    74

	{    WWT_CAPTION,  RESIZE_RIGHT,    14,    11,    23,     0,    13, 0x0,                 STR_018C_WINDOW_TITLE_DRAG_THIS},  // DEPOT_WIDGET_CAPTION

    75

	{  WWT_STICKYBOX,     RESIZE_LR,    14,    24,    35,     0,    13, 0x0,                 STR_STICKY_BUTTON},                // DEPOT_WIDGET_STICKY

    76

    77

	/* Widgets are set up run-time */

    78

	{     WWT_IMGBTN,    RESIZE_LRB,    14,     1,    23,    14,   -32, 0x0,                 STR_NULL},                         // DEPOT_WIDGET_SELL

    79

	{     WWT_IMGBTN,   RESIZE_LRTB,    14,     1,    23,   -55,   -32, SPR_SELL_CHAIN_TRAIN,STR_DRAG_WHOLE_TRAIN_TO_SELL_TIP}, // DEPOT_WIDGET_SELL_CHAIN, trains only

    80

	{ WWT_PUSHIMGBTN,   RESIZE_LRTB,    14,     1,    23,   -31,    -9, 0x0,                 STR_NULL},                         // DEPOT_WIDGET_SELL_ALL

    81

	{ WWT_PUSHIMGBTN,   RESIZE_LRTB,    14,     1,    23,    -8,    14, 0x0,                 STR_NULL},                         // DEPOT_WIDGET_AUTOREPLACE

    82

    83

	{     WWT_MATRIX,     RESIZE_RB,    14,     0,     0,    14,    14, 0x0,                 STR_NULL},                         // DEPOT_WIDGET_MATRIX

    84

	{  WWT_SCROLLBAR,    RESIZE_LRB,    14,    24,    35,    14,    14, 0x0,                 STR_0190_SCROLL_BAR_SCROLLS_LIST}, // DEPOT_WIDGET_V_SCROLL

    85

    86

	{ WWT_HSCROLLBAR,    RESIZE_RTB,    14,     0,     0,     3,    14, 0x0,                 STR_HSCROLL_BAR_SCROLLS_LIST},     // DEPOT_WIDGET_H_SCROLL, trains only

    87

    88

	/* The buttons in the bottom of the window. left and right is not important as they are later resized to be equal in size

    89

	 * This calculation is based on right in DEPOT_WIDGET_LOCATION and it presumes left of DEPOT_WIDGET_BUILD is 0            */

    90

	{ WWT_PUSHTXTBTN,     RESIZE_TB,    14,     0,     0,    15,    26, 0x0,                 STR_NULL},                         // DEPOT_WIDGET_BUILD

    91

	{    WWT_TEXTBTN,     RESIZE_TB,    14,     0,     0,    15,    26, 0x0,                 STR_NULL},                         // DEPOT_WIDGET_CLONE

    92

	{ WWT_PUSHTXTBTN,    RESIZE_RTB,    14,     0,   -12,    15,    26, STR_00E4_LOCATION,   STR_NULL},                         // DEPOT_WIDGET_LOCATION

    93

	{ WWT_PUSHTXTBTN,   RESIZE_LRTB,    14,   -11,     0,    15,    26, 0x0,                 STR_NULL},                         // DEPOT_WIDGET_VEHICLE_LIST

    94

	{ WWT_PUSHIMGBTN,   RESIZE_LRTB,    14,     1,    11,    15,    26, SPR_FLAG_VEH_STOPPED,STR_NULL},                         // DEPOT_WIDGET_STOP_ALL

    95

	{ WWT_PUSHIMGBTN,   RESIZE_LRTB,    14,    12,    23,    15,    26, SPR_FLAG_VEH_RUNNING,STR_NULL},                         // DEPOT_WIDGET_START_ALL

    96

	{  WWT_RESIZEBOX,   RESIZE_LRTB,    14,    24,    35,    15,    26, 0x0,                 STR_RESIZE_BUTTON},                // DEPOT_WIDGET_RESIZE

    97

	{   WIDGETS_END},

    98

};

    99

   100

static void DepotWndProc(Window *w, WindowEvent *e);

   101

   102

static const WindowDesc _train_depot_desc = {

   103

	WDP_AUTO, WDP_AUTO, 36, 27, 36, 27,

   104

	WC_VEHICLE_DEPOT, WC_NONE,

   105

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON | WDF_RESIZABLE,

   106

	_depot_widgets,

   107

	DepotWndProc

   108

};

   109

   110

static const WindowDesc _road_depot_desc = {

   111

	WDP_AUTO, WDP_AUTO, 36, 27, 36, 27,

   112

	WC_VEHICLE_DEPOT, WC_NONE,

   113

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON | WDF_RESIZABLE,

   114

	_depot_widgets,

   115

	DepotWndProc

   116

};

   117

   118

static const WindowDesc _ship_depot_desc = {

   119

	WDP_AUTO, WDP_AUTO, 36, 27, 36, 27,

   120

	WC_VEHICLE_DEPOT, WC_NONE,

   121

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON | WDF_RESIZABLE,

   122

	_depot_widgets,

   123

	DepotWndProc

   124

};

   125

   126

static const WindowDesc _aircraft_depot_desc = {

   127

	WDP_AUTO, WDP_AUTO, 36, 27, 36, 27,

   128

	WC_VEHICLE_DEPOT, WC_NONE,

   129

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON | WDF_RESIZABLE,

   130

	_depot_widgets,

   131

	DepotWndProc

   132

};

   133

   134

extern int WagonLengthToPixels(int len);

   135

   136

/**

   137

 * This is the Callback method after the cloning attempt of a vehicle

   138

 * @param success indicates completion (or not) of the operation

   139

 * @param tile unused

   140

 * @param p1 unused

   141

 * @param p2 unused

   142

 */

   143

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

   144

{

   145

	if (!success) return;

   146

   147

	Vehicle *v = GetVehicle(_new_vehicle_id);

   148

   149

	ShowVehicleViewWindow(v);

   150

}

   151

   152

static void DepotSellAllConfirmationCallback(Window *w, bool confirmed)

   153

{

   154

	if (confirmed) {

   155

		TileIndex tile = w->window_number;

   156

		byte vehtype = WP(w, depot_d).type;

   157

		DoCommandP(tile, vehtype, 0, NULL, CMD_DEPOT_SELL_ALL_VEHICLES);

   158

	}

   159

}

   160

   161

const Sprite *GetAircraftSprite(EngineID engine);

   162

   163

/** Draw a vehicle in the depot window in the box with the top left corner at x,y

   164

 * @param *w Window to draw in

   165

 * @param *v Vehicle to draw

   166

 * @param x Left side of the box to draw in

   167

 * @param y Top of the box to draw in

   168

 */

   169

static void DrawVehicleInDepot(Window *w, const Vehicle *v, int x, int y)

   170

{

   171

	byte diff_x = 0, diff_y = 0;

   172

   173

	int sprite_y = y + w->resize.step_height - GetVehicleListHeight(v->type);

   174

   175

	switch (v->type) {

   176

		case VEH_TRAIN:

   178

   179

			/* Number of wagons relative to a standard length wagon (rounded up) */

   180

			SetDParam(0, (v->u.rail.cached_total_length + 7) / 8);

   181

			DrawStringRightAligned(w->widget[DEPOT_WIDGET_MATRIX].right - 1, y + 4, STR_TINY_BLACK, TC_FROMSTRING); // Draw the counter

   182

			break;

   183

   185

		case VEH_SHIP:     DrawShipImage(    v, x + 19, sprite_y - 1, WP(w, depot_d).sel); break;

   186

		case VEH_AIRCRAFT: {

   187

			const Sprite *spr = GetSprite(v->GetImage(DIR_W));

   188

			DrawAircraftImage(v, x + 12,

   189

							  y + max(spr->height + spr->y_offs - 14, 0), // tall sprites needs an y offset

   190

							  WP(w, depot_d).sel);

   191

		} break;

   192

		default: NOT_REACHED();

   193

	}

   194

   195

	if (w->resize.step_height == 14) {

   196

		/* VEH_TRAIN and VEH_ROAD, which are low */

   197

		diff_x = 15;

   198

	} else {

   199

		/* VEH_SHIP and VEH_AIRCRAFT, which are tall */

   200

		diff_y = 12;

   201

	}

   202

   203

	DrawSprite((v->vehstatus & VS_STOPPED) ? SPR_FLAG_VEH_STOPPED : SPR_FLAG_VEH_RUNNING, PAL_NONE, x + diff_x, y + diff_y);

   204

   205

	SetDParam(0, v->unitnumber);

   206

	DrawString(x, y + 2, (uint16)(v->max_age-366) >= v->age ? STR_00E2 : STR_00E3, TC_FROMSTRING);

   207

}

   208

   209

static void DrawDepotWindow(Window *w)

   210

{

   211

	Vehicle **vl = WP(w, depot_d).vehicle_list;

   212

	TileIndex tile = w->window_number;

   213

	int x, y, i, maxval;

   214

	uint16 hnum;

   215

	uint16 num = WP(w, depot_d).engine_count;

   216

   217

	/* Set the row and number of boxes in each row based on the number of boxes drawn in the matrix */

   218

	uint16 rows_in_display   = w->widget[DEPOT_WIDGET_MATRIX].data >> 8;

   219

	uint16 boxes_in_each_row = w->widget[DEPOT_WIDGET_MATRIX].data & 0xFF;

   220

   221

	/* setup disabled buttons */

   222

	w->SetWidgetsDisabledState(!IsTileOwner(tile, _local_player),

   223

		DEPOT_WIDGET_STOP_ALL,

   224

		DEPOT_WIDGET_START_ALL,

   225

		DEPOT_WIDGET_SELL,

   226

		DEPOT_WIDGET_SELL_CHAIN,

   227

		DEPOT_WIDGET_SELL_ALL,

   228

		DEPOT_WIDGET_BUILD,

   229

		DEPOT_WIDGET_CLONE,

   230

		DEPOT_WIDGET_AUTOREPLACE,

   231

		WIDGET_LIST_END);

   232

   233

	/* determine amount of items for scroller */

   234

	if (WP(w, depot_d).type == VEH_TRAIN) {

   235

		hnum = 8;

   236

		for (num = 0; num < WP(w, depot_d).engine_count; num++) {

   237

			const Vehicle *v = vl[num];

   238

			hnum = max(hnum, v->u.rail.cached_total_length);

   239

		}

   240

		/* Always have 1 empty row, so people can change the setting of the train */

   241

		SetVScrollCount(w, WP(w, depot_d).engine_count + WP(w, depot_d).wagon_count + 1);

   242

		SetHScrollCount(w, WagonLengthToPixels(hnum));

   243

	} else {

   244

		SetVScrollCount(w, (num + w->hscroll.cap - 1) / w->hscroll.cap);

   245

	}

   246

   247

	/* locate the depot struct */

   248

	if (WP(w, depot_d).type == VEH_AIRCRAFT) {

   249

		SetDParam(0, GetStationIndex(tile)); // Airport name

   250

	} else {

   251

		Depot *depot = GetDepotByTile(tile);

   252

		assert(depot != NULL);

   253

   254

		SetDParam(0, depot->town_index);

   255

	}

   256

   257

	DrawWindowWidgets(w);

   258

   259

	num = w->vscroll.pos * boxes_in_each_row;

   260

	maxval = min(WP(w, depot_d).engine_count, num + (rows_in_display * boxes_in_each_row));

   261

   262

	for (x = 2, y = 15; num < maxval; y += w->resize.step_height, x = 2) { // Draw the rows

   263

		byte i;

   264

   265

		for (i = 0; i < boxes_in_each_row && num < maxval; i++, num++, x += w->resize.step_width) {

   266

			/* Draw all vehicles in the current row */

   267

			const Vehicle *v = vl[num];

   268

			DrawVehicleInDepot(w, v, x, y);

   269

		}

   270

	}

   271

   272

	maxval = min(WP(w, depot_d).engine_count + WP(w, depot_d).wagon_count, (w->vscroll.pos * boxes_in_each_row) + (rows_in_display * boxes_in_each_row));

   273

   274

	/* draw the train wagons, that do not have an engine in front */

   275

	for (; num < maxval; num++, y += 14) {

   276

		const Vehicle *v = WP(w, depot_d).wagon_list[num - WP(w, depot_d).engine_count];

   277

		const Vehicle *u;

   278

   280

		DrawString(x, y + 2, STR_8816, TC_FROMSTRING);

   281

   282

		/*Draw the train counter */

   283

		i = 0;

   284

		u = v;

   285

		do i++; while ((u = u->Next()) != NULL); // Determine length of train

   286

		SetDParam(0, i);                      // Set the counter

   287

		DrawStringRightAligned(w->widget[DEPOT_WIDGET_MATRIX].right - 1, y + 4, STR_TINY_BLACK, TC_FROMSTRING); // Draw the counter

   288

	}

   289

}

   290

   291

struct GetDepotVehiclePtData {

   292

	Vehicle *head;

   293

	Vehicle *wagon;

   294

};

   295

   296

enum DepotGUIAction {

   297

	MODE_ERROR,

   298

	MODE_DRAG_VEHICLE,

   299

	MODE_SHOW_VEHICLE,

   300

	MODE_START_STOP,

   301

};

   302

   303

static DepotGUIAction GetVehicleFromDepotWndPt(const Window *w, int x, int y, Vehicle **veh, GetDepotVehiclePtData *d)

   304

{

   305

	Vehicle **vl = WP(w, depot_d).vehicle_list;

   306

	uint xt, row, xm = 0, ym = 0;

   307

	int pos, skip = 0;

   308

	uint16 boxes_in_each_row = w->widget[DEPOT_WIDGET_MATRIX].data & 0xFF;

   309

   310

	if (WP(w, depot_d).type == VEH_TRAIN) {

   311

		xt = 0;

   312

		x -= 23;

   313

	} else {

   314

		xt = x / w->resize.step_width;

   315

		xm = x % w->resize.step_width;

   316

		if (xt >= w->hscroll.cap) return MODE_ERROR;

   317

   318

		ym = (y - 14) % w->resize.step_height;

   319

	}

   320

   321

	row = (y - 14) / w->resize.step_height;

   322

	if (row >= w->vscroll.cap) return MODE_ERROR;

   323

   324

	pos = ((row + w->vscroll.pos) * boxes_in_each_row) + xt;

   325

   326

	if (WP(w, depot_d).engine_count + WP(w, depot_d).wagon_count <= pos) {

   327

		if (WP(w, depot_d).type == VEH_TRAIN) {

   328

			d->head  = NULL;

   329

			d->wagon = NULL;

   330

			return MODE_DRAG_VEHICLE;

   331

		} else {

   332

			return MODE_ERROR; // empty block, so no vehicle is selected

   333

		}

   334

	}

   335

   336

	if (WP(w, depot_d).engine_count > pos) {

   337

		*veh = vl[pos];

   338

		skip = w->hscroll.pos;

   339

	} else {

   340

		vl = WP(w, depot_d).wagon_list;

   341

		pos -= WP(w, depot_d).engine_count;

   342

		*veh = vl[pos];

   343

		/* free wagons don't have an initial loco. */

   344

		x -= _traininfo_vehicle_width;

   345

	}

   346

   347

	switch (WP(w, depot_d).type) {

   348

		case VEH_TRAIN: {

   349

			Vehicle *v = *veh;

   350

			d->head = d->wagon = v;

   351

   352

			/* either pressed the flag or the number, but only when it's a loco */

   353

			if (x < 0 && IsFrontEngine(v)) return (x >= -10) ? MODE_START_STOP : MODE_SHOW_VEHICLE;

   354

   355

			skip = (skip * 8) / _traininfo_vehicle_width;

   356

			x = (x * 8) / _traininfo_vehicle_width;

   357

   358

			/* Skip vehicles that are scrolled off the list */

   359

			x += skip;

   360

   361

			/* find the vehicle in this row that was clicked */

   362

			while (v != NULL && (x -= v->u.rail.cached_veh_length) >= 0) v = v->Next();

   363

   364

			/* if an articulated part was selected, find its parent */

   365

			while (v != NULL && IsArticulatedPart(v)) v = v->Previous();

   366

   367

			d->wagon = v;

   368

   369

			return MODE_DRAG_VEHICLE;

   370

			}

   371

			break;

   372

   373

		case VEH_ROAD:

   374

			if (xm >= 24) return MODE_DRAG_VEHICLE;

   375

			if (xm <= 16) return MODE_SHOW_VEHICLE;

   376

			break;

   377

   378

		case VEH_SHIP:

   379

			if (xm >= 19) return MODE_DRAG_VEHICLE;

   380

			if (ym <= 10) return MODE_SHOW_VEHICLE;

   381

			break;

   382

   383

		case VEH_AIRCRAFT:

   384

			if (xm >= 12) return MODE_DRAG_VEHICLE;

   385

			if (ym <= 12) return MODE_SHOW_VEHICLE;

   386

			break;

   387

   388

		default: NOT_REACHED();

   389

	}

   390

	return MODE_START_STOP;

   391

}

   392

   393

static void TrainDepotMoveVehicle(Vehicle *wagon, VehicleID sel, Vehicle *head)

   394

{

   395

	Vehicle *v;

   396

   397

	v = GetVehicle(sel);

   398

   399

	if (v == wagon) return;

   400

   401

	if (wagon == NULL) {

   402

		if (head != NULL) wagon = GetLastVehicleInChain(head);

   403

	} else  {

   404

		wagon = wagon->Previous();

   405

		if (wagon == NULL) return;

   406

	}

   407

   408

	if (wagon == v) return;

   409

   410

	DoCommandP(v->tile, v->index + ((wagon == NULL ? INVALID_VEHICLE : wagon->index) << 16), _ctrl_pressed ? 1 : 0, NULL, CMD_MOVE_RAIL_VEHICLE | CMD_MSG(STR_8837_CAN_T_MOVE_VEHICLE));

   411

}

   412

   413

static void DepotClick(Window *w, int x, int y)

   414

{

   415

	GetDepotVehiclePtData gdvp;

   416

	Vehicle *v = NULL;

   417

	DepotGUIAction mode = GetVehicleFromDepotWndPt(w, x, y, &v, &gdvp);

   418

   419

	/* share / copy orders */

   420

	if (_thd.place_mode != VHM_NONE && mode != MODE_ERROR) {

   421

		_place_clicked_vehicle = (WP(w, depot_d).type == VEH_TRAIN ? gdvp.head : v);

   422

		return;

   423

	}

   424

   425

	if (WP(w, depot_d).type == VEH_TRAIN) v = gdvp.wagon;

   426

   427

	switch (mode) {

   428

		case MODE_ERROR: // invalid

   429

			return;

   430

   431

		case MODE_DRAG_VEHICLE: { // start dragging of vehicle

   432

			VehicleID sel = WP(w, depot_d).sel;

   433

   434

			if (WP(w, depot_d).type == VEH_TRAIN && sel != INVALID_VEHICLE) {

   436

				TrainDepotMoveVehicle(v, sel, gdvp.head);

   437

			} else if (v != NULL) {

   438

				int image = v->GetImage(DIR_W);

   439

   440

				WP(w, depot_d).sel = v->index;

   441

				SetWindowDirty(w);

   442

				SetObjectToPlaceWnd(image, GetVehiclePalette(v), VHM_DRAG, w);

   443

			}

   444

			}

   445

			break;

   446

   447

		case MODE_SHOW_VEHICLE: // show info window

   448

			ShowVehicleViewWindow(v);

   449

			break;

   450

   451

		case MODE_START_STOP: { // click start/stop flag

   452

			uint command;

   453

   454

			switch (WP(w, depot_d).type) {

   455

				case VEH_TRAIN:    command = CMD_START_STOP_TRAIN | CMD_MSG(STR_883B_CAN_T_STOP_START_TRAIN);          break;

   456

				case VEH_ROAD:     command = CMD_START_STOP_ROADVEH | CMD_MSG(STR_9015_CAN_T_STOP_START_ROAD_VEHICLE); break;

   457

				case VEH_SHIP:     command = CMD_START_STOP_SHIP | CMD_MSG(STR_9818_CAN_T_STOP_START_SHIP);            break;

   458

				case VEH_AIRCRAFT: command = CMD_START_STOP_AIRCRAFT | CMD_MSG(STR_A016_CAN_T_STOP_START_AIRCRAFT);    break;

   459

				default: NOT_REACHED(); command = 0;

   460

			}

   461

			DoCommandP(v->tile, v->index, 0, NULL, command);

   462

			}

   463

			break;

   464

   465

		default: NOT_REACHED();

   466

	}

   467

}

   468

   469

/**

   470

 * Clones a vehicle

   471

 * @param *v is the original vehicle to clone

   472

 * @param *w is the window of the depot where the clone is build

   473

 */

   474

static void HandleCloneVehClick(const Vehicle *v, const Window *w)

   475

{

   476

	uint error_str;

   477

   478

	if (v == NULL) return;

   479

   480

	if (!v->IsPrimaryVehicle()) {

   481

		v = v->First();

   482

		/* Do nothing when clicking on a train in depot with no loc attached */

   483

		if (v->type == VEH_TRAIN && !IsFrontEngine(v)) return;

   484

	}

   485

   486

	switch (v->type) {

   487

		case VEH_TRAIN:    error_str = CMD_MSG(STR_882B_CAN_T_BUILD_RAILROAD_VEHICLE); break;

   488

		case VEH_ROAD:     error_str = CMD_MSG(STR_9009_CAN_T_BUILD_ROAD_VEHICLE);     break;

   489

		case VEH_SHIP:     error_str = CMD_MSG(STR_980D_CAN_T_BUILD_SHIP);             break;

   490

		case VEH_AIRCRAFT: error_str = CMD_MSG(STR_A008_CAN_T_BUILD_AIRCRAFT);         break;

   491

		default: return;

   492

	}

   493

   494

	DoCommandP(w->window_number, v->index, _ctrl_pressed ? 1 : 0, CcCloneVehicle, CMD_CLONE_VEHICLE | error_str);

   495

   496

	ResetObjectToPlace();

   497

}

   498

   499

static void ClonePlaceObj(const Window *w)

   500

{

   501

	const Vehicle *v = CheckMouseOverVehicle();

   502