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

    10

#include "town.h"

    11

#include "command.h"

    12

#include "viewport.h"

    13

    14

static int OrderGetSel(Window *w)

    15

{

    16

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

    17

	const Order *sched = v->schedule_ptr;

    18

	int num = WP(w,order_d).sel;

    19

	int count = 0;

    20

    21

	if (num == 0)

    22

		return 0;

    23

    24

	while (sched->type != OT_NOTHING) {

    25

		sched++;

    26

		count++;

    27

		if (--num == 0)

    28

			break;

    29

	}

    30

    31

	return count;

    32

}

    33

    34

static void DrawOrdersWindow(Window *w)

    35

{

    36

	Vehicle *v;

    37

	int num, sel;

    38

	const Order *sched;

    39

	Order ord;

    40

	int y, i;

    41

	StringID str;

    42

	bool shared_schedule;

    43

    44

	v = &_vehicles[w->window_number];

    45

    46

	w->disabled_state = (v->owner == _local_player) ? 0 : 0x3F0;

    47

    48

	shared_schedule = IsScheduleShared(v) != NULL;

    49

    50

	sched = v->schedule_ptr;

    51

	num=0;

    52

	while (sched->type != OT_NOTHING) {

    53

		sched++;

    54

		num++;

    55

	}

    56

    57

	if ((uint)num + shared_schedule <= (uint)WP(w,order_d).sel)

    58

		SETBIT(w->disabled_state, 5); /* delete */

    59

    60

	if (num == 0)

    61

		SETBIT(w->disabled_state, 4); /* skip */

    62

    63

	SetVScrollCount(w, num+1);

    64

    65

	sel = OrderGetSel(w);

    66

    67

	SetDParam(2,STR_8827_FULL_LOAD);

    68

	switch (v->schedule_ptr[sel].type) {

    69

	case OT_GOTO_STATION:

    70

		break;

    71

	case OT_GOTO_DEPOT:

    72

		SETBIT(w->disabled_state, 9);	/* unload */

    73

		SetDParam(2,STR_SERVICE);

    74

		break;

    81

	default:

    82

		SETBIT(w->disabled_state, 6); /* nonstop */

    83

		SETBIT(w->disabled_state, 8);	/* full load */

    84

		SETBIT(w->disabled_state, 9);	/* unload */

    85

	}

    86

    87

	SetDParam(0, v->string_id);

    88

	SetDParam(1, v->unitnumber);

    89

	DrawWindowWidgets(w);

    90

    91

	y = 15;

    92

    93

	i = 0;

    94

	for(;;) {

    95

		str = ((byte)v->cur_order_index == i) ? STR_8805 : STR_8804;

    96

    97

		ord = v->schedule_ptr[i];

    98

    99

		if ( (uint)(i - w->vscroll.pos) < 6) {

   100

   101

			if (ord.type == OT_NOTHING) {

   102

				str = shared_schedule ? STR_END_OF_SHARED_ORDERS : STR_882A_END_OF_ORDERS;

   103

			} else {

   104

				SetDParam(1, 6);

   105

   106

				if (ord.type == OT_GOTO_STATION) {

   107

					SetDParam(1, STR_8806_GO_TO + (ord.flags >> 1));

   108

					SetDParam(2, ord.station);

   109

				} else if (ord.type == OT_GOTO_DEPOT) {

   110

					StringID s = STR_NULL;

   111

					if (v->type == VEH_Aircraft) {

   112

						s = STR_GO_TO_AIRPORT_HANGAR;

   113

					  SetDParam(2, ord.station);

   114

					} else {

   115

						SetDParam(2, _depots[ord.station].town_index);

   116

						switch (v->type) {

   117

						case VEH_Train:	s = STR_880E_GO_TO_TRAIN_DEPOT; break;

   118

						case VEH_Road:	s = STR_9038_GO_TO_ROADVEH_DEPOT; break;

   119

						case VEH_Ship:	s = STR_GO_TO_SHIP_DEPOT; break;

   120

						}

   121

					}

   122

					if (v->type == VEH_Train && ord.flags & OF_NON_STOP) s += 2;

   123

					if (ord.flags & OF_FULL_LOAD) ++s; /* XXX service */

   124

					SetDParam(1, s);

   125

				} else if (ord.type == OT_GOTO_WAYPOINT) {

   126

					SetDParam(2, ord.station);

   128

				}

   129

			}

   130

			{

   131

				byte color = (i == WP(w,order_d).sel) ? 0xC : 0x10;

   132

				SetDParam(0, i+1);

   133

				if (ord.type != OT_DUMMY) {

   134

					DrawString(2, y, str, color);

   135

				} else {

   136

					SetDParam(1, STR_INVALID_ORDER);

   137

					SetDParam(2, ord.station);

   138

					DrawString(2, y, str, color);

   139

				}

   140

			}

   141

			y += 10;

   142

		}

   143

   144

		i++;

   145

   146

		if (ord.type == OT_NOTHING)

   147

			break;

   148

	}

   149

}

   150

   151

   152

