1

#include "stdafx.h"

     2

#include "ttd.h"

     3

#include "table/strings.h"

     4

#include "map.h"

     5

#include "window.h"

     6

#include "gui.h"

     7

#include "gfx.h"

     8

#include "vehicle.h"

     9

#include "viewport.h"

    10

#include "station.h"

    11

#include "command.h"

    12

#include "player.h"

    13

#include "engine.h"

    14

    15

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

    16

{

    17

	int image = GetRoadVehImage(v, 6);

    18

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

    19

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

    20

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

    21

    22

	if (v->index == selection) {

    23

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

    24

	}

    25

}

    26

    27

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

    28

{

    29

	Vehicle *v = &_vehicles[w->window_number];

    30

	StringID str;

    31

	int mod;

    32

    33

	switch(e->event) {

    34

	case WE_PAINT:

    35

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

    36

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

    37

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

    38

    39

		SetDParam(0, v->string_id);

    40

		SetDParam(1, v->unitnumber);

    41

		DrawWindowWidgets(w);

    42

    43

		/* Draw running cost */

    44

		{

    45

			int year = v->age / 366;

    46

			StringID str;

    47

    48

			SetDParam(1, year);

    49

    50

			str = STR_0199_YEAR;

    51

			if (year != 1) {

    52

				str++;

    53

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

    54

					str++;

    55

			}

    56

			SetDParam(0, str);

    57

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

    58

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

    59

			DrawString(2, 15, STR_900D_AGE_RUNNING_COST_YR, 0);

    60

		}

    61

    62

		/* Draw max speed */

    63

		{

    64

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

    65

			DrawString(2, 25, STR_900E_MAX_SPEED, 0);

    66

		}

    67

    68

		/* Draw profit */

    69

		{

    70

			SetDParam(0, v->profit_this_year);

    71

			SetDParam(1, v->profit_last_year);

    72

			DrawString(2, 35, STR_900F_PROFIT_THIS_YEAR_LAST_YEAR, 0);

    73

		}

    74

    75

		/* Draw breakdown & reliability */

    76

		{

    77

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

    78

			SetDParam(1, v->breakdowns_since_last_service);

    79

			DrawString(2, 45, STR_9010_RELIABILITY_BREAKDOWNS, 0);

    80

		}

    81

    82

		/* Draw service interval text */

    83

		{

    84

			SetDParam(0, v->service_interval);

    85

			SetDParam(1, v->date_of_last_service);

    86

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

    87

		}

    88

    89

		DrawRoadVehImage(v, 3, 57, INVALID_VEHICLE);

    90

    91

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

    92

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

    93

		SetDParam(2, v->value);

    94

		DrawString(34, 57, STR_9011_BUILT_VALUE, 0);

    95

    96

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

    97

		SetDParam(1, v->cargo_cap);

    98

		DrawString(34, 67, STR_9012_CAPACITY, 0);

    99

   100

		str = STR_8812_EMPTY;

   101

		if (v->cargo_count != 0) {

   102

			SetDParam(0, v->cargo_type);

   103

			SetDParam(1, v->cargo_count);

   104

			SetDParam(2, v->cargo_source);

   105

			str = STR_8813_FROM;

   106

		}

   107

		DrawString(34, 78, str, 0);

   108

		break;

   109

   110

	case WE_CLICK:

   111

		switch(e->click.widget) {

   112

		case 2: /* rename */

   113

			SetDParam(0, v->unitnumber);

   114

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

   115

			break;

   116

   117

		case 5: /* increase int */

   118

			mod = _ctrl_pressed? 5 : 10;

   119

			goto change_int;

   120

		case 6: /* decrease int */

   121

			mod = _ctrl_pressed? -5 : -10;

   122

change_int:

   123

			mod += v->service_interval;

   124

   125

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

   126

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

   127

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

   128

			if (mod == v->service_interval)

   129

				return;

   130

   131

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

   132

			break;

   133

		}

   134

		break;

   135

   136

	case WE_4:

   137

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

   138

			DeleteWindow(w);

   139

		break;

   140

   141

	case WE_ON_EDIT_TEXT: {

   142

		byte *b = e->edittext.str;

   143

		if (*b == 0)

   144

			return;

   145

		memcpy(_decode_parameters, b, 32);

   146

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

   147

	} break;

   148

   149

	}

   150

}

   151

   152

