1

#include "stdafx.h"

     2

#include "ttd.h"

     3

#include "viewport.h"

     4

#include "window.h"

     5

#include "vehicle.h"

     6

#include "station.h"

     7

#include "gfx.h"

     8

#include "town.h"

     9

    10

#define VIEWPORT_DRAW_MEM (65536)

    11

    12

static bool _added_tile_sprite;

    13

static bool _offset_ground_sprites;

    14

    15

typedef struct StringSpriteToDraw {

    16

	uint16 string;

    17

	uint16 color;

    18

	struct StringSpriteToDraw *next;

    19

	int16 x;

    20

	int16 y;

    21

	uint32 params[2];

    22

	uint16 width;

    23

} StringSpriteToDraw;

    24

    25

typedef struct TileSpriteToDraw {

    26

	uint32 image;

    27

	struct TileSpriteToDraw *next;

    28

	int16 x, y;

    29

	byte z;

    30

} TileSpriteToDraw;

    31

    32

typedef struct ChildScreenSpriteToDraw {

    33

	uint32 image;

    34

	int16 x,y;

    35

	struct ChildScreenSpriteToDraw *next;

    36

} ChildScreenSpriteToDraw;

    37

    38

typedef struct ParentSpriteToDraw {

    39

	uint32 image;

    40

	int16 left, top, right, bottom;

    41

	int16 tile_x, tile_y;

    42

	int16 tile_right, tile_bottom;

    43

	ChildScreenSpriteToDraw *child;

    44

	byte unk16;

    45

	byte tile_z;

    46

	byte tile_z_bottom;

    47

} ParentSpriteToDraw;

    48

    49

typedef struct ViewportDrawer {

    50

	DrawPixelInfo dpi;

    51

    52

	byte *spritelist_mem, *eof_spritelist_mem;

    53

    54

	StringSpriteToDraw **last_string, *first_string;

    55

	TileSpriteToDraw **last_tile, *first_tile;

    56

    57

	ChildScreenSpriteToDraw **last_child;

    58

    59

	ParentSpriteToDraw **parent_list;

    60

    61

	byte combine_sprites;

    62

    63

	int offs_x, offs_y; // used when drawing ground sprites relative

    64

	bool ground_child;

    65

} ViewportDrawer;

    66

    67

static ViewportDrawer *_cur_vd;

    68

    69

TileHighlightData * const _thd_ptr = &_thd;

    70

static TileInfo *_cur_ti;

    71

    72

    73

Point MapXYZToViewport(ViewPort *vp, uint x, uint y, uint z)

    74

{

    75

	Point p = RemapCoords(x, y, z);

    76

	p.x -= (vp->virtual_width>>1);

    77

	p.y -= (vp->virtual_height>>1);

    78

	return p;

    79

}

    80

    81

void AssignWindowViewport(Window *w, int x, int y, 

    82

	int width, int height, uint32 follow_flags, byte zoom)

    83

{

    84

	ViewPort *vp;

    85

	Point pt;

    86

	byte z;

    87

	uint32 bit;

    88

    89

	for(vp=_viewports,bit=1; ; vp++, bit<<=1) {

    90

		assert(vp!=endof(_viewports));

    91

		if (vp->width == 0)

    92

			break;

    93

	}

    94

	_active_viewports |= bit;

    95

    96

	vp->left = x + w->left;

    97

	vp->top = y + w->top;

    98

	vp->width = width;

    99

	vp->height = height;

   100

   101

	vp->zoom = zoom;

   102

   103

	vp->virtual_width = width << zoom;

   104

	vp->virtual_height = height << zoom;

   105

   106

	if (follow_flags & 0x80000000) {

   107

		Vehicle *veh;

   108

		WP(w,vp_d).follow_vehicle = (VehicleID)(follow_flags & 0xFFFF);

   109

		veh = &_vehicles[WP(w,vp_d).follow_vehicle];

   110

		pt = MapXYZToViewport(vp, veh->x_pos, veh->y_pos, veh->z_pos);

   111

	} else {

   112

		int x = GET_TILE_X(follow_flags) * 16;

   113

		int y = GET_TILE_Y(follow_flags) * 16;

   114

		WP(w,vp_d).follow_vehicle = 0xFFFF;

   115

		z = GetSlopeZ(x,y);

   116

		pt = MapXYZToViewport(vp, x,y, z);

   117

	}

   118

   119

	WP(w,vp_d).scrollpos_x = pt.x;

   120

	WP(w,vp_d).scrollpos_y = pt.y;

   121

	w->viewport = vp;

   122

	vp->virtual_left = 0;//pt.x;

   123

	vp->virtual_top = 0;//pt.y;

   124

}

   125

   126