// lookup a vehicle on a tile

   153

typedef struct {

   154

	TileIndex tile;

   155

	byte owner;

   156

	byte type;

   157

} FindVehS;

   158

   159

static void *FindVehicleCallb(Vehicle *v, FindVehS *f)

   160

{

   161

	if (v->tile != f->tile || v->owner != f->owner || v->vehstatus & VS_HIDDEN ) return NULL;

   162

	return v;

   163

}

   164

   165

Vehicle *GetVehicleOnTile(TileIndex tile, byte owner)

   166

{

   167

	FindVehS fs = {tile, owner, 0};

   168

	return VehicleFromPos(tile, &fs, (VehicleFromPosProc*)FindVehicleCallb);

   169

}

   170

   171

static Order GetOrderCmdFromTile(Vehicle *v, uint tile)

   172

{

   173

	Order order;

   174

	Station *st;

   175

	int st_index;

   176

   177

	// check depot first

   178

	if (_patches.gotodepot) {

   179

		switch(GET_TILETYPE(tile)) {

   180

		case MP_RAILWAY:

   181

			if (v->type == VEH_Train && _map_owner[tile] == _local_player) {

   182

				if ((_map5[tile]&0xFC)==0xC0) {

   183

					order.type = OT_GOTO_DEPOT;

   184

					order.flags = OF_UNLOAD;

   185

					order.station = GetDepotByTile(tile);

   186

					return order;

   187

				}

   188

			}

   189

			break;

   190

   191

		case MP_STREET:

   192

			if ((_map5[tile] & 0xF0) == 0x20 && v->type == VEH_Road && _map_owner[tile] == _local_player) {

   193

				order.type = OT_GOTO_DEPOT;

   194

				order.flags = OF_UNLOAD;

   195

				order.station = GetDepotByTile(tile);

   196

				return order;

   197

			}

   198

			break;

   199

   200

		case MP_STATION:

   201

			if (v->type != VEH_Aircraft) break;

   202

			if ( IsAircraftHangarTile(tile) && _map_owner[tile] == _local_player) {

   203

				order.type = OT_GOTO_DEPOT;

   204

				order.flags = OF_UNLOAD | OF_NON_STOP;

   205

				order.station = _map2[tile];

   206

				return order;

   207

			}

   208

			break;

   209

   210

		case MP_WATER:

   211

			if (v->type != VEH_Ship) break;

   212

			if ( IsShipDepotTile(tile) && _map_owner[tile] == _local_player) {

   213

				switch (_map5[tile]) {

   214

				case 0x81: tile--; break;

   215

				case 0x83: tile-= TILE_XY(0,1); break;

   216

				}

   217

				order.type = OT_GOTO_DEPOT;

   218

				order.flags = OF_UNLOAD;

   219

				order.station = GetDepotByTile(tile);

   220

				return order;

   221

			}

   222

		}

   223

	}

   224

   225

	// check waypoint

   226

	if (IS_TILETYPE(tile, MP_RAILWAY)

   227

	&& v->type == VEH_Train 

   228

	&& _map_owner[tile] == _local_player

   229

	&& (_map5[tile]&0xFE)==0xC4) {

   230

		order.type = OT_GOTO_WAYPOINT;

   231

		order.flags = 0;

   232

		order.station = GetWaypointByTile(tile);

   233

		return order;

   234

	}

   235

   236

	if (IS_TILETYPE(tile, MP_STATION)) {

   237

		st = DEREF_STATION(st_index = _map2[tile]);

   238

   239

		if (st->owner == _current_player || st->owner == OWNER_NONE) {

   240

			byte facil;

   241

			(facil=FACIL_DOCK, v->type == VEH_Ship) ||

   242

			(facil=FACIL_TRAIN, v->type == VEH_Train) ||

   243

			(facil=FACIL_AIRPORT, v->type == VEH_Aircraft) ||

   244

			(facil=FACIL_BUS_STOP, v->type == VEH_Road && v->cargo_type == CT_PASSENGERS) ||

   245

			(facil=FACIL_TRUCK_STOP, 1);

   246

			if (st->facilities & facil) {

   247

				order.type = OT_GOTO_STATION;

   248

				order.flags = 0;

   249

				order.station = st_index;

   250

				return order;

   251

			}

   252

		}

   253

	}

   254

   255

	// not found

   256

	order.type = OT_NOTHING;

   257

	order.flags = 0;

   258

	return order;

   259

}

   260

   261

