1

#include "stdafx.h"

     2

#include "ttd.h"

     3

#include "debug.h"

     4

#include "table/strings.h"

     5

#include "map.h"

     6

#include "window.h"

     7

#include "gui.h"

     8

#include "gfx.h"

     9

#include "vehicle.h"

    10

#include "viewport.h"

    11

#include "station.h"

    12

#include "command.h"

    13

#include "player.h"

    14

#include "engine.h"

    15

#include "depot.h"

    16

    17

void Set_DPARAM_Road_Veh_Build_Window(uint16 engine_number)

    18

{

    19

	const RoadVehicleInfo *rvi = RoadVehInfo(engine_number);

    20

	Engine *e;

    21

	YearMonthDay ymd;

    22

    23

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

    24

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

    25

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

    26

	SetDParam(4, rvi->capacity);

    27

	SetDParam(3, _cargoc.names_long_p[rvi->cargo_type]);

    28

    29

	e = &_engines[engine_number];

    30

	SetDParam(6, e->lifelength);

    31

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

    32

	ConvertDayToYMD(&ymd, e->intro_date);

    33

	SetDParam(5, ymd.year + 1920);

    34

}

    35

    36

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

    37

{

    38

	int image = GetRoadVehImage(v, 6);

    39

	uint32 ormod = SPRITE_PALETTE(PLAYER_SPRITE_COLOR(v->owner));

    40

	if (v->vehstatus & VS_CRASHED) ormod = 0x3248000;

    41

	DrawSprite(image | ormod, x+14, y+6);

    42

    43

	if (v->index == selection) {

    44

		DrawFrameRect(x-1, y-1, x+28, y+12, 15, 0x10);

    45

	}

    46

}

    47

    48

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

    49

{

    50

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

    51

	StringID str;

    52

	int mod;

    53

    54

	switch(e->event) {

    55

	case WE_PAINT:

    56

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

    57

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

    58

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

    59

    60

		SetDParam(0, v->string_id);

    61

		SetDParam(1, v->unitnumber);

    62

		DrawWindowWidgets(w);

    63

    64

		/* Draw running cost */

    65

		{

    66

			int year = v->age / 366;

    67

			StringID str;

    68

    69

			SetDParam(1, year);

    70

    71

			str = STR_0199_YEAR;

    72

			if (year != 1) {

    73

				str++;

    74

				if (v->max_age - 366 < v->age)

    75

					str++;

    76

			}

    77

			SetDParam(0, str);

    78

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

    79

			SetDParam(3, RoadVehInfo(v->engine_type)->running_cost * _price.roadveh_running >> 8);

    80

			DrawString(2, 15, STR_900D_AGE_RUNNING_COST_YR, 0);

    81

		}

    82

    83

		/* Draw max speed */

    84

		{

    85

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

    86

			DrawString(2, 25, STR_900E_MAX_SPEED, 0);

    87

		}

    88

    89

		/* Draw profit */

    90

		{

    91

			SetDParam(0, v->profit_this_year);

    92

			SetDParam(1, v->profit_last_year);

    93

			DrawString(2, 35, STR_900F_PROFIT_THIS_YEAR_LAST_YEAR, 0);

    94

		}

    95

    96

		/* Draw breakdown & reliability */

    97

		{

    98

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

    99

			SetDParam(1, v->breakdowns_since_last_service);

   100

			DrawString(2, 45, STR_9010_RELIABILITY_BREAKDOWNS, 0);

   101

		}

   102

   103

		/* Draw service interval text */

   104

		{

   105

			SetDParam(0, v->service_interval);

   106

			SetDParam(1, v->date_of_last_service);

   107

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

   108

		}

   109

   110

		DrawRoadVehImage(v, 3, 57, INVALID_VEHICLE);

   111

   112

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

   113

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

   114

		SetDParam(2, v->value);

   115

		DrawString(34, 57, STR_9011_BUILT_VALUE, 0);

   116

   117

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

   118

		SetDParam(1, v->cargo_cap);

   119

		DrawString(34, 67, STR_9012_CAPACITY, 0);

   120

   121

		str = STR_8812_EMPTY;

   122

		if (v->cargo_count != 0) {

   123

			SetDParam(0, v->cargo_type);

   124

			SetDParam(1, v->cargo_count);

   125

			SetDParam(2, v->cargo_source);

   126

			str = STR_8813_FROM;

   127

		}

   128

		DrawString(34, 78, str, 0);

   129

		break;

   130

   131

	case WE_CLICK:

   132

		switch(e->click.widget) {

   133

		case 2: /* rename */

   134

			SetDParam(0, v->unitnumber);

   135

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

   136

			break;

   137

   138

		case 5: /* increase int */

   139

			mod = _ctrl_pressed? 5 : 10;

   140

			goto change_int;

   141

		case 6: /* decrease int */

   142

			mod = _ctrl_pressed? -5 : -10;

   143

change_int:

   144

			mod += v->service_interval;

   145

   146

			/*	%-based service interval max 5%-90%

   147

					day-based service interval max 30-800 days */

   148

			mod = _patches.servint_ispercent ? clamp(mod, MIN_SERVINT_PERCENT, MAX_SERVINT_PERCENT) : clamp(mod, MIN_SERVINT_DAYS, MAX_SERVINT_DAYS+1);

   149

			if (mod == v->service_interval)

   150

				return;

   151

   152

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

   153

			break;

   154

		}

   155

		break;

   156

   157

	case WE_4:

   158

		if (FindWindowById(WC_VEHICLE_VIEW, w->window_number) == NULL)

   159

			DeleteWindow(w);

   160

		break;

   161

   162

	case WE_ON_EDIT_TEXT: {

   163

		const char *b = e->edittext.str;

   164

		if (*b == 0)

   165

			return;

   166

		memcpy(_decode_parameters, b, 32);

   167

		DoCommandP(0, w->window_number, 0, NULL, CMD_NAME_VEHICLE | CMD_MSG(STR_902D_CAN_T_NAME_ROAD_VEHICLE));

   168

	} break;

   169

   170

	}

   171

}

   172

   173

