1

/* $Id$ */

     2

     3

#include "stdafx.h"

     4

#include "openttd.h"

     5

#include "clear_map.h"

     6

#include "industry_map.h"

     7

#include "station_map.h"

     8

#include "table/strings.h"

     9

#include "table/sprites.h"

    10

#include "functions.h"

    11

#include "map.h"

    12

#include "tile.h"

    13

#include "viewport.h"

    14

#include "command.h"

    15

#include "industry.h"

    16

#include "town.h"

    17

#include "vehicle.h"

    18

#include "news.h"

    19

#include "saveload.h"

    20

#include "economy.h"

    21

#include "sound.h"

    22

#include "variables.h"

    23

#include "table/industry_land.h"

    24

#include "table/build_industry.h"

    25

    26

enum {

    27

	/* Max industries: 64000 (8 * 8000) */

    28

	INDUSTRY_POOL_BLOCK_SIZE_BITS = 3,       /* In bits, so (1 << 3) == 8 */

    29

	INDUSTRY_POOL_MAX_BLOCKS      = 8000,

    30

};

    31

    32

/**

    33

 * Called if a new block is added to the industry-pool

    34

 */

    35

static void IndustryPoolNewBlock(uint start_item)

    36

{

    37

	Industry *i;

    38

    39

	FOR_ALL_INDUSTRIES_FROM(i, start_item) i->index = start_item++;

    40

}

    41

    42

/* Initialize the industry-pool */

    43

MemoryPool _industry_pool = { "Industry", INDUSTRY_POOL_MAX_BLOCKS, INDUSTRY_POOL_BLOCK_SIZE_BITS, sizeof(Industry), &IndustryPoolNewBlock, NULL, 0, 0, NULL };

    44

    45

static byte _industry_sound_ctr;

    46

static TileIndex _industry_sound_tile;

    47

    48

void ShowIndustryViewWindow(int industry);

    49

void BuildOilRig(TileIndex tile);

    50

void DeleteOilRig(TileIndex tile);

    51

    52

static const IndustryType _industry_close_mode[IT_END] = {

    53

	/* COAL_MINE */          INDUSTRYLIFE_PRODUCTION,

    54

	/* POWER_STATION */      INDUSTRYLIFE_NOT_CLOSABLE,

    55

	/* SAWMILL */            INDUSTRYLIFE_CLOSABLE,

    56

	/* FOREST */             INDUSTRYLIFE_PRODUCTION,

    57

	/* OIL_REFINERY */       INDUSTRYLIFE_CLOSABLE,

    58

	/* OIL_RIG */            INDUSTRYLIFE_PRODUCTION,

    59

	/* FACTORY */            INDUSTRYLIFE_CLOSABLE,

    60

	/* PRINTING_WORKS */     INDUSTRYLIFE_CLOSABLE,

    61

	/* STEEL_MILL */         INDUSTRYLIFE_CLOSABLE,

    62

	/* FARM */               INDUSTRYLIFE_PRODUCTION,

    63

	/* COPPER_MINE */        INDUSTRYLIFE_PRODUCTION,

    64

	/* OIL_WELL */           INDUSTRYLIFE_PRODUCTION,

    65

	/* BANK */               INDUSTRYLIFE_NOT_CLOSABLE,

    66

	/* FOOD_PROCESS */       INDUSTRYLIFE_CLOSABLE,

    67

	/* PAPER_MILL */         INDUSTRYLIFE_CLOSABLE,

    68

	/* GOLD_MINE */          INDUSTRYLIFE_PRODUCTION,

    69

	/* BANK_2,  */           INDUSTRYLIFE_NOT_CLOSABLE,

    70

	/* DIAMOND_MINE */       INDUSTRYLIFE_PRODUCTION,

    71

	/* IRON_MINE */          INDUSTRYLIFE_PRODUCTION,

    72

	/* FRUIT_PLANTATION */   INDUSTRYLIFE_PRODUCTION,

    73

	/* RUBBER_PLANTATION */  INDUSTRYLIFE_PRODUCTION,

    74

	/* WATER_SUPPLY */       INDUSTRYLIFE_PRODUCTION,

    75

	/* WATER_TOWER */        INDUSTRYLIFE_NOT_CLOSABLE,

    76

	/* FACTORY_2 */          INDUSTRYLIFE_CLOSABLE,

    77

	/* FARM_2 */             INDUSTRYLIFE_PRODUCTION,

    78

	/* LUMBER_MILL */        INDUSTRYLIFE_CLOSABLE,

    79

	/* COTTON_CANDY */       INDUSTRYLIFE_PRODUCTION,

    80

	/* CANDY_FACTORY */      INDUSTRYLIFE_CLOSABLE,

    81

	/* BATTERY_FARM */       INDUSTRYLIFE_PRODUCTION,

    82

	/* COLA_WELLS */         INDUSTRYLIFE_PRODUCTION,

    83

	/* TOY_SHOP */           INDUSTRYLIFE_NOT_CLOSABLE,

    84

	/* TOY_FACTORY */        INDUSTRYLIFE_CLOSABLE,

    85

	/* PLASTIC_FOUNTAINS */  INDUSTRYLIFE_PRODUCTION,

    86

	/* FIZZY_DRINK_FACTORY */INDUSTRYLIFE_CLOSABLE,

    87

	/* BUBBLE_GENERATOR */   INDUSTRYLIFE_PRODUCTION,

    88

	/* TOFFEE_QUARRY */      INDUSTRYLIFE_PRODUCTION,

    89

	/* SUGAR_MINE */         INDUSTRYLIFE_PRODUCTION

    90

};

    91

    92