static const Widget _roadveh_details_widgets[] = {

   153

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

   154

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

   155

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

   156

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

   157

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

   158

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

   159

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

   160

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

   161

{   WIDGETS_END},

   162

};

   163

   164

static const WindowDesc _roadveh_details_desc = {

   165

	-1,-1, 380, 101,

   166

	WC_VEHICLE_DETAILS,WC_VEHICLE_VIEW,

   167

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   168

	_roadveh_details_widgets,

   169

	RoadVehDetailsWndProc

   170

};

   171

   172

static void ShowRoadVehDetailsWindow(Vehicle *v)

   173

{

   174

	Window *w;

   175

	VehicleID veh = v->index;

   176

	DeleteWindowById(WC_VEHICLE_ORDERS, veh);

   177

	DeleteWindowById(WC_VEHICLE_DETAILS, veh);

   178

	_alloc_wnd_parent_num = veh;

   179

	w = AllocateWindowDesc(&_roadveh_details_desc);

   180

	w->window_number = veh;

   181

	w->caption_color = v->owner;

   182

}

   183

   184

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

   185

{

   186

	switch(e->event) {

   187

	case WE_PAINT: {

   188

		Vehicle *v = &_vehicles[w->window_number];

   189

		StringID str;

   190

   191

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

   192

   193

		/* draw widgets & caption */

   194

		SetDParam(0, v->string_id);

   195

		SetDParam(1, v->unitnumber);

   196

		DrawWindowWidgets(w);

   197

   198

		/* draw the flag */

   199

		DrawSprite((v->vehstatus & VS_STOPPED) ? 0xC12  : 0xC13, 2, 105);

   200

   201

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

   202

			str = STR_8863_CRASHED;

   203

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

   204

			str = STR_885C_BROKEN_DOWN;

   205

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

   206

			str = STR_8861_STOPPED;

   207

		} else {

   208

			switch (v->current_order.type) {

   209

			case OT_GOTO_STATION: {

   210

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

   211

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

   212

				str = STR_HEADING_FOR_STATION + _patches.vehicle_speed;

   213

			} break;

   214

   215

			case OT_GOTO_DEPOT: {

   216

				Depot *dep = &_depots[v->current_order.station];

   217

				SetDParam(0, dep->town_index);

   218

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

   219

				str = STR_HEADING_FOR_ROAD_DEPOT + _patches.vehicle_speed;

   220

			} break;

   221

   222

			case OT_LOADING:

   223

			case OT_LEAVESTATION:

   224

				str = STR_882F_LOADING_UNLOADING;

   225

				break;

   226

   227

			default:

   228

				if (v->num_orders == 0) {

   229

					str = STR_NO_ORDERS + _patches.vehicle_speed;

   230

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

   231

				} else

   232

					str = STR_EMPTY;

   233

				break;

   234

			}

   235

		}

   236

   237

		DrawStringCentered(125, 105, str, 0);

   238

		DrawWindowViewport(w);

   239

	} break;

   240

   241

	case WE_CLICK: {

   242

		Vehicle *v = &_vehicles[w->window_number];

   243

   244

		switch(e->click.widget) {

   245

		case 5: /* start stop */

   246

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

   247

			break;

   248

		case 6: /* center main view */

   249

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

   250

			break;

   251

		case 7: /* goto hangar */

   252

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

   253

			break;

   254

		case 8: /* turn around */

   255

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

   256

			break;

   257

		case 9: /* show orders */

   258

			ShowOrdersWindow(v);

   259

			break;

   260

		case 10: /* show details */

   261

			ShowRoadVehDetailsWindow(v);

   262

			break;

   263

		}

   264

	} break;

   265

   266

	case WE_DESTROY:

   267

		DeleteWindowById(WC_VEHICLE_ORDERS, w->window_number);

   268

		DeleteWindowById(WC_VEHICLE_DETAILS, w->window_number);

   269

		break;

   270

	}

   271

}

   272

   273