static const Widget _roadveh_details_widgets[] = {

   174

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

   175

{    WWT_CAPTION,   RESIZE_NONE,    14,    11,   339,     0,    13, STR_900C_DETAILS,STR_018C_WINDOW_TITLE_DRAG_THIS},

   176

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    14,   340,   379,     0,    13, STR_01AA_NAME,		STR_902E_NAME_ROAD_VEHICLE},

   177

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

   178

{     WWT_IMGBTN,   RESIZE_NONE,    14,     0,   379,    56,    88, 0x0,							STR_NULL},

   179

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    14,     0,    10,    89,    94, STR_0188,				STR_884D_INCREASE_SERVICING_INTERVAL},

   180

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    14,     0,    10,    95,   100, STR_0189,				STR_884E_DECREASE_SERVICING_INTERVAL},

   181

{     WWT_IMGBTN,   RESIZE_NONE,    14,    11,   379,    89,   100, 0x0,							STR_NULL},

   182

{   WIDGETS_END},

   183

};

   184

   185

static const WindowDesc _roadveh_details_desc = {

   186

	-1,-1, 380, 101,

   187

	WC_VEHICLE_DETAILS,WC_VEHICLE_VIEW,

   188

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   189

	_roadveh_details_widgets,

   190

	RoadVehDetailsWndProc

   191

};

   192

   193

static void ShowRoadVehDetailsWindow(Vehicle *v)

   194

{

   195

	Window *w;

   196

	VehicleID veh = v->index;

   197

	DeleteWindowById(WC_VEHICLE_ORDERS, veh);

   198

	DeleteWindowById(WC_VEHICLE_DETAILS, veh);

   199

	_alloc_wnd_parent_num = veh;

   200

	w = AllocateWindowDesc(&_roadveh_details_desc);

   201

	w->window_number = veh;

   202

	w->caption_color = v->owner;

   203

}

   204

   205

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

   206