static const StringID _industry_prod_up_strings[IT_END] = {

    93

	STR_4836_NEW_COAL_SEAM_FOUND_AT,

    94

	STR_4835_INCREASES_PRODUCTION,

    95

	STR_4835_INCREASES_PRODUCTION,

    96

	STR_4835_INCREASES_PRODUCTION,

    97

	STR_4835_INCREASES_PRODUCTION,

    98

	STR_4837_NEW_OIL_RESERVES_FOUND,

    99

	STR_4835_INCREASES_PRODUCTION,

   100

	STR_4835_INCREASES_PRODUCTION,

   101

	STR_4835_INCREASES_PRODUCTION,

   102

	STR_4838_IMPROVED_FARMING_METHODS,

   103

	STR_4835_INCREASES_PRODUCTION,

   104

	STR_4837_NEW_OIL_RESERVES_FOUND,

   105

	STR_4835_INCREASES_PRODUCTION,

   106

	STR_4835_INCREASES_PRODUCTION,

   107

	STR_4835_INCREASES_PRODUCTION,

   108

	STR_4835_INCREASES_PRODUCTION,

   109

	STR_4835_INCREASES_PRODUCTION,

   110

	STR_4835_INCREASES_PRODUCTION,

   111

	STR_4835_INCREASES_PRODUCTION,

   112

	STR_4838_IMPROVED_FARMING_METHODS,

   113

	STR_4838_IMPROVED_FARMING_METHODS,

   114

	STR_4835_INCREASES_PRODUCTION,

   115

	STR_4835_INCREASES_PRODUCTION,

   116

	STR_4835_INCREASES_PRODUCTION,

   117

	STR_4838_IMPROVED_FARMING_METHODS,

   118

	STR_4835_INCREASES_PRODUCTION,

   119

	STR_4838_IMPROVED_FARMING_METHODS,

   120

	STR_4835_INCREASES_PRODUCTION,

   121

	STR_4838_IMPROVED_FARMING_METHODS,

   122

	STR_4835_INCREASES_PRODUCTION,

   123

	STR_4835_INCREASES_PRODUCTION,

   124

	STR_4835_INCREASES_PRODUCTION,

   125

	STR_4835_INCREASES_PRODUCTION,

   126

	STR_4835_INCREASES_PRODUCTION,

   127

	STR_4835_INCREASES_PRODUCTION,

   128

	STR_4835_INCREASES_PRODUCTION,

   129

	STR_4835_INCREASES_PRODUCTION,

   130

};

   131

   132

