1

#include "stdafx.h"

     2

#include "ttd.h"

     3

#include "table/strings.h"

     4

#include "window.h"

     5

#include "gui.h"

     6

#include "gfx.h"

     7

#include "vehicle.h"

     8

#include "viewport.h"

     9

#include "station.h"

    10

#include "command.h"

    11

#include "player.h"

    12

#include "engine.h"

    13

    14

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

    15

{

    16

	int image = GetRoadVehImage(v, 6);

    17

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

    18

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

    19

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

    20

    21

	if (v->index == selection) {

    22

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

    23

	}

    24

}

    25

    26

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

    27

{

    28

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

    29

	StringID str;

    30

	int mod;

    31

    32

	switch(e->event) {

    33

	case WE_PAINT:

    34

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

    35

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

    36

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

    37

    38

		SetDParam(0, v->string_id);

    39

		SetDParam(1, v->unitnumber);

    40

		DrawWindowWidgets(w);

    41

    42

		/* Draw running cost */

    43

		{

    44

			int year = v->age / 366;

    45

			StringID str;

    46

    47

			SetDParam(1, year);

    48

    49

			str = STR_0199_YEAR;

    50

			if (year != 1) {

    51

				str++;

    52

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

    53

					str++;

    54

			}

    55

			SetDParam(0, str);

    56

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

    57

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

    58

			DrawString(2, 15, STR_900D_AGE_RUNNING_COST_YR, 0);

    59

		}

    60

    61

		/* Draw max speed */

    62

		{

    63

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

    64

			DrawString(2, 25, STR_900E_MAX_SPEED, 0);

    65

		}

    66

    67

		/* Draw profit */

    68

		{

    69

			SetDParam(0, v->profit_this_year);

    70

			SetDParam(1, v->profit_last_year);

    71

			DrawString(2, 35, STR_900F_PROFIT_THIS_YEAR_LAST_YEAR, 0);

    72

		}

    73

    74

		/* Draw breakdown & reliability */

    75

		{

    76

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

    77

			SetDParam(1, v->breakdowns_since_last_service);

    78

			DrawString(2, 45, STR_9010_RELIABILITY_BREAKDOWNS, 0);

    79

		}

    80

    81

		/* Draw service interval text */

    82

		{

    83

			SetDParam(0, v->service_interval);

    84

			SetDParam(1, v->date_of_last_service);

    85

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

    86

		}

    87

    88

		DrawRoadVehImage(v, 3, 57, INVALID_VEHICLE);

    89

    90

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

    91

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

    92

		SetDParam(2, v->value);

    93

		DrawString(34, 57, STR_9011_BUILT_VALUE, 0);

    94

    95

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

    96

		SetDParam(1, v->cargo_cap);

    97

		DrawString(34, 67, STR_9012_CAPACITY, 0);

    98

    99

		str = STR_8812_EMPTY;

   100

		if (v->cargo_count != 0) {

   101

			SetDParam(0, v->cargo_type);

   102

			SetDParam(1, v->cargo_count);

   103

			SetDParam(2, v->cargo_source);

   104

			str = STR_8813_FROM;

   105

		}

   106

		DrawString(34, 78, str, 0);

   107

		break;

   108

   109

	case WE_CLICK:

   110

		switch(e->click.widget) {

   111

		case 2: /* rename */

   112

			SetDParam(0, v->unitnumber);

   113

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

   114

			break;

   115

   116

		case 5: /* increase int */

   117

			mod = _ctrl_pressed? 5 : 10;

   118

			goto change_int;

   119

		case 6: /* decrease int */

   120

			mod = _ctrl_pressed? -5 : -10;

   121

change_int:

   122

			mod += v->service_interval;

   123

   124

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

   125

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

   126

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

   127

			if (mod == v->service_interval)

   128

				return;

   129

   130

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

   131

			break;

   132

		}

   133

		break;

   134

   135

	case WE_4:

   136

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

   137

			DeleteWindow(w);

   138

		break;

   139

   140

	case WE_ON_EDIT_TEXT: {

   141

		byte *b = e->edittext.str;

   142

		if (*b == 0)

   143

			return;

   144

		memcpy(_decode_parameters, b, 32);

   145

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

   146

	} break;

   147

   148

	}

   149

}

   150

   151

static const Widget _roadveh_details_widgets[] = {

   152

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

   153

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

   154

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

   155

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

   156

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

   157

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

   158

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

   159

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

   160

{   WIDGETS_END},

   161

};

   162

   163

static const WindowDesc _roadveh_details_desc = {

   164

	-1,-1, 380, 101,

   165

	WC_VEHICLE_DETAILS,WC_VEHICLE_VIEW,

   166

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   167

	_roadveh_details_widgets,

   168

	RoadVehDetailsWndProc

   169

};

   170

   171

static void ShowRoadVehDetailsWindow(Vehicle *v)

   172

