1

#include "stdafx.h"

     2

#include "ttd.h"

     3

#include "table/strings.h"

     5

#include "viewport.h"

     6

#include "window.h"

     7

#include "vehicle.h"

     8

#include "station.h"

     9

#include "gfx.h"

    10

#include "town.h"

    11

    12

#define VIEWPORT_DRAW_MEM (65536 * 2)

    13

    14

static bool _added_tile_sprite;

    15

static bool _offset_ground_sprites;

    16

    17

typedef struct StringSpriteToDraw {

    18

	uint16 string;

    19

	uint16 color;

    20

	struct StringSpriteToDraw *next;

    21

	int16 x;

    22

	int16 y;

    23

	uint32 params[2];

    24

	uint16 width;

    25

} StringSpriteToDraw;

    26

    27

typedef struct TileSpriteToDraw {

    28

	uint32 image;

    29

	struct TileSpriteToDraw *next;

    30

	int16 x, y;

    31

	byte z;

    32

} TileSpriteToDraw;

    33

    34

typedef struct ChildScreenSpriteToDraw {

    35

	uint32 image;

    36

	int16 x,y;

    37

	struct ChildScreenSpriteToDraw *next;

    38

} ChildScreenSpriteToDraw;

    39

    40

typedef struct ParentSpriteToDraw {

    41

	uint32 image;

    42

	int16 left, top, right, bottom;

    43

	int16 tile_x, tile_y;

    44

	int16 tile_right, tile_bottom;

    45

	ChildScreenSpriteToDraw *child;

    46

	byte unk16;

    47

	byte tile_z;

    48

	byte tile_z_bottom;

    49

} ParentSpriteToDraw;

    50

    51

typedef struct ViewportDrawer {

    52

	DrawPixelInfo dpi;

    53

    54

	byte *spritelist_mem, *eof_spritelist_mem;

    55

    56

	StringSpriteToDraw **last_string, *first_string;

    57

	TileSpriteToDraw **last_tile, *first_tile;

    58

    59

	ChildScreenSpriteToDraw **last_child;

    60

    61

	ParentSpriteToDraw **parent_list;

    62

	ParentSpriteToDraw **eof_parent_list;

    63

    64

	byte combine_sprites;

    65

    66

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

    67

	bool ground_child;

    68

} ViewportDrawer;

    69

    70

static ViewportDrawer *_cur_vd;

    71

    72

TileHighlightData * const _thd_ptr = &_thd;

    73

static TileInfo *_cur_ti;

    74

    75

    76

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

    77

{

    78

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

    79

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

    80

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

    81

	return p;

    82

}

    83

    84

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

    85

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

    86

{

    87

	ViewPort *vp;

    88

	Point pt;

    89

	byte z;

    90

	uint32 bit;

    91

    92

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

    93

		assert(vp!=endof(_viewports));

    94

		if (vp->width == 0)

    95

			break;

    96

	}

    97

	_active_viewports |= bit;

    98

    99

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

   100

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

   101

	vp->width = width;

   102

	vp->height = height;

   103

   104

	vp->zoom = zoom;

   105

   106

	vp->virtual_width = width << zoom;

   107

	vp->virtual_height = height << zoom;

   108

   109

	if (follow_flags & 0x80000000) {

   110

		Vehicle *veh;

   111

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

   112

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

   113

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

   114

	} else {

   115

		int x = GET_TILE_X(follow_flags) * 16;

   116

		int y = GET_TILE_Y(follow_flags) * 16;

   117

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

   118

		z = GetSlopeZ(x,y);

   119

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

   120

	}

   121

   122

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

   123

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

   124

	w->viewport = vp;

   125

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

   126

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

   127

}

   128

   129

static Point _vp_move_offs;

   130

   131

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

   132

{

   133

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

   134

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

   135

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

   136

				top + height > w->top &&

   137

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

   138

   139

			if (left < w->left) {

   140

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

   141

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

   142

				return;

   143

			}

   144

   145

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

   146

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

   147

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

   148

				return;

   149

			}

   150

   151

			if (top < w->top) {

   152

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

   153

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

   154

				return;

   155

			}

   156

   157

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

   158

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

   159

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

   160

				return;

   161

			}

   162

   163

			return;

   164

		}

   165

	}

   166

   167

	{

   168

		int xo = _vp_move_offs.x;

   169

		int yo = _vp_move_offs.y;

   170

   171

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

   172

			/* fully_outside */

   173

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

   174

			return;

   175

		}

   176

   177

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

   178

   179

		if (xo > 0) {

   180

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

   181

			left += xo;

   182

			width -= xo;

   183

		} else if (xo < 0) {

   184

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

   185

			width += xo;

   186

		}

   187

   188

		if (yo > 0) {

   189

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

   190

		} else if (yo < 0) {

   191

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

   192

		}

   193

	}

   194

}

   195

   196

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

   197

