OpenRCT2/src/world/map.c

3108 lines
89 KiB
C
Raw Normal View History

2014-04-09 04:09:30 +02:00
/*****************************************************************************
* Copyright (c) 2014 Ted John, Peter Hill
2014-04-09 04:09:30 +02:00
* OpenRCT2, an open source clone of Roller Coaster Tycoon 2.
*
* This file is part of OpenRCT2.
*
* OpenRCT2 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, either version 3 of the License, or
* (at your option) any later version.
* This program 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. See the
* GNU General Public License for more details.
* You should have received a copy of the GNU General Public License
* along with this program. If not, see <http://www.gnu.org/licenses/>.
*****************************************************************************/
2014-10-06 18:36:58 +02:00
#include "../addresses.h"
#include "../audio/audio.h"
#include "../game.h"
#include "../interface/window.h"
2014-10-06 18:36:58 +02:00
#include "../localisation/date.h"
#include "../localisation/localisation.h"
#include "../management/finance.h"
#include "../scenario.h"
#include "banner.h"
2014-04-09 12:16:35 +02:00
#include "climate.h"
#include "footpath.h"
2014-04-09 04:09:30 +02:00
#include "map.h"
2015-04-22 23:47:59 +02:00
#include "map_animation.h"
#include "park.h"
#include "scenery.h"
#include "../cheats.h"
#include "../config.h"
2014-04-09 04:09:30 +02:00
const rct_xy16 TileDirectionDelta[] = {
{ -32, 0 },
{ 0, +32 },
{ +32, 0 },
{ 0, -32 },
{ -32, +32 },
{ +32, +32 },
{ +32, -32 },
{ -32, -32 }
};
rct_xy16 *gMapSelectionTiles = (rct_xy16*)0x009DE596;
bool LandPaintMode;
2015-05-15 17:28:27 +02:00
bool LandRightsMode;
bool gClearSmallScenery;
bool gClearLargeScenery;
bool gClearFootpath;
2014-10-09 21:31:58 +02:00
int _sub_6A876D_save_x;
int _sub_6A876D_save_y;
2014-04-09 18:06:47 +02:00
static void tiles_init();
2014-10-09 21:31:58 +02:00
static void sub_6A87BB(int x, int y);
static void map_update_grass_length(int x, int y, rct_map_element *mapElement);
static void map_set_grass_length(int x, int y, rct_map_element *mapElement, int length);
2015-06-20 17:24:38 +02:00
static void sub_68ADBC();
static void sub_68AE2A(int x, int y);
2014-04-09 04:09:30 +02:00
2015-06-23 03:37:06 +02:00
void rotate_map_coordinates(sint16* x, sint16* y, int rotation){
int temp;
switch (rotation){
case MAP_ELEMENT_DIRECTION_WEST:
break;
case MAP_ELEMENT_DIRECTION_NORTH:
temp = *x;
*x = *y;
*y = -temp;
break;
case MAP_ELEMENT_DIRECTION_EAST:
*x = -*x;
*y = -*y;
break;
case MAP_ELEMENT_DIRECTION_SOUTH:
temp = *y;
*y = *x;
*x = -temp;
break;
}
}
2015-06-23 03:37:06 +02:00
rct_xy16 coordinate_3d_to_2d(const rct_xyz16* coordinate_3d, int rotation){
rct_xy16 coordinate_2d;
switch (rotation){
case 0:
coordinate_2d.x = coordinate_3d->y - coordinate_3d->x;
coordinate_2d.y = (coordinate_3d->y + coordinate_3d->x) / 2 - coordinate_3d->z;
break;
case 1:
coordinate_2d.x = -coordinate_3d->y - coordinate_3d->x;
coordinate_2d.y = (coordinate_3d->y - coordinate_3d->x) / 2 - coordinate_3d->z;
break;
case 2:
coordinate_2d.x = -coordinate_3d->y + coordinate_3d->x;
coordinate_2d.y = (-coordinate_3d->y - coordinate_3d->x) / 2 - coordinate_3d->z;
break;
case 3:
coordinate_2d.x = coordinate_3d->y + coordinate_3d->x;
coordinate_2d.y = (-coordinate_3d->y + coordinate_3d->x) / 2 - coordinate_3d->z;
break;
}
return coordinate_2d;
}
2015-01-22 01:19:05 +01:00
void map_element_iterator_begin(map_element_iterator *it)
{
it->x = 0;
it->y = 0;
it->element = map_get_first_element_at(0, 0);
}
int map_element_iterator_next(map_element_iterator *it)
{
if (it->element == NULL) {
it->element = map_get_first_element_at(it->x, it->y);
return 1;
}
if (!map_element_is_last_for_tile(it->element)) {
it->element++;
return 1;
}
if (it->x < 255) {
it->x++;
it->element = map_get_first_element_at(it->x, it->y);
return 1;
}
if (it->y < 255) {
it->x = 0;
it->y++;
it->element = map_get_first_element_at(it->x, it->y);
return 1;
}
return 0;
}
void map_element_iterator_restart_for_tile(map_element_iterator *it)
{
it->element = NULL;
}
rct_map_element *map_get_first_element_at(int x, int y)
{
2015-06-27 16:17:54 +02:00
if (x < 0 || y < 0 || x > 255 || y > 255) {
log_error("Trying to access element outside of range");
return NULL;
}
2015-01-22 01:19:05 +01:00
return TILE_MAP_ELEMENT_POINTER(x + y * 256);
}
2015-06-27 16:17:54 +02:00
void map_set_tile_elements(int x, int y, rct_map_element *elements)
{
if (x < 0 || y < 0 || x > 255 || y > 255) {
log_error("Trying to access element outside of range");
return;
}
TILE_MAP_ELEMENT_POINTER(x + y * 256) = elements;
}
2015-01-22 01:19:05 +01:00
int map_element_is_last_for_tile(rct_map_element *element)
{
return element->flags & MAP_ELEMENT_FLAG_LAST_TILE;
}
int map_element_get_type(rct_map_element *element)
{
return element->type & MAP_ELEMENT_TYPE_MASK;
}
2015-06-27 16:17:54 +02:00
int map_element_get_direction(rct_map_element *element)
{
return element->type & MAP_ELEMENT_DIRECTION_MASK;
}
2014-09-18 00:42:18 +02:00
int map_element_get_terrain(rct_map_element *element)
{
int terrain = (element->properties.surface.terrain >> 5) & 7;
if (element->type & 1)
terrain |= (1 << 3);
return terrain;
}
int map_element_get_terrain_edge(rct_map_element *element)
{
int terrain_edge = (element->properties.surface.slope >> 5) & 7;
if (element->type & 128)
terrain_edge |= (1 << 3);
return terrain_edge;
}
2014-04-13 23:23:56 +02:00
void map_element_set_terrain(rct_map_element *element, int terrain)
{
// Bit 3 for terrain is stored in element.type bit 0
if (terrain & 8)
element->type |= 1;
else
element->type &= ~1;
// Bits 0, 1, 2 for terrain are stored in element.terrain bit 5, 6, 7
element->properties.surface.terrain &= ~0xE0;
element->properties.surface.terrain |= (terrain & 7) << 5;
2014-04-13 23:23:56 +02:00
}
void map_element_set_terrain_edge(rct_map_element *element, int terrain)
{
2014-09-18 00:42:18 +02:00
// Bit 3 for terrain is stored in element.type bit 7
2014-04-13 23:23:56 +02:00
if (terrain & 8)
element->type |= 128;
else
element->type &= ~128;
// Bits 0, 1, 2 for terrain are stored in element.slope bit 5, 6, 7
element->properties.surface.slope &= ~0xE0;
2014-09-18 00:42:18 +02:00
element->properties.surface.slope |= (terrain & 7) << 5;
2014-04-13 23:23:56 +02:00
}
rct_map_element *map_get_surface_element_at(int x, int y)
{
2015-01-22 01:19:05 +01:00
rct_map_element *mapElement = map_get_first_element_at(x, y);
if (mapElement == NULL)
return NULL;
// Find the first surface element
2015-01-22 01:19:05 +01:00
while (map_element_get_type(mapElement) != MAP_ELEMENT_TYPE_SURFACE) {
if (map_element_is_last_for_tile(mapElement))
return NULL;
mapElement++;
}
return mapElement;
}
rct_map_element* map_get_path_element_at(int x, int y, int z){
rct_map_element *mapElement = map_get_first_element_at(x, y);
if (mapElement == NULL)
return NULL;
uint8 mapFound = 0;
// Find the path element at known z
do {
if (map_element_get_type(mapElement) != MAP_ELEMENT_TYPE_PATH)
continue;
if (mapElement->base_height != z)
continue;
return mapElement;
} while (!map_element_is_last_for_tile(mapElement++));
return NULL;
}
2014-04-09 04:09:30 +02:00
/**
*
* rct2: 0x0068AB4C
*/
2015-02-09 19:32:58 +01:00
void map_init(int size)
2014-04-09 04:09:30 +02:00
{
int i;
rct_map_element *map_element;
2014-04-09 12:16:35 +02:00
date_reset();
2014-04-09 04:09:30 +02:00
RCT2_GLOBAL(0x0138B580, sint16) = 0;
RCT2_GLOBAL(0x010E63B8, sint32) = 0;
2014-04-09 18:06:47 +02:00
for (i = 0; i < MAX_TILE_MAP_ELEMENT_POINTERS; i++) {
2014-04-09 04:09:30 +02:00
map_element = GET_MAP_ELEMENT(i);
map_element->type = (MAP_ELEMENT_TYPE_SURFACE << 2);
2014-04-10 05:02:06 +02:00
map_element->flags = MAP_ELEMENT_FLAG_LAST_TILE;
map_element->base_height = 14;
map_element->clearance_height = 14;
map_element->properties.surface.slope = 0;
2014-04-10 05:02:06 +02:00
map_element->properties.surface.grass_length = 1;
map_element->properties.surface.ownership = 0;
map_element->properties.surface.terrain = 0;
2014-04-13 23:23:56 +02:00
map_element_set_terrain(map_element, TERRAIN_GRASS);
map_element_set_terrain_edge(map_element, TERRAIN_EDGE_ROCK);
2014-04-09 04:09:30 +02:00
}
RCT2_GLOBAL(RCT2_ADDRESS_GRASS_SCENERY_TILEPOS, sint16) = 0;
2014-10-09 21:31:58 +02:00
_sub_6A876D_save_x = 0;
_sub_6A876D_save_y = 0;
2015-06-13 19:58:58 +02:00
RCT2_GLOBAL(RCT2_ADDRESS_MAP_SIZE_UNITS, sint16) = size * 32 - 32;
RCT2_GLOBAL(RCT2_ADDRESS_MAP_SIZE_MINUS_2, sint16) = size * 32 - 2;
2015-02-09 19:32:58 +01:00
RCT2_GLOBAL(RCT2_ADDRESS_MAP_SIZE, sint16) = size;
2015-06-13 19:58:58 +02:00
RCT2_GLOBAL(RCT2_ADDRESS_MAP_MAX_XY, sint16) = size * 32 - 33;
2014-04-09 04:09:30 +02:00
RCT2_GLOBAL(0x01359208, sint16) = 7;
2014-04-10 16:14:47 +02:00
map_update_tile_pointers();
2015-06-20 17:24:38 +02:00
sub_68ADBC();
2014-04-09 12:16:35 +02:00
climate_reset(CLIMATE_WARM);
2014-04-09 18:06:47 +02:00
}
/**
*
* rct2: 0x0068AFFD
*/
2014-04-10 16:14:47 +02:00
void map_update_tile_pointers()
2014-04-09 18:06:47 +02:00
{
2015-01-22 01:19:05 +01:00
int i, x, y;
2014-04-09 18:06:47 +02:00
for (i = 0; i < MAX_TILE_MAP_ELEMENT_POINTERS; i++)
TILE_MAP_ELEMENT_POINTER(i) = TILE_UNDEFINED_MAP_ELEMENT;
rct_map_element *mapElement = RCT2_ADDRESS(RCT2_ADDRESS_MAP_ELEMENTS, rct_map_element);
rct_map_element **tile = RCT2_ADDRESS(RCT2_ADDRESS_TILE_MAP_ELEMENT_POINTERS, rct_map_element*);
for (y = 0; y < 256; y++) {
for (x = 0; x < 256; x++) {
*tile++ = mapElement;
2015-01-22 01:19:05 +01:00
do { } while (!map_element_is_last_for_tile(mapElement++));
2014-04-09 18:06:47 +02:00
}
}
// Possible next free map element
RCT2_GLOBAL(0x0140E9A4, rct_map_element*) = mapElement;
2014-04-10 16:14:47 +02:00
}
/**
* Return the absolute height of an element, given its (x,y) coordinates
*
* ax: x
* cx: y
* dx: return remember to & with 0xFFFF if you don't want water affecting results
2014-04-10 16:14:47 +02:00
* rct2: 0x00662783
*/
int map_element_height(int x, int y)
2014-04-10 16:14:47 +02:00
{
rct_map_element *mapElement;
// Off the map
2014-04-10 16:14:47 +02:00
if (x >= 8192 || y >= 8192)
return 16;
// Truncate subtile coordinates
int x_tile = x & 0xFFFFFFE0;
int y_tile = y & 0xFFFFFFE0;
2014-04-10 16:14:47 +02:00
// Get the surface element for the tile
mapElement = map_get_surface_element_at(x_tile / 32, y_tile / 32);
2014-04-10 16:14:47 +02:00
uint32 height =
2014-04-10 16:14:47 +02:00
((mapElement->properties.surface.terrain & MAP_ELEMENT_WATER_HEIGHT_MASK) << 20) |
(mapElement->base_height << 3);
uint32 slope = (mapElement->properties.surface.slope & MAP_ELEMENT_SLOPE_MASK);
uint8 extra_height = (slope & 0x10) >> 4; // 0x10 is the 5th bit - sets slope to double height
// Remove the extra height bit
slope &= 0xF;
2014-08-24 15:52:38 +02:00
sint8 quad, quad_extra; // which quadrant the element is in?
// quad_extra is for extra height tiles
uint8 xl, yl; // coordinates across this tile
uint8 TILE_SIZE = 31;
xl = x & 0x1f;
yl = y & 0x1f;
// Slope logic:
// Each of the four bits in slope represents that corner being raised
// slope == 15 (all four bits) is not used and slope == 0 is flat
// If the extra_height bit is set, then the slope goes up two z-levels
// We arbitrarily take the SW corner to be closest to the viewer
// One corner up
if ((slope == 1) || (slope == 2) || (slope == 4) || (slope == 8)) {
switch (slope) {
case 1: // NE corner up
quad = xl + yl - TILE_SIZE;
break;
case 2: // SE corner up
quad = xl - yl;
break;
case 4: // SW corner up
quad = TILE_SIZE - yl - xl;
break;
case 8: // NW corner up
2014-08-24 15:52:38 +02:00
quad = yl - xl;
break;
}
// If the element is in the quadrant with the slope, raise its height
if (quad > 0) {
height += quad / 2;
}
}
// One side up
switch (slope) {
case 3: // E side up
height += xl / 2 + 1;
break;
case 6: // S side up
height += (TILE_SIZE - yl) / 2;
break;
case 9: // N side up
height += yl / 2;
height++;
break;
case 12: // W side up
height += (TILE_SIZE - xl) / 2;
break;
}
// One corner down
if ((slope == 7) || (slope == 11) || (slope == 13) || (slope == 14)) {
switch (slope) {
case 7: // NW corner down
quad_extra = xl + TILE_SIZE - yl;
quad = xl - yl;
break;
case 11: // SW corner down
quad_extra = xl + yl;
quad = xl + yl - TILE_SIZE - 1;
break;
case 13: // SE corner down
quad_extra = TILE_SIZE - xl + yl;
quad = yl - xl;
break;
case 14: // NE corner down
quad_extra = (TILE_SIZE - xl) + (TILE_SIZE - yl);
2014-08-24 15:52:38 +02:00
quad = TILE_SIZE - yl - xl - 1;
break;
}
if (extra_height) {
height += quad_extra / 2;
height++;
return height;
}
// This tile is essentially at the next height level
height += 0x10;
// so we move *down* the slope
if (quad < 0) {
height += quad / 2;
}
}
// Valleys
if ((slope == 5) || (slope == 10)) {
switch (slope) {
case 5: // NW-SE valley
if (xl + yl <= TILE_SIZE + 1) {
return height;
}
quad = TILE_SIZE - xl - yl;
break;
case 10: // NE-SW valley
quad = xl - yl;
break;
}
if (quad > 0) {
height += quad / 2;
}
}
2014-04-10 16:14:47 +02:00
return height;
}
2014-05-04 19:51:36 +02:00
/**
*
* rct2: 0x0068B089
*/
void sub_68B089()
{
int i;
rct_map_element *mapElementFirst, *mapElement;
if (RCT2_GLOBAL(0x009DEA6F, uint8) & 1)
return;
i = RCT2_GLOBAL(0x0010E63B8, uint32);
do {
i++;
if (i >= MAX_TILE_MAP_ELEMENT_POINTERS)
i = 0;
2014-05-12 02:45:45 +02:00
} while (TILE_MAP_ELEMENT_POINTER(i) == TILE_UNDEFINED_MAP_ELEMENT);
2014-05-04 19:51:36 +02:00
RCT2_GLOBAL(0x0010E63B8, uint32) = i;
mapElementFirst = mapElement = TILE_MAP_ELEMENT_POINTER(i);
do {
mapElement--;
2014-05-12 02:45:45 +02:00
if (mapElement < (rct_map_element*)RCT2_ADDRESS_MAP_ELEMENTS)
2014-05-04 19:51:36 +02:00
break;
} while (mapElement->base_height == 255);
mapElement++;
if (mapElement == mapElementFirst)
return;
//
TILE_MAP_ELEMENT_POINTER(i) = mapElement;
do {
*mapElement = *mapElementFirst;
mapElementFirst->base_height = 255;
mapElement++;
mapElementFirst++;
2015-01-22 01:19:05 +01:00
} while (!map_element_is_last_for_tile(mapElement - 1));
2014-05-04 19:51:36 +02:00
// Update next free element?
mapElement = RCT2_GLOBAL(0x0140E9A4, rct_map_element*);
do {
mapElement--;
} while (mapElement->base_height == 255);
mapElement++;
RCT2_GLOBAL(0x0140E9A4, rct_map_element*) = mapElement;
}
/**
* Checks if the tile at coordinate at height counts as connected.
* @return 1 if connected, 0 otherwise
*/
2015-01-22 01:19:05 +01:00
int map_coord_is_connected(int x, int y, int z, uint8 faceDirection)
{
2015-01-22 01:19:05 +01:00
rct_map_element *mapElement = map_get_first_element_at(x, y);
2015-01-22 01:19:05 +01:00
do {
if (map_element_get_type(mapElement) != MAP_ELEMENT_TYPE_PATH)
continue;
2015-01-22 01:19:05 +01:00
rct_map_element_path_properties props = mapElement->properties.path;
uint8 pathType = props.type >> 2;
uint8 pathDirection = props.type & 3;
2015-01-22 01:19:05 +01:00
if (pathType & 1) {
if (pathDirection == faceDirection) {
if (z == mapElement->base_height + 2)
return 1;
2015-01-22 01:19:05 +01:00
} else if ((pathDirection ^ 2) == faceDirection && z == mapElement->base_height) {
return 1;
}
2015-01-22 01:19:05 +01:00
} else {
if (z == mapElement->base_height)
return 1;
2015-01-22 01:19:05 +01:00
}
} while (!map_element_is_last_for_tile(mapElement++));
2015-01-22 01:19:05 +01:00
return 0;
}
2014-10-09 21:31:58 +02:00
/**
*
* rct2: 0x006A876D
*/
void sub_6A876D()
{
int i, x, y;
if (RCT2_GLOBAL(RCT2_ADDRESS_SCREEN_FLAGS, uint8) & (SCREEN_FLAGS_TRACK_DESIGNER | SCREEN_FLAGS_TRACK_MANAGER))
return;
// Presumebly sub_6A87BB is too computationally expensive to call for every
// tile every update, so word_13CE774 and word_13CE776 store the x and y
// progress. A maximum of 128 calls is done per update.
x = _sub_6A876D_save_x;
y = _sub_6A876D_save_y;
for (i = 0; i < 128; i++) {
sub_6A87BB(x, y);
// Next x, y tile
x += 32;
if (x >= 8192) {
x = 0;
y += 32;
if (y >= 8192)
y = 0;
}
}
_sub_6A876D_save_x = x;
_sub_6A876D_save_y = y;
}
/**
*
* rct2: 0x006A87BB
*/
static void sub_6A87BB(int x, int y)
{
RCT2_CALLPROC_X(0x006A87BB, x, 0, y, 0, 0, 0, 0);
}
/**
*
* rct2: 0x006A7B84
*/
int map_height_from_slope(int x, int y, int slope)
{
if (!(slope & 4))
return 0;
2014-09-20 15:06:42 +02:00
switch (slope & 3) {
2014-09-20 15:06:42 +02:00
case 0:
return (31 - (x & 31)) / 2;
case 1:
return (y & 31) / 2;
case 2:
return (x & 31) / 2;
case 3:
return (31 - (y & 31)) / 2;
}
return 0;
}
2014-11-02 02:41:00 +01:00
/**
*
* rct2: 0x00664F72
*/
int map_is_location_owned(int x, int y, int z)
2014-11-02 02:41:00 +01:00
{
rct_map_element *mapElement;
if (x < (256 * 32) && y < (256 * 32)) {
mapElement = map_get_surface_element_at(x / 32, y / 32);
if (mapElement->properties.surface.ownership & OWNERSHIP_OWNED)
2014-11-02 02:41:00 +01:00
return 1;
if (mapElement->properties.surface.ownership & OWNERSHIP_CONSTRUCTION_RIGHTS_OWNED) {
2014-11-02 02:41:00 +01:00
z /= 8;
if (z < mapElement->base_height || z - 2 > mapElement->base_height)
2014-09-20 15:06:42 +02:00
return 1;
}
}
2014-11-02 02:41:00 +01:00
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, uint16) = 1729;
return 0;
}
/**
*
* rct2: 0x00664F2C
*/
int map_is_location_in_park(int x, int y)
{
rct_map_element *mapElement;
if (x < (256 * 32) && y < (256 * 32)) {
mapElement = map_get_surface_element_at(x / 32, y / 32);
if (mapElement->properties.surface.ownership & OWNERSHIP_OWNED)
return 1;
}
2014-11-02 02:41:00 +01:00
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, uint16) = 1729;
return 0;
2014-11-02 04:37:56 +01:00
}
2014-11-02 04:37:56 +01:00
/**
*
* rct2: 0x006ECB60
* NOTE: x, y and z are in pixels, not tile units
*/
void map_invalidate_tile(int x, int y, int zLow, int zHigh)
{
RCT2_CALLPROC_X(0x006ECB60, x, 0, y, 0, zHigh, zLow, 0);
}
/**
*
* rct2: 0x006E0E01
*/
2015-04-16 04:02:47 +02:00
void game_command_remove_scenery(int* eax, int* ebx, int* ecx, int* edx, int* esi, int* edi, int* ebp)
{
2015-04-16 04:02:47 +02:00
int x = *eax;
int y = *ecx;
uint8 base_height = *edx;
uint8 scenery_type = *edx >> 8;
uint8 map_element_type = *ebx >> 8;
money32 cost;
2015-04-16 04:02:47 +02:00
rct_scenery_entry *entry = g_smallSceneryEntries[scenery_type];
cost = entry->small_scenery.removal_price * 10;
RCT2_GLOBAL(RCT2_ADDRESS_NEXT_EXPENDITURE_TYPE, uint8) = RCT_EXPENDITURE_TYPE_LANDSCAPING * 4;
2015-04-16 04:02:47 +02:00
RCT2_GLOBAL(0x009DEA5E, uint32) = x + 16;
RCT2_GLOBAL(0x009DEA60, uint32) = y + 16;
RCT2_GLOBAL(0x009DEA62, uint32) = base_height * 8;
if (!(*ebx & 0x40) && RCT2_GLOBAL(RCT2_ADDRESS_GAME_PAUSED, uint8) != 0 && !gConfigCheat.build_in_pause_mode) {
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, uint16) = STR_CONSTRUCTION_NOT_POSSIBLE_WHILE_GAME_IS_PAUSED;
2015-04-16 04:02:47 +02:00
*ebx = MONEY32_UNDEFINED;
return;
}
if (!(RCT2_GLOBAL(RCT2_ADDRESS_SCREEN_FLAGS, uint8) & SCREEN_FLAGS_SCENARIO_EDITOR) && !(*ebx & 0x40) && !gSandboxMode) {
// Check if allowed to remove item
if (RCT2_GLOBAL(RCT2_ADDRESS_PARK_FLAGS, uint32) & PARK_FLAGS_FORBID_TREE_REMOVAL) {
if (entry->small_scenery.height > 64) {
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, uint16) = STR_FORBIDDEN_BY_THE_LOCAL_AUTHORITY;
2015-04-16 04:02:47 +02:00
*ebx = MONEY32_UNDEFINED;
return;
}
}
// Check if the land is owned
2015-04-16 04:02:47 +02:00
if (!map_is_location_owned(x, y, RCT2_GLOBAL(0x009DEA62, uint32))){
*ebx = MONEY32_UNDEFINED;
return;
}
}
2015-04-16 04:02:47 +02:00
rct_map_element* map_element = map_get_first_element_at(x / 32, y / 32);
while(map_element->type != map_element_type ||
map_element->base_height != base_height ||
map_element->properties.scenery.type != scenery_type ||
(*ebx & 0x40) && !(map_element->flags & MAP_ELEMENT_FLAG_GHOST)){
2015-04-16 04:02:47 +02:00
map_element++;
if((map_element - 1)->flags & MAP_ELEMENT_FLAG_LAST_TILE){
*ebx = 0;
return;
}
}
// Remove element
2015-04-16 04:02:47 +02:00
if (*ebx & GAME_COMMAND_FLAG_APPLY) {
map_invalidate_tile_full(x, y);
2015-04-16 04:02:47 +02:00
map_element_remove(map_element);
}
2015-04-16 04:02:47 +02:00
*ebx = (RCT2_GLOBAL(RCT2_ADDRESS_PARK_FLAGS, uint32) & PARK_FLAGS_NO_MONEY ? 0 : cost);
}
2015-04-17 08:47:23 +02:00
/**
*
* rct2: 0x006B8E1B
*/
void game_command_remove_large_scenery(int* eax, int* ebx, int* ecx, int* edx, int* esi, int* edi, int* ebp)
{
uint8 base_height = *edx;
uint8 scenerymultiple_index = *edx >> 8;
uint8 map_element_direction = *ebx >> 8;
int x = *eax;
int y = *ecx;
int z = map_element_height(x, y);
RCT2_GLOBAL(0x009DEA5E, uint16) = x + 16;
RCT2_GLOBAL(0x009DEA60, uint16) = y + 16;
RCT2_GLOBAL(0x009DEA62, uint16) = z;
2015-06-21 13:07:44 +02:00
RCT2_GLOBAL(RCT2_ADDRESS_NEXT_EXPENDITURE_TYPE, uint8) = RCT_EXPENDITURE_TYPE_LANDSCAPING * 4;
2015-04-17 08:47:23 +02:00
if (!(*ebx & 0x40) && RCT2_GLOBAL(RCT2_ADDRESS_GAME_PAUSED, uint8) != 0 && !gConfigCheat.build_in_pause_mode) {
2015-04-17 08:47:23 +02:00
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, uint16) = STR_CONSTRUCTION_NOT_POSSIBLE_WHILE_GAME_IS_PAUSED;
*ebx = MONEY32_UNDEFINED;
return;
}
uint8 element_found = 0;
2015-04-17 08:47:23 +02:00
rct_map_element* map_element = map_get_first_element_at(x / 32, y / 32);
do {
if (map_element_get_type(map_element) != MAP_ELEMENT_TYPE_SCENERY_MULTIPLE)
continue;
if (map_element->base_height != base_height)
continue;
if ((map_element->properties.scenerymultiple.type >> 10) != scenerymultiple_index)
continue;
if ((map_element->type & MAP_ELEMENT_DIRECTION_MASK) != map_element_direction)
continue;
element_found = 1;
break;
} while (!map_element_is_last_for_tile(map_element++));
if (!element_found){
*ebx = 0;
return;
2015-04-17 08:47:23 +02:00
}
if((*ebx & 0x40) && !(map_element->flags & MAP_ELEMENT_FLAG_GHOST)){
2015-04-17 08:47:23 +02:00
*ebx = 0;
return;
}
map_element_remove_banner_entry(map_element);
int ecx2 = map_element->properties.scenerymultiple.type >> 10;
rct_scenery_entry* scenery_entry = g_largeSceneryEntries[map_element->properties.scenerymultiple.type & 0x3FF];
rct_xyz16 firstTile = {
.x = scenery_entry->large_scenery.tiles[ecx2].x_offset,
.y = scenery_entry->large_scenery.tiles[ecx2].y_offset,
.z = (base_height * 8) - scenery_entry->large_scenery.tiles[ecx2].z_offset
};
rotate_map_coordinates(&firstTile.x, &firstTile.y, map_element_direction);
firstTile.x = x - firstTile.x;
firstTile.y = y - firstTile.y;
for (int i = 0; scenery_entry->large_scenery.tiles[i].x_offset != -1; i++){
rct_xyz16 currentTile = {
.x = scenery_entry->large_scenery.tiles[i].x_offset,
.y = scenery_entry->large_scenery.tiles[i].y_offset,
.z = scenery_entry->large_scenery.tiles[i].z_offset
};
rotate_map_coordinates(&currentTile.x, &currentTile.y, map_element_direction);
currentTile.x += firstTile.x;
currentTile.y += firstTile.y;
currentTile.z += firstTile.z;
if (!(RCT2_GLOBAL(RCT2_ADDRESS_SCREEN_FLAGS, uint8) & SCREEN_FLAGS_SCENARIO_EDITOR) && !gSandboxMode){
if (!map_is_location_owned(currentTile.x, currentTile.y, currentTile.z)){
2015-04-17 08:47:23 +02:00
*ebx = MONEY32_UNDEFINED;
return;
}
}
// If not applying then no need to delete the actual element
if (!(*ebx & GAME_COMMAND_FLAG_APPLY))
continue;
rct_map_element* sceneryElement = map_get_first_element_at(currentTile.x / 32, currentTile.y / 32);
uint8 tile_not_found = 1;
do
{
if (map_element_get_type(sceneryElement) != MAP_ELEMENT_TYPE_SCENERY_MULTIPLE)
continue;
if ((sceneryElement->type & MAP_ELEMENT_DIRECTION_MASK) != map_element_direction)
continue;
if ((sceneryElement->properties.scenerymultiple.type >> 10) != i)
continue;
if (sceneryElement->base_height != currentTile.z / 8)
continue;
map_invalidate_tile_full(currentTile.x, currentTile.y);
map_element_remove(sceneryElement);
tile_not_found = 0;
break;
} while (!map_element_is_last_for_tile(sceneryElement++));
if (tile_not_found){
log_error("Tile not found when trying to remove element!");
2015-04-17 08:47:23 +02:00
}
}
*ebx = scenery_entry->large_scenery.removal_price * 10;
if (RCT2_GLOBAL(RCT2_ADDRESS_PARK_FLAGS, uint32) & PARK_FLAGS_NO_MONEY){
*ebx = 0;
}
return;
2015-04-17 08:47:23 +02:00
}
2015-04-22 09:46:44 +02:00
/**
*
* rct2: 0x006BA058
*/
void game_command_remove_banner(int* eax, int* ebx, int* ecx, int* edx, int* esi, int* edi, int* ebp)
{
int x = *eax;
int y = *ecx;
uint8 base_height = *edx;
uint8 banner_position = *edx >> 8;
int z = base_height * 8;
2015-06-21 13:07:44 +02:00
RCT2_GLOBAL(RCT2_ADDRESS_NEXT_EXPENDITURE_TYPE, uint8) = RCT_EXPENDITURE_TYPE_LANDSCAPING * 4;
2015-04-22 09:46:44 +02:00
RCT2_GLOBAL(0x009DEA5E, uint16) = x + 16;
RCT2_GLOBAL(0x009DEA60, uint16) = y + 16;
RCT2_GLOBAL(0x009DEA62, uint16) = z;
if(!(*ebx & 0x40) && RCT2_GLOBAL(RCT2_ADDRESS_GAME_PAUSED, uint8) != 0 && !gConfigCheat.build_in_pause_mode){
2015-04-22 09:46:44 +02:00
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, uint16) = STR_CONSTRUCTION_NOT_POSSIBLE_WHILE_GAME_IS_PAUSED;
*ebx = MONEY32_UNDEFINED;
return;
}
if(!(RCT2_GLOBAL(RCT2_ADDRESS_SCREEN_FLAGS, uint8) & SCREEN_FLAGS_SCENARIO_EDITOR) && !gSandboxMode && !map_is_location_owned(x, y, z - 16)){
2015-04-22 09:46:44 +02:00
*ebx = MONEY32_UNDEFINED;
return;
}
rct_map_element* map_element = map_get_first_element_at(x / 32, y / 32);
while(map_element->type != MAP_ELEMENT_TYPE_BANNER ||
map_element->properties.banner.position != banner_position){
map_element++;
if((map_element - 1)->flags & MAP_ELEMENT_FLAG_LAST_TILE){
2015-04-22 23:47:59 +02:00
*ebx = MONEY32_UNDEFINED;
2015-04-22 09:46:44 +02:00
return;
}
}
2015-04-22 23:47:59 +02:00
rct_banner *banner = &gBanners[map_element->properties.banner.index];
uint8 bannerType = banner->type;
if (*ebx & GAME_COMMAND_FLAG_APPLY) {
map_element_remove_banner_entry(map_element);
2015-04-22 09:46:44 +02:00
map_invalidate_tile(x, y, z, z + 32);
map_element_remove(map_element);
}
rct_scenery_entry *scenery_entry = (rct_scenery_entry*)object_entry_groups[OBJECT_TYPE_BANNERS].chunks[bannerType];
2015-04-22 09:46:44 +02:00
*ebx = (scenery_entry->banner.price * -3) / 4;
if(RCT2_GLOBAL(RCT2_ADDRESS_PARK_FLAGS, uint32) & PARK_FLAGS_NO_MONEY){
*ebx = 0;
}
}
2015-04-17 22:56:19 +02:00
/**
*
* rct2: 0x006E0F26
*/
void game_command_set_scenery_colour(int* eax, int* ebx, int* ecx, int* edx, int* esi, int* edi, int* ebp)
{
2015-06-21 13:07:44 +02:00
RCT2_GLOBAL(RCT2_ADDRESS_NEXT_EXPENDITURE_TYPE, uint8) = RCT_EXPENDITURE_TYPE_LANDSCAPING * 4;
2015-04-18 07:01:50 +02:00
int x = *eax;
int y = *ecx;
2015-04-17 22:56:19 +02:00
uint8 base_height = *edx;
uint8 scenery_type = *edx >> 8;
uint8 map_element_type = *ebx >> 8;
uint8 color1 = *ebp;
uint8 color2 = *ebp >> 8;
int z = base_height * 8;
RCT2_GLOBAL(0x009DEA5E, uint16) = x + 16;
RCT2_GLOBAL(0x009DEA60, uint16) = y + 16;
RCT2_GLOBAL(0x009DEA62, uint16) = z;
if (!(RCT2_GLOBAL(RCT2_ADDRESS_SCREEN_FLAGS, uint8) & SCREEN_FLAGS_SCENARIO_EDITOR) && !gSandboxMode){
if (!map_is_location_owned(x, y, z)){
2015-04-17 22:56:19 +02:00
*ebx = MONEY32_UNDEFINED;
return;
}
}
rct_map_element* map_element = map_get_first_element_at(x / 32, y / 32);
while(map_element->type != map_element_type ||
map_element->base_height != base_height ||
map_element->properties.scenery.type != scenery_type){
map_element++;
if((map_element - 1)->flags & MAP_ELEMENT_FLAG_LAST_TILE){
2015-04-17 22:56:19 +02:00
*ebx = 0;
return;
}
}
if((*ebx & 0x40) && !(map_element->flags & MAP_ELEMENT_FLAG_GHOST)){
*ebx = 0;
return;
}
if(*ebx & GAME_COMMAND_FLAG_APPLY){
map_element->properties.scenery.colour_1 &= 0xE0;
map_element->properties.scenery.colour_1 |= color1;
map_element->properties.scenery.colour_2 &= 0xE0;
map_element->properties.scenery.colour_2 |= color2;
map_invalidate_tile_full(x, y);
}
2015-04-17 22:56:19 +02:00
*ebx = 0;
}
2015-04-18 07:01:50 +02:00
/**
*
* rct2: 0x006E56B5
*/
void game_command_set_fence_colour(int* eax, int* ebx, int* ecx, int* edx, int* esi, int* edi, int* ebp)
{
2015-06-21 13:07:44 +02:00
RCT2_GLOBAL(RCT2_ADDRESS_NEXT_EXPENDITURE_TYPE, uint8) = RCT_EXPENDITURE_TYPE_LANDSCAPING * 4;
2015-04-18 07:01:50 +02:00
int x = *eax;
int y = *ecx;
uint8 map_element_direction = *edx;
uint8 base_height = *edx >> 8;
uint8 color1 = *ebx >> 8;
uint8 color2 = *ebp;
uint8 color3 = *ebp >> 8;
int z = base_height * 8;
RCT2_GLOBAL(0x009DEA5E, uint16) = x + 16;
RCT2_GLOBAL(0x009DEA60, uint16) = y + 16;
RCT2_GLOBAL(0x009DEA62, uint16) = z;
2015-06-21 13:42:31 +02:00
if((RCT2_GLOBAL(RCT2_ADDRESS_SCREEN_FLAGS, uint8) & SCREEN_FLAGS_SCENARIO_EDITOR) || map_is_location_in_park(x, y) || gSandboxMode){
2015-04-18 07:01:50 +02:00
rct_map_element* map_element = map_get_first_element_at(x / 32, y / 32);
while(map_element_get_type(map_element) != MAP_ELEMENT_TYPE_FENCE ||
map_element->base_height != base_height ||
(map_element->type & MAP_ELEMENT_DIRECTION_MASK) != map_element_direction||
((*ebx & 0x40) && !(map_element->flags & MAP_ELEMENT_FLAG_GHOST))){
2015-04-18 07:01:50 +02:00
map_element++;
if((map_element - 1)->flags & MAP_ELEMENT_FLAG_LAST_TILE){
*ebx = 0;
return;
}
}
if((*ebx & 0x40) && !(map_element->flags & MAP_ELEMENT_FLAG_GHOST)){
2015-04-18 07:01:50 +02:00
*ebx = 0;
return;
}
if(*ebx & GAME_COMMAND_FLAG_APPLY){
rct_scenery_entry* scenery_entry = RCT2_ADDRESS(RCT2_ADDRESS_WALL_SCENERY_ENTRIES, rct_scenery_entry*)[map_element->properties.fence.type];
2015-04-18 07:01:50 +02:00
map_element->properties.fence.item[1] &= 0xE0;
map_element->properties.fence.item[1] |= color1;
map_element->flags &= 0x9F;
map_element->properties.fence.item[1] &= 0x1F;
map_element->properties.fence.item[1] |= (color2 & 0x7) * 32;
map_element->flags |= (color2 & 0x18) * 4;
if(scenery_entry->wall.flags & 0x80){
map_element->properties.fence.item[0] = color3;
}
map_invalidate_tile(x, y, z, z + 0x48);
}
2015-06-21 13:42:31 +02:00
*ebx = 0;
} else {
*ebx = MONEY32_UNDEFINED;
2015-04-18 07:01:50 +02:00
}
}
2015-04-18 21:03:18 +02:00
/**
*
* rct2: 0x006B909A
*/
void game_command_set_large_scenery_colour(int* eax, int* ebx, int* ecx, int* edx, int* esi, int* edi, int* ebp)
{
2015-06-21 13:07:44 +02:00
RCT2_GLOBAL(RCT2_ADDRESS_NEXT_EXPENDITURE_TYPE, uint8) = RCT_EXPENDITURE_TYPE_LANDSCAPING * 4;
2015-04-18 21:03:18 +02:00
int x = *eax;
int y = *ecx;
uint8 map_element_direction = *ebx >> 8;
uint8 base_height = *edx;
uint8 scenerymultiple_index = *edx >> 8;
uint8 color1 = *ebp;
uint8 color2 = *ebp >> 8;
int z = map_element_height(x, y);
RCT2_GLOBAL(0x009DEA5E, uint16) = x + 16;
RCT2_GLOBAL(0x009DEA60, uint16) = y + 16;
RCT2_GLOBAL(0x009DEA62, uint16) = z;
rct_map_element* map_element = map_get_first_element_at(x / 32, y / 32);
while(map_element_get_type(map_element) != MAP_ELEMENT_TYPE_SCENERY_MULTIPLE ||
map_element->base_height != base_height ||
map_element->properties.scenerymultiple.type >> 10 != scenerymultiple_index ||
(map_element->type & MAP_ELEMENT_DIRECTION_MASK) != map_element_direction){
map_element++;
if((map_element - 1)->flags & MAP_ELEMENT_FLAG_LAST_TILE){
*ebx = 0;
return;
}
}
if((*ebx & 0x40) && !(map_element->flags & MAP_ELEMENT_FLAG_GHOST)){
2015-04-18 21:03:18 +02:00
*ebx = 0;
return;
}
int ecx2 = map_element->properties.scenerymultiple.type >> 10;
rct_scenery_entry* scenery_entry = RCT2_ADDRESS(RCT2_ADDRESS_LARGE_SCENERY_ENTRIES, rct_scenery_entry*)[map_element->properties.scenerymultiple.type & 0x3FF];
int x2 = scenery_entry->large_scenery.tiles[ecx2].x_offset;
int y2 = scenery_entry->large_scenery.tiles[ecx2].y_offset;
int z2 = (base_height * 8) - scenery_entry->large_scenery.tiles[ecx2].z_offset;
switch(map_element->type & MAP_ELEMENT_DIRECTION_MASK){
case MAP_ELEMENT_DIRECTION_WEST:
break;
case MAP_ELEMENT_DIRECTION_NORTH:{
int temp = x2;
x2 = y2;
y2 = -temp;
}break;
case MAP_ELEMENT_DIRECTION_EAST:
x2 = -x2;
y2 = -y2;
break;
case MAP_ELEMENT_DIRECTION_SOUTH:{
int temp = y2;
y2 = x2;
x2 = -temp;
}break;
}
x2 = -x2 + x;
y2 = -y2 + y;
int i = 0;
while(1){
if(scenery_entry->large_scenery.tiles[i].x_offset == -1){
*ebx = 0;
return;
}
int x3 = scenery_entry->large_scenery.tiles[i].x_offset;
int y3 = scenery_entry->large_scenery.tiles[i].y_offset;
int z3 = scenery_entry->large_scenery.tiles[i].z_offset;
switch(map_element->type & MAP_ELEMENT_DIRECTION_MASK){
case MAP_ELEMENT_DIRECTION_WEST:
break;
case MAP_ELEMENT_DIRECTION_NORTH:{
int temp = x3;
x3 = y3;
y3 = -temp;
}break;
case MAP_ELEMENT_DIRECTION_EAST:
x3 = -x3;
y3 = -y3;
break;
case MAP_ELEMENT_DIRECTION_SOUTH:{
int temp = y3;
y3 = x3;
x3 = -temp;
}break;
}
x3 += x2;
y3 += y2;
z3 += z2;
if (!(RCT2_GLOBAL(RCT2_ADDRESS_SCREEN_FLAGS, uint8) & SCREEN_FLAGS_SCENARIO_EDITOR) && !gSandboxMode){
if (!map_is_location_owned(x3, y3, z3)){
2015-04-18 21:03:18 +02:00
*ebx = MONEY32_UNDEFINED;
return;
}
}
if(*ebx & GAME_COMMAND_FLAG_APPLY){
rct_map_element* map_element = map_get_first_element_at(x3 / 32, y3 / 32);
while(map_element_get_type(map_element) != MAP_ELEMENT_TYPE_SCENERY_MULTIPLE ||
(map_element->type & MAP_ELEMENT_DIRECTION_MASK) != map_element_direction ||
map_element->properties.scenerymultiple.type >> 10 != i ||
map_element->base_height != base_height){
map_element++;
2015-04-18 21:03:18 +02:00
}
map_element->properties.scenerymultiple.colour[0] &= 0xE0;
map_element->properties.scenerymultiple.colour[0] |= color1;
map_element->properties.scenerymultiple.colour[1] &= 0xE0;
map_element->properties.scenerymultiple.colour[1] |= color2;
map_invalidate_tile_full(x3, y3);
2015-04-18 21:03:18 +02:00
}
2015-04-18 21:03:18 +02:00
i++;
}
*ebx = 0;
}
2015-04-18 23:48:17 +02:00
/**
*
* rct2: 0x006BA16A
*/
void game_command_set_banner_colour(int* eax, int* ebx, int* ecx, int* edx, int* esi, int* edi, int* ebp)
{
2015-06-21 13:07:44 +02:00
RCT2_GLOBAL(RCT2_ADDRESS_NEXT_EXPENDITURE_TYPE, uint8) = RCT_EXPENDITURE_TYPE_LANDSCAPING * 4;
2015-04-18 23:48:17 +02:00
int x = *eax;
int y = *ecx;
uint8 base_height = *edx;
uint8 banner_position = *edx >> 8;
uint8 color = *ebp;
int z = (base_height * 8);
RCT2_GLOBAL(0x009DEA5E, uint16) = x + 16;
RCT2_GLOBAL(0x009DEA60, uint16) = y + 16;
RCT2_GLOBAL(0x009DEA62, uint16) = z;
if (!(RCT2_GLOBAL(RCT2_ADDRESS_SCREEN_FLAGS, uint8) & SCREEN_FLAGS_SCENARIO_EDITOR) && !gSandboxMode){
if (!map_is_location_owned(x, y, z - 16)){
2015-04-18 23:48:17 +02:00
*ebx = MONEY32_UNDEFINED;
return;
}
}
if(*ebx & GAME_COMMAND_FLAG_APPLY){
rct_map_element* map_element = map_get_first_element_at(x / 32, y / 32);
while(map_element->type != MAP_ELEMENT_TYPE_BANNER ||
map_element->properties.banner.position != banner_position){
map_element++;
if((map_element - 1)->flags & MAP_ELEMENT_FLAG_LAST_TILE){
*ebx = MONEY32_UNDEFINED;
return;
2015-04-18 23:48:17 +02:00
}
}
rct_window* window = window_find_by_number(WC_BANNER, map_element->properties.banner.index);
if(window){
window_invalidate(window);
}
gBanners[map_element->properties.banner.index].colour = color;
map_invalidate_tile(x, y, z, z + 32);
2015-04-18 23:48:17 +02:00
}
2015-04-18 23:48:17 +02:00
*ebx = 0;
}
money32 sub_6A67C0(int x, int y, int z, int flags)
{
int eax, ebx, ecx, edx, esi, edi, ebp;
eax = x * 32;
ecx = y * 32;
ebx = flags & 0xFF;
edx = z & 0xFF;
RCT2_CALLFUNC_X(0x006A67C0, &eax, &ebx, &ecx, &edx, &esi, &edi, &ebp);
return ebx;
}
// This will cause clear scenery to remove paths
// This should be a flag for the game command which can be set via a checkbox on the clear scenery window.
// #define CLEAR_SCENERY_REMOVES_PATHS
/**
*
* rct2: 0x0068DFE4
*/
money32 map_clear_scenery_from_tile(int x, int y, int flags)
{
int type;
money32 cost, totalCost;
rct_map_element *mapElement;
totalCost = 0;
restart_from_beginning:
2015-01-22 01:19:05 +01:00
mapElement = map_get_first_element_at(x, y);
do {
2015-01-22 01:19:05 +01:00
type = map_element_get_type(mapElement);
switch (type) {
case MAP_ELEMENT_TYPE_PATH:
if (gClearFootpath) {
cost = sub_6A67C0(x, y, mapElement->base_height, flags);
if (cost == MONEY32_UNDEFINED)
return MONEY32_UNDEFINED;
totalCost += cost;
if (flags & 1)
goto restart_from_beginning;
} break;
case MAP_ELEMENT_TYPE_SCENERY:
if (gClearSmallScenery) {
int eax = x * 32;
int ebx = (mapElement->type << 8) | flags;
int ecx = y * 32;
int edx = (mapElement->properties.scenery.type << 8) | (mapElement->base_height);
int esi, edi, ebp;
game_command_remove_scenery(&eax, &ebx, &ecx, &edx, &esi, &edi, &ebp);
cost = ebx;
if (cost == MONEY32_UNDEFINED)
return MONEY32_UNDEFINED;
totalCost += cost;
if (flags & 1)
goto restart_from_beginning;
} break;
case MAP_ELEMENT_TYPE_FENCE:
if (gClearSmallScenery) {
int eax = x * 32;
int ebx = flags;
int ecx = y * 32;
int edx = (mapElement->base_height << 8) | (mapElement->type & MAP_ELEMENT_DIRECTION_MASK);
int esi, edi, ebp;
game_command_remove_fence(&eax, &ebx, &ecx, &edx, &esi, &edi, &ebp);
cost = ebx;
if (cost == MONEY32_UNDEFINED)
return MONEY32_UNDEFINED;
totalCost += cost;
if (flags & 1)
goto restart_from_beginning;
} break;
case MAP_ELEMENT_TYPE_SCENERY_MULTIPLE:
if (gClearLargeScenery) {
int eax = x * 32;
int ebx = flags | ((mapElement->type & MAP_ELEMENT_DIRECTION_MASK) << 8);
int ecx = y * 32;
int edx = mapElement->base_height | ((mapElement->properties.scenerymultiple.type >> 10) << 8);
int esi, edi, ebp;
game_command_remove_large_scenery(&eax, &ebx, &ecx, &edx, &esi, &edi, &ebp);
cost = ebx;
if (cost == MONEY32_UNDEFINED)
return MONEY32_UNDEFINED;
totalCost += cost;
if (flags & 1)
goto restart_from_beginning;
} break;
break;
}
2015-01-22 01:19:05 +01:00
} while (!map_element_is_last_for_tile(mapElement++));
return totalCost;
}
money32 map_clear_scenery(int x0, int y0, int x1, int y1, int flags)
{
int x, y, z;
money32 totalCost, cost;
RCT2_GLOBAL(RCT2_ADDRESS_NEXT_EXPENDITURE_TYPE, uint8) = RCT_EXPENDITURE_TYPE_LANDSCAPING * 4;
x = (x0 + x1) / 2 + 16;
y = (y0 + y1) / 2 + 16;
z = map_element_height(x, y);
RCT2_GLOBAL(0x009DEA5E, uint16) = x;
RCT2_GLOBAL(0x009DEA60, uint16) = y;
RCT2_GLOBAL(0x009DEA62, uint16) = z;
x0 = max(x0, 32);
y0 = max(y0, 32);
2015-06-13 19:58:58 +02:00
x1 = min(x1, RCT2_GLOBAL(RCT2_ADDRESS_MAP_MAX_XY, uint16));
y1 = min(y1, RCT2_GLOBAL(RCT2_ADDRESS_MAP_MAX_XY, uint16));
totalCost = 0;
for (y = y0; y <= y1; y += 32) {
for (x = x0; x <= x1; x += 32) {
cost = map_clear_scenery_from_tile(x / 32, y / 32, flags);
if (cost == MONEY32_UNDEFINED)
return MONEY32_UNDEFINED;
totalCost += cost;
}
}
return totalCost;
}
/**
*
* rct2: 0x0068DF91
*/
void game_command_clear_scenery(int* eax, int* ebx, int* ecx, int* edx, int* esi, int* edi, int* ebp)
{
*ebx = map_clear_scenery(
(sint16)(*eax & 0xFFFF),
(sint16)(*ecx & 0xFFFF),
(sint16)(*edi & 0xFFFF),
(sint16)(*ebp & 0xFFFF),
*ebx & 0xFF
);
}
/* rct2: 0x00663CCD */
money32 map_change_surface_style(int x0, int y0, int x1, int y1, uint8 surfaceStyle, uint8 edgeStyle, uint8 flags)
{
2015-06-21 13:07:44 +02:00
RCT2_GLOBAL(RCT2_ADDRESS_NEXT_EXPENDITURE_TYPE, uint8) = RCT_EXPENDITURE_TYPE_LANDSCAPING * 4;
x0 = max(x0, 32);
y0 = max(y0, 32);
2015-06-13 19:58:58 +02:00
x1 = min(x1, RCT2_GLOBAL(RCT2_ADDRESS_MAP_MAX_XY, uint16));
y1 = min(y1, RCT2_GLOBAL(RCT2_ADDRESS_MAP_MAX_XY, uint16));
int xMid, yMid;
xMid = (x0 + x1) / 2 + 16;
yMid = (y0 + y1) / 2 + 16;
int heightMid = map_element_height(xMid, yMid);
RCT2_GLOBAL(0x009DEA5E, uint16) = xMid;
RCT2_GLOBAL(0x009DEA60, uint16) = yMid;
RCT2_GLOBAL(0x009DEA62, uint16) = heightMid;
RCT2_GLOBAL(0x009E32B4, uint32) = 0;
money32 cost = 0;
if (RCT2_GLOBAL(RCT2_ADDRESS_GAME_PAUSED, uint8) != 0 && !gConfigCheat.build_in_pause_mode) {
cost += RCT2_GLOBAL(0x009E32B4, uint32);
return (RCT2_GLOBAL(RCT2_ADDRESS_PARK_FLAGS, uint32) & PARK_FLAGS_NO_MONEY) ? 0 : cost;
}
if (!(RCT2_GLOBAL(RCT2_ADDRESS_SCREEN_FLAGS, uint8) & SCREEN_FLAGS_SCENARIO_EDITOR) && !gSandboxMode && RCT2_GLOBAL(RCT2_ADDRESS_PARK_FLAGS, uint32) & PARK_FLAGS_FORBID_LANDSCAPE_CHANGES) {
cost += RCT2_GLOBAL(0x009E32B4, uint32);
return (RCT2_GLOBAL(RCT2_ADDRESS_PARK_FLAGS, uint32) & PARK_FLAGS_NO_MONEY) ? 0 : cost;
}
for (int x = x0; x <= x1; x += 32) {
for (int y = y0; y <= y1; y += 32) {
if (x > 0x1FFF) continue;
if (y > 0x1FFF) continue;
if (!(RCT2_GLOBAL(RCT2_ADDRESS_SCREEN_FLAGS, uint8) & SCREEN_FLAGS_SCENARIO_EDITOR) && !gSandboxMode) {
if (!map_is_location_in_park(x, y)) continue;
}
rct_map_element* mapElement = map_get_surface_element_at(x / 32, y / 32);
if (surfaceStyle != 0xFF){
uint8 cur_terrain = (
(mapElement->type&MAP_ELEMENT_DIRECTION_MASK) << 3) |
(mapElement->properties.surface.terrain >> 5);
if (surfaceStyle != cur_terrain) {
RCT2_GLOBAL(0x009E32B4, uint32) += RCT2_ADDRESS(0x0097B8B8, uint32)[surfaceStyle & 0x1F];
if (flags & 1){
mapElement->properties.surface.terrain &= MAP_ELEMENT_WATER_HEIGHT_MASK;
mapElement->type &= MAP_ELEMENT_QUADRANT_MASK | MAP_ELEMENT_TYPE_MASK;
//Save the new terrain
mapElement->properties.surface.terrain |= surfaceStyle << 5;
//Save the new direction mask
mapElement->type |= (surfaceStyle >> 3) & MAP_ELEMENT_DIRECTION_MASK;
map_invalidate_tile_full(x, y);
RCT2_CALLPROC_X(0x00673883, x, 0, y, map_element_height(x, y), 0, 0, 0);
}
}
}
if (edgeStyle != 0xFF) {
uint8 currentEdge =
((mapElement->type & 0x80) >> 4) |
(mapElement->properties.surface.slope >> 5);
if (edgeStyle != currentEdge){
cost++;
if (flags & 1){
mapElement->properties.surface.slope &= MAP_ELEMENT_SLOPE_MASK;
mapElement->type &= 0x7F;
//Save edge style
mapElement->properties.surface.slope |= edgeStyle << 5;
//Save ???
mapElement->type |= (edgeStyle << 4) & 0x80;
map_invalidate_tile_full(x, y);
}
}
}
if (flags & 1) {
if (!(mapElement->properties.surface.terrain & MAP_ELEMENT_SURFACE_TERRAIN_MASK)) {
if (!(mapElement->type & MAP_ELEMENT_DIRECTION_MASK)) {
if ((mapElement->properties.surface.grass_length & 7) != GRASS_LENGTH_CLEAR_0) {
mapElement->properties.surface.grass_length = GRASS_LENGTH_CLEAR_0;
map_invalidate_tile_full(x, y);
}
}
}
}
}
}
cost *= 100;
cost += RCT2_GLOBAL(0x009E32B4, uint32);
return (RCT2_GLOBAL(RCT2_ADDRESS_PARK_FLAGS, uint32) & PARK_FLAGS_NO_MONEY) ? 0 : cost;
}
/* rct2: 0x00663CCD */
void game_command_change_surface_style(int* eax, int* ebx, int* ecx, int* edx, int* esi, int* edi, int* ebp)
{
*ebx = map_change_surface_style(
(sint16)(*eax & 0xFFFF),
(sint16)(*ecx & 0xFFFF),
(sint16)(*edi & 0xFFFF),
(sint16)(*ebp & 0xFFFF),
*edx & 0xFF,
(*edx & 0xFF00) >> 8,
*ebx & 0xFF
);
}
2015-05-19 01:25:58 +02:00
//0x00981A1E
const uint8 map_element_raise_styles[5][32] = {
{ 0x01, 0x1B, 0x03, 0x1B, 0x05, 0x21, 0x07, 0x21, 0x09, 0x1B, 0x0B, 0x1B, 0x0D, 0x21, 0x20, 0x0F, 0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x23, 0x18, 0x19, 0x1A, 0x3B, 0x1C, 0x29, 0x24, 0x1F },
{ 0x02, 0x03, 0x17, 0x17, 0x06, 0x07, 0x17, 0x17, 0x0A, 0x0B, 0x22, 0x22, 0x0E, 0x20, 0x22, 0x0F, 0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x37, 0x18, 0x19, 0x1A, 0x23, 0x1C, 0x28, 0x26, 0x1F },
{ 0x04, 0x05, 0x06, 0x07, 0x1E, 0x24, 0x1E, 0x24, 0x0C, 0x0D, 0x0E, 0x20, 0x1E, 0x24, 0x1E, 0x0F, 0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x26, 0x18, 0x19, 0x1A, 0x21, 0x1C, 0x2C, 0x3E, 0x1F },
{ 0x08, 0x09, 0x0A, 0x0B, 0x0C, 0x0D, 0x0E, 0x20, 0x1D, 0x1D, 0x28, 0x28, 0x1D, 0x1D, 0x28, 0x0F, 0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x22, 0x18, 0x19, 0x1A, 0x29, 0x1C, 0x3D, 0x2C, 0x1F },
{ 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x22, 0x20, 0x20, 0x20, 0x21, 0x20, 0x28, 0x24, 0x20 },
};
//0x00981ABE
const uint8 map_element_lower_styles[5][32] = {
{ 0x2E, 0x00, 0x2E, 0x02, 0x3E, 0x04, 0x3E, 0x06, 0x2E, 0x08, 0x2E, 0x0A, 0x3E, 0x0C, 0x3E, 0x0F, 0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x06, 0x18, 0x19, 0x1A, 0x0B, 0x1C, 0x0C, 0x3E, 0x1F },
{ 0x2D, 0x2D, 0x00, 0x01, 0x2D, 0x2D, 0x04, 0x05, 0x3D, 0x3D, 0x08, 0x09, 0x3D, 0x3D, 0x0C, 0x0F, 0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x07, 0x18, 0x19, 0x1A, 0x09, 0x1C, 0x3D, 0x0C, 0x1F },
{ 0x2B, 0x3B, 0x2B, 0x3B, 0x00, 0x01, 0x02, 0x03, 0x2B, 0x3B, 0x2B, 0x3B, 0x08, 0x09, 0x0A, 0x0F, 0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x03, 0x18, 0x19, 0x1A, 0x3B, 0x1C, 0x09, 0x0E, 0x1F },
{ 0x27, 0x27, 0x37, 0x37, 0x27, 0x27, 0x37, 0x37, 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x0F, 0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x37, 0x18, 0x19, 0x1A, 0x03, 0x1C, 0x0D, 0x06, 0x1F },
{ 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x07, 0x00, 0x00, 0x00, 0x0B, 0x00, 0x0D, 0x0E, 0x00 },
2015-05-19 01:25:58 +02:00
};
static money32 sub_66397F(int flags, int x, int y, int height, int style, int selectionType)
{
if (RCT2_GLOBAL(RCT2_ADDRESS_GAME_PAUSED, uint8) != 0 && !gConfigCheat.build_in_pause_mode) {
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, rct_string_id) = STR_CONSTRUCTION_NOT_POSSIBLE_WHILE_GAME_IS_PAUSED;
return MONEY32_UNDEFINED;
}
if (!(RCT2_GLOBAL(RCT2_ADDRESS_SCREEN_FLAGS, uint8) & SCREEN_FLAGS_SCENARIO_EDITOR) && !gSandboxMode) {
if (RCT2_GLOBAL(RCT2_ADDRESS_PARK_FLAGS, uint32) & PARK_FLAGS_FORBID_LANDSCAPE_CHANGES) {
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, rct_string_id) = STR_FORBIDDEN_BY_THE_LOCAL_AUTHORITY;
return MONEY32_UNDEFINED;
}
}
2015-06-13 19:58:58 +02:00
if (x > RCT2_GLOBAL(RCT2_ADDRESS_MAP_MAX_XY, uint16) || y > RCT2_GLOBAL(RCT2_ADDRESS_MAP_MAX_XY, uint16)) {
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, rct_string_id) = STR_OFF_EDGE_OF_MAP;
return MONEY32_UNDEFINED;
}
if (height < 2) {
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, rct_string_id) = STR_TOO_LOW;
return MONEY32_UNDEFINED;
}
if (height > 62) {
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, rct_string_id) = STR_TOO_HIGH;
return MONEY32_UNDEFINED;
} else if (height == 62 && (style & 0x1F) != 0) {
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, rct_string_id) = STR_TOO_HIGH;
return MONEY32_UNDEFINED;
}
if (height == 60 && (style & 0x10)) {
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, rct_string_id) = STR_TOO_HIGH;
return MONEY32_UNDEFINED;
}
if (!(RCT2_GLOBAL(RCT2_ADDRESS_SCREEN_FLAGS, uint8) & SCREEN_FLAGS_SCENARIO_EDITOR) && !gSandboxMode) {
if (!map_is_location_in_park(x, y)) {
return MONEY32_UNDEFINED;
}
}
int eax = x, ebx = flags, ecx = y, edx = (style << 8) | height, esi = 0, edi = selectionType << 5, ebp = 0;
RCT2_CALLFUNC_X(0x006639FE, &eax, &ebx, &ecx, &edx, &esi, &edi, &ebp);
return ebx;
}
money32 raise_land(int flags, int x, int y, int z, int ax, int ay, int bx, int by, int selectionType)
{
money32 cost = 0;
if ((flags & GAME_COMMAND_FLAG_APPLY) && RCT2_GLOBAL(0x009A8C28, uint8) == 1) {
sound_play_panned(SOUND_PLACE_ITEM, 0x8001, x, y, z);
}
uint8 min_height = 0xFF;
ax = max(ax, 32);
ay = max(ay, 32);
2015-06-13 19:58:58 +02:00
bx = min(bx, RCT2_GLOBAL(RCT2_ADDRESS_MAP_MAX_XY, uint16));
by = min(by, RCT2_GLOBAL(RCT2_ADDRESS_MAP_MAX_XY, uint16));
// find lowest map element in selection
for (int yi = ay; yi <= by; yi += 32) {
for (int xi = ax; xi <= bx; xi += 32) {
rct_map_element *map_element = map_get_surface_element_at(xi / 32, yi / 32);
if (map_element != NULL && min_height > map_element->base_height) {
min_height = map_element->base_height;
}
}
}
for (int yi = ay; yi <= by; yi += 32) {
for (int xi = ax; xi <= bx; xi += 32) {
rct_map_element *map_element = map_get_surface_element_at(xi / 32, yi / 32);
if (map_element != NULL) {
uint8 height = map_element->base_height;
if (height <= min_height){
uint8 newStyle = map_element_raise_styles[selectionType][map_element->properties.surface.slope & MAP_ELEMENT_SLOPE_MASK];
if (newStyle & 0x20) { // needs to be raised
height += 2;
newStyle &= ~0x20;
}
money32 tileCost = sub_66397F(flags, xi, yi, height, newStyle, selectionType);
if (tileCost == MONEY32_UNDEFINED)
return MONEY32_UNDEFINED;
cost += tileCost;
}
}
}
}
2015-06-21 13:07:44 +02:00
RCT2_GLOBAL(RCT2_ADDRESS_NEXT_EXPENDITURE_TYPE, uint8) = RCT_EXPENDITURE_TYPE_LANDSCAPING * 4;
RCT2_GLOBAL(0x009DEA5E, uint32) = x;
RCT2_GLOBAL(0x009DEA60, uint32) = y;
RCT2_GLOBAL(0x009DEA62, uint32) = z;
return cost;
}
money32 lower_land(int flags, int x, int y, int z, int ax, int ay, int bx, int by, int selectionType)
{
money32 cost = 0;
if ((flags & GAME_COMMAND_FLAG_APPLY) && RCT2_GLOBAL(0x009A8C28, uint8) == 1) {
sound_play_panned(SOUND_PLACE_ITEM, 0x8001, x, y, z);
}
uint8 max_height = 0;
ax = max(ax, 32);
ay = max(ay, 32);
2015-06-13 19:58:58 +02:00
bx = min(bx, RCT2_GLOBAL(RCT2_ADDRESS_MAP_MAX_XY, uint16));
by = min(by, RCT2_GLOBAL(RCT2_ADDRESS_MAP_MAX_XY, uint16));
// find highest map element in selection
for (int yi = ay; yi <= by; yi += 32) {
for (int xi = ax; xi <= bx; xi += 32) {
rct_map_element *map_element = map_get_surface_element_at(xi / 32, yi / 32);
if (map_element != NULL) {
uint8 base_height = map_element->base_height;
if (map_element->properties.surface.slope & 0xF)
base_height += 2;
if (map_element->properties.surface.slope & 0x10)
base_height += 2;
if (max_height < base_height)
max_height = base_height;
}
}
}
for (int yi = ay; yi <= by; yi += 32) {
for (int xi = ax; xi <= bx; xi += 32) {
rct_map_element *map_element = map_get_surface_element_at(xi / 32, yi / 32);
if (map_element != NULL) {
uint8 height = map_element->base_height;
if (map_element->properties.surface.slope & 0xF)
height += 2;
if (map_element->properties.surface.slope & 0x10)
height += 2;
if (height >= max_height) {
height = map_element->base_height;
uint8 newStyle = map_element_lower_styles[selectionType][map_element->properties.surface.slope & MAP_ELEMENT_SLOPE_MASK];
if (newStyle & 0x20) { // needs to be lowered
height -= 2;
newStyle &= ~0x20;
}
money32 tileCost = sub_66397F(flags, xi, yi, height, newStyle, selectionType);
if (tileCost == MONEY32_UNDEFINED)
return MONEY32_UNDEFINED;
cost += tileCost;
}
}
}
}
2015-06-21 13:07:44 +02:00
RCT2_GLOBAL(RCT2_ADDRESS_NEXT_EXPENDITURE_TYPE, uint8) = RCT_EXPENDITURE_TYPE_LANDSCAPING * 4;
RCT2_GLOBAL(0x009DEA5E, uint32) = x;
RCT2_GLOBAL(0x009DEA60, uint32) = y;
RCT2_GLOBAL(0x009DEA62, uint32) = z;
return cost;
}
money32 raise_water(sint16 x0, sint16 y0, sint16 x1, sint16 y1, uint8 flags)
{
money32 cost = 0;
uint8 max_height = 0xFF;
x0 = max(x0, 32);
y0 = max(y0, 32);
2015-06-13 19:58:58 +02:00
x1 = min(x1, RCT2_GLOBAL(RCT2_ADDRESS_MAP_MAX_XY, uint16));
y1 = min(y1, RCT2_GLOBAL(RCT2_ADDRESS_MAP_MAX_XY, uint16));
for (int yi = y0; yi <= y1; yi += 32) {
for (int xi = x0; xi <= x1; xi += 32) {
rct_map_element* map_element = map_get_surface_element_at(xi / 32, yi / 32);
if (map_element != NULL) {
uint8 height = map_element->base_height;
if (map_element->properties.surface.terrain & 0x1F)
height = (map_element->properties.surface.terrain & 0x1F) * 2;
if (max_height > height)
max_height = height;
}
}
}
for (int yi = y0; yi <= y1; yi += 32) {
for (int xi = x0; xi <= x1; xi += 32) {
rct_map_element* map_element = map_get_surface_element_at(xi / 32, yi / 32);
if (map_element != NULL) {
if (map_element->base_height <= max_height){
uint8 height = (map_element->properties.surface.terrain & 0x1F);
if (height != 0) {
height *= 2;
if (height > max_height)
continue;
height += 2;
} else {
height = map_element->base_height + 2;
}
money32 tileCost = game_do_command(xi, flags, yi, (max_height << 8) + height, GAME_COMMAND_16, 0, 0);
if (tileCost == MONEY32_UNDEFINED)
return MONEY32_UNDEFINED;
cost += tileCost;
}
}
}
}
if (flags & GAME_COMMAND_FLAG_APPLY) {
int x = ((x0 + x1) / 2) + 16;
int y = ((y0 + y1) / 2) + 16;
int z = map_element_height(x, y);
sint16 water_height_z = z >> 16;
sint16 base_height_z = z;
z = water_height_z;
if (z != 0)
z = base_height_z;
RCT2_GLOBAL(0x009DEA5E, uint32) = x;
RCT2_GLOBAL(0x009DEA60, uint32) = y;
RCT2_GLOBAL(0x009DEA62, uint32) = z;
sound_play_panned(SOUND_LAYING_OUT_WATER, 0x8001, x, y, z);
}
return cost;
}
money32 lower_water(sint16 x0, sint16 y0, sint16 x1, sint16 y1, uint8 flags)
{
money32 cost = 0;
uint8 min_height = 0;
x0 = max(x0, 32);
y0 = max(y0, 32);
2015-06-13 19:58:58 +02:00
x1 = min(x1, RCT2_GLOBAL(RCT2_ADDRESS_MAP_MAX_XY, uint16));
y1 = min(y1, RCT2_GLOBAL(RCT2_ADDRESS_MAP_MAX_XY, uint16));
for (int yi = y0; yi <= y1; yi += 32){
for (int xi = x0; xi <= x1; xi += 32){
rct_map_element* map_element = map_get_surface_element_at(xi / 32, yi / 32);
if (map_element != NULL) {
uint8 height = map_element->properties.surface.terrain & 0x1F;
if (height != 0) {
height *= 2;
if (height > min_height)
min_height = height;
}
}
}
}
for (int yi = y0; yi <= y1; yi += 32) {
for (int xi = x0; xi <= x1; xi += 32) {
rct_map_element* map_element = map_get_surface_element_at(xi / 32, yi / 32);
if (map_element != NULL) {
uint8 height = (map_element->properties.surface.terrain & 0x1F);
if (height != 0) {
height *= 2;
if (height < min_height)
continue;
height -= 2;
int tileCost = game_do_command(xi, flags, yi, (min_height << 8) + height, GAME_COMMAND_16, 0, 0);
if (tileCost == MONEY32_UNDEFINED)
return MONEY32_UNDEFINED;
cost += tileCost;
}
}
}
}
if (flags & GAME_COMMAND_FLAG_APPLY) {
int x = ((x0 + x1) / 2) + 16;
int y = ((y0 + y1) / 2) + 16;
int z = map_element_height(x, y);
sint16 water_height_z = z >> 16;
sint16 base_height_z = z;
z = water_height_z;
2015-06-10 17:38:27 +02:00
if (z == 0)
z = base_height_z;
RCT2_GLOBAL(0x009DEA5E, uint32) = x;
RCT2_GLOBAL(0x009DEA60, uint32) = y;
RCT2_GLOBAL(0x009DEA62, uint32) = z;
sound_play_panned(SOUND_LAYING_OUT_WATER, 0x8001, x, y, z);
}
return cost;
}
/**
*
* rct2: 0x0068C542
*/
void game_command_raise_land(int* eax, int* ebx, int* ecx, int* edx, int* esi, int* edi, int* ebp)
{
*ebx = raise_land(
*ebx,
*eax,
*ecx,
map_element_height(*eax, *ecx),
(sint16)(*edx & 0xFFFF),
(sint16)(*ebp & 0xFFFF),
*edx >> 16,
*ebp >> 16,
*edi & 0xFFFF
);
}
/**
*
* rct2: 0x0068C6D1
*/
void game_command_lower_land(int* eax, int* ebx, int* ecx, int* edx, int* esi, int* edi, int* ebp)
{
*ebx = lower_land(
*ebx,
*eax,
*ecx,
map_element_height(*eax, *ecx),
(sint16)(*edx & 0xFFFF),
(sint16)(*ebp & 0xFFFF),
*edx >> 16,
*ebp >> 16,
*edi & 0xFFFF
);
}
/**
*
* rct2: 0x006E66A0
*/
void game_command_raise_water(int* eax, int* ebx, int* ecx, int* edx, int* esi, int* edi, int* ebp)
{
*ebx = raise_water(
(sint16)(*eax & 0xFFFF),
(sint16)(*ecx & 0xFFFF),
(sint16)(*edi & 0xFFFF),
(sint16)(*ebp & 0xFFFF),
(uint8)*ebx
);
}
/**
*
* rct2: 0x006E6878
*/
void game_command_lower_water(int* eax, int* ebx, int* ecx, int* edx, int* esi, int* edi, int* ebp)
{
*ebx = lower_water(
(sint16)(*eax & 0xFFFF),
(sint16)(*ecx & 0xFFFF),
(sint16)(*edi & 0xFFFF),
(sint16)(*ebp & 0xFFFF),
(uint8)*ebx
);
}
2015-04-16 01:17:43 +02:00
/**
*
* rct2: 0x006E5597
*/
void game_command_remove_fence(int* eax, int* ebx, int* ecx, int* edx, int* esi, int* edi, int* ebp)
{
int x = *eax;
int y = *ecx;
uint8 base_height = (*edx >> 8);
uint8 direction = *edx;
2015-06-21 13:07:44 +02:00
RCT2_GLOBAL(RCT2_ADDRESS_NEXT_EXPENDITURE_TYPE, uint8) = RCT_EXPENDITURE_TYPE_LANDSCAPING * 4;
if(!(*ebx & 0x40) && RCT2_GLOBAL(RCT2_ADDRESS_GAME_PAUSED, uint8) != 0 && !gConfigCheat.build_in_pause_mode){
2015-04-16 01:17:43 +02:00
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, uint16) = STR_CONSTRUCTION_NOT_POSSIBLE_WHILE_GAME_IS_PAUSED;
2015-04-16 01:30:18 +02:00
*ebx = MONEY32_UNDEFINED;
2015-04-16 01:17:43 +02:00
return;
}
if(!(*ebx & 0x40) && !(RCT2_GLOBAL(RCT2_ADDRESS_SCREEN_FLAGS, uint8) & SCREEN_FLAGS_SCENARIO_EDITOR) && !gSandboxMode && !map_is_location_owned(x, y, base_height * 8)){
2015-04-16 04:02:47 +02:00
*ebx = MONEY32_UNDEFINED;
return;
}
rct_map_element* map_element = map_get_first_element_at(x / 32, y / 32);
while(map_element_get_type(map_element) != MAP_ELEMENT_TYPE_FENCE ||
map_element->base_height != base_height ||
(map_element->type & MAP_ELEMENT_DIRECTION_MASK) != direction ||
((*ebx & 0x40) && !(map_element->flags & MAP_ELEMENT_FLAG_GHOST))){
2015-04-16 04:02:47 +02:00
map_element++;
if((map_element - 1)->flags & MAP_ELEMENT_FLAG_LAST_TILE){
*ebx = 0;
2015-04-16 01:17:43 +02:00
return;
}
2015-04-16 04:02:47 +02:00
}
if (!(*ebx & GAME_COMMAND_FLAG_APPLY)){
*ebx = 0;
return;
}
map_element_remove_banner_entry(map_element);
2015-04-16 04:02:47 +02:00
map_invalidate_tile(x, y, map_element->base_height * 8, (map_element->base_height * 8) + 72);
map_element_remove(map_element);
2015-04-16 01:17:43 +02:00
*ebx = 0;
}
2015-04-22 23:47:59 +02:00
/**
*
* rct2: 0x006B9E6D
*/
void game_command_place_banner(int* eax, int* ebx, int* ecx, int* edx, int* esi, int* edi, int* ebp)
{
int x = (uint16)*eax;
int y = (uint16)*ecx;
uint8 base_height = *edx;
uint8 edge = *edx >> 8;
uint8 colour = *edi;
uint8 type = *ebx >> 8;
RCT2_GLOBAL(0x009DEA5E, uint32) = x + 16;
RCT2_GLOBAL(0x009DEA60, uint32) = y + 16;
RCT2_GLOBAL(0x009DEA62, uint32) = base_height * 16;
2015-06-21 13:07:44 +02:00
RCT2_GLOBAL(RCT2_ADDRESS_NEXT_EXPENDITURE_TYPE, uint8) = RCT_EXPENDITURE_TYPE_LANDSCAPING * 4;
if(RCT2_GLOBAL(RCT2_ADDRESS_GAME_PAUSED, uint8) == 0 || gConfigCheat.build_in_pause_mode){
2015-04-22 23:47:59 +02:00
if(sub_68B044() && x < 8192 && y < 8192){
rct_map_element* map_element = map_get_first_element_at(x / 32, y / 32);
int dl = base_height * 2;
int ch = (base_height - 1) * 2;
while(map_element_get_type(map_element) != MAP_ELEMENT_TYPE_PATH ||
(map_element->base_height != dl && map_element->base_height != ch) ||
!(map_element->properties.path.edges & (1 << edge))){
map_element++;
if((map_element - 1)->flags & MAP_ELEMENT_FLAG_LAST_TILE){
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, uint16) = STR_CAN_ONLY_BE_BUILT_ACROSS_PATHS;
*ebx = MONEY32_UNDEFINED;
return;
}
}
if(!(RCT2_GLOBAL(RCT2_ADDRESS_SCREEN_FLAGS, uint8) & SCREEN_FLAGS_SCENARIO_EDITOR) && !gSandboxMode && !map_is_location_owned(x, y, base_height * 16)){
2015-04-22 23:47:59 +02:00
*ebx = MONEY32_UNDEFINED;
return;
}
map_element = map_get_first_element_at(x / 32, y / 32);
dl = (base_height + 1) * 2;
while(map_element->type != MAP_ELEMENT_TYPE_BANNER ||
map_element->base_height != dl ||
(map_element->properties.banner.position & 0x3) != edge){
map_element++;
if((map_element - 1)->flags & MAP_ELEMENT_FLAG_LAST_TILE){
int banner_index = create_new_banner(*ebx);
if(banner_index == BANNER_NULL){
2015-04-22 23:47:59 +02:00
*ebx = MONEY32_UNDEFINED;
return;
}
*edi = banner_index;
2015-04-22 23:47:59 +02:00
if(*ebx & GAME_COMMAND_FLAG_APPLY){
rct_map_element* new_map_element = map_element_insert(x / 32, y / 32, (base_height + 1) * 2, 0);
gBanners[banner_index].type = type;
gBanners[banner_index].colour = colour;
gBanners[banner_index].x = x / 32;
gBanners[banner_index].y = y / 32;
2015-04-22 23:47:59 +02:00
new_map_element->type = MAP_ELEMENT_TYPE_BANNER;
new_map_element->clearance_height = new_map_element->base_height + 2;
new_map_element->properties.banner.position = edge;
new_map_element->properties.banner.flags = 0xFF;
new_map_element->properties.banner.unused = 0;
new_map_element->properties.banner.index = banner_index;
2015-04-22 23:47:59 +02:00
if(*ebx & 0x40){
new_map_element->flags |= 0x10;
}
map_invalidate_tile_full(x, y);
map_animation_create(0x0A, x, y, new_map_element->base_height);
}
rct_scenery_entry *scenery_entry = (rct_scenery_entry*)object_entry_groups[OBJECT_TYPE_BANNERS].chunks[type];
*ebx = scenery_entry->banner.price;
if(RCT2_GLOBAL(RCT2_ADDRESS_PARK_FLAGS, uint32) & PARK_FLAGS_NO_MONEY){
*ebx = 0;
}
return;
}
}
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, uint16) = STR_BANNER_SIGN_IN_THE_WAY;
*ebx = MONEY32_UNDEFINED;
return;
}
}else{
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, uint16) = STR_CONSTRUCTION_NOT_POSSIBLE_WHILE_GAME_IS_PAUSED;
}
*ebx = MONEY32_UNDEFINED;
}
2015-05-12 21:08:36 +02:00
/**
*
* rct2: 0x006E08F4
*/
void game_command_place_scenery(int* eax, int* ebx, int* ecx, int* edx, int* esi, int* edi, int* ebp)
{
2015-06-21 13:07:44 +02:00
RCT2_GLOBAL(RCT2_ADDRESS_NEXT_EXPENDITURE_TYPE, uint8) = RCT_EXPENDITURE_TYPE_LANDSCAPING * 4;
2015-05-12 21:08:36 +02:00
int x = (uint16)*eax;
int y = (uint16)*ecx;
uint8 color2 = *edi >> 16;
uint8 rotation = *edi;
int z = *ebp;
uint8 scenery_type = *ebx >> 8;
uint8 quadrant = *edx;
uint8 color1 = *edx >> 8;
int F64F1D = 0;
int F64EC8 = z;
int base_height = map_element_height(x, y);
if(base_height & 0xFFFF0000){
base_height >>= 16;
}
RCT2_GLOBAL(0x009DEA5E, uint16) = x;
RCT2_GLOBAL(0x009DEA60, uint16) = y;
RCT2_GLOBAL(0x009DEA62, uint16) = base_height;
if(F64EC8){
base_height = F64EC8;
RCT2_GLOBAL(0x009DEA62, uint16) = base_height;
}
RCT2_GLOBAL(0x009DEA5E, uint16) += 16;
RCT2_GLOBAL(0x009DEA60, uint16) += 16;
if(RCT2_GLOBAL(RCT2_ADDRESS_GAME_PAUSED, uint8) == 0 || gConfigCheat.build_in_pause_mode){
2015-05-12 21:08:36 +02:00
if(sub_68B044()){
2015-06-13 19:58:58 +02:00
if(RCT2_GLOBAL(0x009D8150, uint8) & 1 || (x <= RCT2_GLOBAL(RCT2_ADDRESS_MAP_MAX_XY, uint16) && y <= RCT2_GLOBAL(RCT2_ADDRESS_MAP_MAX_XY, uint16))){
2015-05-12 21:08:36 +02:00
rct_scenery_entry* scenery_entry = (rct_scenery_entry*)object_entry_groups[OBJECT_TYPE_SMALL_SCENERY].chunks[scenery_type];
2015-06-19 18:26:22 +02:00
if(scenery_entry->small_scenery.flags & SMALL_SCENERY_FLAG_FULL_TILE || !(scenery_entry->small_scenery.flags & SMALL_SCENERY_FLAG9)){
if(scenery_entry->small_scenery.flags & (SMALL_SCENERY_FLAG9 | SMALL_SCENERY_FLAG24 | SMALL_SCENERY_FLAG25)){
quadrant = 0;
}
2015-05-12 21:08:36 +02:00
}
int x2 = x;
int y2 = y;
if(scenery_entry->small_scenery.flags & SMALL_SCENERY_FLAG_FULL_TILE){
x2 += 16;
y2 += 16;
}else{
x2 += RCT2_ADDRESS(0x009A3E74, uint8)[(quadrant & 3) * 2] - 1;
y2 += RCT2_ADDRESS(0x009A3E75, uint8)[(quadrant & 3) * 2] - 1;
}
int base_height2 = map_element_height(x2, y2);
if(base_height2 & 0xFFFF0000){
base_height2 >>= 16;
if(F64EC8 == 0){
F64F1D = 1;
}
}
if(F64EC8 == 0){
F64EC8 = base_height2;
}
if(!(RCT2_GLOBAL(RCT2_ADDRESS_SCREEN_FLAGS, uint8) & SCREEN_FLAGS_SCENARIO_EDITOR) && !gSandboxMode && !map_is_location_owned(x, y, F64EC8)){
2015-05-12 21:08:36 +02:00
*ebx = MONEY32_UNDEFINED;
return;
}
if(*ebx & GAME_COMMAND_FLAG_APPLY && !(*ebx & 0x40)){
footpath_remove_litter(x, y, F64EC8);
2015-05-12 21:08:36 +02:00
if(scenery_entry->small_scenery.flags & SMALL_SCENERY_FLAG19){
RCT2_CALLPROC_X(0x006E588E, x, scenery_entry->small_scenery.height, y, F64EC8, 0, 0, 0);
}
}
rct_map_element* map_element = map_get_first_element_at(x / 32, y / 32);
while(map_element_get_type(map_element) != MAP_ELEMENT_TYPE_SURFACE){
map_element++;
}
if(map_element->properties.surface.terrain & 0x1F){
int water_height = ((map_element->properties.surface.terrain & 0x1F) * 16) - 1;
if(water_height > F64EC8){
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, uint16) = STR_CANT_BUILD_THIS_UNDERWATER;
*ebx = MONEY32_UNDEFINED;
return;
}
}
if(!(scenery_entry->small_scenery.flags & SMALL_SCENERY_FLAG18)){
if(F64F1D != 0){
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, uint16) = STR_CAN_ONLY_BUILD_THIS_ON_LAND;
*ebx = MONEY32_UNDEFINED;
return;
}
if(map_element->properties.surface.terrain & 0x1F){
if(((map_element->properties.surface.terrain & 0x1F) * 16) > F64EC8){
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, uint16) = STR_CAN_ONLY_BUILD_THIS_ON_LAND;
*ebx = MONEY32_UNDEFINED;
return;
}
}
}
if(!(scenery_entry->small_scenery.flags & SMALL_SCENERY_FLAG_REQUIRE_FLAT_SURFACE) || z != 0 || F64F1D != 0 || !(map_element->properties.surface.slope & 0x1F)){
if(scenery_entry->small_scenery.flags & SMALL_SCENERY_FLAG18 || z == 0){
l_6E0B78: ;
int bp = quadrant;
int zLow = F64EC8 / 8;
int zHigh = zLow + ((scenery_entry->small_scenery.height + 7) / 8);
int bl = 0xF;
if(!(scenery_entry->small_scenery.flags & SMALL_SCENERY_FLAG_FULL_TILE)){
bp ^= 2;
bl = 1;
bl <<= bp;
}
if(!(scenery_entry->small_scenery.flags & SMALL_SCENERY_FLAG24)){
if(scenery_entry->small_scenery.flags & SMALL_SCENERY_FLAG9 && scenery_entry->small_scenery.flags & SMALL_SCENERY_FLAG_FULL_TILE){
if(scenery_entry->small_scenery.flags & SMALL_SCENERY_FLAG25){
bp ^= 2;
bp += rotation;
bp &= 3;
bl = 0xBB;
2015-05-19 01:25:58 +02:00
bl = rol8(bl, bp);
2015-05-12 21:08:36 +02:00
bl &= 0xF;
}else{
bp += rotation;
bp &= 1;
bl = 0xA;
2015-05-30 01:37:00 +02:00
bl >>= bp;
2015-05-12 21:08:36 +02:00
}
}
}else{
bp ^= 2;
bp += rotation;
bp &= 3;
bl = 0x33;
2015-05-19 01:25:58 +02:00
bl = rol8(bl, bp);
2015-05-12 21:08:36 +02:00
bl &= 0xF;
}
if(z == 0){
bl |= 0xF0;
}
RCT2_GLOBAL(0x00F64F22, uint16) = x;
RCT2_GLOBAL(0x00F64F24, uint16) = y;
RCT2_GLOBAL(0x00F64F1E, uint32) = (uint32)(ebx - 1); //0x006E0D6E uses [F64F1E+4] to read ebx value
if(map_can_construct_with_clear_at(x, y, zLow, zHigh, (void*)0x006E0D6E, bl)){
RCT2_GLOBAL(0x00F64F14, uint8) = RCT2_GLOBAL(0x00F1AD60, uint8) & 0x3;
if(*ebx & GAME_COMMAND_FLAG_APPLY){
int flags = (bl & 0xf);
rct_map_element* new_map_element = map_element_insert(x / 32, y / 32, zLow, flags);
RCT2_GLOBAL(0x00F64EBC, rct_map_element*) = new_map_element;
uint8 type = quadrant << 6;
type |= MAP_ELEMENT_TYPE_SCENERY;
type |= rotation;
new_map_element->type = type;
new_map_element->properties.scenery.type = scenery_type;
new_map_element->properties.scenery.age = 0;
new_map_element->properties.scenery.colour_1 = color1;
new_map_element->properties.scenery.colour_2 = color2;
new_map_element->clearance_height = new_map_element->base_height + ((scenery_entry->small_scenery.height + 7) / 8);
if(z != 0){
new_map_element->properties.scenery.colour_1 |= 0x20;
}
if(*ebx & 0x40){
new_map_element->flags |= 0x10;
}
map_invalidate_tile_full(x, y);
2015-05-19 01:25:58 +02:00
if(scenery_entry->small_scenery.flags & SMALL_SCENERY_FLAG_ANIMATED){
2015-05-12 21:08:36 +02:00
map_animation_create(2, x, y, new_map_element->base_height);
}
}
*ebx = (scenery_entry->small_scenery.price * 10);
if(RCT2_GLOBAL(RCT2_ADDRESS_PARK_FLAGS, uint32) & PARK_FLAGS_NO_MONEY){
*ebx = 0;
}
return;
}
}else{
if(F64F1D == 0){
if((map_element->properties.surface.terrain & 0x1F) || (map_element->base_height * 8) != F64EC8){
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, uint16) = STR_LEVEL_LAND_REQUIRED;
}else{
goto l_6E0B78;
}
}else{
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, uint16) = STR_CAN_ONLY_BUILD_THIS_ON_LAND;
}
}
}else{
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, uint16) = STR_LEVEL_LAND_REQUIRED;
}
}
}
}else{
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, uint16) = STR_CONSTRUCTION_NOT_POSSIBLE_WHILE_GAME_IS_PAUSED;
}
*ebx = MONEY32_UNDEFINED;
}
/**
*
* rct2: 0x006E519A
*/
void game_command_place_fence(int* eax, int* ebx, int* ecx, int* edx, int* esi, int* edi, int* ebp){
rct_xyz16 position = {
.x = *eax & 0xFFFF,
.y = *ecx & 0xFFFF,
.z = *edi & 0xFFFF
};
uint8 flags = *ebx & 0xFF;
uint8 fence_type = (*ebx >> 8) & 0xFF;
uint8 primary_colour = (*edx >> 8) & 0xFF;
uint8 secondary_colour = *ebp & 0xFF;
uint8 tertiary_colour = (*ebp >> 8) & 0xFF;
uint8 edge = *edx & 0xFF;
2015-06-21 13:07:44 +02:00
// *not used*
RCT2_GLOBAL(0x00141F726, uint8) = secondary_colour;
2015-06-21 13:07:44 +02:00
// *not used*
RCT2_GLOBAL(0x00141F727, uint8) = tertiary_colour;
2015-06-21 13:07:44 +02:00
RCT2_GLOBAL(RCT2_ADDRESS_NEXT_EXPENDITURE_TYPE, uint8) = RCT_EXPENDITURE_TYPE_LANDSCAPING * 4;
// Banner index *not used*
RCT2_GLOBAL(0x00141F728, uint8) = 0xFF;
2015-06-21 13:07:44 +02:00
RCT2_GLOBAL(0x009DEA5E, sint16) = position.x + 16;
RCT2_GLOBAL(0x009DEA60, sint16) = position.y + 16;
RCT2_GLOBAL(0x009DEA62, sint16) = position.z;
if (position.z == 0){
RCT2_GLOBAL(0x009DEA62, sint16) = map_element_height(position.x, position.y) & 0xFFFF;
}
if (RCT2_GLOBAL(RCT2_ADDRESS_GAME_PAUSED, uint8) != 0 && !gConfigCheat.build_in_pause_mode){
RCT2_GLOBAL(0x00141E9AC, rct_string_id) = 2214;
*ebx = MONEY32_UNDEFINED;
return;
}
if (!(RCT2_GLOBAL(RCT2_ADDRESS_SCREEN_FLAGS, uint8) & SCREEN_FLAGS_SCENARIO_EDITOR) &&
!(flags & (1 << 7)) && !gSandboxMode){
if (position.z == 0){
if (!map_is_location_in_park(position.x, position.y)){
*ebx = MONEY32_UNDEFINED;
return;
}
}
else if (!map_is_location_owned(position.x, position.y, position.z)){
*ebx = MONEY32_UNDEFINED;
return;
}
}
uint8 bp = 0;
if (position.z == 0){
rct_map_element* map_element = map_get_surface_element_at(position.x / 32, position.y / 32);
if (map_element == NULL){
*ebx = MONEY32_UNDEFINED;
return;
}
position.z = map_element->base_height * 8;
uint8 slope = map_element->properties.surface.slope & MAP_ELEMENT_SLOPE_MASK;
bp = RCT2_ADDRESS(0x009A3FEC, uint8)[slope + (edge & 3) * 32];
if (bp & (1 << 0)){
position.z += 16;
bp &= ~(1 << 0);
}
}
RCT2_GLOBAL(0x00141F721, uint16) = position.z / 8;
RCT2_GLOBAL(0x00141F720, uint8) = primary_colour;
RCT2_GLOBAL(0x00141F723, uint8) = bp;
rct_map_element* map_element = map_get_surface_element_at(position.x / 32, position.y / 32);
if (map_element == NULL){
*ebx = MONEY32_UNDEFINED;
return;
}
if (map_element->properties.surface.terrain & MAP_ELEMENT_WATER_HEIGHT_MASK){
uint16 water_height = map_element->properties.surface.terrain & MAP_ELEMENT_WATER_HEIGHT_MASK;
water_height *= 16;
if (position.z < water_height){
RCT2_GLOBAL(0x00141E9AC, rct_string_id) = 1180;
*ebx = MONEY32_UNDEFINED;
return;
}
}
if (position.z / 8 < map_element->base_height){
RCT2_GLOBAL(0x00141E9AC, rct_string_id) = 1033;
*ebx = MONEY32_UNDEFINED;
return;
}
if (!(bp & 0xC0)){
uint8 new_edge = (edge + 2) & 3;
bp += 2;
if (map_element->properties.surface.slope & (1 << new_edge)){
if (position.z / 8 < bp){
RCT2_GLOBAL(0x00141E9AC, rct_string_id) = 1033;
*ebx = MONEY32_UNDEFINED;
return;
}
if (map_element->properties.surface.slope & (1 << 4)){
new_edge = (new_edge - 1) & 3;
if (map_element->properties.surface.slope & (1 << new_edge)){
new_edge = (new_edge + 2) & 3;
if (map_element->properties.surface.slope & (1 << new_edge)){
bp += 2;
if (position.z / 8 < bp){
RCT2_GLOBAL(0x00141E9AC, rct_string_id) = 1033;
*ebx = MONEY32_UNDEFINED;
return;
}
bp -= 2;
}
}
}
}
new_edge = (edge + 3) & 3;
if (map_element->properties.surface.slope & (1 << new_edge)){
if (position.z / 8 < bp){
RCT2_GLOBAL(0x00141E9AC, rct_string_id) = 1033;
*ebx = MONEY32_UNDEFINED;
return;
}
if (map_element->properties.surface.slope & (1 << 4)){
new_edge = (new_edge - 1) & 3;
if (map_element->properties.surface.slope & (1 << new_edge)){
new_edge = (new_edge + 2) & 3;
if (map_element->properties.surface.slope & (1 << new_edge)){
bp += 2;
if (position.z / 8 < bp){
RCT2_GLOBAL(0x00141E9AC, rct_string_id) = 1033;
*ebx = MONEY32_UNDEFINED;
return;
}
}
}
}
}
}
2015-06-21 13:07:44 +02:00
int banner_index = 0xFF;
rct_scenery_entry* fence = g_wallSceneryEntries[fence_type];
if (fence->wall.var_0D != 0xFF){
2015-06-21 13:07:44 +02:00
banner_index = create_new_banner(fence->wall.var_0D);
2015-06-21 13:07:44 +02:00
RCT2_GLOBAL(0x00141F728, uint8) = banner_index;
if (banner_index == 0xFF){
*ebx = MONEY32_UNDEFINED;
return;
}
rct_banner* banner = &gBanners[banner_index];
if (flags & GAME_COMMAND_FLAG_APPLY){
banner->flags |= (1 << 3);
banner->type = 0;
banner->x = position.x / 32;
banner->y = position.y / 32;
*eax = position.x;
*ecx = position.y;
*edx = position.z;
RCT2_CALLFUNC_X(0x6B7D86, eax, ebx, ecx, edx, esi, edi, ebp);
if ((*eax & 0xFF) != 0xFF){
banner->colour = *eax & 0xFF;
banner->flags |= BANNER_FLAG_2;
}
}
}
bp = RCT2_GLOBAL(0x00141F723, uint8);
RCT2_GLOBAL(0x00141F722, uint8) = position.z / 8;
if (bp & 0xC0){
if (fence->wall.flags & WALL_SCENERY_FLAG3){
RCT2_GLOBAL(0x00141E9AC, rct_string_id) = 3133;
*ebx = MONEY32_UNDEFINED;
return;
}
RCT2_GLOBAL(0x00141F722, uint8) += 2;
}
RCT2_GLOBAL(0x00141F722, uint8) += fence->wall.height;
if (!(flags & (1 << 7))){
2015-06-23 03:58:03 +02:00
if (
RCT2_CALLPROC_X(0x006E5C1A,
position.x,
edge,
position.y,
RCT2_GLOBAL(0x00141F721, uint8) | (RCT2_GLOBAL(0x00141F722, uint8) << 8),
0,
(int)fence,
0
) & 0x100
) {
*ebx = MONEY32_UNDEFINED;
return;
}
}
if (!sub_68B044()){
*ebx = MONEY32_UNDEFINED;
return;
}
if (flags & GAME_COMMAND_FLAG_APPLY){
map_element = map_element_insert(position.x / 32, position.y / 32, position.z / 8, 0);
map_animation_create(MAP_ANIMATION_TYPE_WALL, position.x, position.y, position.z / 8);
map_element->clearance_height = RCT2_GLOBAL(0x00141F722, uint8);
map_element->type = bp | edge | MAP_ELEMENT_TYPE_FENCE;
map_element->properties.fence.item[1] = primary_colour;
map_element->properties.fence.item[1] |= (secondary_colour & 7) << 5;
map_element->flags |= (secondary_colour & 0x18) << 2;
if (RCT2_GLOBAL(0x00141F725, uint8) & 1){
map_element->properties.fence.item[2] |= (1 << 2);
}
map_element->properties.fence.type = fence_type;
2015-06-21 13:07:44 +02:00
if (banner_index != 0xFF){
map_element->properties.fence.item[0] = banner_index;
}
if (fence->wall.flags & WALL_SCENERY_HAS_TERNARY_COLOUR){
map_element->properties.fence.item[0] = tertiary_colour;
}
if (flags & (1 << 6)){
map_element->flags |= MAP_ELEMENT_FLAG_GHOST;
}
RCT2_GLOBAL(0x00F64EBC, rct_map_element*) = map_element;
map_invalidate_tile(position.x, position.y, map_element->base_height * 8, map_element->base_height * 8 + 72);
}
if (RCT2_GLOBAL(RCT2_ADDRESS_PARK_FLAGS, uint32) & PARK_FLAGS_NO_MONEY){
*ebx = 0;
}
else{
*ebx = fence->wall.price;
}
}
2015-06-14 13:56:12 +02:00
/**
*
* rct2: 0x006B893C
*/
void game_command_place_large_scenery(int* eax, int* ebx, int* ecx, int* edx, int* esi, int* edi, int* ebp)
{
2015-06-21 13:07:44 +02:00
RCT2_GLOBAL(RCT2_ADDRESS_NEXT_EXPENDITURE_TYPE, uint8) = RCT_EXPENDITURE_TYPE_LANDSCAPING * 4;
2015-06-14 13:56:12 +02:00
int x = (sint16)*eax;
int y = (sint16)*ecx;
int z = (sint16)*ebp;
uint8 color1 = *edx;
uint8 color2 = *edx >> 8;
uint8 flags = *ebx;
uint8 rotation = *ebx >> 8;
uint8 entry_index = *edi;
int base_height = map_element_height(x, y);
RCT2_GLOBAL(0x009DEA5E, sint16) = x + 16;
RCT2_GLOBAL(0x009DEA60, sint16) = y + 16;
RCT2_GLOBAL(0x009DEA62, sint16) = base_height;
RCT2_GLOBAL(0x00F64F14, uint8) = 0;
uint8 banner_id = 0xFF;
RCT2_GLOBAL(0x00F4389A, uint32) = 0;
if(RCT2_GLOBAL(RCT2_ADDRESS_GAME_PAUSED, uint8) == 0 || gConfigCheat.build_in_pause_mode){
if(sub_68B044()){
rct_scenery_entry* scenery_entry = RCT2_ADDRESS(RCT2_ADDRESS_LARGE_SCENERY_ENTRIES, rct_scenery_entry*)[entry_index];
if(scenery_entry->large_scenery.var_11 != 0xFF){
banner_id = create_new_banner(flags);
if(banner_id == MAX_BANNERS){
*ebx = MONEY32_UNDEFINED;
return;
}
if(flags & GAME_COMMAND_FLAG_APPLY){
rct_banner* banner = &gBanners[banner_id];
banner->flags |= BANNER_FLAG_1;
banner->type = 0;
banner->x = x / 32;
banner->y = y / 32;
int eax2 = x, ebx2 = *ebx, ecx2 = y, edx2 = z, esi2 = *esi, edi2 = *edi, ebp2 = *ebp;
RCT2_CALLFUNC_X(0x006B7D86, &eax2, &ebx2, &ecx2, &edx2, &esi2, &edi2, &ebp2);
if((uint8)eax2 != 0xFF){
banner->colour = eax2;
banner->flags |= BANNER_FLAG_2;
}
}
}
rct_large_scenery_tile* tile = scenery_entry->large_scenery.tiles;
sint16 F43884 = 0xFFFF;
do{
if(tile->x_offset == (sint16)0xFFFF){
break;
}
int x2 = tile->x_offset;
int y2 = tile->y_offset;
switch(rotation){
case 0:{
}break;
case 1:{
int temp = x2;
x2 = y2;
y2 = -temp;
}break;
case 2:{
x2 = -x2;
y2 = -y2;
}break;
case 3:{
int temp = y2;
y2 = x2;
x2 = -temp;
}break;
}
x2 += x;
y2 += y;
2015-06-14 22:23:18 +02:00
if(x2 >= 0x1FFF || y2 >= 0x1FFF || x2 < 0 || y2 < 0){
2015-06-14 13:56:12 +02:00
tile++;
continue;
}
rct_map_element* map_element = map_get_surface_element_at(x2 / 32, y2 / 32);
2015-06-14 22:23:18 +02:00
if(map_element != NULL){
int height = map_element->base_height * 8;
if(map_element->properties.scenerymultiple.type & 0xF){
2015-06-14 13:56:12 +02:00
height += 16;
2015-06-14 22:23:18 +02:00
if(map_element->properties.scenerymultiple.type & 0x10){
height += 16;
}
}
if(height > F43884){
F43884 = height;
2015-06-14 13:56:12 +02:00
}
}
tile++;
}while(1);
if(z != 0){
F43884 = z;
}
RCT2_GLOBAL(0x009DEA62, sint16) = F43884;
tile = scenery_entry->large_scenery.tiles;
uint8 tile_num = 0;
do{
if(tile->x_offset == (sint16)0xFFFF){
break;
}
int x2 = tile->x_offset;
int y2 = tile->y_offset;
switch(rotation){
case 0:{
}break;
case 1:{
int temp = x2;
x2 = y2;
y2 = -temp;
}break;
case 2:{
x2 = -x2;
y2 = -y2;
}break;
case 3:{
int temp = y2;
y2 = x2;
x2 = -temp;
}break;
}
int zLow = (tile->z_offset + F43884) / 8;
int zHigh = (tile->var_6 / 8) + zLow;
int bx = tile->var_7 >> 12;
bx <<= rotation;
uint8 bl = bx;
uint8 bh = bl >> 4;
bl &= 0xF;
bl |= bh;
uint8 F43887 = bl;
x2 += x;
y2 += y;
RCT2_GLOBAL(0x00F43892, sint16) = x2;
RCT2_GLOBAL(0x00F43894, sint16) = y2;
RCT2_GLOBAL(0x00F43896, uint32) = (uint32)(ebx - 3); // this is how ebx flags var is passed to 0x006B8D88
if(map_can_construct_with_clear_at(x2, y2, zLow, zHigh, (void*)0x006B8D88, bl)){
if(!(RCT2_GLOBAL(0x00F1AD60, uint8) & 4) && !(RCT2_GLOBAL(0x00F1AD60, uint8) & 2)){
int b = RCT2_GLOBAL(0x00F1AD60, uint8) & 0x3;
if(RCT2_GLOBAL(0x00F64F14, uint8) && !(RCT2_GLOBAL(0x00F64F14, uint8) & b)){
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, uint16) = STR_CANT_BUILD_PARTLY_ABOVE_AND_PARTLY_BELOW_GROUND;
*ebx = MONEY32_UNDEFINED;
return;
}
RCT2_GLOBAL(0x00F64F14, uint8) = b;
if(x2 >= RCT2_GLOBAL(RCT2_ADDRESS_MAP_SIZE_UNITS, uint16) || y2 >= RCT2_GLOBAL(RCT2_ADDRESS_MAP_SIZE_UNITS, uint16)){
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, uint16) = STR_OFF_EDGE_OF_MAP;
*ebx = MONEY32_UNDEFINED;
return;
}
2015-06-20 17:26:42 +02:00
if((RCT2_GLOBAL(RCT2_ADDRESS_SCREEN_FLAGS, uint8) & SCREEN_FLAGS_SCENARIO_EDITOR) || map_is_location_owned(x2, y2, zLow * 8) || gSandboxMode){
2015-06-14 13:56:12 +02:00
if(*ebx & GAME_COMMAND_FLAG_APPLY){
if(!(*ebx & 0x40)){
footpath_remove_litter(x2, y2, zLow * 8);
int bh = (zHigh - zLow) * 8;
RCT2_CALLPROC_X(0x006E588E, x2, bh << 8 | flags, y2, zLow * 8, 0, 0, 0);
}
rct_map_element *new_map_element = map_element_insert(x2 / 32, y2 / 32, zLow, F43887);
map_animation_create(0xB, x2, y2, zLow);
2015-06-14 13:56:12 +02:00
new_map_element->clearance_height = zHigh;
new_map_element->type = MAP_ELEMENT_TYPE_SCENERY_MULTIPLE | rotation;
int bx = tile_num;
bx <<= 10;
bx |= entry_index;
new_map_element->properties.scenerymultiple.type = bx;
new_map_element->properties.scenerymultiple.colour[0] = color1;
new_map_element->properties.scenerymultiple.colour[1] = color2;
if(banner_id != 0xFF){
uint8 bh = banner_id;
bh &= 0xC0;
new_map_element->type |= bh;
bh = banner_id;
bh &= 0x38;
bh <<= 2;
new_map_element->properties.scenerymultiple.colour[0] |= bh;
uint8 bl = banner_id;
bl &= 7;
bl <<= 5;
new_map_element->properties.scenerymultiple.colour[1] |= bl;
}
if(*ebx & 0x40){
new_map_element->flags |= MAP_ELEMENT_FLAG_GHOST;
2015-06-14 13:56:12 +02:00
}
if(tile_num == 0){
RCT2_GLOBAL(0x00F64EBC, rct_map_element*) = new_map_element;
}
map_invalidate_tile_full(x2 / 32, y2 / 32);
}
}else{
*ebx = MONEY32_UNDEFINED;
return;
}
}else{
*ebx = MONEY32_UNDEFINED;
return;
}
}else{
*ebx = MONEY32_UNDEFINED;
return;
}
tile++;
tile_num++;
}while(1);
*ebx = (scenery_entry->large_scenery.price * 10) + RCT2_GLOBAL(0x00F4389A, uint32);
if(RCT2_GLOBAL(RCT2_ADDRESS_PARK_FLAGS, uint32) & PARK_FLAGS_NO_MONEY){
*ebx = 0;
}
return;
}
}else{
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TEXT, uint16) = STR_CONSTRUCTION_NOT_POSSIBLE_WHILE_GAME_IS_PAUSED;
}
*ebx = MONEY32_UNDEFINED;
}
/**
*
* rct2: 0x006EC6D7
*/
void map_invalidate_tile_full(int x, int y)
{
RCT2_CALLPROC_X(0x006EC6D7, x, 0, y, 0, 0, 0, 0);
}
int map_get_station(rct_map_element *mapElement)
{
return (mapElement->properties.track.sequence & 0x70) >> 4;
}
/**
*
* rct2: 0x0068B280
*/
void map_element_remove(rct_map_element *mapElement)
{
if (!map_element_is_last_for_tile(mapElement)){
do{
*mapElement = *(mapElement + 1);
} while (!map_element_is_last_for_tile(++mapElement));
}
(mapElement - 1)->flags |= MAP_ELEMENT_FLAG_LAST_TILE;
mapElement->base_height = 0xFF;
if ((mapElement + 1) == RCT2_GLOBAL(0x00140E9A4, rct_map_element*)){
RCT2_GLOBAL(0x00140E9A4, rct_map_element*)--;
}
}
/**
*
* rct2: 0x006A6AA7
* @param x x-coordinate in units (not tiles)
* @param y y-coordinate in units (not tiles)
*/
void sub_6A6AA7(int x, int y, rct_map_element *mapElement)
{
RCT2_CALLPROC_X(0x006A6AA7, x, 0, y, 0, (int)mapElement, 0, 0);
}
/**
*
* rct2: 0x00675A8E
*/
void map_remove_all_rides()
{
2015-01-22 01:19:05 +01:00
map_element_iterator it;
2015-01-22 01:19:05 +01:00
map_element_iterator_begin(&it);
do {
switch (map_element_get_type(it.element)) {
case MAP_ELEMENT_TYPE_PATH:
if (it.element->type & 1) {
it.element->properties.path.type &= ~8;
it.element->properties.path.addition_status = 255;
}
break;
case MAP_ELEMENT_TYPE_ENTRANCE:
if (it.element->properties.entrance.type == ENTRANCE_TYPE_PARK_ENTRANCE)
break;
// fall-through
case MAP_ELEMENT_TYPE_TRACK:
2015-06-09 03:36:02 +02:00
sub_6A7594();
2015-01-22 01:19:05 +01:00
sub_6A6AA7(it.x * 32, it.y * 32, it.element);
map_element_remove(it.element);
map_element_iterator_restart_for_tile(&it);
break;
}
2015-01-22 01:19:05 +01:00
} while (map_element_iterator_next(&it));
}
/**
*
* rct2: 0x0068AB1B
*/
void map_invalidate_map_selection_tiles()
{
rct_xy16 *position;
if (!(RCT2_GLOBAL(RCT2_ADDRESS_MAP_SELECTION_FLAGS, uint16) & (1 << 1)))
return;
for (position = gMapSelectionTiles; position->x != -1; position++)
map_invalidate_tile_full(position->x, position->y);
}
/**
*
* rct2: 0x0068AAE1
*/
void map_invalidate_selection_rect()
{
int x, y, x0, y0, x1, y1;
if (!(RCT2_GLOBAL(RCT2_ADDRESS_MAP_SELECTION_FLAGS, uint16) & (1 << 0)))
return;
x0 = RCT2_GLOBAL(RCT2_ADDRESS_MAP_SELECTION_A_X, sint16);
y0 = RCT2_GLOBAL(RCT2_ADDRESS_MAP_SELECTION_A_Y, sint16);
x1 = RCT2_GLOBAL(RCT2_ADDRESS_MAP_SELECTION_B_X, sint16);
y1 = RCT2_GLOBAL(RCT2_ADDRESS_MAP_SELECTION_B_Y, sint16);
for (x = x0; x <= x1; x++)
for (y = y0; y <= y1; y++)
map_invalidate_tile_full(x, y);
}
/**
*
* rct2: 0x0068B111
*/
void map_reorganise_elements()
{
RCT2_CALLPROC_EBPSAFE(0x0068B111);
}
/**
*
* rct2: 0x0068B044
*/
int sub_68B044()
{
return (RCT2_CALLPROC_X(0x0068B044, 0, 0, 0, 0, 0, 0, 0) & 0x100) == 0;
}
/**
*
* rct2: 0x0068B1F6
*/
rct_map_element *map_element_insert(int x, int y, int z, int flags)
{
rct_map_element *originalMapElement, *newMapElement, *insertedElement;
sub_68B044();
newMapElement = RCT2_GLOBAL(0x00140E9A4, rct_map_element*);
originalMapElement = TILE_MAP_ELEMENT_POINTER(y * 256 + x);
// Set tile index pointer to point to new element block
TILE_MAP_ELEMENT_POINTER(y * 256 + x) = newMapElement;
// Copy all elements that are below the insert height
while (z >= originalMapElement->base_height) {
// Copy over map element
*newMapElement = *originalMapElement;
originalMapElement->base_height = 255;
originalMapElement++;
newMapElement++;
if ((newMapElement - 1)->flags & MAP_ELEMENT_FLAG_LAST_TILE) {
// No more elements above the insert element
(newMapElement - 1)->flags &= ~MAP_ELEMENT_FLAG_LAST_TILE;
flags |= MAP_ELEMENT_FLAG_LAST_TILE;
break;
}
}
// Insert new map element
insertedElement = newMapElement;
newMapElement->base_height = z;
newMapElement->flags = flags;
newMapElement->clearance_height = z;
*((uint32*)&newMapElement->properties) = 0;
newMapElement++;
// Insert rest of map elements above insert height
if (!(flags & MAP_ELEMENT_FLAG_LAST_TILE)) {
do {
// Copy over map element
*newMapElement = *originalMapElement;
originalMapElement->base_height = 255;
originalMapElement++;
newMapElement++;
} while (!((newMapElement - 1)->flags & MAP_ELEMENT_FLAG_LAST_TILE));
}
RCT2_GLOBAL(0x00140E9A4, rct_map_element*) = newMapElement;
return insertedElement;
}
/**
*
* rct2: 0x0068B932
*/
int map_can_construct_with_clear_at(int x, int y, int zLow, int zHigh, void *clearFunc, uint8 bl)
{
return (RCT2_CALLPROC_X(0x0068B932, x, bl, y, (zHigh << 8) | zLow, 0, 0, (int)clearFunc) & 0x100) == 0;
}
/**
*
* rct2: 0x0068B93A
*/
int map_can_construct_at(int x, int y, int zLow, int zHigh, uint8 bl)
{
return map_can_construct_with_clear_at(x, y, zLow, zHigh, (void*)0xFFFFFFFF, bl);
}
/**
*
* rct2: 0x006E5935
*/
void map_remove_intersecting_walls(int x, int y, int z0, int z1, int direction)
{
rct_map_element *mapElement;
mapElement = map_get_first_element_at(x >> 5, y >> 5);
do {
if (map_element_get_type(mapElement) != MAP_ELEMENT_TYPE_FENCE)
continue;
if (mapElement->clearance_height <= z0 || mapElement->base_height >= z1)
continue;
if (direction != (mapElement->type & 3))
continue;
2015-06-17 17:32:50 +02:00
map_element_remove_banner_entry(mapElement);
map_invalidate_tile(x, y, mapElement->base_height * 8, mapElement->base_height * 8 + 72);
map_element_remove(mapElement);
2015-06-17 17:32:50 +02:00
mapElement--;
} while (!map_element_is_last_for_tile(mapElement++));
}
/**
* Updates grass length, scenery age and jumping fountains.
*
* rct2: 0x006646E1
*/
void map_update_tiles()
{
int ignoreScreenFlags = SCREEN_FLAGS_SCENARIO_EDITOR | SCREEN_FLAGS_TRACK_DESIGNER | SCREEN_FLAGS_TRACK_MANAGER;
if (RCT2_GLOBAL(RCT2_ADDRESS_SCREEN_FLAGS, uint8) & ignoreScreenFlags)
return;
// Update 43 more tiles
for (int j = 0; j < 43; j++) {
int x = 0;
int y = 0;
uint16 interleaved_xy = RCT2_GLOBAL(RCT2_ADDRESS_GRASS_SCENERY_TILEPOS, sint16);
for (int i = 0; i < 8; i++) {
x = (x << 1) | (interleaved_xy & 1);
interleaved_xy >>= 1;
y = (y << 1) | (interleaved_xy & 1);
interleaved_xy >>= 1;
}
rct_map_element *mapElement = map_get_surface_element_at(x, y);
if (mapElement != NULL) {
map_update_grass_length(x * 32, y * 32, mapElement);
scenery_update_tile(x * 32, y * 32);
}
RCT2_GLOBAL(RCT2_ADDRESS_GRASS_SCENERY_TILEPOS, sint16)++;
RCT2_GLOBAL(RCT2_ADDRESS_GRASS_SCENERY_TILEPOS, sint16) &= 0xFFFF;
}
}
/**
*
* rct2: 0x006647A1
*/
static void map_update_grass_length(int x, int y, rct_map_element *mapElement)
{
// Check if tile is grass
if ((mapElement->properties.surface.terrain & 0xE0) && !(mapElement->type & 3))
return;
int grassLength = mapElement->properties.surface.grass_length & 7;
// Check if grass is underwater or outside park
int waterHeight = (mapElement->properties.surface.terrain & 0x1F) * 2;
if (waterHeight > mapElement->base_height || !map_is_location_in_park(x, y)) {
if (grassLength != GRASS_LENGTH_CLEAR_0)
map_set_grass_length(x, y, mapElement, GRASS_LENGTH_CLEAR_0);
return;
}
// Grass can't grow any further
if (grassLength == GRASS_LENGTH_CLUMPS_2)
return;
int z0 = mapElement->base_height;
int z1 = mapElement->base_height + 2;
if (mapElement->properties.surface.slope & 0x10)
z1 += 2;
// Check objects above grass
rct_map_element *mapElementAbove = mapElement;
for (;;) {
if (mapElementAbove->flags & MAP_ELEMENT_FLAG_LAST_TILE) {
// Grow grass
if (mapElement->properties.surface.grass_length < 0xF0) {
mapElement->properties.surface.grass_length += 0x10;
} else {
mapElement->properties.surface.grass_length += 0x10;
mapElement->properties.surface.grass_length ^= 8;
if (mapElement->properties.surface.grass_length & 8) {
// Random growth rate
mapElement->properties.surface.grass_length |= scenario_rand() & 0x70;
} else {
// Increase length
map_set_grass_length(x, y, mapElement, grassLength + 1);
}
}
} else {
mapElementAbove++;
if (map_element_get_type(mapElementAbove) == MAP_ELEMENT_TYPE_FENCE)
continue;
if (z0 >= mapElementAbove->clearance_height)
continue;
if (z1 < mapElementAbove->base_height)
continue;
}
break;
}
}
static void map_set_grass_length(int x, int y, rct_map_element *mapElement, int length)
{
int z0, z1;
mapElement->properties.surface.grass_length = length;
z0 = mapElement->base_height * 8;
z1 = z0 + 16;
gfx_invalidate_viewport_tile(x, y, z0, z1);
2015-06-09 03:36:02 +02:00
}
void sub_6A7594()
{
RCT2_GLOBAL(0x00F3EFF4, uint32) = 0x00F3EFF8;
}
int map_element_get_banner_index(rct_map_element *mapElement)
{
rct_scenery_entry* sceneryEntry;
switch (map_element_get_type(mapElement)) {
case MAP_ELEMENT_TYPE_SCENERY_MULTIPLE:
sceneryEntry = g_largeSceneryEntries[mapElement->properties.scenerymultiple.type & 0x3FF];
if (sceneryEntry->large_scenery.var_11 == 0xFF)
return -1;
return
(mapElement->type & MAP_ELEMENT_QUADRANT_MASK) |
2015-06-17 17:32:50 +02:00
((mapElement->properties.scenerymultiple.colour[0] & 0xE0) >> 2) |
((mapElement->properties.scenerymultiple.colour[1] & 0xE0) >> 5);
case MAP_ELEMENT_TYPE_FENCE:
sceneryEntry = g_wallSceneryEntries[mapElement->properties.fence.type];
if (sceneryEntry->wall.var_0D == 0xFF)
return -1;
return mapElement->properties.fence.item[0];
case MAP_ELEMENT_TYPE_BANNER:
return mapElement->properties.banner.index;
default:
return -1;
}
}
void map_element_remove_banner_entry(rct_map_element *mapElement)
{
int bannerIndex = map_element_get_banner_index(mapElement);
if (bannerIndex == -1)
return;
rct_banner* banner = &gBanners[bannerIndex];
if (banner->type != BANNER_NULL) {
window_close_by_number(WC_BANNER, bannerIndex);
banner->type = BANNER_NULL;
user_string_free(banner->string_idx);
}
2015-06-20 17:24:38 +02:00
}
static void sub_68ADBC()
{
int mapMaxXY = RCT2_GLOBAL(RCT2_ADDRESS_MAP_MAX_XY, uint16);
for (int y = 0; y < (256 * 32); y += 32) {
for (int x = 0; x < (256 * 32); x += 32) {
if (x == 0 || y == 0 || x >= mapMaxXY || y >= mapMaxXY) {
sub_68AE2A(x, y);
} else if (x >= mapMaxXY - 32 || y >= mapMaxXY - 32) {
RCT2_GLOBAL(RCT2_ADDRESS_MAP_SIZE_UNITS, uint16) += 32;
map_buy_land_rights(x, y, x, y, 6, GAME_COMMAND_FLAG_APPLY);
RCT2_GLOBAL(RCT2_ADDRESS_MAP_SIZE_UNITS, uint16) -= 32;
}
}
}
}
static void sub_68AE2A(int x, int y)
{
for (;;) {
rct2_peep_spawn *peepSpawns = RCT2_ADDRESS(RCT2_ADDRESS_PEEP_SPAWNS, rct2_peep_spawn);
for (int i = 0; i < 2; i++) {
if ((peepSpawns[i].x & 0xFFE0) == x && (peepSpawns[i].y & 0xFFE0) == y) {
peepSpawns[i].x = 0xFFFF;
}
}
rct_map_element *mapElement = map_get_first_element_at(x >> 5, y >> 5);
next_element:
switch (map_element_get_type(mapElement)) {
case MAP_ELEMENT_TYPE_SURFACE:
mapElement->base_height = 2;
mapElement->clearance_height = 2;
mapElement->properties.surface.slope = 0;
mapElement->properties.surface.terrain = 0;
mapElement->properties.surface.grass_length = 1;
mapElement->properties.surface.ownership = 0;
if (!map_element_is_last_for_tile(mapElement++))
goto next_element;
return;
case MAP_ELEMENT_TYPE_ENTRANCE:
viewport_interaction_remove_park_entrance(mapElement, x, y);
break;
case MAP_ELEMENT_TYPE_FENCE:
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TITLE, rct_string_id) = STR_CANT_REMOVE_THIS;
game_do_command(
x,
GAME_COMMAND_FLAG_APPLY,
y,
(mapElement->type & MAP_ELEMENT_DIRECTION_MASK) | (mapElement->base_height << 8),
GAME_COMMAND_REMOVE_FENCE,
0,
0
);
break;
case MAP_ELEMENT_TYPE_SCENERY_MULTIPLE:
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TITLE, rct_string_id) = STR_CANT_REMOVE_THIS;
game_do_command(
x,
(GAME_COMMAND_FLAG_APPLY) | (mapElement->type & MAP_ELEMENT_DIRECTION_MASK),
y,
(mapElement->base_height) | (((mapElement->properties.scenerymultiple.type >> 8) >> 2) << 8),
GAME_COMMAND_REMOVE_LARGE_SCENERY,
0,
0
);
break;
case MAP_ELEMENT_TYPE_BANNER:
RCT2_GLOBAL(RCT2_ADDRESS_GAME_COMMAND_ERROR_TITLE, rct_string_id) = STR_CANT_REMOVE_THIS;
game_do_command(
x,
GAME_COMMAND_FLAG_APPLY,
y,
(mapElement->base_height) | ((mapElement->properties.banner.position & 3) << 8),
GAME_COMMAND_REMOVE_BANNER,
0,
0
);
break;
default:
map_element_remove(mapElement);
break;
}
}
}
2015-06-27 16:17:54 +02:00
int map_get_highest_z(int tileX, int tileY)
{
rct_map_element *mapElement;
int z;
mapElement = map_get_surface_element_at(tileX, tileY);
if (mapElement == NULL)
return -1;
z = mapElement->base_height * 8;
// Raise z so that is above highest point of land and water on tile
if ((mapElement->properties.surface.slope & 0x0F) != 0)
z += 16;
if ((mapElement->properties.surface.slope & 0x10) != 0)
z += 16;
z = max(z, (mapElement->properties.surface.terrain & 0x1F) * 16);
return z;
}