1

#include "stdafx.h"

     2

#include "ttd.h"

     3

#include "table/strings.h"

     4

#include "viewport.h"

     5

#include "window.h"

     6

#include "vehicle.h"

     7

#include "station.h"

     8

#include "gfx.h"

     9

#include "town.h"

    10

    11

#define VIEWPORT_DRAW_MEM (65536 * 2)

    12

    13

static bool _added_tile_sprite;

    14

static bool _offset_ground_sprites;

    15

    16

typedef struct StringSpriteToDraw {

    17

	uint16 string;

    18

	uint16 color;

    19

	struct StringSpriteToDraw *next;

    20

	int16 x;

    21

	int16 y;

    22

	uint32 params[2];

    23

	uint16 width;

    24

} StringSpriteToDraw;

    25

    26

typedef struct TileSpriteToDraw {

    27

	uint32 image;

    28

	struct TileSpriteToDraw *next;

    29

	int16 x, y;

    30

	byte z;

    31

} TileSpriteToDraw;

    32

    33

typedef struct ChildScreenSpriteToDraw {

    34

	uint32 image;

    35

	int16 x,y;

    36

	struct ChildScreenSpriteToDraw *next;

    37

} ChildScreenSpriteToDraw;

    38

    39

typedef struct ParentSpriteToDraw {

    40

	uint32 image;

    41

	int16 left, top, right, bottom;

    42

	int16 tile_x, tile_y;

    43

	int16 tile_right, tile_bottom;

    44

	ChildScreenSpriteToDraw *child;

    45

	byte unk16;

    46

	byte tile_z;

    47

	byte tile_z_bottom;

    48

} ParentSpriteToDraw;

    49

    50

typedef struct ViewportDrawer {

    51

	DrawPixelInfo dpi;

    52

    53

	byte *spritelist_mem, *eof_spritelist_mem;

    54

    55

	StringSpriteToDraw **last_string, *first_string;

    56

	TileSpriteToDraw **last_tile, *first_tile;

    57

    58

	ChildScreenSpriteToDraw **last_child;

    59

    60

	ParentSpriteToDraw **parent_list;

    61

	ParentSpriteToDraw **eof_parent_list;

    62

    63

	byte combine_sprites;

    64

    65

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

    66

	bool ground_child;

    67

} ViewportDrawer;

    68

    69

static ViewportDrawer *_cur_vd;

    70

    71

TileHighlightData * const _thd_ptr = &_thd;

    72

static TileInfo *_cur_ti;

    73

    74

    75

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

    76

{

    77

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

    78

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

    79

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

    80

	return p;

    81

}

    82

    83

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

    84

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

    85

{

    86

	ViewPort *vp;

    87

	Point pt;

    88

	byte z;

    89

	uint32 bit;

    90

    91

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

    92

		assert(vp!=endof(_viewports));

    93

		if (vp->width == 0)

    94

			break;

    95

	}

    96

	_active_viewports |= bit;

    97

    98

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

    99

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

   100

	vp->width = width;

   101

	vp->height = height;

   102

   103

	vp->zoom = zoom;

   104

   105

	vp->virtual_width = width << zoom;

   106

	vp->virtual_height = height << zoom;

   107

   108

	if (follow_flags & 0x80000000) {

   109

		Vehicle *veh;

   110

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

   111

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

   112

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

   113

	} else {

   114

		int x = GET_TILE_X(follow_flags) * 16;

   115

		int y = GET_TILE_Y(follow_flags) * 16;

   116

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

   117

		z = GetSlopeZ(x,y);

   118

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

   119

	}

   120

   121

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

   122

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

   123

	w->viewport = vp;

   124

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

   125

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

   126

}

   127

   128

static Point _vp_move_offs;

   129

   130

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

   131

{

   132

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

   133

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

   134

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

   135

				top + height > w->top &&

   136

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

   137

   138

			if (left < w->left) {

   139

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

   140

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

   141

				return;

   142

			}

   143

   144

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

   145

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

   146

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

   147

				return;

   148

			}

   149

   150

			if (top < w->top) {

   151

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

   152

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

   153

				return;

   154

			}

   155

   156

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

   157

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

   158

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

   159

				return;

   160

			}

   161

   162

			return;

   163

		}

   164

	}

   165

   166

	{

   167

		int xo = _vp_move_offs.x;

   168

		int yo = _vp_move_offs.y;

   169

   170

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

   171

			/* fully_outside */

   172

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

   173

			return;

   174

		}

   175

   176

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

   177

   178

		if (xo > 0) {

   179

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

   180

			left += xo;

   181

			width -= xo;

   182

		} else if (xo < 0) {

   183

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

   184

			width += xo;

   185

		}

   186

   187

		if (yo > 0) {

   188

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

   189

		} else if (yo < 0) {

   190

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

   191

		}

   192

	}

   193

}

   194

   195

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

   196