{

   198

	ViewPort *vp = w->viewport;

   199

	int old_left = vp->virtual_left;

   200

	int old_top = vp->virtual_top;

   201

	int i;

   202

	int left, top, width, height;

   203

   204

	vp->virtual_left = x;

   205

	vp->virtual_top = y;

   206

   207

	old_left >>= vp->zoom;

   208

	old_top >>= vp->zoom;

   209

	x >>= vp->zoom;

   210

	y >>= vp->zoom;

   211

   212

	old_left -= x;

   213

	old_top -= y;

   214

   215

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

   216

		return;

   217

   218

	_vp_move_offs.x = old_left;

   219

	_vp_move_offs.y = old_top;

   220

   221

	left = vp->left;

   222

	top = vp->top;

   223

	width = vp->width;

   224

	height = vp->height;

   225

   226

	if (left < 0) {

   227

		width += left;

   228

		left = 0;

   229

	}

   230

   231

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

   232

		width -= i;

   233

   234

	if (width > 0) {

   235

		if (top < 0) {

   236

			height += top;

   237

			top = 0;

   238

		}

   239

   240

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

   241

			height -= i;

   242

		}

   243

   244

		if (height > 0)

   245

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

   246

	}

   247

}

   248

   249

   250

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

   251

{

   252

	ViewPort *vp = w->viewport;

   253

	if (vp != NULL &&

   254

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

   255

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

   256

		return vp;

   257

   258

	return NULL;

   259

}

   260

   261

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

   262

	int z;

   263

	Point pt;

   264

	int a,b;

   265

   266

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

   267

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

   268

				Point pt = {-1, -1};

   269

				return pt;

   270

	}

   271

   272

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

   273

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

   274

   275

#if !defined(NEW_ROTATION)

   276

	a = y-x;

   277

	b = y+x;

   278

#else

   279

	a = x+y;

   280

	b = x-y;

   281

#endif

   282

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

   283

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

   284

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

   285

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

   286

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

   287

   288

	pt.x = a+z;

   289

	pt.y = b+z;

   290

   291

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

   292

		pt.x = pt.y = -1;

   293

	}

   294

   295

	return pt;

   296

}

   297

   298

static Point GetTileFromScreenXY(int x, int y)

   299

{

   300

	Window *w;

   301

	ViewPort *vp;

   302

	Point pt;

   303

   304

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

   305

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

   306

				return TranslateXYToTileCoord(vp, x, y);

   307

   308

	pt.y = pt.x = -1;

   309

	return pt;

   310

}

   311

   312

Point GetTileBelowCursor()

   313

{

   314

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

   315

}

   316

   317

   318

Point GetTileZoomCenterWindow(bool in, Window * w)

   319

{

   320

	int x, y;

   321

	ViewPort * vp;

   322

   323

	vp = w->viewport;

   324

   325

	if (in)	{

   326

		x = ( (_cursor.pos.x - vp->left ) >> 1) + (vp->width >> 2);

   327

		y = ( (_cursor.pos.y - vp->top ) >> 1) + (vp->height >> 2);

   328

	}

   329

	else {

   330

		x = vp->width - (_cursor.pos.x - vp->left);

   331

		y = vp->height - (_cursor.pos.y - vp->top);

   332

	}

   333

	return GetTileFromScreenXY(x+vp->left, y+vp->top);

   334

}

   335

   336

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

   337

{

   338

	ViewportDrawer *vd = _cur_vd;

   339

	TileSpriteToDraw *ts;

   340

   341

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

   342

   343

	ts = (TileSpriteToDraw*)vd->spritelist_mem;

   344

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

   345

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

   346

		return;

   347

	}

   348

   349

	vd->spritelist_mem += sizeof(TileSpriteToDraw);

   350

   351

	ts->image = image;

   352

	ts->next = NULL;

   353

	ts->x = x;

   354

	ts->y = y;

   355

	ts->z = z;

   356

	*vd->last_tile = ts;

   357

	vd->last_tile = &ts->next;

   358

}

   359

   360

void DrawGroundSprite(uint32 image)

   361