static const StringID _industry_prod_down_strings[IT_END] = {

   133

	STR_4839_PRODUCTION_DOWN_BY_50,

   134

	STR_4839_PRODUCTION_DOWN_BY_50,

   135

	STR_4839_PRODUCTION_DOWN_BY_50,

   136

	STR_483A_INSECT_INFESTATION_CAUSES,

   137

	STR_4839_PRODUCTION_DOWN_BY_50,

   138

	STR_4839_PRODUCTION_DOWN_BY_50,

   139

	STR_4839_PRODUCTION_DOWN_BY_50,

   140

	STR_4839_PRODUCTION_DOWN_BY_50,

   141

	STR_4839_PRODUCTION_DOWN_BY_50,

   142

	STR_483A_INSECT_INFESTATION_CAUSES,

   143

	STR_4839_PRODUCTION_DOWN_BY_50,

   144

	STR_4839_PRODUCTION_DOWN_BY_50,

   145

	STR_4839_PRODUCTION_DOWN_BY_50,

   146

	STR_4839_PRODUCTION_DOWN_BY_50,

   147

	STR_4839_PRODUCTION_DOWN_BY_50,

   148

	STR_4839_PRODUCTION_DOWN_BY_50,

   149

	STR_4839_PRODUCTION_DOWN_BY_50,

   150

	STR_4839_PRODUCTION_DOWN_BY_50,

   151

	STR_4839_PRODUCTION_DOWN_BY_50,

   152

	STR_483A_INSECT_INFESTATION_CAUSES,

   153

	STR_483A_INSECT_INFESTATION_CAUSES,

   154

	STR_4839_PRODUCTION_DOWN_BY_50,

   155

	STR_4839_PRODUCTION_DOWN_BY_50,

   156

	STR_4839_PRODUCTION_DOWN_BY_50,

   157

	STR_483A_INSECT_INFESTATION_CAUSES,

   158

	STR_4839_PRODUCTION_DOWN_BY_50,

   159

	STR_4839_PRODUCTION_DOWN_BY_50,

   160

	STR_4839_PRODUCTION_DOWN_BY_50,

   161

	STR_483A_INSECT_INFESTATION_CAUSES,

   162

	STR_4839_PRODUCTION_DOWN_BY_50,

   163

	STR_4839_PRODUCTION_DOWN_BY_50,

   164

	STR_4839_PRODUCTION_DOWN_BY_50,

   165

	STR_4839_PRODUCTION_DOWN_BY_50,

   166

	STR_4839_PRODUCTION_DOWN_BY_50,

   167

	STR_4839_PRODUCTION_DOWN_BY_50,

   168

	STR_4839_PRODUCTION_DOWN_BY_50,

   169

	STR_4839_PRODUCTION_DOWN_BY_50,

   170

};

   171

   172