static const Widget _roadveh_view_widgets[] = {

   274

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

   275

{    WWT_CAPTION,    14,    11,   237,     0,    13, STR_9002,	STR_018C_WINDOW_TITLE_DRAG_THIS},

   276

{  WWT_STICKYBOX,    14,   238,   249,     0,    13, 0x0,       STR_STICKY_BUTTON},

   277

{     WWT_IMGBTN,    14,     0,   231,    14,   103, 0x0,				STR_NULL},

   278

{          WWT_6,    14,     2,   229,    16,   101, 0x0,				STR_NULL},

   279

{ WWT_PUSHIMGBTN,    14,     0,   249,   104,   115, 0x0,				STR_901C_CURRENT_VEHICLE_ACTION},

   280

{ WWT_PUSHIMGBTN,    14,   232,   249,    14,    31, 0x2AB,			STR_901E_CENTER_MAIN_VIEW_ON_VEHICLE},

   281

{ WWT_PUSHIMGBTN,    14,   232,   249,    32,    49, 0x2AE,			STR_901F_SEND_VEHICLE_TO_DEPOT},

   282

{ WWT_PUSHIMGBTN,    14,   232,   249,    50,    67, 0x2CB,			STR_9020_FORCE_VEHICLE_TO_TURN_AROUND},

   283

{ WWT_PUSHIMGBTN,    14,   232,   249,    68,    85, 0x2B2,			STR_901D_SHOW_VEHICLE_S_ORDERS},

   284

{ WWT_PUSHIMGBTN,    14,   232,   249,    86,   103, 0x2B3,			STR_9021_SHOW_ROAD_VEHICLE_DETAILS},

   285

{   WIDGETS_END},

   286

};

   287

   288

static const WindowDesc _roadveh_view_desc = {

   289

	-1,-1, 250, 116,

   290

	WC_VEHICLE_VIEW,0,

   291

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON,

   292

	_roadveh_view_widgets,

   293

	RoadVehViewWndProc,

   294

};

   295

   296

void ShowRoadVehViewWindow(Vehicle *v)

   297

{

   298

	Window *w;

   299

   300

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

   301

	if (w) {

   302

		w->caption_color = v->owner;

   303

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

   304

	}

   305

}

   306

   307

   308

static void DrawNewRoadVehWindow(Window *w)

   309

{

   310

	YearMonthDay ymd;

   311

   312

	if (w->window_number == 0)

   313

		w->disabled_state = 1 << 5;

   314

   315

	// setup scroller

   316

	{

   317

		int count = 0;

   318

		int num = NUM_ROAD_ENGINES;

   319

		Engine *e = &_engines[ROAD_ENGINES_INDEX];

   320

		do {

   321

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

   322

				count++;

   323

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

   324

		SetVScrollCount(w, count);

   325

	}

   326

   327

	DrawWindowWidgets(w);

   328

   329

	{

   330

		int num = NUM_ROAD_ENGINES;

   331

		Engine *e = &_engines[ROAD_ENGINES_INDEX];

   332

		int x = 1;

   333

		int y = 15;

   334

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

   335

		int pos = w->vscroll.pos;

   336

		int engine_id = ROAD_ENGINES_INDEX;

   337

		int selected_id = -1;

   338

   339

		do {

   340

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

   341

				if (sel==0) selected_id = engine_id;

   342

				if (IS_INT_INSIDE(--pos, -8, 0)) {

   343

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

   344

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

   345

					y += 14;

   346

				}

   347

				sel--;

   348

			}

   349

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

   350

   351

		WP(w,buildtrain_d).sel_engine = selected_id;

   352

		if (selected_id != -1) {

   353

			const RoadVehicleInfo *rvi = RoadVehInfo(selected_id);

   354

			Engine *e;

   355

   356

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

   357

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

   358

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

   359

			SetDParam(4, rvi->capacity);

   360

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

   361

   362

			e = &_engines[selected_id];

   363

			SetDParam(6, e->lifelength);

   364

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

   365

			ConvertDayToYMD(&ymd, e->intro_date);

   366

			SetDParam(5, ymd.year + 1920);

   367

   368

			DrawString(2, 127, STR_9008_COST_SPEED_RUNNING_COST, 0);

   369

		}

   370

	}

   371

}

   372

   373

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

   374

{

   375

	Vehicle *v;

   376

   377

	if (!success) return;

   378

   379

	v = &_vehicles[_new_roadveh_id];

   380

	if (v->tile == _backup_orders_tile) {

   381

		_backup_orders_tile = 0;

   382

		RestoreVehicleOrders(v, _backup_orders_data);

   383

	}

   384

	ShowRoadVehViewWindow(v);

   385

}

   386

   387

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

   388

{

   389

	switch(e->event) {

   390

	case WE_PAINT:

   391

		DrawNewRoadVehWindow(w);

   392

		break;

   393

   394

	case WE_CLICK:

   395

		switch(e->click.widget) {

   396

		case 2: { /* listbox */

   397

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

   398

			if (i < 8) {

   399

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

   400

				SetWindowDirty(w);

   401

			}

   402

		} break;

   403

   404

		case 5: { /* build */

   405

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

   406

			if (sel_eng != -1)

   407

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

   408

		} break;

   409

   410

		case 6: /* rename */

   411

			WP(w,buildtrain_d).rename_engine = WP(w,buildtrain_d).sel_engine;

   412

			ShowQueryString(

   413

				GetCustomEngineName(WP(w,buildtrain_d).sel_engine),

   414

				STR_9036_RENAME_ROAD_VEHICLE_TYPE,

   415

				31,

   416

				160,

   417

				w->window_class,

   418

				w->window_number);

   419

			break;

   420

		}

   421

		break;

   422

   423

	case WE_4:

   424

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

   425

			DeleteWindow(w);

   426

		}

   427

		break;

   428

   429

	case WE_ON_EDIT_TEXT: {

   430

		byte *b = e->edittext.str;

   431

		if (*b == 0)

   432

			return;

   433

		memcpy(_decode_parameters, b, 32);

   434

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

   435

	} break;

   436

   437

	}

   438

}

   439

   440