static bool HandleOrderVehClick(Vehicle *v, Vehicle *u, Window *w)

   262

{

   263

	if (u->type != v->type)

   264

		return false;

   265

   266

	if (u->type == VEH_Train && u->subtype != 0) {

   267

		u = GetFirstVehicleInChain(u);

   268

		if (u->subtype != 0)

   269

			return false;

   270

	}

   271

   272

	// v is vehicle getting orders. Only copy/clone orders if vehicle doesn't have any orders yet

   273

	// obviously if you press CTRL on a non-empty orders vehicle you know what you are doing

   274

	if (v->num_orders != 0 && _ctrl_pressed == 0) {return false;}

   275

   276

	if (DoCommandP(v->tile, v->index | (u->index << 16), _ctrl_pressed ? 0 : 1, NULL,

   277

		_ctrl_pressed ? CMD_CLONE_ORDER | CMD_MSG(STR_CANT_SHARE_ORDER_LIST) : CMD_CLONE_ORDER | CMD_MSG(STR_CANT_COPY_ORDER_LIST))) {

   278

		WP(w,order_d).sel = -1;

   279

		ResetObjectToPlace();

   280

	}

   281

   282

	return true;

   283

}

   284

   285

static void OrdersPlaceObj(Vehicle *v, uint tile, Window *w)

   286

{

   287

	Order cmd;

   288

	Vehicle *u;

   289

   290

	// check if we're clicking on a vehicle first.. clone orders in that case.

   291

	u = CheckMouseOverVehicle();

   292

	if (u && HandleOrderVehClick(v, u, w))

   293

		return;

   294

   295

	cmd = GetOrderCmdFromTile(v, tile);

   296

	if (cmd.type == OT_NOTHING) return;

   297

   298

	if (DoCommandP(v->tile, v->index + (OrderGetSel(w) << 16), PackOrder(&cmd), NULL, CMD_INSERT_ORDER | CMD_MSG(STR_8833_CAN_T_INSERT_NEW_ORDER))) {

   299

		if (WP(w,order_d).sel != -1)

   300

			WP(w,order_d).sel++;

   301

		ResetObjectToPlace();

   302

	}

   303

}

   304

   305

   306

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

   307