static Point _vp_move_offs;

   127

   128

static void DoSetViewportPosition(Window *w, int left, int top, int width, int height)

   129

{

   130

	for (; w < _last_window; w++) {

   131

		if (left + width > w->left &&

   132

				w->left+w->width > left &&

   133

				top + height > w->top &&

   134

				w->top+w->height > top) {

   135

   136

			if (left < w->left) {

   137

				DoSetViewportPosition(w, left, top, w->left - left, height);

   138

				DoSetViewportPosition(w, left + (w->left - left), top, width - (w->left - left), height);

   139

				return;

   140

			}

   141

   142

			if (left + width > w->left + w->width) {

   143

				DoSetViewportPosition(w, left, top, (w->left + w->width - left), height);

   144

				DoSetViewportPosition(w, left + (w->left + w->width - left), top, width - (w->left + w->width - left) , height);

   145

				return;

   146

			}

   147

   148

			if (top < w->top) {

   149

				DoSetViewportPosition(w, left, top, width, (w->top - top));

   150

				DoSetViewportPosition(w, left, top + (w->top - top), width, height - (w->top - top));

   151

				return;

   152

			}

   153

   154

			if (top + height > w->top + w->height) {

   155

				DoSetViewportPosition(w, left, top, width, (w->top + w->height - top));

   156

				DoSetViewportPosition(w, left, top + (w->top + w->height - top), width , height - (w->top + w->height - top));

   157

				return;

   158

			}

   159

   160

			return;

   161

		}

   162

	}

   163

   164

	{

   165

		int xo = _vp_move_offs.x;

   166

		int yo = _vp_move_offs.y;

   167

   168

		if (abs(xo) >= width || abs(yo) >= height) {

   169

			/* fully_outside */

   170

			RedrawScreenRect(left, top, left+width, top+height);

   171

			return;

   172

		}

   173

   174

		GfxScroll(left, top, width, height, xo, yo);

   175

   176

		if (xo > 0) {

   177

			RedrawScreenRect(left, top, xo + left, top + height);

   178

			left += xo;

   179

			width -= xo;

   180

		} else if (xo < 0) {

   181

			RedrawScreenRect(left+width+xo, top, left+width, top + height);

   182

			width += xo;

   183

		}

   184

   185

		if (yo > 0) {

   186

			RedrawScreenRect(left, top, width+left, top + yo);

   187

		} else if (yo < 0) {

   188

			RedrawScreenRect(left, top + height + yo, width+left, top + height);

   189

		}

   190

	}

   191

}

   192

   193

void SetViewportPosition(Window *w, int x, int y)

   194