{

   197

	ViewPort *vp = w->viewport;

   198

	int old_left = vp->virtual_left;

   199

	int old_top = vp->virtual_top;

   200

	int i;

   201

	int left, top, width, height;

   202

   203

	vp->virtual_left = x;

   204

	vp->virtual_top = y;

   205

   206

	old_left >>= vp->zoom;

   207

	old_top >>= vp->zoom;

   208

	x >>= vp->zoom;

   209

	y >>= vp->zoom;

   210

   211

	old_left -= x;

   212

	old_top -= y;

   213

   214

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

   215

		return;

   216

   217

	_vp_move_offs.x = old_left;

   218

	_vp_move_offs.y = old_top;

   219

   220

	left = vp->left;

   221

	top = vp->top;

   222

	width = vp->width;

   223

	height = vp->height;

   224

   225

	if (left < 0) {

   226

		width += left;

   227

		left = 0;

   228

	}

   229

   230

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

   231

		width -= i;

   232

   233

	if (width > 0) {

   234

		if (top < 0) {

   235

			height += top;

   236

			top = 0;

   237

		}

   238

   239

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

   240

			height -= i;

   241

		}

   242

   243

		if (height > 0)

   244

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

   245

	}

   246

}

   247

   248

   249

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

   250

{

   251

	ViewPort *vp = w->viewport;

   252

	if (vp != NULL &&

   253

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

   254

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

   255

		return vp;

   256

   257

	return NULL;

   258

}

   259

   260

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

   261

	int z;

   262

	Point pt;

   263

	int a,b;

   264

   265

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

   266

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

   267

				Point pt = {-1, -1};

   268

				return pt;

   269

	}

   270

   271

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

   272

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

   273

   274

#if !defined(NEW_ROTATION)

   275

	a = y-x;

   276

	b = y+x;

   277

#else

   278

	a = x+y;

   279

	b = x-y;

   280

#endif

   281

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

   282

	z = GetSlopeZ(a+z, b+z) >> 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

   287

	pt.x = a+z;

   288

	pt.y = b+z;

   289

   290

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

   291

		pt.x = pt.y = -1;

   292

	}

   293

   294

	return pt;

   295

}

   296

   297

static Point GetTileFromScreenXY(int x, int y)

   298

{

   299

	Window *w;

   300

	ViewPort *vp;

   301

	Point pt;

   302

   303

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

   304

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

   305

				return TranslateXYToTileCoord(vp, x, y);

   306

   307

	pt.y = pt.x = -1;

   308

	return pt;

   309

}

   310

   311

Point GetTileBelowCursor()

   312

{

   313

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

   314

}

   315

   316

   317

Point GetTileZoomCenterWindow(bool in, Window * w)

   318

{

   319

	int x, y;

   320

	ViewPort * vp;

   321

   322

	vp = w->viewport;

   323

   324

	if (in)	{

   325

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

   326

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

   327

	}

   328

	else {

   329

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

   330

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

   331

	}

   332

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

   333

}

   334

   335

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

   336

{

   337

	ViewportDrawer *vd = _cur_vd;

   338

	TileSpriteToDraw *ts;

   339

   340

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

   341

   342

	ts = (TileSpriteToDraw*)vd->spritelist_mem;

   343

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

   344

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

   345

		return;

   346

	}

   347

   348

	vd->spritelist_mem += sizeof(TileSpriteToDraw);

   349

   350

	ts->image = image;

   351

	ts->next = NULL;

   352

	ts->x = x;

   353

	ts->y = y;

   354

	ts->z = z;

   355

	*vd->last_tile = ts;

   356

	vd->last_tile = &ts->next;

   357

}

   358

   359

void DrawGroundSprite(uint32 image)

   360

