tron@2186: /* $Id$ */
tron@2186: 
belugas@6918: /** @file terraform_gui.cpp */
belugas@6918: 
truelight@0: #include "stdafx.h"
Darkvater@1891: #include "openttd.h"
celestar@5573: #include "bridge_map.h"
tron@3144: #include "clear_map.h"
rubidium@8750: #include "player_func.h"
rubidium@8750: #include "player_base.h"
truelight@0: #include "gui.h"
rubidium@8603: #include "window_gui.h"
rubidium@8720: #include "viewport_func.h"
rubidium@8720: #include "gfx_func.h"
rubidium@8612: #include "command_func.h"
truelight@988: #include "signs.h"
tron@2159: #include "variables.h"
rubidium@8627: #include "functions.h"
rubidium@8653: #include "sound_func.h"
rubidium@8701: #include "station.h"
rubidium@8701: #include "unmovable_map.h"
rubidium@8701: #include "textbuf_gui.h"
rubidium@8732: #include "genworld.h"
rubidium@8766: #include "settings_type.h"
frosch@8955: #include "tree_map.h"
truelight@0: 
rubidium@8760: #include "table/sprites.h"
rubidium@8760: #include "table/strings.h"
rubidium@8760: 
tron@1977: void CcTerraform(bool success, TileIndex tile, uint32 p1, uint32 p2)
truelight@0: {
truelight@0: 	if (success) {
tron@541: 		SndPlayTileFx(SND_1F_SPLAT, tile);
truelight@0: 	} else {
rubidium@8706: 		extern TileIndex _terraform_err_tile;
truelight@0: 		SetRedErrorSquare(_terraform_err_tile);
truelight@0: 	}
truelight@0: }
truelight@0: 
truelight@0: 
Darkvater@1632: /** Scenario editor command that generates desert areas */
Darkvater@1632: static void GenerateDesertArea(TileIndex end, TileIndex start)
Darkvater@1632: {
Darkvater@1632: 	int size_x, size_y;
Darkvater@1632: 	int sx = TileX(start);
Darkvater@1632: 	int sy = TileY(start);
Darkvater@1632: 	int ex = TileX(end);
Darkvater@1632: 	int ey = TileY(end);
Darkvater@1632: 
Darkvater@1632: 	if (_game_mode != GM_EDITOR) return;
Darkvater@1632: 
tron@6432: 	if (ex < sx) Swap(ex, sx);
tron@6432: 	if (ey < sy) Swap(ey, sy);
Darkvater@1632: 	size_x = (ex - sx) + 1;
Darkvater@1632: 	size_y = (ey - sy) + 1;
Darkvater@1632: 
Darkvater@1710: 	_generating_world = true;
tron@1981: 	BEGIN_TILE_LOOP(tile, size_x, size_y, TileXY(sx, sy)) {
Darkvater@1710: 		if (GetTileType(tile) != MP_WATER) {
frosch@8946: 			SetTropicZone(tile, (_ctrl_pressed) ? TROPICZONE_NORMAL : TROPICZONE_DESERT);
Darkvater@1780: 			DoCommandP(tile, 0, 0, NULL, CMD_LANDSCAPE_CLEAR);
Darkvater@1710: 			MarkTileDirtyByTile(tile);
Darkvater@1710: 		}
Darkvater@1632: 	} END_TILE_LOOP(tile, size_x, size_y, 0);
Darkvater@1710: 	_generating_world = false;
Darkvater@1632: }
Darkvater@1632: 
tron@3017: /** Scenario editor command that generates rocky areas */
Darkvater@2615: static void GenerateRockyArea(TileIndex end, TileIndex start)
Darkvater@2615: {
Darkvater@2615: 	int size_x, size_y;
Darkvater@2615: 	bool success = false;
Darkvater@2615: 	int sx = TileX(start);
Darkvater@2615: 	int sy = TileY(start);
Darkvater@2615: 	int ex = TileX(end);
Darkvater@2615: 	int ey = TileY(end);
Darkvater@2615: 
Darkvater@2615: 	if (_game_mode != GM_EDITOR) return;
Darkvater@2615: 
tron@6432: 	if (ex < sx) Swap(ex, sx);
tron@6432: 	if (ey < sy) Swap(ey, sy);
Darkvater@2615: 	size_x = (ex - sx) + 1;
Darkvater@2615: 	size_y = (ey - sy) + 1;
Darkvater@2615: 
Darkvater@2615: 	BEGIN_TILE_LOOP(tile, size_x, size_y, TileXY(sx, sy)) {
celestar@5573: 		switch (GetTileType(tile)) {
frosch@8955: 			case MP_TREES:
frosch@8955: 				if (GetTreeGround(tile) == TREE_GROUND_SHORE) continue;
frosch@8955: 			/* FALL THROUGH */
celestar@5573: 			case MP_CLEAR:
celestar@5573: 				MakeClear(tile, CLEAR_ROCKS, 3);
celestar@5573: 				break;
celestar@5573: 
celestar@5573: 			default: continue;
Darkvater@2615: 		}
celestar@5573: 		MarkTileDirtyByTile(tile);
celestar@5573: 		success = true;
Darkvater@2615: 	} END_TILE_LOOP(tile, size_x, size_y, 0);
Darkvater@2615: 
Darkvater@2615: 	if (success) SndPlayTileFx(SND_1F_SPLAT, end);
Darkvater@2615: }
Darkvater@2615: 
Darkvater@1632: /**
Darkvater@1632:  * A central place to handle all X_AND_Y dragged GUI functions.
belugas@6918:  * @param e WindowEvent variable holding in its higher bits (excluding the lower
Darkvater@1632:  * 4, since that defined the X_Y drag) the type of action to be performed
Darkvater@1632:  * @return Returns true if the action was found and handled, and false otherwise. This
Darkvater@1632:  * allows for additional implements that are more local. For example X_Y drag
belugas@6918:  * of convertrail which belongs in rail_gui.cpp and not terraform_gui.cpp
Darkvater@1632:  **/
belugas@4634: bool GUIPlaceProcDragXY(const WindowEvent *e)
Darkvater@1632: {
belugas@4634: 	TileIndex start_tile = e->we.place.starttile;
belugas@4634: 	TileIndex end_tile = e->we.place.tile;
Darkvater@1632: 
maedhros@7165: 	switch (e->we.place.select_proc) {
maedhros@7166: 		case DDSP_DEMOLISH_AREA:
maedhros@7165: 			DoCommandP(end_tile, start_tile, 0, CcPlaySound10, CMD_CLEAR_AREA | CMD_MSG(STR_00B5_CAN_T_CLEAR_THIS_AREA));
maedhros@7165: 			break;
peter1138@8692: 		case DDSP_RAISE_AND_LEVEL_AREA:
smatz@8700: 			DoCommandP(end_tile, start_tile, 1, CcTerraform, CMD_LEVEL_LAND | CMD_MSG(STR_0808_CAN_T_RAISE_LAND_HERE));
peter1138@8692: 			break;
peter1138@8692: 		case DDSP_LOWER_AND_LEVEL_AREA:
rubidium@8698: 			DoCommandP(end_tile, start_tile, (uint32)-1, CcTerraform, CMD_LEVEL_LAND | CMD_MSG(STR_0809_CAN_T_LOWER_LAND_HERE));
peter1138@8692: 			break;
maedhros@7166: 		case DDSP_LEVEL_AREA:
rubidium@8017: 			DoCommandP(end_tile, start_tile, 0, CcPlaySound10, CMD_LEVEL_LAND);
maedhros@7165: 			break;
maedhros@7166: 		case DDSP_CREATE_ROCKS:
maedhros@7165: 			GenerateRockyArea(end_tile, start_tile);
maedhros@7165: 			break;
maedhros@7166: 		case DDSP_CREATE_DESERT:
maedhros@7165: 			GenerateDesertArea(end_tile, start_tile);
maedhros@7165: 			break;
maedhros@7166: 		case DDSP_CREATE_WATER:
rubidium@8017: 			DoCommandP(end_tile, start_tile, _ctrl_pressed, CcBuildCanal, CMD_BUILD_CANAL | CMD_MSG(STR_CANT_BUILD_CANALS));
maedhros@7165: 			break;
peter1138@8856: 		case DDSP_CREATE_RIVER:
peter1138@8856: 			DoCommandP(end_tile, start_tile, 2, CcBuildCanal, CMD_BUILD_CANAL | CMD_MSG(STR_CANT_BUILD_CANALS));
peter1138@8856: 			break;
maedhros@7165: 		default:
maedhros@7165: 			return false;
Darkvater@1632: 	}
Darkvater@1632: 
Darkvater@1632: 	return true;
Darkvater@1632: }
truelight@0: 
truelight@0: typedef void OnButtonClick(Window *w);
truelight@0: 
truelight@0: static const uint16 _terraform_keycodes[] = {
dominik@606: 	'Q',
dominik@606: 	'W',
dominik@606: 	'E',
dominik@936: 	'D',
dominik@606: 	'U',
dominik@606: 	'I',
dominik@613: 	'O',
truelight@0: };
truelight@0: 
tron@1977: void PlaceProc_DemolishArea(TileIndex tile)
truelight@0: {
maedhros@7166: 	VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_DEMOLISH_AREA);
truelight@0: }
truelight@0: 
tron@2817: static void PlaceProc_RaiseLand(TileIndex tile)
truelight@0: {
peter1138@8692: 	VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_RAISE_AND_LEVEL_AREA);
truelight@0: }
truelight@0: 
tron@2817: static void PlaceProc_LowerLand(TileIndex tile)
truelight@0: {
peter1138@8692: 	VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_LOWER_AND_LEVEL_AREA);
truelight@0: }
truelight@0: 
tron@1977: void PlaceProc_LevelLand(TileIndex tile)
truelight@0: {
maedhros@7166: 	VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_LEVEL_AREA);
truelight@0: }
truelight@0: 
truelight@0: static void TerraformClick_Lower(Window *w)
truelight@0: {
rubidium@8385: 	HandlePlacePushButton(w, 4, ANIMCURSOR_LOWERLAND, VHM_POINT, PlaceProc_LowerLand);
truelight@0: }
truelight@0: 
truelight@0: static void TerraformClick_Raise(Window *w)
truelight@0: {
rubidium@8385: 	HandlePlacePushButton(w, 5, ANIMCURSOR_RAISELAND, VHM_POINT, PlaceProc_RaiseLand);
truelight@0: }
truelight@0: 
truelight@0: static void TerraformClick_Level(Window *w)
truelight@0: {
rubidium@8385: 	HandlePlacePushButton(w, 6, SPR_CURSOR_LEVEL_LAND, VHM_POINT, PlaceProc_LevelLand);
truelight@0: }
truelight@0: 
dominik@936: static void TerraformClick_Dynamite(Window *w)
dominik@936: {
rubidium@8385: 	HandlePlacePushButton(w, 7, ANIMCURSOR_DEMOLISH , VHM_RECT, PlaceProc_DemolishArea);
dominik@936: }
dominik@936: 
truelight@0: static void TerraformClick_BuyLand(Window *w)
truelight@0: {
rubidium@8385: 	HandlePlacePushButton(w, 8, SPR_CURSOR_BUY_LAND, VHM_RECT, PlaceProc_BuyLand);
truelight@0: }
truelight@0: 
truelight@0: static void TerraformClick_Trees(Window *w)
truelight@0: {
celestar@3817: 	/* This button is NOT a place-push-button, so don't treat it as such */
celestar@3817: 	ShowBuildTreesToolbar();
truelight@0: }
truelight@0: 
truelight@0: static void TerraformClick_PlaceSign(Window *w)
truelight@0: {
rubidium@8385: 	HandlePlacePushButton(w, 10, SPR_CURSOR_SIGN, VHM_RECT, PlaceProc_Sign);
truelight@0: }
truelight@0: 
truelight@0: static OnButtonClick * const _terraform_button_proc[] = {
truelight@0: 	TerraformClick_Lower,
truelight@0: 	TerraformClick_Raise,
truelight@0: 	TerraformClick_Level,
dominik@936: 	TerraformClick_Dynamite,
truelight@0: 	TerraformClick_BuyLand,
truelight@0: 	TerraformClick_Trees,
truelight@0: 	TerraformClick_PlaceSign,
truelight@0: };
truelight@0: 
truelight@0: static void TerraformToolbWndProc(Window *w, WindowEvent *e)
truelight@0: {
tron@2952: 	switch (e->event) {
truelight@0: 	case WE_PAINT:
truelight@0: 		DrawWindowWidgets(w);
truelight@0: 		break;
tron@2639: 
truelight@0: 	case WE_CLICK:
belugas@4634: 		if (e->we.click.widget >= 4) _terraform_button_proc[e->we.click.widget - 4](w);
truelight@0: 		break;
truelight@0: 
tron@2639: 	case WE_KEYPRESS: {
tron@2639: 		uint i;
dominik@616: 
tron@2639: 		for (i = 0; i != lengthof(_terraform_keycodes); i++) {
belugas@4634: 			if (e->we.keypress.keycode == _terraform_keycodes[i]) {
belugas@4634: 				e->we.keypress.cont = false;
truelight@0: 				_terraform_button_proc[i](w);
truelight@0: 				break;
truelight@0: 			}
tron@2639: 		}
tron@2639: 		break;
truelight@0: 	}
truelight@0: 
truelight@0: 	case WE_PLACE_OBJ:
belugas@4634: 		_place_proc(e->we.place.tile);
truelight@0: 		return;
truelight@0: 
truelight@0: 	case WE_PLACE_DRAG:
maedhros@7165: 		VpSelectTilesWithMethod(e->we.place.pt.x, e->we.place.pt.y, e->we.place.select_method);
truelight@0: 		break;
truelight@0: 
truelight@0: 	case WE_PLACE_MOUSEUP:
maedhros@7166: 		if (e->we.place.pt.x != -1) {
maedhros@7166: 			switch (e->we.place.select_proc) {
maedhros@7166: 				case DDSP_DEMOLISH_AREA:
peter1138@8692: 				case DDSP_RAISE_AND_LEVEL_AREA:
peter1138@8692: 				case DDSP_LOWER_AND_LEVEL_AREA:
maedhros@7166: 				case DDSP_LEVEL_AREA:
maedhros@7166: 					GUIPlaceProcDragXY(e);
maedhros@7166: 					break;
maedhros@7166: 			}
truelight@0: 		}
truelight@0: 		break;
truelight@0: 
truelight@0: 	case WE_ABORT_PLACE_OBJ:
belugas@8528: 		w->RaiseButtons();
truelight@0: 		break;
truelight@0: 	}
truelight@0: }
truelight@0: 
truelight@0: static const Widget _terraform_widgets[] = {
Darkvater@1632: { WWT_CLOSEBOX,   RESIZE_NONE,     7,   0,  10,   0,  13, STR_00C5,                STR_018B_CLOSE_WINDOW},
Darkvater@1632: {  WWT_CAPTION,   RESIZE_NONE,     7,  11, 145,   0,  13, STR_LANDSCAPING_TOOLBAR, STR_018C_WINDOW_TITLE_DRAG_THIS},
Darkvater@1632: {WWT_STICKYBOX,   RESIZE_NONE,     7, 146, 157,   0,  13, STR_NULL,                STR_STICKY_BUTTON},
truelight@867: 
Darkvater@4938: {    WWT_PANEL,   RESIZE_NONE,     7,  66,  69,  14,  35, 0x0,                    STR_NULL},
Darkvater@4938: {   WWT_IMGBTN,   RESIZE_NONE,     7,   0,  21,  14,  35, SPR_IMG_TERRAFORM_DOWN,  STR_018E_LOWER_A_CORNER_OF_LAND},
Darkvater@4938: {   WWT_IMGBTN,   RESIZE_NONE,     7,  22,  43,  14,  35, SPR_IMG_TERRAFORM_UP,    STR_018F_RAISE_A_CORNER_OF_LAND},
Darkvater@4938: {   WWT_IMGBTN,   RESIZE_NONE,     7,  44,  65,  14,  35, SPR_IMG_LEVEL_LAND,      STR_LEVEL_LAND_TOOLTIP},
Darkvater@4938: {   WWT_IMGBTN,   RESIZE_NONE,     7,  70,  91,  14,  35, SPR_IMG_DYNAMITE,        STR_018D_DEMOLISH_BUILDINGS_ETC},
Darkvater@4938: {   WWT_IMGBTN,   RESIZE_NONE,     7,  92, 113,  14,  35, SPR_IMG_BUY_LAND,        STR_0329_PURCHASE_LAND_FOR_FUTURE},
Darkvater@4938: {   WWT_IMGBTN,   RESIZE_NONE,     7, 114, 135,  14,  35, SPR_IMG_PLANTTREES,      STR_0185_PLANT_TREES_PLACE_SIGNS},
maedhros@7096: {   WWT_IMGBTN,   RESIZE_NONE,     7, 136, 157,  14,  35, SPR_IMG_SIGN,            STR_0289_PLACE_SIGN},
truelight@0: 
darkvater@176: {   WIDGETS_END},
truelight@0: };
truelight@0: 
truelight@0: static const WindowDesc _terraform_desc = {
rubidium@7837: 	WDP_ALIGN_TBR, 22 + 36, 158, 36, 158, 36,
rubidium@6144: 	WC_SCEN_LAND_GEN, WC_NONE,
darkvater@756: 	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_STICKY_BUTTON,
truelight@0: 	_terraform_widgets,
truelight@0: 	TerraformToolbWndProc
truelight@0: };
truelight@0: 
tron@6111: void ShowTerraformToolbar(Window *link)
truelight@0: {
Darkvater@5005: 	if (!IsValidPlayer(_current_player)) return;
tron@6111: 	Window *w = AllocateWindowDescFront(&_terraform_desc, 0);
tron@6111: 	if (w != NULL && link != NULL) {
tron@6111: 		/* Align the terraform toolbar under the main toolbar and put the linked
tron@6111: 		 * toolbar to left of it
tron@6111: 		 */
tron@6111: 		w->top = 22;
tron@6111: 		link->left = w->left - link->width;
rubidium@7818: 
rubidium@7818: 		SetWindowDirty(link);
tron@6111: 	}
truelight@0: }
rubidium@8701: 
rubidium@8701: static byte _terraform_size = 1;
rubidium@8701: 
rubidium@8701: /**
rubidium@8701:  * Raise/Lower a bigger chunk of land at the same time in the editor. When
rubidium@8701:  * raising get the lowest point, when lowering the highest point, and set all
rubidium@8701:  * tiles in the selection to that height.
rubidium@8701:  * @todo : Incorporate into game itself to allow for ingame raising/lowering of
rubidium@8701:  *         larger chunks at the same time OR remove altogether, as we have 'level land' ?
rubidium@8701:  * @param tile The top-left tile where the terraforming will start
rubidium@8701:  * @param mode 1 for raising, 0 for lowering land
rubidium@8701:  */
rubidium@8701: static void CommonRaiseLowerBigLand(TileIndex tile, int mode)
rubidium@8701: {
rubidium@8701: 	int sizex, sizey;
rubidium@8701: 	uint h;
rubidium@8701: 
rubidium@8701: 	_generating_world = true; // used to create green terraformed land
rubidium@8701: 
rubidium@8701: 	if (_terraform_size == 1) {
rubidium@8701: 		StringID msg =
rubidium@8701: 			mode ? STR_0808_CAN_T_RAISE_LAND_HERE : STR_0809_CAN_T_LOWER_LAND_HERE;
rubidium@8701: 
rubidium@8701: 		DoCommandP(tile, SLOPE_N, (uint32)mode, CcTerraform, CMD_TERRAFORM_LAND | CMD_MSG(msg));
rubidium@8701: 	} else {
rubidium@8701: 		assert(_terraform_size != 0);
rubidium@8701: 		/* check out for map overflows */
rubidium@8701: 		sizex = min(MapSizeX() - TileX(tile) - 1, _terraform_size);
rubidium@8701: 		sizey = min(MapSizeY() - TileY(tile) - 1, _terraform_size);
rubidium@8701: 
rubidium@8701: 		if (sizex == 0 || sizey == 0) return;
rubidium@8701: 
rubidium@11131: 		SndPlayTileFx(SND_1F_SPLAT, tile);
rubidium@11131: 
rubidium@8701: 		if (mode != 0) {
rubidium@8701: 			/* Raise land */
rubidium@8701: 			h = 15; // XXX - max height
rubidium@8701: 			BEGIN_TILE_LOOP(tile2, sizex, sizey, tile) {
rubidium@8701: 				h = min(h, TileHeight(tile2));
rubidium@8701: 			} END_TILE_LOOP(tile2, sizex, sizey, tile)
rubidium@8701: 		} else {
rubidium@8701: 			/* Lower land */
rubidium@8701: 			h = 0;
rubidium@8701: 			BEGIN_TILE_LOOP(tile2, sizex, sizey, tile) {
rubidium@8701: 				h = max(h, TileHeight(tile2));
rubidium@8701: 			} END_TILE_LOOP(tile2, sizex, sizey, tile)
rubidium@8701: 		}
rubidium@8701: 
rubidium@8701: 		BEGIN_TILE_LOOP(tile2, sizex, sizey, tile) {
rubidium@8701: 			if (TileHeight(tile2) == h) {
rubidium@8701: 				DoCommandP(tile2, SLOPE_N, (uint32)mode, NULL, CMD_TERRAFORM_LAND);
rubidium@8701: 			}
rubidium@8701: 		} END_TILE_LOOP(tile2, sizex, sizey, tile)
rubidium@8701: 	}
rubidium@8701: 
rubidium@8701: 	_generating_world = false;
rubidium@8701: }
rubidium@8701: 
rubidium@8701: static void PlaceProc_RaiseBigLand(TileIndex tile)
rubidium@8701: {
rubidium@8701: 	CommonRaiseLowerBigLand(tile, 1);
rubidium@8701: }
rubidium@8701: 
rubidium@8701: static void PlaceProc_LowerBigLand(TileIndex tile)
rubidium@8701: {
rubidium@8701: 	CommonRaiseLowerBigLand(tile, 0);
rubidium@8701: }
rubidium@8701: 
rubidium@8701: static void PlaceProc_RockyArea(TileIndex tile)
rubidium@8701: {
rubidium@8701: 	VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_CREATE_ROCKS);
rubidium@8701: }
rubidium@8701: 
rubidium@8701: static void PlaceProc_LightHouse(TileIndex tile)
rubidium@8701: {
smatz@8968: 	/* not flat || not(trees || clear without bridge above) */
smatz@8968: 	if (GetTileSlope(tile, NULL) != SLOPE_FLAT || !(IsTileType(tile, MP_TREES) || (IsTileType(tile, MP_CLEAR) && !IsBridgeAbove(tile)))) {
rubidium@8701: 		return;
rubidium@8701: 	}
rubidium@8701: 
rubidium@8701: 	MakeLighthouse(tile);
rubidium@8701: 	MarkTileDirtyByTile(tile);
rubidium@8701: 	SndPlayTileFx(SND_1F_SPLAT, tile);
rubidium@8701: }
rubidium@8701: 
rubidium@8701: static void PlaceProc_Transmitter(TileIndex tile)
rubidium@8701: {
smatz@8968: 	/* not flat || not(trees || clear without bridge above) */
smatz@8968: 	if (GetTileSlope(tile, NULL) != SLOPE_FLAT || !(IsTileType(tile, MP_TREES) || (IsTileType(tile, MP_CLEAR) && !IsBridgeAbove(tile)))) {
rubidium@8701: 		return;
rubidium@8701: 	}
rubidium@8701: 
rubidium@8701: 	MakeTransmitter(tile);
rubidium@8701: 	MarkTileDirtyByTile(tile);
rubidium@8701: 	SndPlayTileFx(SND_1F_SPLAT, tile);
rubidium@8701: }
rubidium@8701: 
rubidium@8701: static void PlaceProc_DesertArea(TileIndex tile)
rubidium@8701: {
rubidium@8701: 	VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_CREATE_DESERT);
rubidium@8701: }
rubidium@8701: 
rubidium@8701: static void PlaceProc_WaterArea(TileIndex tile)
rubidium@8701: {
rubidium@8701: 	VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_CREATE_WATER);
rubidium@8701: }
rubidium@8701: 
peter1138@8856: static void PlaceProc_RiverArea(TileIndex tile)
peter1138@8856: {
peter1138@8856: 	VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_CREATE_RIVER);
peter1138@8856: }
peter1138@8856: 
rubidium@8701: static const Widget _scen_edit_land_gen_widgets[] = {
rubidium@8701: {  WWT_CLOSEBOX,   RESIZE_NONE,     7,     0,    10,     0,    13, STR_00C5,                  STR_018B_CLOSE_WINDOW},
peter1138@8856: {   WWT_CAPTION,   RESIZE_NONE,     7,    11,   191,     0,    13, STR_0223_LAND_GENERATION,  STR_018C_WINDOW_TITLE_DRAG_THIS},
peter1138@8856: { WWT_STICKYBOX,   RESIZE_NONE,     7,   192,   203,     0,    13, STR_NULL,                  STR_STICKY_BUTTON},
peter1138@8856: {     WWT_PANEL,   RESIZE_NONE,     7,     0,   203,    14,   102, 0x0,                       STR_NULL},
rubidium@8701: {    WWT_IMGBTN,   RESIZE_NONE,    14,     2,    23,    16,    37, SPR_IMG_DYNAMITE,          STR_018D_DEMOLISH_BUILDINGS_ETC},
rubidium@8701: {    WWT_IMGBTN,   RESIZE_NONE,    14,    24,    45,    16,    37, SPR_IMG_TERRAFORM_DOWN,    STR_018E_LOWER_A_CORNER_OF_LAND},
rubidium@8701: {    WWT_IMGBTN,   RESIZE_NONE,    14,    46,    67,    16,    37, SPR_IMG_TERRAFORM_UP,      STR_018F_RAISE_A_CORNER_OF_LAND},
rubidium@8701: {    WWT_IMGBTN,   RESIZE_NONE,    14,    68,    89,    16,    37, SPR_IMG_LEVEL_LAND,        STR_LEVEL_LAND_TOOLTIP},
rubidium@8701: {    WWT_IMGBTN,   RESIZE_NONE,    14,    90,   111,    16,    37, SPR_IMG_BUILD_CANAL,       STR_CREATE_LAKE},
peter1138@8877: {    WWT_IMGBTN,   RESIZE_NONE,    14,   112,   133,    16,    37, SPR_IMG_BUILD_RIVER,       STR_CREATE_RIVER},
peter1138@8856: {    WWT_IMGBTN,   RESIZE_NONE,    14,   134,   156,    16,    37, SPR_IMG_ROCKS,             STR_028C_PLACE_ROCKY_AREAS_ON_LANDSCAPE},
peter1138@8856: {    WWT_IMGBTN,   RESIZE_NONE,    14,   157,   179,    16,    37, SPR_IMG_LIGHTHOUSE_DESERT, STR_NULL}, // XXX - dynamic
peter1138@8856: {    WWT_IMGBTN,   RESIZE_NONE,    14,   180,   201,    16,    37, SPR_IMG_TRANSMITTER,       STR_028E_PLACE_TRANSMITTER},
peter1138@8856: {    WWT_IMGBTN,   RESIZE_NONE,    14,   150,   161,    45,    56, SPR_ARROW_UP,              STR_0228_INCREASE_SIZE_OF_LAND_AREA},
peter1138@8856: {    WWT_IMGBTN,   RESIZE_NONE,    14,   150,   161,    58,    69, SPR_ARROW_DOWN,            STR_0229_DECREASE_SIZE_OF_LAND_AREA},
peter1138@8856: {   WWT_TEXTBTN,   RESIZE_NONE,    14,    24,   179,    76,    87, STR_SE_NEW_WORLD,          STR_022A_GENERATE_RANDOM_LAND},
peter1138@8856: {   WWT_TEXTBTN,   RESIZE_NONE,    14,    24,   179,    89,   100, STR_022B_RESET_LANDSCAPE,  STR_RESET_LANDSCAPE_TOOLTIP},
rubidium@8701: {   WIDGETS_END},
rubidium@8701: };
rubidium@8701: 
rubidium@8701: static const int8 _multi_terraform_coords[][2] = {
rubidium@8701: 	{  0, -2},
rubidium@8701: 	{  4,  0}, { -4,  0}, {  0,  2},
rubidium@8701: 	{ -8,  2}, { -4,  4}, {  0,  6}, {  4,  4}, {  8,  2},
rubidium@8701: 	{-12,  0}, { -8, -2}, { -4, -4}, {  0, -6}, {  4, -4}, {  8, -2}, { 12,  0},
rubidium@8701: 	{-16,  2}, {-12,  4}, { -8,  6}, { -4,  8}, {  0, 10}, {  4,  8}, {  8,  6}, { 12,  4}, { 16,  2},
rubidium@8701: 	{-20,  0}, {-16, -2}, {-12, -4}, { -8, -6}, { -4, -8}, {  0,-10}, {  4, -8}, {  8, -6}, { 12, -4}, { 16, -2}, { 20,  0},
rubidium@8701: 	{-24,  2}, {-20,  4}, {-16,  6}, {-12,  8}, { -8, 10}, { -4, 12}, {  0, 14}, {  4, 12}, {  8, 10}, { 12,  8}, { 16,  6}, { 20,  4}, { 24,  2},
rubidium@8701: 	{-28,  0}, {-24, -2}, {-20, -4}, {-16, -6}, {-12, -8}, { -8,-10}, { -4,-12}, {  0,-14}, {  4,-12}, {  8,-10}, { 12, -8}, { 16, -6}, { 20, -4}, { 24, -2}, { 28,  0},
rubidium@8701: };
rubidium@8701: 
rubidium@8701: /**
rubidium@8701:  * @todo Merge with terraform_gui.cpp (move there) after I have cooled down at its braindeadness
rubidium@8701:  * and changed OnButtonClick to include the widget as well in the function declaration. Post 0.4.0 - Darkvater
rubidium@8701:  */
rubidium@8701: static void EditorTerraformClick_Dynamite(Window *w)
rubidium@8701: {
rubidium@8701: 	HandlePlacePushButton(w, 4, ANIMCURSOR_DEMOLISH, VHM_RECT, PlaceProc_DemolishArea);
rubidium@8701: }
rubidium@8701: 
rubidium@8701: static void EditorTerraformClick_LowerBigLand(Window *w)
rubidium@8701: {
rubidium@8701: 	HandlePlacePushButton(w, 5, ANIMCURSOR_LOWERLAND, VHM_POINT, PlaceProc_LowerBigLand);
rubidium@8701: }
rubidium@8701: 
rubidium@8701: static void EditorTerraformClick_RaiseBigLand(Window *w)
rubidium@8701: {
rubidium@8701: 	HandlePlacePushButton(w, 6, ANIMCURSOR_RAISELAND, VHM_POINT, PlaceProc_RaiseBigLand);
rubidium@8701: }
rubidium@8701: 
rubidium@8701: static void EditorTerraformClick_LevelLand(Window *w)
rubidium@8701: {
rubidium@8701: 	HandlePlacePushButton(w, 7, SPR_CURSOR_LEVEL_LAND, VHM_POINT, PlaceProc_LevelLand);
rubidium@8701: }
rubidium@8701: 
rubidium@8701: static void EditorTerraformClick_WaterArea(Window *w)
rubidium@8701: {
rubidium@8701: 	HandlePlacePushButton(w, 8, SPR_CURSOR_CANAL, VHM_RECT, PlaceProc_WaterArea);
rubidium@8701: }
rubidium@8701: 
peter1138@8856: static void EditorTerraformClick_RiverArea(Window *w)
peter1138@8856: {
peter1138@8877: 	HandlePlacePushButton(w, 9, SPR_CURSOR_RIVER, VHM_RECT, PlaceProc_RiverArea);
peter1138@8856: }
peter1138@8856: 
rubidium@8701: static void EditorTerraformClick_RockyArea(Window *w)
rubidium@8701: {
peter1138@8856: 	HandlePlacePushButton(w, 10, SPR_CURSOR_ROCKY_AREA, VHM_RECT, PlaceProc_RockyArea);
rubidium@8701: }
rubidium@8701: 
rubidium@8701: static void EditorTerraformClick_DesertLightHouse(Window *w)
rubidium@8701: {
peter1138@8856: 	HandlePlacePushButton(w, 11, SPR_CURSOR_LIGHTHOUSE, VHM_RECT, (_opt.landscape == LT_TROPIC) ? PlaceProc_DesertArea : PlaceProc_LightHouse);
rubidium@8701: }
rubidium@8701: 
rubidium@8701: static void EditorTerraformClick_Transmitter(Window *w)
rubidium@8701: {
peter1138@8856: 	HandlePlacePushButton(w, 12, SPR_CURSOR_TRANSMITTER, VHM_RECT, PlaceProc_Transmitter);
rubidium@8701: }
rubidium@8701: 
rubidium@8701: static const uint16 _editor_terraform_keycodes[] = {
rubidium@8701: 	'D',
rubidium@8701: 	'Q',
rubidium@8701: 	'W',
rubidium@8701: 	'E',
rubidium@8701: 	'R',
rubidium@8701: 	'T',
rubidium@8701: 	'Y',
peter1138@8856: 	'U',
peter1138@8856: 	'I'
rubidium@8701: };
rubidium@8701: 
rubidium@8701: typedef void OnButtonClick(Window *w);
rubidium@8701: static OnButtonClick * const _editor_terraform_button_proc[] = {
rubidium@8701: 	EditorTerraformClick_Dynamite,
rubidium@8701: 	EditorTerraformClick_LowerBigLand,
rubidium@8701: 	EditorTerraformClick_RaiseBigLand,
rubidium@8701: 	EditorTerraformClick_LevelLand,
rubidium@8701: 	EditorTerraformClick_WaterArea,
peter1138@8856: 	EditorTerraformClick_RiverArea,
rubidium@8701: 	EditorTerraformClick_RockyArea,
rubidium@8701: 	EditorTerraformClick_DesertLightHouse,
rubidium@8701: 	EditorTerraformClick_Transmitter
rubidium@8701: };
rubidium@8701: 
rubidium@8701: 
rubidium@8701: /** Callback function for the scenario editor 'reset landscape' confirmation window
rubidium@8701:  * @param w Window unused
rubidium@8701:  * @param confirmed boolean value, true when yes was clicked, false otherwise */
rubidium@8701: static void ResetLandscapeConfirmationCallback(Window *w, bool confirmed)
rubidium@8701: {
rubidium@8701: 	if (confirmed) {
rubidium@8701: 		Player *p;
rubidium@8701: 
rubidium@8701: 		/* Set generating_world to true to get instant-green grass after removing
rubidium@8701: 		 * player property. */
rubidium@8701: 		_generating_world = true;
rubidium@8701: 		/* Delete all players */
rubidium@8701: 		FOR_ALL_PLAYERS(p) {
rubidium@8701: 			if (p->is_active) {
rubidium@8701: 				ChangeOwnershipOfPlayerItems(p->index, PLAYER_SPECTATOR);
rubidium@8701: 				p->is_active = false;
rubidium@8701: 			}
rubidium@8701: 		}
rubidium@8701: 		_generating_world = false;
rubidium@8701: 
rubidium@8701: 		/* Delete all stations owned by a player */
rubidium@8701: 		Station *st;
rubidium@8701: 		FOR_ALL_STATIONS(st) {
rubidium@8701: 			if (IsValidPlayer(st->owner)) delete st;
rubidium@8701: 		}
rubidium@8701: 	}
rubidium@8701: }
rubidium@8701: 
rubidium@8701: static void ScenEditLandGenWndProc(Window *w, WindowEvent *e)
rubidium@8701: {
rubidium@8701: 	switch (e->event) {
rubidium@8701: 		case WE_CREATE:
peter1138@8856: 			/* XXX - lighthouse button is widget 11!! Don't forget when changing */
peter1138@8856: 			w->widget[11].tooltips = (_opt.landscape == LT_TROPIC) ? STR_028F_DEFINE_DESERT_AREA : STR_028D_PLACE_LIGHTHOUSE;
rubidium@8701: 			break;
rubidium@8701: 
rubidium@8701: 		case WE_PAINT: {
rubidium@8701: 			DrawWindowWidgets(w);
rubidium@8701: 
rubidium@8701: 			int n = _terraform_size * _terraform_size;
rubidium@8701: 			const int8 *coords = &_multi_terraform_coords[0][0];
rubidium@8701: 
rubidium@8701: 			assert(n != 0);
rubidium@8701: 			do {
peter1138@8856: 				DrawSprite(SPR_WHITE_POINT, PAL_NONE, 88 + coords[0], 55 + coords[1]);
rubidium@8701: 				coords += 2;
rubidium@8701: 			} while (--n);
rubidium@8701: 
rubidium@8701: 			if (w->IsWidgetLowered(5) || w->IsWidgetLowered(6)) // change area-size if raise/lower corner is selected
rubidium@8701: 				SetTileSelectSize(_terraform_size, _terraform_size);
rubidium@8701: 
rubidium@8701: 		} break;
rubidium@8701: 
rubidium@8701: 		case WE_KEYPRESS:
rubidium@8701: 			for (uint i = 0; i != lengthof(_editor_terraform_keycodes); i++) {
rubidium@8701: 				if (e->we.keypress.keycode == _editor_terraform_keycodes[i]) {
rubidium@8701: 					e->we.keypress.cont = false;
rubidium@8701: 					_editor_terraform_button_proc[i](w);
rubidium@8701: 					break;
rubidium@8701: 				}
rubidium@8701: 			}
rubidium@8701: 			break;
rubidium@8701: 
rubidium@8701: 		case WE_CLICK:
rubidium@8701: 			switch (e->we.click.widget) {
peter1138@8856: 				case 4: case 5: case 6: case 7: case 8: case 9: case 10: case 11: case 12:
rubidium@8701: 					_editor_terraform_button_proc[e->we.click.widget - 4](w);
rubidium@8701: 					break;
peter1138@8856: 				case 13: case 14: { // Increase/Decrease terraform size
peter1138@8856: 					int size = (e->we.click.widget == 13) ? 1 : -1;
rubidium@8701: 					w->HandleButtonClick(e->we.click.widget);
rubidium@8701: 					size += _terraform_size;
rubidium@8701: 
rubidium@8701: 					if (!IsInsideMM(size, 1, 8 + 1)) return;
rubidium@8701: 					_terraform_size = size;
rubidium@8701: 
rubidium@8701: 					SndPlayFx(SND_15_BEEP);
rubidium@8701: 					SetWindowDirty(w);
rubidium@8701: 				} break;
peter1138@8856: 				case 15: // gen random land
peter1138@8856: 					w->HandleButtonClick(15);
rubidium@8701: 					ShowCreateScenario();
rubidium@8701: 					break;
peter1138@8856: 				case 16: // Reset landscape
rubidium@8701: 					ShowQuery(
rubidium@8701: 						STR_022C_RESET_LANDSCAPE,
rubidium@8701: 						STR_RESET_LANDSCAPE_CONFIRMATION_TEXT,
rubidium@8701: 						NULL,
rubidium@8701: 						ResetLandscapeConfirmationCallback);
rubidium@8701: 					break;
rubidium@8701: 			}
rubidium@8701: 			break;
rubidium@8701: 
rubidium@8701: 		case WE_TIMEOUT:
rubidium@8701: 			for (uint i = 0; i < w->widget_count; i++) {
rubidium@8701: 				if (w->IsWidgetLowered(i)) {
rubidium@8701: 					w->RaiseWidget(i);
rubidium@8701: 					w->InvalidateWidget(i);
rubidium@8701: 				}
peter1138@8856: 				if (i == 3) i = 12;
rubidium@8701: 			}
rubidium@8701: 			break;
rubidium@8701: 
rubidium@8701: 		case WE_PLACE_OBJ:
rubidium@8701: 			_place_proc(e->we.place.tile);
rubidium@8701: 			break;
rubidium@8701: 
rubidium@8701: 		case WE_PLACE_DRAG:
rubidium@8701: 			VpSelectTilesWithMethod(e->we.place.pt.x, e->we.place.pt.y, e->we.place.select_method);
rubidium@8701: 			break;
rubidium@8701: 
rubidium@8701: 		case WE_PLACE_MOUSEUP:
rubidium@8701: 			if (e->we.place.pt.x != -1) {
rubidium@8701: 				switch (e->we.place.select_proc) {
rubidium@8701: 					case DDSP_CREATE_ROCKS:
rubidium@8701: 					case DDSP_CREATE_DESERT:
rubidium@8701: 					case DDSP_CREATE_WATER:
peter1138@8856: 					case DDSP_CREATE_RIVER:
rubidium@8701: 					case DDSP_RAISE_AND_LEVEL_AREA:
rubidium@8701: 					case DDSP_LOWER_AND_LEVEL_AREA:
rubidium@8701: 					case DDSP_LEVEL_AREA:
rubidium@8701: 					case DDSP_DEMOLISH_AREA:
rubidium@8701: 						GUIPlaceProcDragXY(e);
rubidium@8701: 						break;
rubidium@8701: 				}
rubidium@8701: 			}
rubidium@8701: 			break;
rubidium@8701: 
rubidium@8701: 		case WE_ABORT_PLACE_OBJ:
rubidium@8701: 			w->RaiseButtons();
rubidium@8701: 			SetWindowDirty(w);
rubidium@8701: 			break;
rubidium@8701: 	}
rubidium@8701: }
rubidium@8701: 
rubidium@8701: static const WindowDesc _scen_edit_land_gen_desc = {
peter1138@8856: 	WDP_AUTO, WDP_AUTO, 204, 103, 204, 103,
rubidium@8701: 	WC_SCEN_LAND_GEN, WC_NONE,
rubidium@8701: 	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_STICKY_BUTTON,
rubidium@8701: 	_scen_edit_land_gen_widgets,
rubidium@8701: 	ScenEditLandGenWndProc,
rubidium@8701: };
rubidium@8701: 
rubidium@8701: void ShowEditorTerraformToolbar()
rubidium@8701: {
rubidium@8701: 	AllocateWindowDescFront(&_scen_edit_land_gen_desc, 0);
rubidium@8701: }