{

   195

	ViewPort *vp = w->viewport;

   196

	int old_left = vp->virtual_left;

   197

	int old_top = vp->virtual_top;

   198

	int i;

   199

	int left, top, width, height;

   200

   201

	vp->virtual_left = x;

   202

	vp->virtual_top = y;

   203

   204

	old_left >>= vp->zoom;

   205

	old_top >>= vp->zoom;

   206

	x >>= vp->zoom;

   207

	y >>= vp->zoom;

   208

   209

	old_left -= x;

   210

	old_top -= y;

   211

   212

	if (old_top == 0 && old_left == 0)

   213

		return;

   214

   215

	_vp_move_offs.x = old_left;

   216

	_vp_move_offs.y = old_top;

   217

   218

	left = vp->left;

   219

	top = vp->top;

   220

	width = vp->width;

   221

	height = vp->height;

   222

   223

	if (left < 0) {

   224

		width += left;

   225

		left = 0;

   226

	}

   227

   228

	if ( (i=(left + width - _screen.width)) >= 0)

   229

		width -= i;

   230

   231

	if (width > 0) {

   232

		if (top < 0) {

   233

			height += top;

   234

			top = 0;

   235

		}

   236

   237

		if ( (i=(top + height - _screen.height)) >= 0) {

   238

			height -= i;

   239

		}

   240

   241

		if (height > 0)

   242

			DoSetViewportPosition(w+1, left, top, width, height);

   243

	}

   244

}

   245

   246

   247

ViewPort *IsPtInWindowViewport(Window *w, int x, int y)

   248

{

   249

	ViewPort *vp = w->viewport;

   250

	if (vp != NULL &&

   251

	    IS_INT_INSIDE(x, vp->left, vp->left + vp->width) &&

   252

			IS_INT_INSIDE(y, vp->top, vp->top + vp->height))

   253

		return vp;

   254

   255

	return NULL;

   256

}

   257

   258

Point TranslateXYToTileCoord(ViewPort *vp, int x, int y) {

   259

	int z;

   260

	Point pt;

   261

	int a,b;

   262

   263

	if ( (uint)(x -= vp->left) >= (uint)vp->width ||

   264

				(uint)(y -= vp->top) >= (uint)vp->height) {

   265

				Point pt = {-1, -1};

   266

				return pt;

   267

	}

   268

   269

	x = ((x << vp->zoom) + vp->virtual_left) >> 2;

   270

	y = ((y << vp->zoom) + vp->virtual_top) >> 1;

   271

   272

#if !defined(NEW_ROTATION)

   273

	a = y-x;

   274

	b = y+x;

   275

#else

   276

	a = x+y;

   277

	b = x-y;

   278

#endif

   279

	z = GetSlopeZ(a, b) >> 1;

   280

	z = GetSlopeZ(a+z, b+z) >> 1;

   281

	z = GetSlopeZ(a+z, b+z) >> 1;

   282

	z = GetSlopeZ(a+z, b+z) >> 1;

   283

	z = GetSlopeZ(a+z, b+z) >> 1;

   284

   285

	pt.x = a+z;

   286

	pt.y = b+z;

   287

   288

	if ((uint)pt.x >= TILE_X_MAX*16 || (uint)pt.y >= TILE_Y_MAX*16) {

   289

		pt.x = pt.y = -1;

   290

	}

   291

   292

	return pt;

   293

}

   294

   295

static Point GetTileFromScreenXY(int x, int y)

   296

{	

   297

	Window *w;

   298

	ViewPort *vp;

   299

	Point pt;

   300

   301

	if ( (w = FindWindowFromPt(x, y)) != NULL && 

   302

			 (vp = IsPtInWindowViewport(w, x, y)) != NULL)

   303

				return TranslateXYToTileCoord(vp, x, y);

   304

   305

	pt.y = pt.x = -1;

   306

	return pt;

   307

}

   308

   309

Point GetTileBelowCursor()

   310

{

   311

	return GetTileFromScreenXY(_cursor.pos.x, _cursor.pos.y);

   312

}

   313

   314

Point GetTileZoomCenter(bool in)

   315

{

   316

	int x, y;

   317

   318

	if (in)	{

   319

		x = (_cursor.pos.x >> 1) + (_screen.width >> 2);

   320

		y = (_cursor.pos.y >> 1) + (_screen.height >> 2);

   321

	}

   322

	else {

   323

		x = _screen.width - _cursor.pos.x;

   324

		y = _screen.height - _cursor.pos.y;

   325

	}

   326

	return GetTileFromScreenXY(x, y);

   327

}

   328

   329

