OpenTTD Source  1.11.2
object_cmd.cpp
Go to the documentation of this file.
1 /*
2  * This file is part of OpenTTD.
3  * OpenTTD is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, version 2.
4  * OpenTTD is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
5  * See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with OpenTTD. If not, see <http://www.gnu.org/licenses/>.
6  */
7 
10 #include "stdafx.h"
11 #include "landscape.h"
12 #include "command_func.h"
13 #include "viewport_func.h"
14 #include "company_base.h"
15 #include "town.h"
16 #include "bridge_map.h"
17 #include "genworld.h"
18 #include "autoslope.h"
19 #include "clear_func.h"
20 #include "water.h"
21 #include "window_func.h"
22 #include "company_gui.h"
23 #include "cheat_type.h"
24 #include "object.h"
25 #include "cargopacket.h"
26 #include "core/random_func.hpp"
27 #include "core/pool_func.hpp"
28 #include "object_map.h"
29 #include "object_base.h"
30 #include "newgrf_config.h"
31 #include "newgrf_object.h"
32 #include "date_func.h"
33 #include "newgrf_debug.h"
34 #include "vehicle_func.h"
35 
36 #include "table/strings.h"
37 #include "table/object_land.h"
38 
39 #include "safeguards.h"
40 
41 ObjectPool _object_pool("Object");
44 
50 /* static */ Object *Object::GetByTile(TileIndex tile)
51 {
52  return Object::Get(GetObjectIndex(tile));
53 }
54 
62 {
63  assert(IsTileType(t, MP_OBJECT));
64  return Object::GetByTile(t)->type;
65 }
66 
69 {
71 }
72 
83 void BuildObject(ObjectType type, TileIndex tile, CompanyID owner, Town *town, uint8 view)
84 {
85  const ObjectSpec *spec = ObjectSpec::Get(type);
86 
87  TileArea ta(tile, GB(spec->size, HasBit(view, 0) ? 4 : 0, 4), GB(spec->size, HasBit(view, 0) ? 0 : 4, 4));
88  Object *o = new Object();
89  o->type = type;
90  o->location = ta;
91  o->town = town == nullptr ? CalcClosestTownFromTile(tile) : town;
92  o->build_date = _date;
93  o->view = view;
94 
95  /* If nothing owns the object, the colour will be random. Otherwise
96  * get the colour from the company's livery settings. */
97  if (owner == OWNER_NONE) {
98  o->colour = Random();
99  } else {
100  const Livery *l = Company::Get(owner)->livery;
101  o->colour = l->colour1 + l->colour2 * 16;
102  }
103 
104  /* If the object wants only one colour, then give it that colour. */
105  if ((spec->flags & OBJECT_FLAG_2CC_COLOUR) == 0) o->colour &= 0xF;
106 
107  if (HasBit(spec->callback_mask, CBM_OBJ_COLOUR)) {
108  uint16 res = GetObjectCallback(CBID_OBJECT_COLOUR, o->colour, 0, spec, o, tile);
109  if (res != CALLBACK_FAILED) {
110  if (res >= 0x100) ErrorUnknownCallbackResult(spec->grf_prop.grffile->grfid, CBID_OBJECT_COLOUR, res);
111  o->colour = GB(res, 0, 8);
112  }
113  }
114 
115  assert(o->town != nullptr);
116 
117  TILE_AREA_LOOP(t, ta) {
119  /* Update company infrastructure counts for objects build on canals owned by nobody. */
120  if (wc == WATER_CLASS_CANAL && owner != OWNER_NONE && (IsTileOwner(tile, OWNER_NONE) || IsTileOwner(tile, OWNER_WATER))) {
121  Company::Get(owner)->infrastructure.water++;
123  }
124  MakeObject(t, owner, o->index, wc, Random());
126  }
127 
128  Object::IncTypeCount(type);
130 }
131 
137 {
138  TileArea ta = Object::GetByTile(tile)->location;
139  TILE_AREA_LOOP(t, ta) {
142  }
143 }
144 
146 #define GetCompanyHQSize GetAnimationFrame
147 
148 #define IncreaseCompanyHQSize IncreaseAnimationStage
149 
155 void UpdateCompanyHQ(TileIndex tile, uint score)
156 {
157  if (tile == INVALID_TILE) return;
158 
159  byte val = 0;
160  if (score >= 170) val++;
161  if (score >= 350) val++;
162  if (score >= 520) val++;
163  if (score >= 720) val++;
164 
165  while (GetCompanyHQSize(tile) < val) {
166  IncreaseCompanyHQSize(tile);
167  }
168 }
169 
175 {
176  for (Object *obj : Object::Iterate()) {
177  Owner owner = GetTileOwner(obj->location.tile);
178  /* Not the current owner, so colour doesn't change. */
179  if (owner != c->index) continue;
180 
181  const ObjectSpec *spec = ObjectSpec::GetByTile(obj->location.tile);
182  /* Using the object colour callback, so not using company colour. */
183  if (HasBit(spec->callback_mask, CBM_OBJ_COLOUR)) continue;
184 
185  const Livery *l = c->livery;
186  obj->colour = ((spec->flags & OBJECT_FLAG_2CC_COLOUR) ? (l->colour2 * 16) : 0) + l->colour1;
187  }
188 }
189 
190 extern CommandCost CheckBuildableTile(TileIndex tile, uint invalid_dirs, int &allowed_z, bool allow_steep, bool check_bridge);
191 static CommandCost ClearTile_Object(TileIndex tile, DoCommandFlag flags);
192 
202 CommandCost CmdBuildObject(TileIndex tile, DoCommandFlag flags, uint32 p1, uint32 p2, const char *text)
203 {
205 
206  ObjectType type = (ObjectType)GB(p1, 0, 16);
207  if (type >= NUM_OBJECTS) return CMD_ERROR;
208  uint8 view = GB(p2, 0, 2);
209  const ObjectSpec *spec = ObjectSpec::Get(type);
210  if (_game_mode == GM_NORMAL && !spec->IsAvailable() && !_generating_world) return CMD_ERROR;
211  if ((_game_mode == GM_EDITOR || _generating_world) && !spec->WasEverAvailable()) return CMD_ERROR;
212 
213  if ((spec->flags & OBJECT_FLAG_ONLY_IN_SCENEDIT) != 0 && ((!_generating_world && _game_mode != GM_EDITOR) || _current_company != OWNER_NONE)) return CMD_ERROR;
214  if ((spec->flags & OBJECT_FLAG_ONLY_IN_GAME) != 0 && (_generating_world || _game_mode != GM_NORMAL || _current_company > MAX_COMPANIES)) return CMD_ERROR;
215  if (view >= spec->views) return CMD_ERROR;
216 
217  if (!Object::CanAllocateItem()) return_cmd_error(STR_ERROR_TOO_MANY_OBJECTS);
218  if (Town::GetNumItems() == 0) return_cmd_error(STR_ERROR_MUST_FOUND_TOWN_FIRST);
219 
220  int size_x = GB(spec->size, HasBit(view, 0) ? 4 : 0, 4);
221  int size_y = GB(spec->size, HasBit(view, 0) ? 0 : 4, 4);
222  TileArea ta(tile, size_x, size_y);
223 
224  if (type == OBJECT_OWNED_LAND) {
225  /* Owned land is special as it can be placed on any slope. */
226  cost.AddCost(DoCommand(tile, 0, 0, flags, CMD_LANDSCAPE_CLEAR));
227  } else {
228  /* Check the surface to build on. At this time we can't actually execute the
229  * the CLEAR_TILE commands since the newgrf callback later on can check
230  * some information about the tiles. */
231  bool allow_water = (spec->flags & (OBJECT_FLAG_BUILT_ON_WATER | OBJECT_FLAG_NOT_ON_LAND)) != 0;
232  bool allow_ground = (spec->flags & OBJECT_FLAG_NOT_ON_LAND) == 0;
233  TILE_AREA_LOOP(t, ta) {
234  if (HasTileWaterGround(t)) {
235  if (!allow_water) return_cmd_error(STR_ERROR_CAN_T_BUILD_ON_WATER);
236  if (!IsWaterTile(t)) {
237  /* Normal water tiles don't have to be cleared. For all other tile types clear
238  * the tile but leave the water. */
239  cost.AddCost(DoCommand(t, 0, 0, flags & ~DC_NO_WATER & ~DC_EXEC, CMD_LANDSCAPE_CLEAR));
240  } else {
241  /* Can't build on water owned by another company. */
242  Owner o = GetTileOwner(t);
243  if (o != OWNER_NONE && o != OWNER_WATER) cost.AddCost(CheckOwnership(o, t));
244 
245  /* However, the tile has to be clear of vehicles. */
247  }
248  } else {
249  if (!allow_ground) return_cmd_error(STR_ERROR_MUST_BE_BUILT_ON_WATER);
250  /* For non-water tiles, we'll have to clear it before building. */
251 
252  /* When relocating HQ, allow it to be relocated (partial) on itself. */
253  if (!(type == OBJECT_HQ &&
254  IsTileType(t, MP_OBJECT) &&
256  IsObjectType(t, OBJECT_HQ))) {
257  cost.AddCost(DoCommand(t, 0, 0, flags & ~DC_EXEC, CMD_LANDSCAPE_CLEAR));
258  }
259  }
260  }
261 
262  /* So, now the surface is checked... check the slope of said surface. */
263  int allowed_z;
264  if (GetTileSlope(tile, &allowed_z) != SLOPE_FLAT) allowed_z++;
265 
266  TILE_AREA_LOOP(t, ta) {
267  uint16 callback = CALLBACK_FAILED;
269  TileIndex diff = t - tile;
270  callback = GetObjectCallback(CBID_OBJECT_LAND_SLOPE_CHECK, GetTileSlope(t), TileY(diff) << 4 | TileX(diff), spec, nullptr, t, view);
271  }
272 
273  if (callback == CALLBACK_FAILED) {
274  cost.AddCost(CheckBuildableTile(t, 0, allowed_z, false, false));
275  } else {
276  /* The meaning of bit 10 is inverted for a grf version < 8. */
277  if (spec->grf_prop.grffile->grf_version < 8) ToggleBit(callback, 10);
278  CommandCost ret = GetErrorMessageFromLocationCallbackResult(callback, spec->grf_prop.grffile, STR_ERROR_LAND_SLOPED_IN_WRONG_DIRECTION);
279  if (ret.Failed()) return ret;
280  }
281  }
282 
283  if (flags & DC_EXEC) {
284  /* This is basically a copy of the loop above with the exception that we now
285  * execute the commands and don't check for errors, since that's already done. */
286  TILE_AREA_LOOP(t, ta) {
287  if (HasTileWaterGround(t)) {
288  if (!IsWaterTile(t)) {
290  }
291  } else {
293  }
294  }
295  }
296  }
297  if (cost.Failed()) return cost;
298 
299  /* Finally do a check for bridges. */
300  TILE_AREA_LOOP(t, ta) {
301  if (IsBridgeAbove(t) && (
304  return_cmd_error(STR_ERROR_MUST_DEMOLISH_BRIDGE_FIRST);
305  }
306  }
307 
308  int hq_score = 0;
309  switch (type) {
310  case OBJECT_TRANSMITTER:
311  case OBJECT_LIGHTHOUSE:
312  if (!IsTileFlat(tile)) return_cmd_error(STR_ERROR_FLAT_LAND_REQUIRED);
313  break;
314 
315  case OBJECT_OWNED_LAND:
316  if (IsTileType(tile, MP_OBJECT) &&
317  IsTileOwner(tile, _current_company) &&
319  return_cmd_error(STR_ERROR_YOU_ALREADY_OWN_IT);
320  }
321  break;
322 
323  case OBJECT_HQ: {
325  if (c->location_of_HQ != INVALID_TILE) {
326  /* We need to persuade a bit harder to remove the old HQ. */
328  cost.AddCost(ClearTile_Object(c->location_of_HQ, flags));
329  _current_company = c->index;
330  }
331 
332  if (flags & DC_EXEC) {
333  hq_score = UpdateCompanyRatingAndValue(c, false);
334  c->location_of_HQ = tile;
336  }
337  break;
338  }
339 
340  case OBJECT_STATUE:
341  /* This may never be constructed using this method. */
342  return CMD_ERROR;
343 
344  default: // i.e. NewGRF provided.
345  break;
346  }
347 
348  if (flags & DC_EXEC) {
349  BuildObject(type, tile, _current_company, nullptr, view);
350 
351  /* Make sure the HQ starts at the right size. */
352  if (type == OBJECT_HQ) UpdateCompanyHQ(tile, hq_score);
353  }
354 
355  cost.AddCost(ObjectSpec::Get(type)->GetBuildCost() * size_x * size_y);
356  return cost;
357 }
358 
359 
360 static Foundation GetFoundation_Object(TileIndex tile, Slope tileh);
361 
362 static void DrawTile_Object(TileInfo *ti)
363 {
364  ObjectType type = GetObjectType(ti->tile);
365  const ObjectSpec *spec = ObjectSpec::Get(type);
366 
367  /* Fall back for when the object doesn't exist anymore. */
368  if (!spec->enabled) type = OBJECT_TRANSMITTER;
369 
370  if ((spec->flags & OBJECT_FLAG_HAS_NO_FOUNDATION) == 0) DrawFoundation(ti, GetFoundation_Object(ti->tile, ti->tileh));
371 
372  if (type < NEW_OBJECT_OFFSET) {
373  const DrawTileSprites *dts = nullptr;
374  Owner to = GetTileOwner(ti->tile);
375  PaletteID palette = to == OWNER_NONE ? PAL_NONE : COMPANY_SPRITE_COLOUR(to);
376 
377  if (type == OBJECT_HQ) {
378  TileIndex diff = ti->tile - Object::GetByTile(ti->tile)->location.tile;
379  dts = &_object_hq[GetCompanyHQSize(ti->tile) << 2 | TileY(diff) << 1 | TileX(diff)];
380  } else {
381  dts = &_objects[type];
382  }
383 
384  if (spec->flags & OBJECT_FLAG_HAS_NO_FOUNDATION) {
385  /* If an object has no foundation, but tries to draw a (flat) ground
386  * type... we have to be nice and convert that for them. */
387  switch (dts->ground.sprite) {
388  case SPR_FLAT_BARE_LAND: DrawClearLandTile(ti, 0); break;
389  case SPR_FLAT_1_THIRD_GRASS_TILE: DrawClearLandTile(ti, 1); break;
390  case SPR_FLAT_2_THIRD_GRASS_TILE: DrawClearLandTile(ti, 2); break;
391  case SPR_FLAT_GRASS_TILE: DrawClearLandTile(ti, 3); break;
392  default: DrawGroundSprite(dts->ground.sprite, palette); break;
393  }
394  } else {
395  DrawGroundSprite(dts->ground.sprite, palette);
396  }
397 
399  const DrawTileSeqStruct *dtss;
400  foreach_draw_tile_seq(dtss, dts->seq) {
402  dtss->image.sprite, palette,
403  ti->x + dtss->delta_x, ti->y + dtss->delta_y,
404  dtss->size_x, dtss->size_y,
405  dtss->size_z, ti->z + dtss->delta_z,
407  );
408  }
409  }
410  } else {
411  DrawNewObjectTile(ti, spec);
412  }
413 
414  DrawBridgeMiddle(ti);
415 }
416 
417 static int GetSlopePixelZ_Object(TileIndex tile, uint x, uint y)
418 {
419  if (IsObjectType(tile, OBJECT_OWNED_LAND)) {
420  int z;
421  Slope tileh = GetTilePixelSlope(tile, &z);
422 
423  return z + GetPartialPixelZ(x & 0xF, y & 0xF, tileh);
424  } else {
425  return GetTileMaxPixelZ(tile);
426  }
427 }
428 
429 static Foundation GetFoundation_Object(TileIndex tile, Slope tileh)
430 {
432 }
433 
439 {
441  TILE_AREA_LOOP(tile_cur, o->location) {
442  DeleteNewGRFInspectWindow(GSF_OBJECTS, tile_cur);
443 
444  MakeWaterKeepingClass(tile_cur, GetTileOwner(tile_cur));
445  }
446  delete o;
447 }
448 
449 std::vector<ClearedObjectArea> _cleared_object_areas;
450 
457 {
458  TileArea ta = TileArea(tile, 1, 1);
459 
460  for (ClearedObjectArea &coa : _cleared_object_areas) {
461  if (coa.area.Intersects(ta)) return &coa;
462  }
463 
464  return nullptr;
465 }
466 
467 static CommandCost ClearTile_Object(TileIndex tile, DoCommandFlag flags)
468 {
469  /* Get to the northern most tile. */
470  Object *o = Object::GetByTile(tile);
471  TileArea ta = o->location;
472 
473  ObjectType type = o->type;
474  const ObjectSpec *spec = ObjectSpec::Get(type);
475 
476  CommandCost cost(EXPENSES_CONSTRUCTION, spec->GetClearCost() * ta.w * ta.h / 5);
477  if (spec->flags & OBJECT_FLAG_CLEAR_INCOME) cost.MultiplyCost(-1); // They get an income!
478 
479  /* Towns can't remove any objects. */
480  if (_current_company == OWNER_TOWN) return CMD_ERROR;
481 
482  /* Water can remove everything! */
483  if (_current_company != OWNER_WATER) {
484  if ((flags & DC_NO_WATER) && IsTileOnWater(tile)) {
485  /* There is water under the object, treat it as water tile. */
486  return_cmd_error(STR_ERROR_CAN_T_BUILD_ON_WATER);
487  } else if (!(spec->flags & OBJECT_FLAG_AUTOREMOVE) && (flags & DC_AUTO)) {
488  /* No automatic removal by overbuilding stuff. */
489  return_cmd_error(type == OBJECT_HQ ? STR_ERROR_COMPANY_HEADQUARTERS_IN : STR_ERROR_OBJECT_IN_THE_WAY);
490  } else if (_game_mode == GM_EDITOR) {
491  /* No further limitations for the editor. */
492  } else if (GetTileOwner(tile) == OWNER_NONE) {
493  /* Owned by nobody and unremovable, so we can only remove it with brute force! */
494  if (!_cheats.magic_bulldozer.value && (spec->flags & OBJECT_FLAG_CANNOT_REMOVE) != 0) return CMD_ERROR;
495  } else if (CheckTileOwnership(tile).Failed()) {
496  /* We don't own it!. */
497  return_cmd_error(STR_ERROR_OWNED_BY);
498  } else if ((spec->flags & OBJECT_FLAG_CANNOT_REMOVE) != 0 && (spec->flags & OBJECT_FLAG_AUTOREMOVE) == 0) {
499  /* In the game editor or with cheats we can remove, otherwise we can't. */
501  if (type == OBJECT_HQ) return_cmd_error(STR_ERROR_COMPANY_HEADQUARTERS_IN);
502  return CMD_ERROR;
503  }
504 
505  /* Removing with the cheat costs more in TTDPatch / the specs. */
506  cost.MultiplyCost(25);
507  }
508  } else if ((spec->flags & (OBJECT_FLAG_BUILT_ON_WATER | OBJECT_FLAG_NOT_ON_LAND)) != 0) {
509  /* Water can't remove objects that are buildable on water. */
510  return CMD_ERROR;
511  }
512 
513  switch (type) {
514  case OBJECT_HQ: {
515  Company *c = Company::Get(GetTileOwner(tile));
516  if (flags & DC_EXEC) {
517  c->location_of_HQ = INVALID_TILE; // reset HQ position
520  }
521 
522  /* cost of relocating company is 1% of company value */
524  break;
525  }
526 
527  case OBJECT_STATUE:
528  if (flags & DC_EXEC) {
529  Town *town = o->town;
530  ClrBit(town->statues, GetTileOwner(tile));
532  }
533  break;
534 
535  default:
536  break;
537  }
538 
539  _cleared_object_areas.push_back({tile, ta});
540 
541  if (flags & DC_EXEC) ReallyClearObjectTile(o);
542 
543  return cost;
544 }
545 
546 static void AddAcceptedCargo_Object(TileIndex tile, CargoArray &acceptance, CargoTypes *always_accepted)
547 {
548  if (!IsObjectType(tile, OBJECT_HQ)) return;
549 
550  /* HQ accepts passenger and mail; but we have to divide the values
551  * between 4 tiles it occupies! */
552 
553  /* HQ level (depends on company performance) in the range 1..5. */
554  uint level = GetCompanyHQSize(tile) + 1;
555 
556  /* Top town building generates 10, so to make HQ interesting, the top
557  * type makes 20. */
558  acceptance[CT_PASSENGERS] += std::max(1U, level);
559  SetBit(*always_accepted, CT_PASSENGERS);
560 
561  /* Top town building generates 4, HQ can make up to 8. The
562  * proportion passengers:mail is different because such a huge
563  * commercial building generates unusually high amount of mail
564  * correspondence per physical visitor. */
565  acceptance[CT_MAIL] += std::max(1U, level / 2);
566  SetBit(*always_accepted, CT_MAIL);
567 }
568 
569 static void AddProducedCargo_Object(TileIndex tile, CargoArray &produced)
570 {
571  if (!IsObjectType(tile, OBJECT_HQ)) return;
572 
573  produced[CT_PASSENGERS]++;
574  produced[CT_MAIL]++;
575 }
576 
577 
578 static void GetTileDesc_Object(TileIndex tile, TileDesc *td)
579 {
580  const ObjectSpec *spec = ObjectSpec::GetByTile(tile);
581  td->str = spec->name;
582  td->owner[0] = GetTileOwner(tile);
584 
585  if (spec->grf_prop.grffile != nullptr) {
586  td->grf = GetGRFConfig(spec->grf_prop.grffile->grfid)->GetName();
587  }
588 }
589 
590 static void TileLoop_Object(TileIndex tile)
591 {
592  const ObjectSpec *spec = ObjectSpec::GetByTile(tile);
593  if (spec->flags & OBJECT_FLAG_ANIMATION) {
594  Object *o = Object::GetByTile(tile);
596  if (o->location.tile == tile) TriggerObjectAnimation(o, OAT_256_TICKS, spec);
597  }
598 
599  if (IsTileOnWater(tile)) TileLoop_Water(tile);
600 
601  if (!IsObjectType(tile, OBJECT_HQ)) return;
602 
603  /* HQ accepts passenger and mail; but we have to divide the values
604  * between 4 tiles it occupies! */
605 
606  /* HQ level (depends on company performance) in the range 1..5. */
607  uint level = GetCompanyHQSize(tile) + 1;
608  assert(level < 6);
609 
610  StationFinder stations(TileArea(tile, 2, 2));
611 
612  uint r = Random();
613  /* Top town buildings generate 250, so the top HQ type makes 256. */
614  if (GB(r, 0, 8) < (256 / 4 / (6 - level))) {
615  uint amt = GB(r, 0, 8) / 8 / 4 + 1;
616  if (EconomyIsInRecession()) amt = (amt + 1) >> 1;
617  MoveGoodsToStation(CT_PASSENGERS, amt, ST_HEADQUARTERS, GetTileOwner(tile), stations.GetStations());
618  }
619 
620  /* Top town building generates 90, HQ can make up to 196. The
621  * proportion passengers:mail is about the same as in the acceptance
622  * equations. */
623  if (GB(r, 8, 8) < (196 / 4 / (6 - level))) {
624  uint amt = GB(r, 8, 8) / 8 / 4 + 1;
625  if (EconomyIsInRecession()) amt = (amt + 1) >> 1;
626  MoveGoodsToStation(CT_MAIL, amt, ST_HEADQUARTERS, GetTileOwner(tile), stations.GetStations());
627  }
628 }
629 
630 
631 static TrackStatus GetTileTrackStatus_Object(TileIndex tile, TransportType mode, uint sub_mode, DiagDirection side)
632 {
633  return 0;
634 }
635 
636 static bool ClickTile_Object(TileIndex tile)
637 {
638  if (!IsObjectType(tile, OBJECT_HQ)) return false;
639 
640  ShowCompany(GetTileOwner(tile));
641  return true;
642 }
643 
644 static void AnimateTile_Object(TileIndex tile)
645 {
646  AnimateNewObjectTile(tile);
647 }
648 
655 static bool HasTransmitter(TileIndex tile, void *user)
656 {
657  return IsObjectTypeTile(tile, OBJECT_TRANSMITTER);
658 }
659 
664 static bool TryBuildLightHouse()
665 {
666  uint maxx = MapMaxX();
667  uint maxy = MapMaxY();
668  uint r = Random();
669 
670  /* Scatter the lighthouses more evenly around the perimeter */
671  int perimeter = (GB(r, 16, 16) % (2 * (maxx + maxy))) - maxy;
672  DiagDirection dir;
673  for (dir = DIAGDIR_NE; perimeter > 0; dir++) {
674  perimeter -= (DiagDirToAxis(dir) == AXIS_X) ? maxx : maxy;
675  }
676 
677  TileIndex tile;
678  switch (dir) {
679  default:
680  case DIAGDIR_NE: tile = TileXY(maxx - 1, r % maxy); break;
681  case DIAGDIR_SE: tile = TileXY(r % maxx, 1); break;
682  case DIAGDIR_SW: tile = TileXY(1, r % maxy); break;
683  case DIAGDIR_NW: tile = TileXY(r % maxx, maxy - 1); break;
684  }
685 
686  /* Only build lighthouses at tiles where the border is sea. */
687  if (!IsTileType(tile, MP_WATER)) return false;
688 
689  for (int j = 0; j < 19; j++) {
690  int h;
691  if (IsTileType(tile, MP_CLEAR) && IsTileFlat(tile, &h) && h <= 2 && !IsBridgeAbove(tile)) {
693  assert(tile < MapSize());
694  return true;
695  }
696  tile += TileOffsByDiagDir(dir);
697  if (!IsValidTile(tile)) return false;
698  }
699  return false;
700 }
701 
706 static bool TryBuildTransmitter()
707 {
708  TileIndex tile = RandomTile();
709  int h;
710  if (IsTileType(tile, MP_CLEAR) && IsTileFlat(tile, &h) && h >= 4 && !IsBridgeAbove(tile)) {
711  TileIndex t = tile;
712  if (CircularTileSearch(&t, 9, HasTransmitter, nullptr)) return false;
713 
715  return true;
716  }
717  return false;
718 }
719 
720 void GenerateObjects()
721 {
722  /* Set a guestimate on how much we progress */
724 
725  /* Determine number of water tiles at map border needed for freeform_edges */
726  uint num_water_tiles = 0;
728  for (uint x = 0; x < MapMaxX(); x++) {
729  if (IsTileType(TileXY(x, 1), MP_WATER)) num_water_tiles++;
730  if (IsTileType(TileXY(x, MapMaxY() - 1), MP_WATER)) num_water_tiles++;
731  }
732  for (uint y = 1; y < MapMaxY() - 1; y++) {
733  if (IsTileType(TileXY(1, y), MP_WATER)) num_water_tiles++;
734  if (IsTileType(TileXY(MapMaxX() - 1, y), MP_WATER)) num_water_tiles++;
735  }
736  }
737 
738  /* Iterate over all possible object types */
739  for (uint i = 0; i < NUM_OBJECTS; i++) {
740  const ObjectSpec *spec = ObjectSpec::Get(i);
741 
742  /* Continue, if the object was never available till now or shall not be placed */
743  if (!spec->WasEverAvailable() || spec->generate_amount == 0) continue;
744 
745  uint16 amount = spec->generate_amount;
746 
747  /* Scale by map size */
749  /* Scale the amount of lighthouses with the amount of land at the borders.
750  * The -6 is because the top borders are MP_VOID (-2) and all corners
751  * are counted twice (-4). */
752  amount = ScaleByMapSize1D(amount * num_water_tiles) / (2 * MapMaxY() + 2 * MapMaxX() - 6);
753  } else if (spec->flags & OBJECT_FLAG_SCALE_BY_WATER) {
754  amount = ScaleByMapSize1D(amount);
755  } else {
756  amount = ScaleByMapSize(amount);
757  }
758 
759  /* Now try to place the requested amount of this object */
760  for (uint j = ScaleByMapSize(1000); j != 0 && amount != 0 && Object::CanAllocateItem(); j--) {
761  switch (i) {
762  case OBJECT_TRANSMITTER:
763  if (TryBuildTransmitter()) amount--;
764  break;
765 
766  case OBJECT_LIGHTHOUSE:
767  if (TryBuildLightHouse()) amount--;
768  break;
769 
770  default:
771  uint8 view = RandomRange(spec->views);
772  if (CmdBuildObject(RandomTile(), DC_EXEC | DC_AUTO | DC_NO_TEST_TOWN_RATING | DC_NO_MODIFY_TOWN_RATING, i, view, nullptr).Succeeded()) amount--;
773  break;
774  }
775  }
777  }
778 }
779 
780 static void ChangeTileOwner_Object(TileIndex tile, Owner old_owner, Owner new_owner)
781 {
782  if (!IsTileOwner(tile, old_owner)) return;
783 
784  bool do_clear = false;
785 
786  ObjectType type = GetObjectType(tile);
787  if ((type == OBJECT_OWNED_LAND || type >= NEW_OBJECT_OFFSET) && new_owner != INVALID_OWNER) {
788  SetTileOwner(tile, new_owner);
789  } else if (type == OBJECT_STATUE) {
790  Town *t = Object::GetByTile(tile)->town;
791  ClrBit(t->statues, old_owner);
792  if (new_owner != INVALID_OWNER && !HasBit(t->statues, new_owner)) {
793  /* Transfer ownership to the new company */
794  SetBit(t->statues, new_owner);
795  SetTileOwner(tile, new_owner);
796  } else {
797  do_clear = true;
798  }
799 
801  } else {
802  do_clear = true;
803  }
804 
805  if (do_clear) {
807  /* When clearing objects, they may turn into canal, which may require transferring ownership. */
808  ChangeTileOwner(tile, old_owner, new_owner);
809  }
810 }
811 
812 static CommandCost TerraformTile_Object(TileIndex tile, DoCommandFlag flags, int z_new, Slope tileh_new)
813 {
814  ObjectType type = GetObjectType(tile);
815 
816  if (type == OBJECT_OWNED_LAND) {
817  /* Owned land remains unsold */
818  CommandCost ret = CheckTileOwnership(tile);
819  if (ret.Succeeded()) return CommandCost();
820  } else if (AutoslopeEnabled() && type != OBJECT_TRANSMITTER && type != OBJECT_LIGHTHOUSE) {
821  /* Behaviour:
822  * - Both new and old slope must not be steep.
823  * - TileMaxZ must not be changed.
824  * - Allow autoslope by default.
825  * - Disallow autoslope if callback succeeds and returns non-zero.
826  */
827  Slope tileh_old = GetTileSlope(tile);
828  /* TileMaxZ must not be changed. Slopes must not be steep. */
829  if (!IsSteepSlope(tileh_old) && !IsSteepSlope(tileh_new) && (GetTileMaxZ(tile) == z_new + GetSlopeMaxZ(tileh_new))) {
830  const ObjectSpec *spec = ObjectSpec::Get(type);
831 
832  /* Call callback 'disable autosloping for objects'. */
833  if (HasBit(spec->callback_mask, CBM_OBJ_AUTOSLOPE)) {
834  /* If the callback fails, allow autoslope. */
835  uint16 res = GetObjectCallback(CBID_OBJECT_AUTOSLOPE, 0, 0, spec, Object::GetByTile(tile), tile);
836  if (res == CALLBACK_FAILED || !ConvertBooleanCallback(spec->grf_prop.grffile, CBID_OBJECT_AUTOSLOPE, res)) return CommandCost(EXPENSES_CONSTRUCTION, _price[PR_BUILD_FOUNDATION]);
837  } else if (spec->enabled) {
838  /* allow autoslope */
839  return CommandCost(EXPENSES_CONSTRUCTION, _price[PR_BUILD_FOUNDATION]);
840  }
841  }
842  }
843 
844  return DoCommand(tile, 0, 0, flags, CMD_LANDSCAPE_CLEAR);
845 }
846 
847 extern const TileTypeProcs _tile_type_object_procs = {
848  DrawTile_Object, // draw_tile_proc
849  GetSlopePixelZ_Object, // get_slope_z_proc
850  ClearTile_Object, // clear_tile_proc
851  AddAcceptedCargo_Object, // add_accepted_cargo_proc
852  GetTileDesc_Object, // get_tile_desc_proc
853  GetTileTrackStatus_Object, // get_tile_track_status_proc
854  ClickTile_Object, // click_tile_proc
855  AnimateTile_Object, // animate_tile_proc
856  TileLoop_Object, // tile_loop_proc
857  ChangeTileOwner_Object, // change_tile_owner_proc
858  AddProducedCargo_Object, // add_produced_cargo_proc
859  nullptr, // vehicle_enter_tile_proc
860  GetFoundation_Object, // get_foundation_proc
861  TerraformTile_Object, // terraform_tile_proc
862 };
OBJECT_FLAG_BUILT_ON_WATER
@ OBJECT_FLAG_BUILT_ON_WATER
Object can be built on water (not required).
Definition: newgrf_object.h:29
TileInfo::z
int z
Height.
Definition: tile_cmd.h:47
MP_CLEAR
@ MP_CLEAR
A tile without any structures, i.e. grass, rocks, farm fields etc.
Definition: tile_type.h:46
DeleteNewGRFInspectWindow
void DeleteNewGRFInspectWindow(GrfSpecFeature feature, uint index)
Delete inspect window for a given feature and index.
Definition: newgrf_debug_gui.cpp:734
IsTileFlat
bool IsTileFlat(TileIndex tile, int *h)
Check if a given tile is flat.
Definition: tile_map.cpp:100
DIAGDIR_SE
@ DIAGDIR_SE
Southeast.
Definition: direction_type.h:80
TileDesc::grf
const char * grf
newGRF used for the tile contents
Definition: tile_cmd.h:61
OBJECT_FLAG_ANIMATION
@ OBJECT_FLAG_ANIMATION
Object has animated tiles.
Definition: newgrf_object.h:32
Object::colour
byte colour
Colour of the object, for display purpose.
Definition: object_base.h:28
TileIndex
uint32 TileIndex
The index/ID of a Tile.
Definition: tile_type.h:83
CBID_OBJECT_COLOUR
@ CBID_OBJECT_COLOUR
Called to determine the colour of a town building.
Definition: newgrf_callbacks.h:266
Cheats::magic_bulldozer
Cheat magic_bulldozer
dynamite industries, objects
Definition: cheat_type.h:27
GetObjectType
ObjectType GetObjectType(TileIndex t)
Gets the ObjectType of the given object tile.
Definition: object_cmd.cpp:61
StationFinder
Structure contains cached list of stations nearby.
Definition: station_type.h:100
DoCommand
CommandCost DoCommand(const CommandContainer *container, DoCommandFlag flags)
Shorthand for calling the long DoCommand with a container.
Definition: command.cpp:450
OBJECT_FLAG_ONLY_IN_SCENEDIT
@ OBJECT_FLAG_ONLY_IN_SCENEDIT
Object can only be constructed in the scenario editor.
Definition: newgrf_object.h:26
OAT_256_TICKS
@ OAT_256_TICKS
Triggered every 256 ticks (for all tiles at the same time).
Definition: newgrf_animation_type.h:59
Pool::PoolItem<&_object_pool >::Get
static Titem * Get(size_t index)
Returns Titem with given index.
Definition: pool_type.hpp:329
TileOffsByDiagDir
static TileIndexDiff TileOffsByDiagDir(DiagDirection dir)
Convert a DiagDirection to a TileIndexDiff.
Definition: map_func.h:341
CBID_OBJECT_LAND_SLOPE_CHECK
@ CBID_OBJECT_LAND_SLOPE_CHECK
Callback done for each tile of an object to check the slope.
Definition: newgrf_callbacks.h:254
SetWindowDirty
void SetWindowDirty(WindowClass cls, WindowNumber number)
Mark window as dirty (in need of repainting)
Definition: window.cpp:3220
water.h
GetTileMaxZ
int GetTileMaxZ(TileIndex t)
Get top height of the tile inside the map.
Definition: tile_map.cpp:141
GB
static uint GB(const T x, const uint8 s, const uint8 n)
Fetch n bits from x, started at bit s.
Definition: bitmath_func.hpp:32
FindClearedObject
ClearedObjectArea * FindClearedObject(TileIndex tile)
Find the entry in _cleared_object_areas which occupies a certain tile.
Definition: object_cmd.cpp:456
OBJECT_FLAG_2CC_COLOUR
@ OBJECT_FLAG_2CC_COLOUR
Object wants 2CC colour mapping.
Definition: newgrf_object.h:34
command_func.h
ObjectSpec
Allow incrementing of ObjectClassID variables.
Definition: newgrf_object.h:58
ObjectSpec::grf_prop
GRFFilePropsBase< 2 > grf_prop
Properties related the the grf file.
Definition: newgrf_object.h:60
TileInfo::x
uint x
X position of the tile in unit coordinates.
Definition: tile_cmd.h:43
CMD_ERROR
static const CommandCost CMD_ERROR
Define a default return value for a failed command.
Definition: command_func.h:23
TileInfo
Tile information, used while rendering the tile.
Definition: tile_cmd.h:42
Town::statues
CompanyMask statues
which companies have a statue?
Definition: town.h:66
company_base.h
IsTransparencySet
static bool IsTransparencySet(TransparencyOption to)
Check if the transparency option bit is set and if we aren't in the game menu (there's never transpar...
Definition: transparency.h:48
CommandCost::MultiplyCost
void MultiplyCost(int factor)
Multiplies the cost of the command by the given factor.
Definition: command_type.h:73
TileDesc::owner
Owner owner[4]
Name of the owner(s)
Definition: tile_cmd.h:53
OBJECT_FLAG_CLEAR_INCOME
@ OBJECT_FLAG_CLEAR_INCOME
When object is cleared a positive income is generated instead of a cost.
Definition: newgrf_object.h:30
company_gui.h
CargoPacket::InvalidateAllFrom
static void InvalidateAllFrom(SourceType src_type, SourceID src)
Invalidates (sets source_id to INVALID_SOURCE) all cargo packets from given source.
Definition: cargopacket.cpp:127
Object::location
TileArea location
Location of the object.
Definition: object_base.h:26
DiagDirToAxis
static Axis DiagDirToAxis(DiagDirection d)
Convert a DiagDirection to the axis.
Definition: direction_func.h:214
Pool::PoolItem::index
Tindex index
Index of this pool item.
Definition: pool_type.hpp:227
Object::GetByTile
static Object * GetByTile(TileIndex tile)
Get the object associated with a tile.
Definition: object_cmd.cpp:50
ObjectSpec::IsAvailable
bool IsAvailable() const
Check whether the object is available at this time.
Definition: newgrf_object.cpp:78
GetCompanyHQSize
#define GetCompanyHQSize
We encode the company HQ size in the animation stage.
Definition: object_cmd.cpp:146
CargoArray
Class for storing amounts of cargo.
Definition: cargo_type.h:81
PalSpriteID::sprite
SpriteID sprite
The 'real' sprite.
Definition: gfx_type.h:23
GetBridgeHeight
int GetBridgeHeight(TileIndex t)
Get the height ('z') of a bridge.
Definition: bridge_map.cpp:70
HasBit
static bool HasBit(const T x, const uint8 y)
Checks if a bit in a value is set.
Definition: bitmath_func.hpp:103
TryBuildLightHouse
static bool TryBuildLightHouse()
Try to build a lighthouse.
Definition: object_cmd.cpp:664
ClrBit
static T ClrBit(T &x, const uint8 y)
Clears a bit in a variable.
Definition: bitmath_func.hpp:151
TriggerObjectTileAnimation
void TriggerObjectTileAnimation(Object *o, TileIndex tile, ObjectAnimationTrigger trigger, const ObjectSpec *spec)
Trigger the update of animation on a single tile.
Definition: newgrf_object.cpp:540
WaterClass
WaterClass
classes of water (for WATER_TILE_CLEAR water tile type).
Definition: water_map.h:47
OBJECT_STATUE
static const ObjectType OBJECT_STATUE
Statue in towns.
Definition: object_type.h:18
NUM_OBJECTS
static const ObjectType NUM_OBJECTS
Number of supported objects overall.
Definition: object_type.h:25
GetPartialPixelZ
uint GetPartialPixelZ(int x, int y, Slope corners)
Determines height at given coordinate of a slope.
Definition: landscape.cpp:216
DrawBridgeMiddle
void DrawBridgeMiddle(const TileInfo *ti)
Draw the middle bits of a bridge.
Definition: tunnelbridge_cmd.cpp:1540
TileInfo::y
uint y
Y position of the tile in unit coordinates.
Definition: tile_cmd.h:44
DC_NO_WATER
@ DC_NO_WATER
don't allow building on water
Definition: command_type.h:351
newgrf_debug.h
town.h
TileY
static uint TileY(TileIndex tile)
Get the Y component of a tile.
Definition: map_func.h:215
DIAGDIR_NW
@ DIAGDIR_NW
Northwest.
Definition: direction_type.h:82
RandomRange
static uint32 RandomRange(uint32 limit)
Pick a random number between 0 and limit - 1, inclusive.
Definition: random_func.hpp:81
DrawNewObjectTile
void DrawNewObjectTile(TileInfo *ti, const ObjectSpec *spec)
Draw an object on the map.
Definition: newgrf_object.cpp:446
WC_COMPANY
@ WC_COMPANY
Company view; Window numbers:
Definition: window_type.h:362
TransportType
TransportType
Available types of transport.
Definition: transport_type.h:19
newgrf_config.h
ConvertBooleanCallback
bool ConvertBooleanCallback(const GRFFile *grffile, uint16 cbid, uint16 cb_res)
Converts a callback result into a boolean.
Definition: newgrf_commons.cpp:550
Owner
Owner
Enum for all companies/owners.
Definition: company_type.h:18
CalculateCompanyValue
Money CalculateCompanyValue(const Company *c, bool including_loan=true)
Calculate the value of the company.
Definition: economy.cpp:111
DC_EXEC
@ DC_EXEC
execute the given command
Definition: command_type.h:348
ObjectSpec::Get
static const ObjectSpec * Get(ObjectType index)
Get the specification associated with a specific ObjectType.
Definition: newgrf_object.cpp:39
ObjectSpec::size
uint8 size
The size of this objects; low nibble for X, high nibble for Y.
Definition: newgrf_object.h:65
TileDesc
Tile description for the 'land area information' tool.
Definition: tile_cmd.h:51
ObjectSpec::callback_mask
uint16 callback_mask
Bitmask of requested/allowed callbacks.
Definition: newgrf_object.h:72
DoCommandFlag
DoCommandFlag
List of flags for a command.
Definition: command_type.h:346
genworld.h
Foundation
Foundation
Enumeration for Foundations.
Definition: slope_type.h:93
TriggerObjectAnimation
void TriggerObjectAnimation(Object *o, ObjectAnimationTrigger trigger, const ObjectSpec *spec)
Trigger the update of animation on a whole object.
Definition: newgrf_object.cpp:553
EnsureNoVehicleOnGround
CommandCost EnsureNoVehicleOnGround(TileIndex tile)
Ensure there is no vehicle at the ground at the given position.
Definition: vehicle.cpp:539
Object::IncTypeCount
static void IncTypeCount(ObjectType type)
Increment the count of objects for this type.
Definition: object_base.h:43
IncreaseGeneratingWorldProgress
void IncreaseGeneratingWorldProgress(GenWorldProgress cls)
Increases the current stage of the world generation with one.
Definition: genworld_gui.cpp:1494
IncreaseAnimationStage
static void IncreaseAnimationStage(TileIndex tile)
Increase the animation stage of a whole structure.
Definition: object_cmd.cpp:136
ObjectSpec::GetClearCost
Money GetClearCost() const
Get the cost for clearing a structure of this type.
Definition: newgrf_object.h:88
FlatteningFoundation
static Foundation FlatteningFoundation(Slope s)
Returns the foundation needed to flatten a slope.
Definition: slope_func.h:369
CommandCost::Succeeded
bool Succeeded() const
Did this command succeed?
Definition: command_type.h:150
IncreaseCompanyHQSize
#define IncreaseCompanyHQSize
We encode the company HQ size in the animation stage.
Definition: object_cmd.cpp:148
object_base.h
TileX
static uint TileX(TileIndex tile)
Get the X component of a tile.
Definition: map_func.h:205
TileInfo::tileh
Slope tileh
Slope of the tile.
Definition: tile_cmd.h:45
IsTileOnWater
static bool IsTileOnWater(TileIndex t)
Tests if the tile was built on water.
Definition: water_map.h:130
SLOPE_FLAT
@ SLOPE_FLAT
a flat tile
Definition: slope_type.h:49
ReallyClearObjectTile
static void ReallyClearObjectTile(Object *o)
Perform the actual removal of the object from the map.
Definition: object_cmd.cpp:438
ChangeTileOwner
void ChangeTileOwner(TileIndex tile, Owner old_owner, Owner new_owner)
Change the owner of a tile.
Definition: landscape.cpp:601
NEW_OBJECT_OFFSET
static const ObjectType NEW_OBJECT_OFFSET
Offset for new objects.
Definition: object_type.h:24
TileDesc::build_date
Date build_date
Date of construction of tile contents.
Definition: tile_cmd.h:55
DrawTileSprites::ground
PalSpriteID ground
Palette and sprite for the ground.
Definition: sprite.h:59
WATER_CLASS_INVALID
@ WATER_CLASS_INVALID
Used for industry tiles on land (also for oilrig if newgrf says so).
Definition: water_map.h:51
OBJECT_FLAG_CANNOT_REMOVE
@ OBJECT_FLAG_CANNOT_REMOVE
Object can not be removed.
Definition: newgrf_object.h:27
DrawTileSeqStruct::delta_x
int8 delta_x
0x80 is sequence terminator
Definition: sprite.h:26
GetSlopeMaxZ
static int GetSlopeMaxZ(Slope s)
Returns the height of the highest corner of a slope relative to TileZ (= minimal height)
Definition: slope_func.h:160
DIAGDIR_SW
@ DIAGDIR_SW
Southwest.
Definition: direction_type.h:81
GetAnimationFrame
static byte GetAnimationFrame(TileIndex t)
Get the current animation frame.
Definition: tile_map.h:250
CheckOwnership
CommandCost CheckOwnership(Owner owner, TileIndex tile)
Check whether the current owner owns something.
Definition: company_cmd.cpp:311
return_cmd_error
#define return_cmd_error(errcode)
Returns from a function with a specific StringID as error.
Definition: command_func.h:33
MapSize
static uint MapSize()
Get the size of the map.
Definition: map_func.h:92
EXPENSES_CONSTRUCTION
@ EXPENSES_CONSTRUCTION
Construction costs.
Definition: economy_type.h:158
IsSteepSlope
static bool IsSteepSlope(Slope s)
Checks if a slope is steep.
Definition: slope_func.h:36
CommandCost
Common return value for all commands.
Definition: command_type.h:23
HasTileWaterGround
static bool HasTileWaterGround(TileIndex t)
Checks whether the tile has water at the ground.
Definition: water_map.h:344
_date
Date _date
Current date in days (day counter)
Definition: date.cpp:28
TILE_AREA_LOOP
#define TILE_AREA_LOOP(var, ta)
A loop which iterates over the tiles of a TileArea.
Definition: tilearea_type.h:232
CircularTileSearch
bool CircularTileSearch(TileIndex *tile, uint size, TestTileOnSearchProc proc, void *user_data)
Function performing a search around a center tile and going outward, thus in circle.
Definition: map.cpp:258
clear_func.h
WC_TOWN_AUTHORITY
@ WC_TOWN_AUTHORITY
Town authority; Window numbers:
Definition: window_type.h:187
DrawTileSeqStruct::delta_z
int8 delta_z
0x80 identifies child sprites
Definition: sprite.h:28
DirtyCompanyInfrastructureWindows
void DirtyCompanyInfrastructureWindows(CompanyID company)
Redraw all windows with company infrastructure counts.
Definition: company_gui.cpp:2762
CalcClosestTownFromTile
Town * CalcClosestTownFromTile(TileIndex tile, uint threshold=UINT_MAX)
Return the town closest to the given tile within threshold.
Definition: town_cmd.cpp:3580
ObjectSpec::WasEverAvailable
bool WasEverAvailable() const
Check whether the object was available at some point in the past or present in this game with the cur...
Definition: newgrf_object.cpp:69
autoslope.h
ObjectType
uint16 ObjectType
Types of objects.
Definition: object_type.h:14
MP_OBJECT
@ MP_OBJECT
Contains objects such as transmitters and owned land.
Definition: tile_type.h:56
_cheats
Cheats _cheats
All the cheats.
Definition: cheat.cpp:16
Object::view
byte view
The view setting for this object.
Definition: object_base.h:29
INVALID_OWNER
@ INVALID_OWNER
An invalid owner.
Definition: company_type.h:29
OrthogonalTileArea::w
uint16 w
The width of the area.
Definition: tilearea_type.h:18
MP_WATER
@ MP_WATER
Water tile.
Definition: tile_type.h:52
CommandCost::Failed
bool Failed() const
Did this command fail?
Definition: command_type.h:159
BuildObject
void BuildObject(ObjectType type, TileIndex tile, CompanyID owner, Town *town, uint8 view)
Actually build the object.
Definition: object_cmd.cpp:83
IsInvisibilitySet
static bool IsInvisibilitySet(TransparencyOption to)
Check if the invisibility option bit is set and if we aren't in the game menu (there's never transpar...
Definition: transparency.h:59
Object
An object, such as transmitter, on the map.
Definition: object_base.h:23
OrthogonalTileArea
Represents the covered area of e.g.
Definition: tilearea_type.h:16
GetErrorMessageFromLocationCallbackResult
CommandCost GetErrorMessageFromLocationCallbackResult(uint16 cb_res, const GRFFile *grffile, StringID default_error)
Get the error message from a shape/location/slope check callback result.
Definition: newgrf_commons.cpp:480
foreach_draw_tile_seq
#define foreach_draw_tile_seq(idx, list)
Iterate through all DrawTileSeqStructs in DrawTileSprites.
Definition: sprite.h:79
_settings_game
GameSettings _settings_game
Game settings of a running game or the scenario editor.
Definition: settings.cpp:80
CBM_OBJ_COLOUR
@ CBM_OBJ_COLOUR
decide the colour of the building
Definition: newgrf_callbacks.h:385
Object::type
ObjectType type
Type of the object.
Definition: object_base.h:24
MAX_COMPANIES
@ MAX_COMPANIES
Maximum number of companies.
Definition: company_type.h:23
safeguards.h
cargopacket.h
GWP_OBJECT
@ GWP_OBJECT
Generate objects (radio tower, light houses)
Definition: genworld.h:76
IsValidTile
static bool IsValidTile(TileIndex tile)
Checks if a tile is valid.
Definition: tile_map.h:161
ConstructionSettings::freeform_edges
bool freeform_edges
allow terraforming the tiles at the map edges
Definition: settings_type.h:333
GetTileSlope
Slope GetTileSlope(TileIndex tile, int *h)
Return the slope of a given tile inside the map.
Definition: tile_map.cpp:59
UpdateCompanyRatingAndValue
int UpdateCompanyRatingAndValue(Company *c, bool update)
if update is set to true, the economy is updated with this score (also the house is updated,...
Definition: economy.cpp:149
IsTileOwner
static bool IsTileOwner(TileIndex tile, Owner owner)
Checks if a tile belongs to the given owner.
Definition: tile_map.h:214
ST_HEADQUARTERS
@ ST_HEADQUARTERS
Source/destination are company headquarters.
Definition: cargo_type.h:149
CmdBuildObject
CommandCost CmdBuildObject(TileIndex tile, DoCommandFlag flags, uint32 p1, uint32 p2, const char *text)
Build an object object.
Definition: object_cmd.cpp:202
CompanyProperties::location_of_HQ
TileIndex location_of_HQ
Northern tile of HQ; INVALID_TILE when there is none.
Definition: company_base.h:74
RandomTile
#define RandomTile()
Get a valid random tile.
Definition: map_func.h:435
ObjectSpec::height
uint8 height
The height of this structure, in heightlevels; max MAX_TILE_HEIGHT.
Definition: newgrf_object.h:73
DrawTileSprites
Ground palette sprite of a tile, together with its sprite layout.
Definition: sprite.h:58
DC_NO_TEST_TOWN_RATING
@ DC_NO_TEST_TOWN_RATING
town rating does not disallow you from building
Definition: command_type.h:353
AutoslopeEnabled
static bool AutoslopeEnabled()
Tests if autoslope is enabled for _current_company.
Definition: autoslope.h:44
FOUNDATION_NONE
@ FOUNDATION_NONE
The tile has no foundation, the slope remains unchanged.
Definition: slope_type.h:94
GetSouthernBridgeEnd
TileIndex GetSouthernBridgeEnd(TileIndex t)
Finds the southern end of a bridge starting at a middle tile.
Definition: bridge_map.cpp:49
Slope
Slope
Enumeration for the slope-type.
Definition: slope_type.h:48
DiagDirection
DiagDirection
Enumeration for diagonal directions.
Definition: direction_type.h:77
date_func.h
CommandCost::AddCost
void AddCost(const Money &cost)
Adds the given cost to the cost of the command.
Definition: command_type.h:62
WATER_CLASS_CANAL
@ WATER_CLASS_CANAL
Canal.
Definition: water_map.h:49
stdafx.h
landscape.h
ObjectSpec::enabled
bool enabled
Is this spec enabled?
Definition: newgrf_object.h:76
TileTypeProcs
Set of callback functions for performing tile operations of a given tile type.
Definition: tile_cmd.h:145
Cheat::value
bool value
tells if the bool cheat is active or not
Definition: cheat_type.h:18
viewport_func.h
TileLoop_Water
void TileLoop_Water(TileIndex tile)
Let a water tile floods its diagonal adjoining tiles called from tunnelbridge_cmd,...
Definition: water_cmd.cpp:1210
bridge_map.h
IsTileType
static bool IsTileType(TileIndex tile, TileType type)
Checks if a tile is a given tiletype.
Definition: tile_map.h:150
CBID_OBJECT_AUTOSLOPE
@ CBID_OBJECT_AUTOSLOPE
Called to determine if one can alter the ground below an object tile.
Definition: newgrf_callbacks.h:272
GetTileOwner
static Owner GetTileOwner(TileIndex tile)
Returns the owner of a tile.
Definition: tile_map.h:178
AddSortableSpriteToDraw
void AddSortableSpriteToDraw(SpriteID image, PaletteID pal, int x, int y, int w, int h, int dz, int z, bool transparent, int bb_offset_x, int bb_offset_y, int bb_offset_z, const SubSprite *sub)
Draw a (transparent) sprite at given coordinates with a given bounding box.
Definition: viewport.cpp:660
OBJECT_FLAG_NOT_ON_LAND
@ OBJECT_FLAG_NOT_ON_LAND
Object can not be on land, implicitly sets OBJECT_FLAG_BUILT_ON_WATER.
Definition: newgrf_object.h:35
newgrf_object.h
OrthogonalTileArea::h
uint16 h
The height of the area.
Definition: tilearea_type.h:19
ObjectSpec::name
StringID name
The name for this object.
Definition: newgrf_object.h:62
object_map.h
DrawFoundation
void DrawFoundation(TileInfo *ti, Foundation f)
Draw foundation f at tile ti.
Definition: landscape.cpp:471
OBJECT_OWNED_LAND
static const ObjectType OBJECT_OWNED_LAND
Owned land 'flag'.
Definition: object_type.h:19
_generating_world
bool _generating_world
Whether we are generating the map or not.
Definition: genworld.cpp:61
OBJECT_FLAG_AUTOREMOVE
@ OBJECT_FLAG_AUTOREMOVE
Object get automatically removed (like "owned land").
Definition: newgrf_object.h:28
ObjectSpec::generate_amount
uint8 generate_amount
Number of objects which are attempted to be generated per 256^2 map during world generation.
Definition: newgrf_object.h:75
EconomyIsInRecession
static bool EconomyIsInRecession()
Is the economy in recession?
Definition: economy_func.h:47
CALLBACK_FAILED
static const uint CALLBACK_FAILED
Different values for Callback result evaluations.
Definition: newgrf_callbacks.h:404
object_land.h
_current_company
CompanyID _current_company
Company currently doing an action.
Definition: company_cmd.cpp:47
vehicle_func.h
OAT_BUILT
@ OAT_BUILT
Triggered when the object is built (for all tiles at the same time).
Definition: newgrf_animation_type.h:57
CBM_OBJ_SLOPE_CHECK
@ CBM_OBJ_SLOPE_CHECK
decides slope suitability
Definition: newgrf_callbacks.h:382
Pool::PoolItem<&_object_pool >::Iterate
static Pool::IterateWrapper< Titem > Iterate(size_t from=0)
Returns an iterable ensemble of all valid Titem.
Definition: pool_type.hpp:378
IsObjectTypeTile
static bool IsObjectTypeTile(TileIndex t, ObjectType type)
Check whether a tile is a object tile of a specific type.
Definition: object_map.h:36
Pool
Base class for all pools.
Definition: pool_type.hpp:81
TO_STRUCTURES
@ TO_STRUCTURES
other objects such as transmitters and lighthouses
Definition: transparency.h:29
GetWaterClass
static WaterClass GetWaterClass(TileIndex t)
Get the water class at a tile.
Definition: water_map.h:106
ScaleByMapSize
static uint ScaleByMapSize(uint n)
Scales the given value by the map size, where the given value is for a 256 by 256 map.
Definition: map_func.h:122
OAT_TILELOOP
@ OAT_TILELOOP
Triggered in the periodic tile loop.
Definition: newgrf_animation_type.h:58
MapMaxY
static uint MapMaxY()
Gets the maximum Y coordinate within the map, including MP_VOID.
Definition: map_func.h:111
Pool::PoolItem<&_town_pool >::GetNumItems
static size_t GetNumItems()
Returns number of valid items in the pool.
Definition: pool_type.hpp:359
TileXY
static TileIndex TileXY(uint x, uint y)
Returns the TileIndex of a coordinate.
Definition: map_func.h:163
ObjectSpec::views
uint8 views
The number of views.
Definition: newgrf_object.h:74
TryBuildTransmitter
static bool TryBuildTransmitter()
Try to build a transmitter.
Definition: object_cmd.cpp:706
IsWaterTile
static bool IsWaterTile(TileIndex t)
Is it a water tile with plain water?
Definition: water_map.h:184
CheckBuildableTile
CommandCost CheckBuildableTile(TileIndex tile, uint invalid_dirs, int &allowed_z, bool allow_steep, bool check_bridge)
Checks if the given tile is buildable, flat and has a certain height.
Definition: station_cmd.cpp:784
SetGeneratingWorldProgress
void SetGeneratingWorldProgress(GenWorldProgress cls, uint total)
Set the total of a stage of the world generation.
Definition: genworld_gui.cpp:1480
OrthogonalTileArea::tile
TileIndex tile
The base tile of the area.
Definition: tilearea_type.h:17
PaletteID
uint32 PaletteID
The number of the palette.
Definition: gfx_type.h:18
CBM_OBJ_AUTOSLOPE
@ CBM_OBJ_AUTOSLOPE
decides allowance of autosloping
Definition: newgrf_callbacks.h:387
cheat_type.h
OBJECT_FLAG_ALLOW_UNDER_BRIDGE
@ OBJECT_FLAG_ALLOW_UNDER_BRIDGE
Object can built under a bridge.
Definition: newgrf_object.h:37
MarkTileDirtyByTile
void MarkTileDirtyByTile(TileIndex tile, int bridge_level_offset, int tile_height_override)
Mark a tile given by its index dirty for repaint.
Definition: viewport.cpp:1985
ObjectSpec::GetByTile
static const ObjectSpec * GetByTile(TileIndex tile)
Get the specification associated with a tile.
Definition: newgrf_object.cpp:50
OWNER_NONE
@ OWNER_NONE
The tile has no ownership.
Definition: company_type.h:25
GetObjectCallback
uint16 GetObjectCallback(CallbackID callback, uint32 param1, uint32 param2, const ObjectSpec *spec, Object *o, TileIndex tile, uint8 view)
Perform a callback for an object.
Definition: newgrf_object.cpp:408
Pool::PoolItem<&_object_pool >::CanAllocateItem
static bool CanAllocateItem(size_t n=1)
Helper functions so we can use PoolItem::Function() instead of _poolitem_pool.Function()
Definition: pool_type.hpp:299
MakeObject
static void MakeObject(TileIndex t, Owner o, ObjectID index, WaterClass wc, byte random)
Make an Object tile.
Definition: object_map.h:74
TileDesc::str
StringID str
Description of the tile.
Definition: tile_cmd.h:52
DC_AUTO
@ DC_AUTO
don't allow building on structures
Definition: command_type.h:349
EXPENSES_PROPERTY
@ EXPENSES_PROPERTY
Property costs.
Definition: economy_type.h:164
GetTileMaxPixelZ
static int GetTileMaxPixelZ(TileIndex tile)
Get top height of the tile.
Definition: tile_map.h:304
ScaleByMapSize1D
static uint ScaleByMapSize1D(uint n)
Scales the given value by the maps circumference, where the given value is for a 256 by 256 map.
Definition: map_func.h:136
DC_NO_MODIFY_TOWN_RATING
@ DC_NO_MODIFY_TOWN_RATING
do not change town rating
Definition: command_type.h:358
InitializeObjects
void InitializeObjects()
Initialize/reset the objects.
Definition: object_cmd.cpp:68
MapMaxX
static uint MapMaxX()
Gets the maximum X coordinate within the map, including MP_VOID.
Definition: map_func.h:102
Object::DecTypeCount
static void DecTypeCount(ObjectType type)
Decrement the count of objects for this type.
Definition: object_base.h:54
INSTANTIATE_POOL_METHODS
#define INSTANTIATE_POOL_METHODS(name)
Force instantiation of pool methods so we don't get linker errors.
Definition: pool_func.hpp:224
TileArea
OrthogonalTileArea TileArea
Shorthand for the much more common orthogonal tile area.
Definition: tilearea_type.h:96
Object::ResetTypeCounts
static void ResetTypeCounts()
Resets object counts.
Definition: object_base.h:72
CheckTileOwnership
CommandCost CheckTileOwnership(TileIndex tile)
Check whether the current owner owns the stuff on the given tile.
Definition: company_cmd.cpp:329
DrawTileSprites::seq
const DrawTileSeqStruct * seq
Array of child sprites. Terminated with a terminator entry.
Definition: sprite.h:60
window_func.h
ToggleBit
static T ToggleBit(T &x, const uint8 y)
Toggles a bit in a variable.
Definition: bitmath_func.hpp:181
SetBit
static T SetBit(T &x, const uint8 y)
Set a bit in a variable.
Definition: bitmath_func.hpp:121
Town
Town data structure.
Definition: town.h:50
UpdateCompanyHQ
void UpdateCompanyHQ(TileIndex tile, uint score)
Update the CompanyHQ to the state associated with the given score.
Definition: object_cmd.cpp:155
random_func.hpp
OBJECT_FLAG_HAS_NO_FOUNDATION
@ OBJECT_FLAG_HAS_NO_FOUNDATION
Do not display foundations when on a slope.
Definition: newgrf_object.h:31
INVALID_TILE
static const TileIndex INVALID_TILE
The very nice invalid tile marker.
Definition: tile_type.h:88
GetObjectIndex
static ObjectID GetObjectIndex(TileIndex t)
Get the index of which object this tile is attached to.
Definition: object_map.h:47
AnimateNewObjectTile
void AnimateNewObjectTile(TileIndex tile)
Handle the animation of the object tile.
Definition: newgrf_object.cpp:525
OBJECT_FLAG_SCALE_BY_WATER
@ OBJECT_FLAG_SCALE_BY_WATER
Object count is roughly scaled by water amount at edges.
Definition: newgrf_object.h:39
HasTransmitter
static bool HasTransmitter(TileIndex tile, void *user)
Helper function for CircularTileSearch.
Definition: object_cmd.cpp:655
SetTileOwner
static void SetTileOwner(TileIndex tile, Owner owner)
Sets the owner of a tile.
Definition: tile_map.h:198
TileInfo::tile
TileIndex tile
Tile index.
Definition: tile_cmd.h:46
GameSettings::construction
ConstructionSettings construction
construction of things in-game
Definition: settings_type.h:565
ErrorUnknownCallbackResult
void ErrorUnknownCallbackResult(uint32 grfid, uint16 cbid, uint16 cb_res)
Record that a NewGRF returned an unknown/invalid callback result.
Definition: newgrf_commons.cpp:516
GRFFilePropsBase::grffile
const struct GRFFile * grffile
grf file that introduced this entity
Definition: newgrf_commons.h:320
GetTilePixelSlope
static Slope GetTilePixelSlope(TileIndex tile, int *h)
Return the slope of a given tile.
Definition: tile_map.h:280
pool_func.hpp
OBJECT_HQ
static const ObjectType OBJECT_HQ
HeadQuarter of a player.
Definition: object_type.h:20
SetAnimationFrame
static void SetAnimationFrame(TileIndex t, byte frame)
Set a new animation frame.
Definition: tile_map.h:262
OBJECT_TRANSMITTER
static const ObjectType OBJECT_TRANSMITTER
The large antenna.
Definition: object_type.h:16
OBJECT_LIGHTHOUSE
static const ObjectType OBJECT_LIGHTHOUSE
The nice lighthouse.
Definition: object_type.h:17
ShowCompany
void ShowCompany(CompanyID company)
Show the window with the overview of the company.
Definition: company_gui.cpp:2751
DIAGDIR_NE
@ DIAGDIR_NE
Northeast, upper right on your monitor.
Definition: direction_type.h:79
ClearedObjectArea
Keeps track of removed objects during execution/testruns of commands.
Definition: object_base.h:84
Company
Definition: company_base.h:110
Object::counts
static uint16 counts[NUM_OBJECTS]
Number of objects per type ingame.
Definition: object_base.h:78
OWNER_WATER
@ OWNER_WATER
The tile/execution is done by "water".
Definition: company_type.h:26
Object::build_date
Date build_date
Date of construction.
Definition: object_base.h:27
Livery
Information about a particular livery.
Definition: livery.h:78
Object::town
Town * town
Town the object is built in.
Definition: object_base.h:25
CMD_LANDSCAPE_CLEAR
@ CMD_LANDSCAPE_CLEAR
demolish a tile
Definition: command_type.h:180
GetGRFConfig
GRFConfig * GetGRFConfig(uint32 grfid, uint32 mask)
Retrieve a NewGRF from the current config by its grfid.
Definition: newgrf_config.cpp:811
OWNER_TOWN
@ OWNER_TOWN
A town owns the tile, or a town is expanding.
Definition: company_type.h:24
IsObjectType
static bool IsObjectType(TileIndex t, ObjectType type)
Check whether the object on a tile is of a specific type.
Definition: object_map.h:25
UpdateObjectColours
void UpdateObjectColours(const Company *c)
Updates the colour of the object whenever a company changes.
Definition: object_cmd.cpp:174
DrawGroundSprite
void DrawGroundSprite(SpriteID image, PaletteID pal, const SubSprite *sub, int extra_offs_x, int extra_offs_y)
Draws a ground sprite for the current tile.
Definition: viewport.cpp:576
object.h
GRFConfig::GetName
const char * GetName() const
Get the name of this grf.
Definition: newgrf_config.cpp:105
IsBridgeAbove
static bool IsBridgeAbove(TileIndex t)
checks if a bridge is set above the ground of this tile
Definition: bridge_map.h:45
OBJECT_FLAG_ONLY_IN_GAME
@ OBJECT_FLAG_ONLY_IN_GAME
Object can only be built in game.
Definition: newgrf_object.h:33
DrawTileSeqStruct
A tile child sprite and palette to draw for stations etc, with 3D bounding box.
Definition: sprite.h:25
Livery::colour2
byte colour2
Second colour, for vehicles with 2CC support.
Definition: livery.h:81
ObjectSpec::flags
ObjectFlags flags
Flags/settings related to the object.
Definition: newgrf_object.h:70
Livery::colour1
byte colour1
First colour, for all vehicles.
Definition: livery.h:80
AXIS_X
@ AXIS_X
The X axis.
Definition: direction_type.h:124