static const StringID _industry_close_strings[IT_END] = {

   173

	STR_4832_ANNOUNCES_IMMINENT_CLOSURE,

   174

	STR_4832_ANNOUNCES_IMMINENT_CLOSURE,

   175

	STR_4833_SUPPLY_PROBLEMS_CAUSE_TO,

   176

	STR_4832_ANNOUNCES_IMMINENT_CLOSURE,

   177

	STR_4833_SUPPLY_PROBLEMS_CAUSE_TO,

   178

	STR_4832_ANNOUNCES_IMMINENT_CLOSURE,

   179

	STR_4833_SUPPLY_PROBLEMS_CAUSE_TO,

   180

	STR_4833_SUPPLY_PROBLEMS_CAUSE_TO,

   181

	STR_4833_SUPPLY_PROBLEMS_CAUSE_TO,

   182

	STR_4832_ANNOUNCES_IMMINENT_CLOSURE,

   183

	STR_4832_ANNOUNCES_IMMINENT_CLOSURE,

   184

	STR_4832_ANNOUNCES_IMMINENT_CLOSURE,

   185

	STR_4832_ANNOUNCES_IMMINENT_CLOSURE,

   186

	STR_4833_SUPPLY_PROBLEMS_CAUSE_TO,

   187

	STR_4833_SUPPLY_PROBLEMS_CAUSE_TO,

   188

	STR_4832_ANNOUNCES_IMMINENT_CLOSURE,

   189

	STR_4832_ANNOUNCES_IMMINENT_CLOSURE,

   190

	STR_4832_ANNOUNCES_IMMINENT_CLOSURE,

   191

	STR_4832_ANNOUNCES_IMMINENT_CLOSURE,

   192

	STR_4832_ANNOUNCES_IMMINENT_CLOSURE,

   193

	STR_4832_ANNOUNCES_IMMINENT_CLOSURE,

   194

	STR_4832_ANNOUNCES_IMMINENT_CLOSURE,

   195

	STR_4832_ANNOUNCES_IMMINENT_CLOSURE,

   196

	STR_4833_SUPPLY_PROBLEMS_CAUSE_TO,

   197

	STR_4832_ANNOUNCES_IMMINENT_CLOSURE,

   198

	STR_4834_LACK_OF_NEARBY_TREES_CAUSES,

   199

	STR_4832_ANNOUNCES_IMMINENT_CLOSURE,

   200

	STR_4833_SUPPLY_PROBLEMS_CAUSE_TO,

   201

	STR_4832_ANNOUNCES_IMMINENT_CLOSURE,

   202

	STR_4832_ANNOUNCES_IMMINENT_CLOSURE,

   203

	STR_4833_SUPPLY_PROBLEMS_CAUSE_TO,

   204

	STR_4833_SUPPLY_PROBLEMS_CAUSE_TO,

   205

	STR_4832_ANNOUNCES_IMMINENT_CLOSURE,

   206

	STR_4833_SUPPLY_PROBLEMS_CAUSE_TO,

   207

	STR_4832_ANNOUNCES_IMMINENT_CLOSURE,

   208

	STR_4832_ANNOUNCES_IMMINENT_CLOSURE,

   209

	STR_4832_ANNOUNCES_IMMINENT_CLOSURE

   210

};

   211

   212

/**

   213

 * Retrieve the type for this industry.  Although it is accessed by a tile,

   214

 * it will return the general type of industry, and not the sprite index

   215

 * as would do GetIndustryGfx.

   216

 * The same information can be accessed by looking at Industry->type

   217

 * @param tile that is queried

   218

 * @pre IsTileType(tile, MP_INDUSTRY)

   219

 * @return general type for this industry, as defined in industry.h

   220

 **/

   221

IndustryType GetIndustryType(TileIndex tile)

   222

{

   223

	IndustryGfx this_type = GetIndustryGfx(tile);

   224

	IndustryType iloop;

   225

   226

	assert(IsTileType(tile, MP_INDUSTRY));

   227

   228

	for (iloop = IT_COAL_MINE; iloop < IT_END; iloop += 1) {

   229

		if (IS_BYTE_INSIDE(this_type, industry_gfx_Solver[iloop].MinGfx,

   230

				industry_gfx_Solver[iloop].MaxGfx+1)) {

   231

			return iloop;

   232

		}

   233

	}

   234

   235

	return IT_INVALID;  //we have not found equivalent, whatever the reason

   236

}

   237

   238

static void IndustryDrawSugarMine(const TileInfo *ti)

   239