void DrawGroundSpriteAt(uint32 image, int x, int y, byte z)

   330

{

   331

	ViewportDrawer *vd = _cur_vd;

   332

	TileSpriteToDraw *ts;

   333

   334

	assert( (image & 0x3fff) < NUM_SPRITES);

   335

   336

	ts = (TileSpriteToDraw*)vd->spritelist_mem;

   337

	if ((byte*)ts >= vd->eof_spritelist_mem) {

   338

		DEBUG(misc, 0) ("Out of sprite mem\n");

   339

		return;

   340

	}

   341

   342

	vd->spritelist_mem += sizeof(TileSpriteToDraw);

   343

   344

	ts->image = image;

   345

	ts->next = NULL;

   346

	ts->x = x;

   347

	ts->y = y;

   348

	ts->z = z;

   349

	*vd->last_tile = ts;

   350

	vd->last_tile = &ts->next;	

   351

}

   352

   353

void DrawGroundSprite(uint32 image)

   354

{

   355

	if (_offset_ground_sprites) {

   356

		// offset ground sprite because of foundation?

   357

		AddChildSpriteScreen(image, _cur_vd->offs_x, _cur_vd->offs_y);

   358

	} else {

   359

			_added_tile_sprite = true;

   360

		DrawGroundSpriteAt(image, _cur_ti->x, _cur_ti->y, _cur_ti->z);

   361

	}

   362

}

   363

   364

   365

void OffsetGroundSprite(int x, int y)

   366

{

   367

	_cur_vd->offs_x = x;

   368

	_cur_vd->offs_y = y;

   369

	_offset_ground_sprites = true;

   370

}

   371

   372

static void AddCombinedSprite(uint32 image, int x, int y, byte z)

   373

{

   374

	ViewportDrawer *vd = _cur_vd;

   375

	int t;

   376

	uint32 image_org = image;

   377

	const SpriteDimension *sd;

   378

	Point pt = RemapCoords(x, y, z);

   379

   380

	sd = GetSpriteDimension(image & 0x3FFF);

   381

   382

	if ((t = pt.x + sd->xoffs) >= vd->dpi.left + vd->dpi.width || 

   383

			(t + sd->xsize) <= vd->dpi.left ||

   384

			(t = pt.y + sd->yoffs) >= vd->dpi.top + vd->dpi.height ||

   385

			(t + sd->ysize) <= vd->dpi.top)

   386

		return;

   387

   388

	AddChildSpriteScreen(image_org, pt.x - vd->parent_list[-1]->left, pt.y - vd->parent_list[-1]->top);

   389

}

   390

   391

   392

void AddSortableSpriteToDraw(uint32 image, int x, int y, int w, int h, byte dz, byte z)

   393

{

   394

	ViewportDrawer *vd = _cur_vd;

   395

	ParentSpriteToDraw *ps;

   396

	const SpriteDimension *sd;

   397

	Point pt;

   398

   399

	assert( (image & 0x3fff) < NUM_SPRITES);

   400

   401

	if (vd->combine_sprites == 2) {

   402

		AddCombinedSprite(image, x, y, z);

   403

		return;

   404

	}

   405

   406

	vd->last_child = NULL;

   407

   408

	ps = (ParentSpriteToDraw*)vd->spritelist_mem;

   409

	if ((byte*)ps >= vd->eof_spritelist_mem) {

   410

		DEBUG(misc, 0) ("Out of sprite mem\n");

   411

		return;

   412

	}

   413

   414

	ps->image = image;

   415

	ps->tile_x = x;

   416

	ps->tile_right = x + w - 1;

   417

   418

	ps->tile_y = y;

   419

	ps->tile_bottom = y + h - 1;

   420

   421

	ps->tile_z = z;

   422

	ps->tile_z_bottom = z + dz - 1;

   423

   424

	pt = RemapCoords(x, y, z);

   425

   426

	sd = GetSpriteDimension(image & 0x3FFF);

   427

	if ((ps->left = (pt.x += sd->xoffs)) >= vd->dpi.left + vd->dpi.width || 

   428

			(ps->right = (pt.x + sd->xsize)) <= vd->dpi.left ||

   429

			(ps->top = (pt.y += sd->yoffs)) >= vd->dpi.top + vd->dpi.height ||

   430

			(ps->bottom = (pt.y + sd->ysize)) <= vd->dpi.top) {

   431

		return;

   432

	}

   433

   434

	ps->unk16 = 0;

   435

	ps->child = NULL;

   436

	vd->last_child = &ps->child;

   437

   438

	vd->spritelist_mem += sizeof(ParentSpriteToDraw);

   439

	*vd->parent_list++ = ps;

   440

   441

	if (vd->combine_sprites == 1) {

   442

		vd->combine_sprites = 2;

   443

	}

   444

}

   445

   446