{

   308

	switch(e->event) {

   309

	case WE_PAINT:

   310

		DrawOrdersWindow(w);

   311

		break;

   312

   313

	case WE_CLICK: {

   314

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

   315

		int mode;

   316

		switch(e->click.widget) {

   317

		case 2:	{/* orders list */

   318

			int sel;

   319

			sel = (e->click.pt.y - 15) / 10;

   320

   321

			if ( (uint) sel >= 6)

   322

				return;

   323

   324

			sel += w->vscroll.pos;

   325

   326

			if (_ctrl_pressed && sel < v->num_orders) { // watch out for schedule_ptr overflow

   327

				Order ord = v->schedule_ptr[sel];

   328

				int xy = 0;

   329

				switch (ord.type) {

   330

				case OT_GOTO_STATION:			/* station order */

   331

					xy = _stations[ord.station].xy ;

   332

					break;

   333

				case OT_GOTO_DEPOT:				/* goto depot order */

   334

					xy = _depots[ord.station].xy;

   335

					break;

   336

				case OT_GOTO_WAYPOINT:	/* goto waypoint order */

   337

					xy = _waypoints[ord.station].xy;

   338

				}

   339

   340

				if (xy)

   341

					ScrollMainWindowToTile(xy);

   342

   343

				return;

   344

			}

   345

   346

			if (sel == WP(w,order_d).sel) sel = -1;

   347

			WP(w,order_d).sel = sel;

   348

			SetWindowDirty(w);

   349

		}	break;

   350

   351

		case 4: /* skip button */

   352

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

   353

			break;

   354

   355

		case 5: /* delete button */

   356

			DoCommandP(v->tile,v->index, OrderGetSel(w), NULL, CMD_DELETE_ORDER | CMD_MSG(STR_8834_CAN_T_DELETE_THIS_ORDER));

   357

			break;

   358

   359

		case 7: /* goto button */

   360

			InvalidateWidget(w, 7);

   361

			w->click_state ^= 1<<7;

   362

			if (HASBIT(w->click_state, 7)) {

   363

				_place_clicked_vehicle = NULL;

   364

				SetObjectToPlaceWnd(ANIMCURSOR_PICKSTATION, 1, w);

   365

			} else {

   366

				ResetObjectToPlace();

   367

			}

   368

			break;

   369

   370

		case 8: /* full load button */

   371

			mode = 0;

   372

			DoCommandP(v->tile, v->index, OrderGetSel(w) | (mode << 8), NULL, CMD_MODIFY_ORDER | CMD_MSG(STR_8835_CAN_T_MODIFY_THIS_ORDER));

   373

			break;

   374

   375

		case 9: /* unload button */

   376

			mode = 1;

   377

			DoCommandP(v->tile, v->index, OrderGetSel(w) | (mode << 8), NULL, CMD_MODIFY_ORDER | CMD_MSG(STR_8835_CAN_T_MODIFY_THIS_ORDER));

   378

			break;

   379

   380

		case 6: /* non stop button */

   381

			mode = 2;

   382

			DoCommandP(v->tile, v->index, OrderGetSel(w) | (mode << 8), NULL, CMD_MODIFY_ORDER | CMD_MSG(STR_8835_CAN_T_MODIFY_THIS_ORDER));

   383

			break;

   384

		}

   385

	} break;

   386

   387

   388

	case WE_RCLICK: {

   389

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

   390

		if (e->click.widget != 8) break;

   391

		if (v->schedule_ptr[OrderGetSel(w)].type == OT_GOTO_DEPOT)

   392

			GuiShowTooltips(STR_SERVICE_HINT);

   393

		else

   394

			GuiShowTooltips(STR_8857_MAKE_THE_HIGHLIGHTED_ORDER);

   395

		} break;

   396

   397

	case WE_4: {

   398

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

   399

			DeleteWindow(w);

   400

	} break;

   401

   402

	case WE_PLACE_OBJ: {

   403

		OrdersPlaceObj(&_vehicles[w->window_number], e->place.tile, w);

   404

	} break;

   405

   406

	case WE_ABORT_PLACE_OBJ: {

   407

		w->click_state &= ~(1<<7);

   408

		InvalidateWidget(w, 7);

   409

	} break;

   410

   411

	// check if a vehicle in a depot was clicked..

   412

	case WE_MOUSELOOP: {

   413

		Vehicle *v = _place_clicked_vehicle;

   414

		/*

   415

		 * Check if we clicked on a vehicle

   416

		 * and if the GOTO button of this window is pressed

   417

		 * This is because of all open order windows WE_MOUSELOOP is called

   418

		 * and if you have 3 windows open, and this check is not done

   419

		 * the order is copied to the last open window instead of the

   420

		 * one where GOTO is enalbed

   421

		 */

   422

		if (v && HASBIT(w->click_state, 7)) {

   423

			_place_clicked_vehicle = NULL;

   424

			HandleOrderVehClick(&_vehicles[w->window_number], v, w);

   425

		}

   426

	} break;

   427

   428

	}

   429

}

   430

   431

static const Widget _train_orders_widgets[] = {

   432

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

   433

{    WWT_CAPTION,    14,    11,   319,     0,    13, STR_8829_ORDERS,					STR_018C_WINDOW_TITLE_DRAG_THIS},

   434

{      WWT_PANEL,    14,     0,   308,    14,    75, 0x0,											STR_8852_ORDERS_LIST_CLICK_ON_ORDER},

   435

{  WWT_SCROLLBAR,    14,   309,   319,    14,    75, 0x0,											STR_0190_SCROLL_BAR_SCROLLS_LIST},

   436

{ WWT_PUSHTXTBTN,    14,     0,    52,    76,    87, STR_8823_SKIP,						STR_8853_SKIP_THE_CURRENT_ORDER},

   437

{ WWT_PUSHTXTBTN,    14,    53,   105,    76,    87, STR_8824_DELETE,					STR_8854_DELETE_THE_HIGHLIGHTED},

   438

{ WWT_PUSHTXTBTN,    14,   106,   158,    76,    87, STR_8825_NON_STOP,				STR_8855_MAKE_THE_HIGHLIGHTED_ORDER},

   439

{WWT_NODISTXTBTN,    14,   159,   211,    76,    87, STR_8826_GO_TO,					STR_8856_INSERT_A_NEW_ORDER_BEFORE},

   440

{ WWT_PUSHTXTBTN,    14,   212,   264,    76,    87, STR_FULLLOAD_OR_SERVICE,	STR_NULL},

   441

{ WWT_PUSHTXTBTN,    14,   265,   319,    76,    87, STR_8828_UNLOAD,					STR_8858_MAKE_THE_HIGHLIGHTED_ORDER},

   442

{   WIDGETS_END},

   443

};

   444

   445