{

   240

	const DrawIndustrySpec1Struct *d;

   241

	uint32 image;

   242

   243

	if (!IsIndustryCompleted(ti->tile)) return;

   244

   245

	d = &_draw_industry_spec1[_m[ti->tile].m3];

   246

   247

	AddChildSpriteScreen(SPR_IT_SUGAR_MINE_SIEVE + d->image_1, d->x, 0);

   248

   249

	image = d->image_2;

   250

	if (image != 0) AddChildSpriteScreen(SPR_IT_SUGAR_MINE_CLOUDS + image - 1, 8, 41);

   251

   252

	image = d->image_3;

   253

	if (image != 0) {

   254

		AddChildSpriteScreen(SPR_IT_SUGAR_MINE_PILE + image - 1,

   255

			_drawtile_proc1_x[image - 1], _drawtile_proc1_y[image - 1]);

   256

	}

   257

}

   258

   259

static void IndustryDrawToffeeQuarry(const TileInfo *ti)

   260

{

   261

	int x = 0;

   262

   263

	if (IsIndustryCompleted(ti->tile)) {

   264

		x = _industry_anim_offs[_m[ti->tile].m3];

   265

		if ( (byte)x == 0xFF)

   266

			x = 0;

   267

	}

   268

   269

	AddChildSpriteScreen(SPR_IT_TOFFEE_QUARRY_SHOVEL, 22 - x, 24 + x);

   270

	AddChildSpriteScreen(SPR_IT_TOFFEE_QUARRY_TOFFEE, 6, 14);

   271

}

   272

   273

static void IndustryDrawBubbleGenerator( const TileInfo *ti)

   274

{

   275

	if (IsIndustryCompleted(ti->tile)) {

   276

		AddChildSpriteScreen(SPR_IT_BUBBLE_GENERATOR_BUBBLE, 5, _industry_anim_offs_2[_m[ti->tile].m3]);

   277

	} else {

   278

		AddChildSpriteScreen(SPR_IT_BUBBLE_GENERATOR_SPRING, 3, 67);

   279

	}

   280

}

   281

   282

static void IndustryDrawToyFactory(const TileInfo *ti)

   283

{

   284

	const DrawIndustrySpec4Struct *d;

   285

   286

	d = &_industry_anim_offs_3[_m[ti->tile].m3];

   287

   288

	if (d->image_1 != 0xFF) {

   289

		AddChildSpriteScreen(SPR_IT_TOY_FACTORY_CLAY, 50 - d->image_1 * 2, 96 + d->image_1);

   290

	}

   291

   292

	if (d->image_2 != 0xFF) {

   293

		AddChildSpriteScreen(SPR_IT_TOY_FACTORY_ROBOT, 16 - d->image_2 * 2, 100 + d->image_2);

   294

	}

   295

   296

	AddChildSpriteScreen(SPR_IT_TOY_FACTORY_STAMP, 7, d->image_3);

   297

	AddChildSpriteScreen(SPR_IT_TOY_FACTORY_STAMP_HOLDER, 0, 42);

   298

}

   299

   300

static void IndustryDrawCoalPlantSparks(const TileInfo *ti)

   301

{

   302

	if (IsIndustryCompleted(ti->tile)) {

   303

		uint image = GB(_m[ti->tile].m1, 2, 5);

   304

   305

		if (image != 0 && image < 7) {

   306

			AddChildSpriteScreen(image + SPR_IT_POWER_PLANT_TRANSFORMERS,

   307

				_coal_plant_sparks_x[image - 1],

   308

				_coal_plant_sparks_y[image - 1]

   309

			);

   310

		}

   311

	}

   312

}

   313

   314

typedef void IndustryDrawTileProc(const TileInfo *ti);

   315

static IndustryDrawTileProc * const _industry_draw_tile_procs[5] = {

   316

	IndustryDrawSugarMine,

   317

	IndustryDrawToffeeQuarry,

   318

	IndustryDrawBubbleGenerator,

   319

	IndustryDrawToyFactory,

   320

	IndustryDrawCoalPlantSparks,

   321

};

   322

   323

