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 * 2)

    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

	ParentSpriteToDraw **eof_parent_list;

    61

    62

	byte combine_sprites;

    63

    64

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

    65

	bool ground_child;

    66

} ViewportDrawer;

    67

    68

static ViewportDrawer *_cur_vd;

    69

    70

TileHighlightData * const _thd_ptr = &_thd;

    71

static TileInfo *_cur_ti;

    72

    73

    74

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

    75

{

    76

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

    77

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

    78

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

    79

	return p;

    80

}

    81

    82

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

    83

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

    84

{

    85

	ViewPort *vp;

    86

	Point pt;

    87

	byte z;

    88

	uint32 bit;

    89

    90

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

    91

		assert(vp!=endof(_viewports));

    92

		if (vp->width == 0)

    93

			break;

    94

	}

    95

	_active_viewports |= bit;

    96

    97

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

    98

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

    99

	vp->width = width;

   100

	vp->height = height;

   101

   102

	vp->zoom = zoom;

   103

   104

	vp->virtual_width = width << zoom;

   105

	vp->virtual_height = height << zoom;

   106

   107

	if (follow_flags & 0x80000000) {

   108

		Vehicle *veh;

   109

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

   110

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

   111

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

   112

	} else {

   113

		int x = GET_TILE_X(follow_flags) * 16;

   114

		int y = GET_TILE_Y(follow_flags) * 16;

   115

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

   116

		z = GetSlopeZ(x,y);

   117

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

   118

	}

   119

   120

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

   121

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

   122

	w->viewport = vp;

   123

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

   124

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

   125

}

   126

   127

static Point _vp_move_offs;

   128

   129

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

   130

{

   131

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

   132

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

   133

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

   134

				top + height > w->top &&

   135

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

   136

   137

			if (left < w->left) {

   138

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

   139

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

   140

				return;

   141

			}

   142

   143

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

   144

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

   145

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

   146

				return;

   147

			}

   148

   149

			if (top < w->top) {

   150

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

   151

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

   152

				return;

   153

			}

   154

   155

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

   156

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

   157

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

   158

				return;

   159

			}

   160

   161

			return;

   162

		}

   163

	}

   164

   165

	{

   166

		int xo = _vp_move_offs.x;

   167

		int yo = _vp_move_offs.y;

   168

   169

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

   170

			/* fully_outside */

   171

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

   172

			return;

   173

		}

   174

   175

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

   176

   177

		if (xo > 0) {

   178

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

   179

			left += xo;

   180

			width -= xo;

   181

		} else if (xo < 0) {

   182

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

   183

			width += xo;

   184

		}

   185

   186

		if (yo > 0) {

   187

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

   188

		} else if (yo < 0) {

   189

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

   190

		}

   191

	}

   192

}

   193

   194

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

   195

{

   196

	ViewPort *vp = w->viewport;

   197

	int old_left = vp->virtual_left;

   198

	int old_top = vp->virtual_top;

   199

	int i;

   200

	int left, top, width, height;

   201

   202

	vp->virtual_left = x;

   203

	vp->virtual_top = y;

   204

   205

	old_left >>= vp->zoom;

   206

	old_top >>= vp->zoom;

   207

	x >>= vp->zoom;

   208

	y >>= vp->zoom;

   209

   210

	old_left -= x;

   211

	old_top -= y;

   212

   213

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

   214

		return;

   215

   216

	_vp_move_offs.x = old_left;

   217

	_vp_move_offs.y = old_top;

   218

   219

	left = vp->left;

   220

	top = vp->top;

   221

	width = vp->width;

   222

	height = vp->height;

   223

   224

	if (left < 0) {

   225

		width += left;

   226

		left = 0;

   227

	}

   228

   229

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

   230

		width -= i;

   231

   232

	if (width > 0) {

   233

		if (top < 0) {

   234

			height += top;

   235

			top = 0;

   236

		}

   237

   238

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

   239

			height -= i;

   240

		}

   241

   242

		if (height > 0)

   243

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

   244

	}

   245

}

   246

   247

   248

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

   249

{

   250

	ViewPort *vp = w->viewport;

   251

	if (vp != NULL &&

   252

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

   253

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

   254

		return vp;

   255

   256

	return NULL;

   257

}

   258

   259

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

   260

	int z;

   261

	Point pt;

   262

	int a,b;

   263

   264

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

   265

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

   266

				Point pt = {-1, -1};

   267

				return pt;

   268

	}

   269

   270

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

   271

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

   272

   273

#if !defined(NEW_ROTATION)

   274

	a = y-x;

   275

	b = y+x;

   276

#else

   277

	a = x+y;

   278

	b = x-y;

   279

#endif

   280

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

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

   285

   286

	pt.x = a+z;

   287

	pt.y = b+z;

   288

   289

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

   290

		pt.x = pt.y = -1;

   291

	}

   292

   293

	return pt;

   294

}

   295

   296

static Point GetTileFromScreenXY(int x, int y)

   297

{

   298

	Window *w;

   299

	ViewPort *vp;

   300

	Point pt;

   301

   302

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

   303

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

   304

				return TranslateXYToTileCoord(vp, x, y);

   305

   306

	pt.y = pt.x = -1;

   307

	return pt;

   308

}

   309

   310

Point GetTileBelowCursor()

   311

{

   312

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

   313

}

   314

   315

   316

Point GetTileZoomCenterWindow(bool in, Window * w)

   317