{

   361

	if (_offset_ground_sprites) {

   362

		// offset ground sprite because of foundation?

   363

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

   364

	} else {

   365

			_added_tile_sprite = true;

   366

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

   367

	}

   368

}

   369

   370

   371

void OffsetGroundSprite(int x, int y)

   372

{

   373

	_cur_vd->offs_x = x;

   374

	_cur_vd->offs_y = y;

   375

	_offset_ground_sprites = true;

   376

}

   377

   378

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

   379

{

   380

	ViewportDrawer *vd = _cur_vd;

   381

	int t;

   382

	uint32 image_org = image;

   383

	const SpriteDimension *sd;

   384

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

   385

   386

	sd = GetSpriteDimension(image & 0x3FFF);

   387

   388

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

   389

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

   390

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

   391

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

   392

		return;

   393

   394

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

   395

}

   396

   397

   398

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

   399

{

   400

	ViewportDrawer *vd = _cur_vd;

   401

	ParentSpriteToDraw *ps;

   402

	const SpriteDimension *sd;

   403

	Point pt;

   404

   405

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

   406

   407

	if (vd->combine_sprites == 2) {

   408

		AddCombinedSprite(image, x, y, z);

   409

		return;

   410

	}

   411

   412

	vd->last_child = NULL;

   413

   414

	ps = (ParentSpriteToDraw*)vd->spritelist_mem;

   415

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

   416

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

   417

		return;

   418

	}

   419

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

   420

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

   421

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

   422

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

   423

		//  parent_list somewhere below to a higher number.

   424

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

   425

		//  spots on the screen ;)

   426

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

   427

		return;

   428

	}

   429

   430

	vd->spritelist_mem += sizeof(ParentSpriteToDraw);

   431

   432

	ps->image = image;

   433

	ps->tile_x = x;

   434

	ps->tile_right = x + w - 1;

   435

   436

	ps->tile_y = y;

   437

	ps->tile_bottom = y + h - 1;

   438

   439

	ps->tile_z = z;

   440

	ps->tile_z_bottom = z + dz - 1;

   441

   442

	pt = RemapCoords(x, y, z);

   443

   444

	sd = GetSpriteDimension(image & 0x3FFF);

   445

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

   446

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

   447

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

   448

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

   449

		return;

   450

	}

   451

   452

	ps->unk16 = 0;

   453

	ps->child = NULL;

   454

	vd->last_child = &ps->child;

   455

   456

	*vd->parent_list++ = ps;

   457

   458

	if (vd->combine_sprites == 1) {

   459

		vd->combine_sprites = 2;

   460

	}

   461

}

   462

   463

void StartSpriteCombine()

   464

{

   465

	_cur_vd->combine_sprites = 1;

   466

}

   467

   468

void EndSpriteCombine()

   469

{

   470

	_cur_vd->combine_sprites = 0;

   471

}

   472

   473

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

   474

{

   475

	ViewportDrawer *vd = _cur_vd;

   476

	ChildScreenSpriteToDraw *cs;

   477

   478

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

   479

   480

	cs = (ChildScreenSpriteToDraw*) vd->spritelist_mem;

   481

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

   482

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

   483

		return;

   484

	}

   485

   486

	if (vd->last_child == NULL)

   487

		return;

   488

   489

	vd->spritelist_mem += sizeof(ChildScreenSpriteToDraw);

   490

   491

	*vd->last_child = cs;

   492

	vd->last_child = &cs->next;

   493

   494

	cs->image = image;

   495

	cs->x = x;

   496

	cs->y = y;

   497

	cs->next = NULL;

   498

}

   499

   500

/* Returns a StringSpriteToDraw */

   501

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

   502

{

   503

	ViewportDrawer *vd = _cur_vd;

   504

	StringSpriteToDraw *ss;

   505

   506

	ss = (StringSpriteToDraw*)vd->spritelist_mem;

   507

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

   508

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

   509

		return NULL;

   510

	}

   511

   512

	vd->spritelist_mem += sizeof(StringSpriteToDraw);

   513

   514

	ss->string = string;

   515

	ss->next = NULL;

   516

	ss->x = x;

   517

	ss->y = y;

   518

	ss->params[0] = params_1;

   519

	ss->params[1] = params_2;

   520

	ss->width = 0;

   521

   522

	*vd->last_string = ss;

   523

	vd->last_string = &ss->next;