{

   362

	if (_offset_ground_sprites) {

   363

		// offset ground sprite because of foundation?

   364

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

   365

	} else {

   366

			_added_tile_sprite = true;

   367

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

   368

	}

   369

}

   370

   371

   372

void OffsetGroundSprite(int x, int y)

   373

{

   374

	_cur_vd->offs_x = x;

   375

	_cur_vd->offs_y = y;

   376

	_offset_ground_sprites = true;

   377

}

   378

   379

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

   380

{

   381

	ViewportDrawer *vd = _cur_vd;

   382

	int t;

   383

	uint32 image_org = image;

   384

	const SpriteDimension *sd;

   385

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

   386

   387

	sd = GetSpriteDimension(image & 0x3FFF);

   388

   389

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

   390

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

   391

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

   392

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

   393

		return;

   394

   395

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

   396

}

   397

   398

   399

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

   400

{

   401

	ViewportDrawer *vd = _cur_vd;

   402

	ParentSpriteToDraw *ps;

   403

	const SpriteDimension *sd;

   404

	Point pt;

   405

   406

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

   407

   408

	if (vd->combine_sprites == 2) {

   409

		AddCombinedSprite(image, x, y, z);

   410

		return;

   411

	}

   412

   413

	vd->last_child = NULL;

   414

   415

	ps = (ParentSpriteToDraw*)vd->spritelist_mem;

   416

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

   417

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

   418

		return;

   419

	}

   420

	if (vd->parent_list >= vd->eof_parent_list) {

   421

		// This can happen rarely, mostly when you zoom out completely

   422

		//  and have a lot of stuff that moves (and is added to the

   423

		//  sort-list, this function). To solve it, increase

   424

		//  parent_list somewhere below to a higher number.

   425

		// This can not really hurt you, it just gives some black

   426

		//  spots on the screen ;)

   427

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

   428

		return;

   429

	}

   430

   431

	vd->spritelist_mem += sizeof(ParentSpriteToDraw);

   432

   433

	ps->image = image;

   434

	ps->tile_x = x;

   435

	ps->tile_right = x + w - 1;

   436

   437

	ps->tile_y = y;

   438

	ps->tile_bottom = y + h - 1;

   439

   440

	ps->tile_z = z;

   441

	ps->tile_z_bottom = z + dz - 1;

   442

   443

	pt = RemapCoords(x, y, z);

   444

   445

	sd = GetSpriteDimension(image & 0x3FFF);

   446

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

   447

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

   448

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

   449

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

   450

		return;

   451

	}

   452

   453

	ps->unk16 = 0;

   454

	ps->child = NULL;

   455

	vd->last_child = &ps->child;

   456

   457

	*vd->parent_list++ = ps;

   458

   459

	if (vd->combine_sprites == 1) {

   460

		vd->combine_sprites = 2;

   461

	}

   462

}

   463

   464

void StartSpriteCombine()

   465

{

   466

	_cur_vd->combine_sprites = 1;

   467

}

   468

   469

void EndSpriteCombine()

   470

{

   471

	_cur_vd->combine_sprites = 0;

   472

}

   473

   474

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

   475

{

   476

	ViewportDrawer *vd = _cur_vd;

   477

	ChildScreenSpriteToDraw *cs;

   478

   479

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

   480

   481

	cs = (ChildScreenSpriteToDraw*) vd->spritelist_mem;

   482

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

   483

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

   484

		return;

   485

	}

   486

   487

	if (vd->last_child == NULL)

   488

		return;

   489

   490

	vd->spritelist_mem += sizeof(ChildScreenSpriteToDraw);

   491

   492

	*vd->last_child = cs;

   493

	vd->last_child = &cs->next;

   494

   495

	cs->image = image;

   496

	cs->x = x;

   497

	cs->y = y;

   498

	cs->next = NULL;

   499

}

   500

   501

/* Returns a StringSpriteToDraw */

   502

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

   503

{

   504

	ViewportDrawer *vd = _cur_vd;

   505

	StringSpriteToDraw *ss;

   506

   507

	ss = (StringSpriteToDraw*)vd->spritelist_mem;

   508

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

   509

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

   510

		return NULL;

   511

	}

   512

   513

	vd->spritelist_mem += sizeof(StringSpriteToDraw);

   514

   515

	ss->string = string;

   516

	ss->next = NULL;

   517

	ss->x = x;

   518

	ss->y = y;

   519

	ss->params[0] = params_1;

   520

	ss->params[1] = params_2;

   521

	ss->width = 0;

   522

   523