static void DrawTile_Industry(TileInfo *ti)

   324

{

   325

	const Industry* ind;

   326

	const DrawBuildingsTileStruct *dits;

   327

	byte z;

   328

	uint32 image, ormod;

   329

   330

	/* Pointer to industry */

   331

	ind = GetIndustryByTile(ti->tile);

   332

	ormod = GENERAL_SPRITE_COLOR(ind->color_map);

   333

   334

	/* Retrieve pointer to the draw industry tile struct */

   335

	dits = &_industry_draw_tile_data[GetIndustryGfx(ti->tile) << 2 | GetIndustryConstructionStage(ti->tile)];

   336

   337

	image = dits->ground;

   338

	if (image & PALETTE_MODIFIER_COLOR && (image & PALETTE_SPRITE_MASK) == 0)

   339

		image |= ormod;

   340

   341

	z = ti->z;

   342

	/* Add bricks below the industry? */

   343

	if (ti->tileh != SLOPE_FLAT) {

   344

		AddSortableSpriteToDraw(SPR_FOUNDATION_BASE + ti->tileh, ti->x, ti->y, 16, 16, 7, z);

   345

		AddChildSpriteScreen(image, 31, 1);

   346

		z += TILE_HEIGHT;

   347

	} else {

   348

		/* Else draw regular ground */

   349

		DrawGroundSprite(image);

   350

	}

   351

   352

	/* Add industry on top of the ground? */

   353

	image = dits->building;

   354

	if (image != 0) {

   355

		if (image & PALETTE_MODIFIER_COLOR && (image & PALETTE_SPRITE_MASK) == 0)

   356

			image |= ormod;

   357

   358

		if (_display_opt & DO_TRANS_BUILDINGS) MAKE_TRANSPARENT(image);

   359

   360

		AddSortableSpriteToDraw(image,

   361

			ti->x + dits->subtile_x,

   362

			ti->y + dits->subtile_y,

   363

			dits->width  + 1,

   364

			dits->height + 1,

   365

			dits->dz,

   366

			z);

   367

   368

		if (_display_opt & DO_TRANS_BUILDINGS) return;

   369

	}

   370

   371

	{

   372

		int proc = dits->draw_proc - 1;

   373

		if (proc >= 0) _industry_draw_tile_procs[proc](ti);

   374

	}

   375

}

   376

   377

static uint GetSlopeZ_Industry(const TileInfo* ti)

   378

{

   379

	return ti->z + (ti->tileh == SLOPE_FLAT ? 0 : TILE_HEIGHT);

   380

}

   381

   382

static Slope GetSlopeTileh_Industry(TileIndex tile, Slope tileh)

   383

{

   384

	return SLOPE_FLAT;

   385

}

   386

   387

static void GetAcceptedCargo_Industry(TileIndex tile, AcceptedCargo ac)

   388

{

   389

	IndustryGfx gfx = GetIndustryGfx(tile);

   390

	CargoID a;

   391

   392

	a = _industry_section_accepts_1[gfx];

   393

	if (a != CT_INVALID) ac[a] = (a == 0) ? 1 : 8;

   394

   395

	a = _industry_section_accepts_2[gfx];

   396

	if (a != CT_INVALID) ac[a] = 8;

   397

   398

	a = _industry_section_accepts_3[gfx];

   399

	if (a != CT_INVALID) ac[a] = 8;

   400

}

   401

   402

static void GetTileDesc_Industry(TileIndex tile, TileDesc *td)

   403

{

   404

	const Industry* i = GetIndustryByTile(tile);

   405

   406

	td->owner = i->owner;

   407

	td->str = STR_4802_COAL_MINE + i->type;

   408

	if (!IsIndustryCompleted(tile)) {

   409

		SetDParamX(td->dparam, 0, td->str);

   410

		td->str = STR_2058_UNDER_CONSTRUCTION;

   411

	}

   412

}

   413

   414