static const WindowDesc _train_orders_desc = {

   446

	-1,-1, 320, 88,

   447

	WC_VEHICLE_ORDERS,WC_VEHICLE_VIEW,

   448

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_RESTORE_DPARAM,

   449

	_train_orders_widgets,

   450

	OrdersWndProc

   451

};

   452

   453

static const Widget _other_train_orders_widgets[] = {

   454

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

   455

{    WWT_CAPTION,    14,    11,   319,     0,    13, STR_8829_ORDERS, STR_018C_WINDOW_TITLE_DRAG_THIS},

   456

{      WWT_PANEL,    14,     0,   308,    14,    75, 0x0, STR_8852_ORDERS_LIST_CLICK_ON_ORDER},

   457

{  WWT_SCROLLBAR,    14,   309,   319,    14,    75, 0x0, STR_0190_SCROLL_BAR_SCROLLS_LIST},

   458

{   WIDGETS_END},

   459

};

   460

   461

static const WindowDesc _other_train_orders_desc = {

   462

	-1,-1, 320, 76,

   463

	WC_VEHICLE_ORDERS,WC_VEHICLE_VIEW,

   464

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   465

	_other_train_orders_widgets,

   466

	OrdersWndProc

   467

};

   468

   469

   470

static const Widget _roadveh_orders_widgets[] = {

   471

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

   472

{    WWT_CAPTION,    14,    11,   319,     0,    13, STR_900B_ORDERS,	STR_018C_WINDOW_TITLE_DRAG_THIS},

   473

{     WWT_IMGBTN,    14,     0,   308,    14,    75, 0x0,							STR_8852_ORDERS_LIST_CLICK_ON_ORDER},

   474

{  WWT_SCROLLBAR,    14,   309,   319,    14,    75, 0x0,							STR_0190_SCROLL_BAR_SCROLLS_LIST},

   475

{ WWT_PUSHTXTBTN,    14,     0,    63,    76,    87, STR_8823_SKIP,		STR_8853_SKIP_THE_CURRENT_ORDER},

   476

{ WWT_PUSHTXTBTN,    14,    64,   127,    76,    87, STR_8824_DELETE,	STR_8854_DELETE_THE_HIGHLIGHTED},

   477

{      WWT_EMPTY,     0,     0,     0,     0,     0, 0x0,							STR_NULL},

   478

{WWT_NODISTXTBTN,    14,   128,   191,    76,    87, STR_8826_GO_TO,	STR_8856_INSERT_A_NEW_ORDER_BEFORE},

   479

{ WWT_PUSHTXTBTN,    14,   192,   255,    76,    87, STR_FULLLOAD_OR_SERVICE, STR_NULL},

   480

{ WWT_PUSHTXTBTN,    14,   256,   319,    76,    87, STR_8828_UNLOAD,	STR_8858_MAKE_THE_HIGHLIGHTED_ORDER},

   481

{   WIDGETS_END},

   482

};

   483

   484

static const WindowDesc _roadveh_orders_desc = {

   485

	-1,-1, 320, 88,

   486

	WC_VEHICLE_ORDERS,WC_VEHICLE_VIEW,

   487

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_RESTORE_DPARAM,

   488

	_roadveh_orders_widgets,

   489

	OrdersWndProc

   490

};

   491

   492

static const Widget _other_roadveh_orders_widgets[] = {

   493

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

   494

{    WWT_CAPTION,    14,    11,   319,     0,    13, STR_900B_ORDERS,	STR_018C_WINDOW_TITLE_DRAG_THIS},

   495

{     WWT_IMGBTN,    14,     0,   308,    14,    75, 0x0,							STR_8852_ORDERS_LIST_CLICK_ON_ORDER},

   496

{  WWT_SCROLLBAR,    14,   309,   319,    14,    75, 0x0,							STR_0190_SCROLL_BAR_SCROLLS_LIST},

   497

{   WIDGETS_END},

   498

};

   499

   500

static const WindowDesc _other_roadveh_orders_desc = {

   501

	-1,-1, 320, 76,

   502

	WC_VEHICLE_ORDERS,WC_VEHICLE_VIEW,

   503

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   504

	_other_roadveh_orders_widgets,

   505

	OrdersWndProc

   506

};

   507

   508

static const Widget _ship_orders_widgets[] = {

   509

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

   510

{    WWT_CAPTION,    14,    11,   319,     0,    13, STR_9810_ORDERS,	STR_018C_WINDOW_TITLE_DRAG_THIS},

   511