{

   207

	switch(e->event) {

   208

	case WE_PAINT: {

   209

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

   210

		StringID str;

   211

   212

		w->disabled_state = (v->owner != _local_player) ? (1<<8 | 1<<7) : 0;

   213

   214

		/* draw widgets & caption */

   215

		SetDParam(0, v->string_id);

   216

		SetDParam(1, v->unitnumber);

   217

		DrawWindowWidgets(w);

   218

   219

		/* draw the flag */

   222

   223

		if (v->u.road.crashed_ctr != 0) {

   224

			str = STR_8863_CRASHED;

   225

		} else if (v->breakdown_ctr == 1) {

   226

			str = STR_885C_BROKEN_DOWN;

   227

		} else if (v->vehstatus & VS_STOPPED) {

   228

			str = STR_8861_STOPPED;

   229

		} else {

   230

			switch (v->current_order.type) {

   231

			case OT_GOTO_STATION: {

   232

				SetDParam(0, v->current_order.station);

   233

				SetDParam(1, v->cur_speed * 10 >> 5);

   234

				str = STR_HEADING_FOR_STATION + _patches.vehicle_speed;

   235

			} break;

   236

   237

			case OT_GOTO_DEPOT: {

   238

				Depot *depot = GetDepot(v->current_order.station);

   239

				SetDParam(0, depot->town_index);

   240

				SetDParam(1, v->cur_speed * 10 >> 5);

   241

				str = STR_HEADING_FOR_ROAD_DEPOT + _patches.vehicle_speed;

   242

			} break;

   243

   244

			case OT_LOADING:

   245

			case OT_LEAVESTATION:

   246

				str = STR_882F_LOADING_UNLOADING;

   247

				break;

   248

   249

			default:

   250

				if (v->num_orders == 0) {

   251

					str = STR_NO_ORDERS + _patches.vehicle_speed;

   252

					SetDParam(0, v->cur_speed * 10 >> 5);

   253

				} else

   254

					str = STR_EMPTY;

   255

				break;

   256

			}

   257

		}

   258

   261

		DrawWindowViewport(w);

   262

	} break;

   263

   264

	case WE_CLICK: {

   265

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

   266

   267

		switch(e->click.widget) {

   268

		case 5: /* start stop */

   269

			DoCommandP(v->tile, v->index, 0, NULL, CMD_START_STOP_ROADVEH | CMD_MSG(STR_9015_CAN_T_STOP_START_ROAD_VEHICLE));

   270

			break;

   271

		case 6: /* center main view */

   272

			ScrollMainWindowTo(v->x_pos, v->y_pos);

   273

			break;

   274

		case 7: /* goto hangar */

   275

			DoCommandP(v->tile, v->index, 0, NULL, CMD_SEND_ROADVEH_TO_DEPOT | CMD_MSG(STR_9018_CAN_T_SEND_VEHICLE_TO_DEPOT));

   276

			break;

   277

		case 8: /* turn around */

   278

			DoCommandP(v->tile, v->index, 0, NULL, CMD_TURN_ROADVEH | CMD_MSG(STR_9033_CAN_T_MAKE_VEHICLE_TURN));

   279

			break;

   280

		case 9: /* show orders */

   281

			ShowOrdersWindow(v);

   282

			break;

   283

		case 10: /* show details */

   284

			ShowRoadVehDetailsWindow(v);

   285

			break;

   286

		}

   287

	} break;

   288

   296

	case WE_DESTROY:

   297

		DeleteWindowById(WC_VEHICLE_ORDERS, w->window_number);

   298

		DeleteWindowById(WC_VEHICLE_DETAILS, w->window_number);

   299

		break;

   300

	}

   301

}

   302

   303

static const Widget _roadveh_view_widgets[] = {

   318

};

   319

   320