static const Widget _new_road_veh_widgets[] = {

   441

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

   442

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

   443

{     WWT_MATRIX,    14,     0,   236,    14,   125, 0x801,									STR_9026_ROAD_VEHICLE_SELECTION},

   444

{  WWT_SCROLLBAR,    14,   237,   247,    14,   125, 0x0,										STR_0190_SCROLL_BAR_SCROLLS_LIST},

   445

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

   446

{ WWT_PUSHTXTBTN,    14,     0,   123,   178,   189, STR_9007_BUILD_VEHICLE,STR_9027_BUILD_THE_HIGHLIGHTED_ROAD},

   447

{ WWT_PUSHTXTBTN,    14,   124,   247,   178,   189, STR_9034_RENAME,				STR_9035_RENAME_ROAD_VEHICLE_TYPE},

   448

{   WIDGETS_END},

   449

};

   450

   451

static const WindowDesc _new_road_veh_desc = {

   452

	-1, -1, 248, 190,

   453

	WC_BUILD_VEHICLE,0,

   454

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   455

	_new_road_veh_widgets,

   456

	NewRoadVehWndProc

   457

};

   458

   459

static void ShowBuildRoadVehWindow(TileIndex tile)

   460

{

   461

	Window *w;

   462

   463

	DeleteWindowById(WC_BUILD_VEHICLE, tile);

   464

   465

	w = AllocateWindowDesc(&_new_road_veh_desc);

   466

	w->window_number = tile;

   467

	w->vscroll.cap = 8;

   468

   469

	if (tile != 0) {

   470

		w->caption_color = _map_owner[tile];

   471

	} else {

   472

		w->caption_color = _local_player;

   473

	}

   474

}

   475

   476

static void DrawRoadDepotWindow(Window *w)

   477

{

   478

	uint tile;

   479

	Vehicle *v;

   480

	int num,x,y;

   481

	Depot *d;

   482

   483

	tile = w->window_number;

   484

   485

	/* setup disabled buttons */

   486

	w->disabled_state = (_map_owner[tile]==_local_player) ? 0 : ((1<<4)|(1<<6));

   487

   488

	/* determine amount of items for scroller */

   489

	num = 0;

   490

	FOR_ALL_VEHICLES(v) {

   491

		if (v->type == VEH_Road && v->u.road.state == 254 &&

   492

				v->tile == (TileIndex)tile)

   493

					num++;

   494

	}

   495

	SetVScrollCount(w, (num + 4) / 5);

   496

   497

	/* locate the depot struct */

   498

	for(d=_depots; d->xy != (TileIndex)tile; d++) {}

   499

   500

	SetDParam(0, d->town_index);

   501

	DrawWindowWidgets(w);

   502

   503

	x = 2;

   504

	y = 15;

   505

	num = w->vscroll.pos * 5;

   506

   507

	FOR_ALL_VEHICLES(v) {

   508

		if (v->type == VEH_Road &&

   509

				v->u.road.state == 254 &&

   510

				v->tile == (TileIndex)tile &&

   511

				--num < 0 && num >=	-15) {

   512

   513

			DrawRoadVehImage(v, x+24, y, WP(w,traindepot_d).sel);

   514

   515