static int32 ClearTile_Industry(TileIndex tile, byte flags)

   415

{

   416

	Industry* i = GetIndustryByTile(tile);

   417

   418

	/*	* water can destroy industries

   419

			* in editor you can bulldoze industries

   420

			* with magic_bulldozer cheat you can destroy industries

   421

			* (area around OILRIG is water, so water shouldn't flood it

   422

	*/

   423

	if ((_current_player != OWNER_WATER && _game_mode != GM_EDITOR &&

   424

			!_cheats.magic_bulldozer.value) ||

   425

			(_current_player == OWNER_WATER && i->type == IT_OIL_RIG) ) {

   426

 		SetDParam(0, STR_4802_COAL_MINE + i->type);

   427

		return_cmd_error(STR_4800_IN_THE_WAY);

   428

	}

   429

   430

	if (flags & DC_EXEC) DeleteIndustry(i);

   431

	return 0;

   432

}

   433

   434

   435

static const byte _industry_min_cargo[] = {

   436

	5, 5, 5, 30, 5, 5, 5, 5,

   437

	5, 5, 5, 5, 2, 5, 5, 5,

   438

	5, 5, 5, 15, 15, 5, 5, 5,

   439

	5, 5, 30, 5, 30, 5, 5, 5,

   440

	5, 5, 5, 5, 5,

   441

};

   442

   443

static void TransportIndustryGoods(TileIndex tile)

   444

{

   445

	Industry* i = GetIndustryByTile(tile);

   446

	uint cw, am;

   447

   448

	cw = min(i->cargo_waiting[0], 255);

   449

	if (cw > _industry_min_cargo[i->type]/* && i->produced_cargo[0] != 0xFF*/) {

   450

		i->cargo_waiting[0] -= cw;

   451

   452

		/* fluctuating economy? */

   453

		if (_economy.fluct <= 0) cw = (cw + 1) / 2;

   454

   455

		i->last_mo_production[0] += cw;

   456

   457

		am = MoveGoodsToStation(i->xy, i->width, i->height, i->produced_cargo[0], cw);

   458

		i->last_mo_transported[0] += am;

   459

		if (am != 0) {

   460

			uint newgfx = _industry_produce_section[GetIndustryGfx(tile)];

   461

   462

			if (newgfx != 0xFF) {

   463

				ResetIndustryConstructionStage(tile);

   464

				SetIndustryCompleted(tile, true);

   465

				SetIndustryGfx(tile, newgfx);

   466

				MarkTileDirtyByTile(tile);

   467

			}

   468

		}

   469

	}

   470

   471

	cw = min(i->cargo_waiting[1], 255);

   472

	if (cw > _industry_min_cargo[i->type]) {

   473

		i->cargo_waiting[1] -= cw;

   474

   475

		if (_economy.fluct <= 0) cw = (cw + 1) / 2;

   476

   477

		i->last_mo_production[1] += cw;

   478

   479

		am = MoveGoodsToStation(i->xy, i->width, i->height, i->produced_cargo[1], cw);

   480

		i->last_mo_transported[1] += am;

   481

	}

   482

}

   483

   484

   485

static void AnimateTile_Industry(TileIndex tile)

   486

{

   487

	byte m;

   488

   489

	switch (GetIndustryGfx(tile)) {

   490

	case GFX_SUGAR_MINE_SIEVE:

   491

		if ((_tick_counter & 1) == 0) {

   492

			m = _m[tile].m3 + 1;

   493

   494

			switch (m & 7) {

   495

			case 2:	SndPlayTileFx(SND_2D_RIP_2, tile); break;

   496

			case 6: SndPlayTileFx(SND_29_RIP, tile); break;

   497

			}

   498

   499

			if (m >= 96) {

   500

				m = 0;

   501

				DeleteAnimatedTile(tile);