{

   318

	int x, y;

   319

	ViewPort * vp;

   320

   321

	vp = w->viewport;

   322

   323

	if (in)	{

   324

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

   325

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

   326

	}

   327

	else {

   328

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

   329

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

   330

	}

   331

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

   332

}

   333

   334

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

   335

{

   336

	ViewportDrawer *vd = _cur_vd;

   337

	TileSpriteToDraw *ts;

   338

   339

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

   340

   341

	ts = (TileSpriteToDraw*)vd->spritelist_mem;

   342

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

   343

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

   344

		return;

   345

	}

   346

   347

	vd->spritelist_mem += sizeof(TileSpriteToDraw);

   348

   349

	ts->image = image;

   350

	ts->next = NULL;

   351

	ts->x = x;

   352

	ts->y = y;

   353

	ts->z = z;

   354

	*vd->last_tile = ts;

   355

	vd->last_tile = &ts->next;

   356

}

   357

   358

void DrawGroundSprite(uint32 image)

   359

{

   360

	if (_offset_ground_sprites) {

   361

		// offset ground sprite because of foundation?

   362

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

   363

	} else {

   364

			_added_tile_sprite = true;

   365

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

   366

	}

   367

}

   368

   369

   370

void OffsetGroundSprite(int x, int y)

   371

{

   372

	_cur_vd->offs_x = x;

   373

	_cur_vd->offs_y = y;

   374

	_offset_ground_sprites = true;

   375

}

   376

   377

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

   378

{

   379

	ViewportDrawer *vd = _cur_vd;

   380

	int t;

   381

	uint32 image_org = image;

   382

	const SpriteDimension *sd;

   383

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

   384

   385

	sd = GetSpriteDimension(image & 0x3FFF);

   386

   387

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

   388

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

   389

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

   390

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

   391

		return;

   392

   393

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

   394

}

   395

   396

   397

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

   398

{

   399

	ViewportDrawer *vd = _cur_vd;

   400

	ParentSpriteToDraw *ps;

   401

	const SpriteDimension *sd;

   402

	Point pt;

   403

   404

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

   405

   406

	if (vd->combine_sprites == 2) {

   407

		AddCombinedSprite(image, x, y, z);

   408

		return;

   409

	}

   410

   411

	vd->last_child = NULL;

   412

   413

	ps = (ParentSpriteToDraw*)vd->spritelist_mem;

   414

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

   415

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

   416

		return;

   417

	}

   418

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

   419

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

   420

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

   421

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

   422

		//  parent_list somewhere below to a higher number.

   423

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

   424

		//  spots on the screen ;)

   425

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

   426

		return;

   427

	}

   428

   429

	vd->spritelist_mem += sizeof(ParentSpriteToDraw);

   430

   431

	ps->image = image;

   432

	ps->tile_x = x;

   433

	ps->tile_right = x + w - 1;

   434

   435

	ps->tile_y = y;

   436

	ps->tile_bottom = y + h - 1;

   437

   438

	ps->tile_z = z;

   439

	ps->tile_z_bottom = z + dz - 1;

   440

   441

	pt = RemapCoords(x, y, z);

   442

   443

	sd = GetSpriteDimension(image & 0x3FFF);

   444

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

   445

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

   446

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

   447

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

   448

		return;

   449

	}

   450

   451

	ps->unk16 = 0;

   452

	ps->child = NULL;

   453

	vd->last_child = &ps->child;

   454

   455

	*vd->parent_list++ = ps;

   456

   457

	if (vd->combine_sprites == 1) {

   458

		vd->combine_sprites = 2;

   459

	}

   460

}

   461

   462

void StartSpriteCombine()

   463

{

   464

	_cur_vd->combine_sprites = 1;

   465

}

   466

   467

void EndSpriteCombine()

   468

{

   469

	_cur_vd->combine_sprites = 0;

   470

}

   471

   472

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

   473

{

   474

	ViewportDrawer *vd = _cur_vd;

   475

	ChildScreenSpriteToDraw *cs;

   476

   477

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

   478

   479

	cs = (ChildScreenSpriteToDraw*) vd->spritelist_mem;

   480

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

   481

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

   482

		return;

   483

	}

   484

   485

	if (vd->last_child == NULL)

   486

		return;

   487

   488

	vd->spritelist_mem += sizeof(ChildScreenSpriteToDraw);

   489

   490

	*vd->last_child = cs;

   491

	vd->last_child = &cs->next;

   492

   493

	cs->image = image;

   494

	cs->x = x;

   495

	cs->y = y;

   496

	cs->next = NULL;

   497

}

   498

   499

/* Returns a StringSpriteToDraw */

   500

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

   501

{

   502

	ViewportDrawer *vd = _cur_vd;

   503

	StringSpriteToDraw *ss;

   504

   505

	ss = (StringSpriteToDraw*)vd->spritelist_mem;

   506

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

   507

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

   508

		return NULL;

   509

	}

   510

   511

	vd->spritelist_mem += sizeof(StringSpriteToDraw);

   512

   513

	ss->string = string;

   514

	ss->next = NULL;

   515

	ss->x = x;

   516

	ss->y = y;

   517

	ss->params[0] = params_1;

   518

	ss->params[1] = params_2;

   519

	ss->width = 0;

   520

   521

	*vd->last_string = ss;

   522

	vd->last_string = &ss->next;

   523