{

   173

	Window *w;

   174

	VehicleID veh = v->index;

   175

	DeleteWindowById(WC_VEHICLE_ORDERS, veh);

   176

	DeleteWindowById(WC_VEHICLE_DETAILS, veh);

   177

	_alloc_wnd_parent_num = veh;

   178

	w = AllocateWindowDesc(&_roadveh_details_desc);

   179

	w->window_number = veh;

   180

	w->caption_color = v->owner;

   181

}

   182

   183

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

   184

{

   185

	switch(e->event) {

   186

	case WE_PAINT: {

   187

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

   188

		StringID str;

   189

   190

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

   191

   192

		/* draw widgets & caption */

   193

		SetDParam(0, v->string_id);

   194

		SetDParam(1, v->unitnumber);

   195

		DrawWindowWidgets(w);

   196

   197

		/* draw the flag */

   198

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

   199

   200

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

   201

			str = STR_8863_CRASHED;

   202

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

   203

			str = STR_885C_BROKEN_DOWN;

   204

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

   205

			str = STR_8861_STOPPED;

   206

		} else {

   207

			switch(v->next_order & OT_MASK) {

   208

			case OT_GOTO_STATION: {

   209

				SetDParam(0, v->next_order_param);

   210

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

   211

				str = STR_HEADING_FOR_STATION + _patches.vehicle_speed;

   212

			} break;

   213

   214

			case OT_GOTO_DEPOT: {

   215

				Depot *dep = &_depots[v->next_order_param];

   216

				SetDParam(0, dep->town_index);

   217

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

   218

				str = STR_HEADING_FOR_ROAD_DEPOT + _patches.vehicle_speed;

   219

			} break;

   220

   221

			case OT_LOADING:

   222

			case OT_LEAVESTATION:

   223

				str = STR_882F_LOADING_UNLOADING;

   224

				break;

   225

   226

			default:

   227

				if (v->num_orders == 0) {

   228

					str = STR_NO_ORDERS + _patches.vehicle_speed;

   229

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

   230

				} else

   231

					str = STR_EMPTY;

   232

				break;

   233

			}

   234

		}

   235

   236

		DrawStringCentered(125, 105, str, 0);

   237

		DrawWindowViewport(w);

   238

	} break;

   239

   240

	case WE_CLICK: {

   241

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

   242

   243

		switch(e->click.widget) {

   244

		case 4: /* start stop */

   245

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

   246

			break;

   247

		case 5: /* center main view */

   248

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

   249

			break;

   250

		case 6: /* goto hangar */

   251

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

   252

			break;

   253

		case 7: /* turn around */

   254

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

   255

			break;

   256

		case 8: /* show orders */

   257

			ShowOrdersWindow(v);

   258

			break;

   259

		case 9: /* show details */

   260

			ShowRoadVehDetailsWindow(v);

   261

			break;

   262

		}

   263

	} break;

   264

   265

	case WE_DESTROY:

   266

		DeleteWindowById(WC_VEHICLE_ORDERS, w->window_number);

   267

		DeleteWindowById(WC_VEHICLE_DETAILS, w->window_number);

   268

		break;

   269

	}

   270

}

   271

   272

static const Widget _roadveh_view_widgets[] = {

   273

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

   274

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

   275

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

   276

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

   277

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

   278

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

   279

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

   280

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

   281

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

   282

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

   283

{   WIDGETS_END},

   284

};

   285

   286

static const WindowDesc _roadveh_view_desc = {

   287

	-1,-1, 250, 116,

   288

	WC_VEHICLE_VIEW,0,

   289

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   290

	_roadveh_view_widgets,

   291

	RoadVehViewWndProc,

   292

};

   293

   294

void ShowRoadVehViewWindow(Vehicle *v)

   295

{

   296

	Window *w;

   297

   298

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

   299

	if (w) {

   300

		w->caption_color = v->owner;

   301

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

   302

	}

   303

}

   304

   305

   306

static void DrawNewRoadVehWindow(Window *w)

   307