static const WindowDesc _roadveh_view_desc = {

   321

	-1,-1, 250, 116,

   322

	WC_VEHICLE_VIEW,0,

   324

	_roadveh_view_widgets,

   325

	RoadVehViewWndProc,

   326

};

   327

   328

void ShowRoadVehViewWindow(Vehicle *v)

   329

{

   330

	Window *w;

   331

   332

	w = AllocateWindowDescFront(&_roadveh_view_desc, v->index);

   333

	if (w) {

   334

		w->caption_color = v->owner;

   335

		AssignWindowViewport(w, 3, 17, 0xE2, 0x54, w->window_number | (1 << 31), 0);

   336

	}

   337

}

   338

   339

   340

static void DrawNewRoadVehWindow(Window *w)

   341

{

   342

	if (w->window_number == 0)

   343

		w->disabled_state = 1 << 5;

   344

   345

	// setup scroller

   346

	{

   347

		int count = 0;

   348

		int num = NUM_ROAD_ENGINES;

   349

		Engine *e = &_engines[ROAD_ENGINES_INDEX];

   350

		do {

   351

			if (HASBIT(e->player_avail, _local_player))

   352

				count++;

   353

		} while (++e,--num);

   354

		SetVScrollCount(w, count);

   355

	}

   356

   357

	DrawWindowWidgets(w);

   358

   359

	{

   360

		int num = NUM_ROAD_ENGINES;

   361

		Engine *e = &_engines[ROAD_ENGINES_INDEX];

   362

		int x = 1;

   363

		int y = 15;

   364

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

   365

		int pos = w->vscroll.pos;

   366

		int engine_id = ROAD_ENGINES_INDEX;

   367

		int selected_id = -1;

   368

   369

		do {

   370

			if (HASBIT(e->player_avail, _local_player)) {

   371

				if (sel==0) selected_id = engine_id;

   372

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

   373

					DrawString(x+59, y+2, GetCustomEngineName(engine_id), sel==0 ? 0xC : 0x10);

   374

					DrawRoadVehEngine(x+29, y+6, engine_id, SPRITE_PALETTE(PLAYER_SPRITE_COLOR(_local_player)));

   375

					y += 14;

   376

				}

   377

				sel--;

   378

			}

   379

		} while (++engine_id, ++e,--num);

   380

   381

		WP(w,buildtrain_d).sel_engine = selected_id;

   382

		if (selected_id != -1) {

   383

			Set_DPARAM_Road_Veh_Build_Window(selected_id);

   384

   385

			DrawString(2, w->widget[4].top + 1, STR_9008_COST_SPEED_RUNNING_COST, 0);

   386

		}

   387

	}

   388

}

   389

   390

void CcBuildRoadVeh(bool success, uint tile, uint32 p1, uint32 p2)

   391

{

   392

	Vehicle *v;

   393

   394

	if (!success) return;

   395

   396

	v = GetVehicle(_new_roadveh_id);

   397

	if (v->tile == _backup_orders_tile) {

   398

		_backup_orders_tile = 0;

   399

		RestoreVehicleOrders(v, _backup_orders_data);

   400

	}

   401

	ShowRoadVehViewWindow(v);

   402

}

   403

   404

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

   405