void StartSpriteCombine()

   447

{

   448

	_cur_vd->combine_sprites = 1;

   449

}

   450

   451

void EndSpriteCombine()

   452

{

   453

	_cur_vd->combine_sprites = 0;

   454

}

   455

   456

void AddChildSpriteScreen(uint32 image, int x, int y)

   457

{

   458

	ViewportDrawer *vd = _cur_vd;

   459

	ChildScreenSpriteToDraw *cs;

   460

   461

	cs = (ChildScreenSpriteToDraw*) vd->spritelist_mem;

   462

	if ((byte*)cs >= vd->eof_spritelist_mem) {

   463

		DEBUG(misc,0) ("Out of sprite mem\n");

   464

		return;

   465

	}

   466

   467

	if (vd->last_child == NULL)

   468

		return;

   469

   470

	*vd->last_child = cs;

   471

	vd->last_child = &cs->next;

   472

   473

	vd->spritelist_mem += sizeof(ChildScreenSpriteToDraw);

   474

   475

	cs->image = image;

   476

	cs->x = x;

   477

	cs->y = y;

   478

	cs->next = NULL;

   479

}

   480

   481

/* Returns a StringSpriteToDraw */

   482

void *AddStringToDraw(int x, int y, StringID string, uint32 params_1, uint32 params_2)

   483

{

   484

	ViewportDrawer *vd = _cur_vd;

   485

	StringSpriteToDraw *ss;

   486

   487

	ss = (StringSpriteToDraw*)vd->spritelist_mem;

   488

	if ((byte*)ss >= vd->eof_spritelist_mem) {

   489

		DEBUG(misc, 0) ("Out of sprite mem\n");

   490

		return NULL;

   491

	}

   492

   493

	vd->spritelist_mem += sizeof(StringSpriteToDraw);

   494

   495

	ss->string = string;

   496

	ss->next = NULL;

   497

	ss->x = x;

   498

	ss->y = y;

   499

	ss->params[0] = params_1;

   500

	ss->params[1] = params_2;

   501

	ss->width = 0;

   502

   503

	*vd->last_string = ss;

   504

	vd->last_string = &ss->next;

   505

   506

	return ss;

   507

}

   508

   509

/* Debugging code */

   510

   511

#ifdef DEBUG_TILE_PUSH

   512

static int _num_push;

   513

static uint _pushed_tile[200];

   514

static int _pushed_track[200];

   515

   516

static uint _stored_tile[200];

   517

static int _stored_track[200];

   518

static int _num_stored;

   519

   520

void dbg_store_path()

   521

{

   522

	memcpy(_stored_tile, _pushed_tile, sizeof(_stored_tile));

   523

	memcpy(_stored_track, _pushed_track, sizeof(_stored_tile));

   524

	_num_stored = _num_push;

   525

	MarkWholeScreenDirty();

   526

}

   527

   528

void dbg_push_tile(uint tile, int track)

   529

{

   530

	_pushed_tile[_num_push] = tile;