{

   308

	YearMonthDay ymd;

   309

   310

	if (w->window_number == 0)

   311

		w->disabled_state = 1 << 5;

   312

   313

	// setup scroller

   314

	{

   315

		int count = 0;

   316

		int num = NUM_ROAD_ENGINES;

   317

		Engine *e = &_engines[ROAD_ENGINES_INDEX];

   318

		do {

   319

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

   320

				count++;

   321

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

   322

		SetVScrollCount(w, count);

   323

	}

   324

   325

	DrawWindowWidgets(w);

   326

   327

	{

   328

		int num = NUM_ROAD_ENGINES;

   329

		Engine *e = &_engines[ROAD_ENGINES_INDEX];

   330

		int x = 1;

   331

		int y = 15;

   332

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

   333

		int pos = w->vscroll.pos;

   334

		int engine_id = ROAD_ENGINES_INDEX;

   335

		int selected_id = -1;

   336

   337

		do {

   338

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

   339

				if (sel==0) selected_id = engine_id;

   340

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

   341

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

   342

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

   343

					y += 14;

   344

				}

   345

				sel--;

   346

			}

   347

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

   348

   349

		WP(w,buildtrain_d).sel_engine = selected_id;

   350

		if (selected_id != -1) {

   351

			const RoadVehicleInfo *rvi = RoadVehInfo(selected_id);

   352

			Engine *e;

   353

   354

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

   355

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

   356

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

   357

			SetDParam(4, rvi->capacity);

   358

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

   359

   360

			e = &_engines[selected_id];

   361

			SetDParam(6, e->lifelength);

   362

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

   363

			ConvertDayToYMD(&ymd, e->intro_date);

   364

			SetDParam(5, ymd.year + 1920);

   365

   366

			DrawString(2, 127, STR_9008_COST_SPEED_RUNNING_COST, 0);

   367

		}

   368

	}

   369

}

   370

   371

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

   372

{

   373

	Vehicle *v;

   374

   375

	if (!success) return;

   376

   377

	v = &_vehicles[_new_roadveh_id];

   378

	if (v->tile == _backup_orders_tile) {

   379

		_backup_orders_tile = 0;

   380

		RestoreVehicleOrders(v, _backup_orders_data);

   381

	}

   382

	ShowRoadVehViewWindow(v);

   383

}

   384

   385

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

   386

{

   387

	switch(e->event) {

   388

	case WE_PAINT:

   389

		DrawNewRoadVehWindow(w);

   390

		break;

   391

   392

	case WE_CLICK:

   393

		switch(e->click.widget) {

   394

		case 2: { /* listbox */

   395

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

   396

			if (i < 8) {

   397

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

   398

				SetWindowDirty(w);

   399

			}

   400

		} break;

   401

   402

		case 5: { /* build */

   403

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

   404

			if (sel_eng != -1)

   405

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

   406

		} break;

   407

   408

		case 6: /* rename */

   409

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

   410

			ShowQueryString(

   411

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

   412

				STR_9036_RENAME_ROAD_VEHICLE_TYPE,

   413

				31,

   414

				160,

   415

				w->window_class,

   416

				w->window_number);

   417

			break;

   418

		}

   419

		break;

   420

   421

	case WE_4:

   422

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

   423

			DeleteWindow(w);

   424

		}

   425

		break;

   426

   427

	case WE_ON_EDIT_TEXT: {

   428

		byte *b = e->edittext.str;

   429

		if (*b == 0)

   430

			return;

   431

		memcpy(_decode_parameters, b, 32);

   432

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

   433

	} break;

   434

   435

	}

   436

}

   437

   438

static const Widget _new_road_veh_widgets[] = {

   439

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

   440

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

   441

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

   442

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

   443

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

   444

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

   445

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

   446

{   WIDGETS_END},

   447

};

   448

   449

static const WindowDesc _new_road_veh_desc = {

   450

	-1, -1, 248, 190,

   451

	WC_BUILD_VEHICLE,0,

   452

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   453

	_new_road_veh_widgets,

   454

	NewRoadVehWndProc

   455

};

   456

   457

static void ShowBuildRoadVehWindow(TileIndex tile)

   458

{

   459

	Window *w;

   460

   461

	DeleteWindowById(WC_BUILD_VEHICLE, tile);

   462

   463

	w = AllocateWindowDesc(&_new_road_veh_desc);

   464

	w->window_number = tile;

   465

	w->vscroll.cap = 8;

   466

   467

	if (tile != 0) {

   468

		w->caption_color = _map_owner[tile];

   469

	} else {

   470

		w->caption_color = _local_player;

   471

	}

   472

}

   473

   474

static void DrawRoadDepotWindow(Window *w)

   475

{

   476

	uint tile;

   477

	Vehicle *v;

   478

	int num,x,y;

   479

	Depot *d;

   480

   481

	tile = w->window_number;

   482

   483

	/* setup disabled buttons */

   484

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

   485

   486

	/* determine amount of items for scroller */

   487

	num = 0;

   488

	FOR_ALL_VEHICLES(v) {

   489

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

   490

				v->tile == (TileIndex)tile)

   491

					num++;

   492

	}

   493

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

   494

   495

	/* locate the depot struct */

   496

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

   497

   498

	SetDParam(0, d->town_index);

   499

	DrawWindowWidgets(w);

   500

   501

	x = 2;

   502

	y = 15;

   503

	num = w->vscroll.pos * 5;

   504

   505

	FOR_ALL_VEHICLES(v) {

   506

		if (v->type == VEH_Road &&

   507

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

   508

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

   509

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

   510

   511

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

   512

   513

			SetDParam(0, v->unitnumber);

   514

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

   515

   516

			DrawSprite( (v->vehstatus & VS_STOPPED) ? 0xC12 : 0xC13, x + 16, y);

   517