{

   406

	switch(e->event) {

   407

	case WE_PAINT:

   408

		DrawNewRoadVehWindow(w);

   409

		break;

   410

   411

	case WE_CLICK:

   412

		switch(e->click.widget) {

   413

		case 2: { /* listbox */

   414

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

   415

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

   416

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

   417

				SetWindowDirty(w);

   418

			}

   419

		} break;

   420

   421

		case 5: { /* build */

   422

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

   423

			if (sel_eng != -1)

   424

				DoCommandP(w->window_number, sel_eng, 0, CcBuildRoadVeh, CMD_BUILD_ROAD_VEH | CMD_MSG(STR_9009_CAN_T_BUILD_ROAD_VEHICLE));

   425

		} break;

   426

   427

		case 6: { /* rename */

   428

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

   429

			if (sel_eng != -1) {

   430

				WP(w,buildtrain_d).rename_engine = sel_eng;

   431

				ShowQueryString(GetCustomEngineName(sel_eng),

   432

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

   433

			}

   434

		}	break;

   435

		}

   436

		break;

   437

   438

	case WE_4:

   439

		if (w->window_number != 0 && !FindWindowById(WC_VEHICLE_DEPOT, w->window_number)) {

   440

			DeleteWindow(w);

   441

		}

   442

		break;

   443

   444

	case WE_ON_EDIT_TEXT: {

   445

		const char *b = e->edittext.str;

   446

		if (*b == 0)

   447

			return;

   448

		memcpy(_decode_parameters, b, 32);

   449

		DoCommandP(0, WP(w,buildtrain_d).rename_engine, 0, NULL, CMD_RENAME_ENGINE | CMD_MSG(STR_9037_CAN_T_RENAME_ROAD_VEHICLE));

   450

	} break;

   451

   452

	case WE_RESIZE: {

   453

		if (e->sizing.diff.y == 0)

   454

			break;

   455

   456

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

   457

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

   458

	} break;

   459

   460

	}

   461

}

   462

   463

static const Widget _new_road_veh_widgets[] = {

   464

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

   465

{    WWT_CAPTION,   RESIZE_NONE,    14,    11,   247,     0,    13, STR_9006_NEW_ROAD_VEHICLES, STR_018C_WINDOW_TITLE_DRAG_THIS},

   466

{     WWT_MATRIX, RESIZE_BOTTOM,    14,     0,   235,    14,   125, 0x801,									STR_9026_ROAD_VEHICLE_SELECTION},

   467

{  WWT_SCROLLBAR, RESIZE_BOTTOM,    14,   236,   247,    14,   125, 0x0,										STR_0190_SCROLL_BAR_SCROLLS_LIST},

   468

{     WWT_IMGBTN,     RESIZE_TB,    14,     0,   247,   126,   177, 0x0,										STR_NULL},

   469

{ WWT_PUSHTXTBTN,     RESIZE_TB,    14,     0,   117,   178,   189, STR_9007_BUILD_VEHICLE,STR_9027_BUILD_THE_HIGHLIGHTED_ROAD},

   470

{ WWT_PUSHTXTBTN,     RESIZE_TB,    14,   118,   235,   178,   189, STR_9034_RENAME,				STR_9035_RENAME_ROAD_VEHICLE_TYPE},

   471

{  WWT_RESIZEBOX,     RESIZE_TB,    14,   236,   247,   178,   189, 0x0,										STR_RESIZE_BUTTON},

   472

{   WIDGETS_END},

   473

};

   474

   475

static const WindowDesc _new_road_veh_desc = {

   476

	-1, -1, 248, 190,

   477

	WC_BUILD_VEHICLE,0,

   478

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_RESIZABLE,

   479

	_new_road_veh_widgets,

   480

	NewRoadVehWndProc

   481

};

   482

   483

static void ShowBuildRoadVehWindow(TileIndex tile)

   484

{

   485

	Window *w;

   486

   487

	DeleteWindowById(WC_BUILD_VEHICLE, tile);

   488

   489

	w = AllocateWindowDesc(&_new_road_veh_desc);

   490

	w->window_number = tile;

   491

	w->vscroll.cap = 8;

   492

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

   493

   494

	w->resize.step_height = 14;

   495

	w->resize.height = w->height - 14 * 4; /* Minimum of 4 vehicles in the display */

   496

   497

	if (tile != 0) {

   498

		w->caption_color = _map_owner[tile];

   499

	} else {

   500

		w->caption_color = _local_player;

   501

	}

   502

}

   503

   504

static void DrawRoadDepotWindow(Window *w)

   505

{

   506

	uint tile;

   507

	Vehicle *v;

   508

	int num,x,y;

   509

	Depot *depot;

   510