terraform_gui.cpp

Go to the documentation of this file.
00001 /* $Id: terraform_gui.cpp 21627 2010-12-24 15:08:19Z alberth $ */
00002 
00003 /*
00004  * This file is part of OpenTTD.
00005  * OpenTTD is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, version 2.
00006  * OpenTTD is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
00007  * See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with OpenTTD. If not, see <http://www.gnu.org/licenses/>.
00008  */
00009 
00012 #include "stdafx.h"
00013 #include "clear_map.h"
00014 #include "company_func.h"
00015 #include "company_base.h"
00016 #include "gui.h"
00017 #include "window_gui.h"
00018 #include "window_func.h"
00019 #include "viewport_func.h"
00020 #include "command_func.h"
00021 #include "signs_func.h"
00022 #include "functions.h"
00023 #include "sound_func.h"
00024 #include "base_station_base.h"
00025 #include "textbuf_gui.h"
00026 #include "genworld.h"
00027 #include "tree_map.h"
00028 #include "landscape_type.h"
00029 #include "tilehighlight_func.h"
00030 #include "strings_func.h"
00031 #include "newgrf_object.h"
00032 #include "object.h"
00033 #include "hotkeys.h"
00034 
00035 #include "table/strings.h"
00036 
00037 void CcTerraform(const CommandCost &result, TileIndex tile, uint32 p1, uint32 p2)
00038 {
00039   if (result.Succeeded()) {
00040     SndPlayTileFx(SND_1F_SPLAT, tile);
00041   } else {
00042     extern TileIndex _terraform_err_tile;
00043     SetRedErrorSquare(_terraform_err_tile);
00044   }
00045 }
00046 
00047 
00049 static void GenerateDesertArea(TileIndex end, TileIndex start)
00050 {
00051   if (_game_mode != GM_EDITOR) return;
00052 
00053   _generating_world = true;
00054 
00055   TileArea ta(start, end);
00056   TILE_AREA_LOOP(tile, ta) {
00057     SetTropicZone(tile, (_ctrl_pressed) ? TROPICZONE_NORMAL : TROPICZONE_DESERT);
00058     DoCommandP(tile, 0, 0, CMD_LANDSCAPE_CLEAR);
00059     MarkTileDirtyByTile(tile);
00060   }
00061   _generating_world = false;
00062 }
00063 
00065 static void GenerateRockyArea(TileIndex end, TileIndex start)
00066 {
00067   if (_game_mode != GM_EDITOR) return;
00068 
00069   bool success = false;
00070   TileArea ta(start, end);
00071 
00072   TILE_AREA_LOOP(tile, ta) {
00073     switch (GetTileType(tile)) {
00074       case MP_TREES:
00075         if (GetTreeGround(tile) == TREE_GROUND_SHORE) continue;
00076         /* FALL THROUGH */
00077       case MP_CLEAR:
00078         MakeClear(tile, CLEAR_ROCKS, 3);
00079         break;
00080 
00081       default: continue;
00082     }
00083     MarkTileDirtyByTile(tile);
00084     success = true;
00085   }
00086 
00087   if (success) SndPlayTileFx(SND_1F_SPLAT, end);
00088 }
00089 
00099 bool GUIPlaceProcDragXY(ViewportDragDropSelectionProcess proc, TileIndex start_tile, TileIndex end_tile)
00100 {
00101   if (!_settings_game.construction.freeform_edges) {
00102     /* When end_tile is MP_VOID, the error tile will not be visible to the
00103      * user. This happens when terraforming at the southern border. */
00104     if (TileX(end_tile) == MapMaxX()) end_tile += TileDiffXY(-1, 0);
00105     if (TileY(end_tile) == MapMaxY()) end_tile += TileDiffXY(0, -1);
00106   }
00107 
00108   switch (proc) {
00109     case DDSP_DEMOLISH_AREA:
00110       DoCommandP(end_tile, start_tile, _ctrl_pressed ? 1 : 0, CMD_CLEAR_AREA | CMD_MSG(STR_ERROR_CAN_T_CLEAR_THIS_AREA), CcPlaySound10);
00111       break;
00112     case DDSP_RAISE_AND_LEVEL_AREA:
00113       DoCommandP(end_tile, start_tile, LM_RAISE << 1 | (_ctrl_pressed ? 1 : 0), CMD_LEVEL_LAND | CMD_MSG(STR_ERROR_CAN_T_RAISE_LAND_HERE), CcTerraform);
00114       break;
00115     case DDSP_LOWER_AND_LEVEL_AREA:
00116       DoCommandP(end_tile, start_tile, LM_LOWER << 1 | (_ctrl_pressed ? 1 : 0), CMD_LEVEL_LAND | CMD_MSG(STR_ERROR_CAN_T_LOWER_LAND_HERE), CcTerraform);
00117       break;
00118     case DDSP_LEVEL_AREA:
00119       DoCommandP(end_tile, start_tile, LM_LEVEL << 1 | (_ctrl_pressed ? 1 : 0), CMD_LEVEL_LAND | CMD_MSG(STR_ERROR_CAN_T_LEVEL_LAND_HERE), CcTerraform);
00120       break;
00121     case DDSP_CREATE_ROCKS:
00122       GenerateRockyArea(end_tile, start_tile);
00123       break;
00124     case DDSP_CREATE_DESERT:
00125       GenerateDesertArea(end_tile, start_tile);
00126       break;
00127     default:
00128       return false;
00129   }
00130 
00131   return true;
00132 }
00133 
00138 void PlaceProc_DemolishArea(TileIndex tile)
00139 {
00140   VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_DEMOLISH_AREA);
00141 }
00142 
00144 enum TerraformToolbarWidgets {
00145   TTW_SHOW_PLACE_OBJECT,                
00146   TTW_BUTTONS_START,                    
00147   TTW_LOWER_LAND = TTW_BUTTONS_START,   
00148   TTW_RAISE_LAND,                       
00149   TTW_LEVEL_LAND,                       
00150   TTW_DEMOLISH,                         
00151   TTW_BUY_LAND,                         
00152   TTW_PLANT_TREES,                      
00153   TTW_PLACE_SIGN,                       
00154   TTW_PLACE_OBJECT,                     
00155 };
00156 
00158 struct TerraformToolbarWindow : Window {
00159   int last_user_action; 
00160 
00161   TerraformToolbarWindow(const WindowDesc *desc, WindowNumber window_number) : Window()
00162   {
00163     /* This is needed as we like to have the tree available on OnInit. */
00164     this->CreateNestedTree(desc);
00165     this->FinishInitNested(desc, window_number);
00166     this->last_user_action = WIDGET_LIST_END;
00167   }
00168 
00169   ~TerraformToolbarWindow()
00170   {
00171   }
00172 
00173   virtual void OnInit()
00174   {
00175     /* Don't show the place object button when there are no objects to place. */
00176     NWidgetStacked *show_object = this->GetWidget<NWidgetStacked>(TTW_SHOW_PLACE_OBJECT);
00177     show_object->SetDisplayedPlane(ObjectClass::GetCount() != 0 ? 0 : SZSP_NONE);
00178   }
00179 
00180   virtual void OnClick(Point pt, int widget, int click_count)
00181   {
00182     if (widget < TTW_BUTTONS_START) return;
00183 
00184     switch (widget) {
00185       case TTW_LOWER_LAND: // Lower land button
00186         HandlePlacePushButton(this, TTW_LOWER_LAND, ANIMCURSOR_LOWERLAND, HT_POINT | HT_DIAGONAL);
00187         this->last_user_action = widget;
00188         break;
00189 
00190       case TTW_RAISE_LAND: // Raise land button
00191         HandlePlacePushButton(this, TTW_RAISE_LAND, ANIMCURSOR_RAISELAND, HT_POINT | HT_DIAGONAL);
00192         this->last_user_action = widget;
00193         break;
00194 
00195       case TTW_LEVEL_LAND: // Level land button
00196         HandlePlacePushButton(this, TTW_LEVEL_LAND, SPR_CURSOR_LEVEL_LAND, HT_POINT | HT_DIAGONAL);
00197         this->last_user_action = widget;
00198         break;
00199 
00200       case TTW_DEMOLISH: // Demolish aka dynamite button
00201         HandlePlacePushButton(this, TTW_DEMOLISH, ANIMCURSOR_DEMOLISH, HT_RECT | HT_DIAGONAL);
00202         this->last_user_action = widget;
00203         break;
00204 
00205       case TTW_BUY_LAND: // Buy land button
00206         HandlePlacePushButton(this, TTW_BUY_LAND, SPR_CURSOR_BUY_LAND, HT_RECT);
00207         this->last_user_action = widget;
00208         break;
00209 
00210       case TTW_PLANT_TREES: // Plant trees button
00211         /* This button is NOT a place-push-button, so don't treat it as such */
00212         this->HandleButtonClick(TTW_PLANT_TREES);
00213         ShowBuildTreesToolbar();
00214         break;
00215 
00216       case TTW_PLACE_SIGN: // Place sign button
00217         HandlePlacePushButton(this, TTW_PLACE_SIGN, SPR_CURSOR_SIGN, HT_RECT);
00218         this->last_user_action = widget;
00219         break;
00220 
00221       case TTW_PLACE_OBJECT: // Place object button
00222         /* Don't show the place object button when there are no objects to place. */
00223         if (ObjectClass::GetCount() == 0) return;
00224         if (HandlePlacePushButton(this, TTW_PLACE_OBJECT, SPR_CURSOR_TRANSMITTER, HT_RECT)) {
00225           ShowBuildObjectPicker(this);
00226           this->last_user_action = widget;
00227         }
00228         break;
00229 
00230       default: NOT_REACHED();
00231     }
00232   }
00233 
00234   virtual void OnTimeout()
00235   {
00236     this->RaiseWidget(TTW_PLANT_TREES);
00237     this->SetWidgetDirty(TTW_PLANT_TREES);
00238   }
00239 
00240   virtual EventState OnKeyPress(uint16 key, uint16 keycode)
00241   {
00242     int num = CheckHotkeyMatch(terraform_hotkeys, keycode, this);
00243     if (num == -1) return ES_NOT_HANDLED;
00244     this->OnClick(Point(), num, 1);
00245     return ES_HANDLED;
00246   }
00247 
00248   virtual void OnPlaceObject(Point pt, TileIndex tile)
00249   {
00250     switch (this->last_user_action) {
00251       case TTW_LOWER_LAND: // Lower land button
00252         VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_LOWER_AND_LEVEL_AREA);
00253         break;
00254 
00255       case TTW_RAISE_LAND: // Raise land button
00256         VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_RAISE_AND_LEVEL_AREA);
00257         break;
00258 
00259       case TTW_LEVEL_LAND: // Level land button
00260         VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_LEVEL_AREA);
00261         break;
00262 
00263       case TTW_DEMOLISH: // Demolish aka dynamite button
00264         PlaceProc_DemolishArea(tile);
00265         break;
00266 
00267       case TTW_BUY_LAND: // Buy land button
00268         DoCommandP(tile, OBJECT_OWNED_LAND, 0, CMD_BUILD_OBJECT | CMD_MSG(STR_ERROR_CAN_T_PURCHASE_THIS_LAND), CcPlaySound1E);
00269         break;
00270 
00271       case TTW_PLACE_SIGN: // Place sign button
00272         PlaceProc_Sign(tile);
00273         break;
00274 
00275       case TTW_PLACE_OBJECT: // Place object button
00276         PlaceProc_Object(tile);
00277         break;
00278 
00279       default: NOT_REACHED();
00280     }
00281   }
00282 
00283   virtual void OnPlaceDrag(ViewportPlaceMethod select_method, ViewportDragDropSelectionProcess select_proc, Point pt)
00284   {
00285     VpSelectTilesWithMethod(pt.x, pt.y, select_method);
00286   }
00287 
00288   virtual Point OnInitialPosition(const WindowDesc *desc, int16 sm_width, int16 sm_height, int window_number)
00289   {
00290     Point pt = GetToolbarAlignedWindowPosition(sm_width);
00291     pt.y += sm_height;
00292     return pt;
00293   }
00294 
00295   virtual void OnPlaceMouseUp(ViewportPlaceMethod select_method, ViewportDragDropSelectionProcess select_proc, Point pt, TileIndex start_tile, TileIndex end_tile)
00296   {
00297     if (pt.x != -1) {
00298       switch (select_proc) {
00299         default: NOT_REACHED();
00300         case DDSP_DEMOLISH_AREA:
00301         case DDSP_RAISE_AND_LEVEL_AREA:
00302         case DDSP_LOWER_AND_LEVEL_AREA:
00303         case DDSP_LEVEL_AREA:
00304           GUIPlaceProcDragXY(select_proc, start_tile, end_tile);
00305           break;
00306       }
00307     }
00308   }
00309 
00310   virtual void OnPlaceObjectAbort()
00311   {
00312     DeleteWindowById(WC_BUILD_OBJECT, 0);
00313     this->RaiseButtons();
00314   }
00315 
00316   static Hotkey<TerraformToolbarWindow> terraform_hotkeys[];
00317 };
00318 
00319 Hotkey<TerraformToolbarWindow> TerraformToolbarWindow::terraform_hotkeys[] = {
00320   Hotkey<TerraformToolbarWindow>('Q' | WKC_GLOBAL_HOTKEY, "lower", TTW_LOWER_LAND),
00321   Hotkey<TerraformToolbarWindow>('W' | WKC_GLOBAL_HOTKEY, "raise", TTW_RAISE_LAND),
00322   Hotkey<TerraformToolbarWindow>('E' | WKC_GLOBAL_HOTKEY, "level", TTW_LEVEL_LAND),
00323   Hotkey<TerraformToolbarWindow>('D' | WKC_GLOBAL_HOTKEY, "dynamite", TTW_DEMOLISH),
00324   Hotkey<TerraformToolbarWindow>('U', "buyland", TTW_BUY_LAND),
00325   Hotkey<TerraformToolbarWindow>('I', "trees", TTW_PLANT_TREES),
00326   Hotkey<TerraformToolbarWindow>('O', "placesign", TTW_PLACE_SIGN),
00327   Hotkey<TerraformToolbarWindow>('P', "placeobject", TTW_PLACE_OBJECT),
00328   HOTKEY_LIST_END(TerraformToolbarWindow)
00329 };
00330 Hotkey<TerraformToolbarWindow> *_terraform_hotkeys = TerraformToolbarWindow::terraform_hotkeys;
00331 
00332 static const NWidgetPart _nested_terraform_widgets[] = {
00333   NWidget(NWID_HORIZONTAL),
00334     NWidget(WWT_CLOSEBOX, COLOUR_DARK_GREEN),
00335     NWidget(WWT_CAPTION, COLOUR_DARK_GREEN), SetDataTip(STR_LANDSCAPING_TOOLBAR, STR_TOOLTIP_WINDOW_TITLE_DRAG_THIS),
00336     NWidget(WWT_STICKYBOX, COLOUR_DARK_GREEN),
00337   EndContainer(),
00338   NWidget(NWID_HORIZONTAL),
00339     NWidget(WWT_IMGBTN, COLOUR_DARK_GREEN, TTW_LOWER_LAND), SetMinimalSize(22, 22),
00340                 SetFill(0, 1), SetDataTip(SPR_IMG_TERRAFORM_DOWN, STR_LANDSCAPING_TOOLTIP_LOWER_A_CORNER_OF_LAND),
00341     NWidget(WWT_IMGBTN, COLOUR_DARK_GREEN, TTW_RAISE_LAND), SetMinimalSize(22, 22),
00342                 SetFill(0, 1), SetDataTip(SPR_IMG_TERRAFORM_UP, STR_LANDSCAPING_TOOLTIP_RAISE_A_CORNER_OF_LAND),
00343     NWidget(WWT_IMGBTN, COLOUR_DARK_GREEN, TTW_LEVEL_LAND), SetMinimalSize(22, 22),
00344                 SetFill(0, 1), SetDataTip(SPR_IMG_LEVEL_LAND, STR_LANDSCAPING_LEVEL_LAND_TOOLTIP),
00345 
00346     NWidget(WWT_PANEL, COLOUR_DARK_GREEN), SetMinimalSize(4, 22), EndContainer(),
00347 
00348     NWidget(WWT_IMGBTN, COLOUR_DARK_GREEN, TTW_DEMOLISH), SetMinimalSize(22, 22),
00349                 SetFill(0, 1), SetDataTip(SPR_IMG_DYNAMITE, STR_TOOLTIP_DEMOLISH_BUILDINGS_ETC),
00350     NWidget(WWT_IMGBTN, COLOUR_DARK_GREEN, TTW_BUY_LAND), SetMinimalSize(22, 22),
00351                 SetFill(0, 1), SetDataTip(SPR_IMG_BUY_LAND, STR_LANDSCAPING_TOOLTIP_PURCHASE_LAND),
00352     NWidget(WWT_IMGBTN, COLOUR_DARK_GREEN, TTW_PLANT_TREES), SetMinimalSize(22, 22),
00353                 SetFill(0, 1), SetDataTip(SPR_IMG_PLANTTREES, STR_SCENEDIT_TOOLBAR_PLANT_TREES),
00354     NWidget(WWT_IMGBTN, COLOUR_DARK_GREEN, TTW_PLACE_SIGN), SetMinimalSize(22, 22),
00355                 SetFill(0, 1), SetDataTip(SPR_IMG_SIGN, STR_SCENEDIT_TOOLBAR_PLACE_SIGN),
00356     NWidget(NWID_SELECTION, INVALID_COLOUR, TTW_SHOW_PLACE_OBJECT),
00357       NWidget(WWT_IMGBTN, COLOUR_DARK_GREEN, TTW_PLACE_OBJECT), SetMinimalSize(22, 22),
00358                 SetFill(0, 1), SetDataTip(SPR_IMG_TRANSMITTER, STR_SCENEDIT_TOOLBAR_PLACE_OBJECT),
00359     EndContainer(),
00360   EndContainer(),
00361 };
00362 
00363 static const WindowDesc _terraform_desc(
00364   WDP_MANUAL, 0, 0,
00365   WC_SCEN_LAND_GEN, WC_NONE,
00366   WDF_CONSTRUCTION,
00367   _nested_terraform_widgets, lengthof(_nested_terraform_widgets)
00368 );
00369 
00370 Window *ShowTerraformToolbar(Window *link)
00371 {
00372   if (!Company::IsValidID(_local_company)) return NULL;
00373 
00374   Window *w;
00375   if (link == NULL) {
00376     w = AllocateWindowDescFront<TerraformToolbarWindow>(&_terraform_desc, 0);
00377     return w;
00378   }
00379 
00380   /* Delete the terraform toolbar to place it again. */
00381   DeleteWindowById(WC_SCEN_LAND_GEN, 0, true);
00382   w = AllocateWindowDescFront<TerraformToolbarWindow>(&_terraform_desc, 0);
00383   /* Align the terraform toolbar under the main toolbar. */
00384   w->top -= w->height;
00385   w->SetDirty();
00386   /* Put the linked toolbar to the left / right of it. */
00387   link->left = w->left + (_current_text_dir == TD_RTL ? w->width : -link->width);
00388   link->top  = w->top;
00389   link->SetDirty();
00390 
00391   return w;
00392 }
00393 
00394 EventState TerraformToolbarGlobalHotkeys(uint16 key, uint16 keycode)
00395 {
00396   int num = CheckHotkeyMatch<TerraformToolbarWindow>(_terraform_hotkeys, keycode, NULL, true);
00397   if (num == -1) return ES_NOT_HANDLED;
00398   Window *w = ShowTerraformToolbar(NULL);
00399   if (w == NULL) return ES_NOT_HANDLED;
00400   return w->OnKeyPress(key, keycode);
00401 }
00402 
00403 static byte _terraform_size = 1;
00404 
00414 static void CommonRaiseLowerBigLand(TileIndex tile, int mode)
00415 {
00416   if (_terraform_size == 1) {
00417     StringID msg =
00418       mode ? STR_ERROR_CAN_T_RAISE_LAND_HERE : STR_ERROR_CAN_T_LOWER_LAND_HERE;
00419 
00420     DoCommandP(tile, SLOPE_N, (uint32)mode, CMD_TERRAFORM_LAND | CMD_MSG(msg), CcTerraform);
00421   } else {
00422     assert(_terraform_size != 0);
00423     TileArea ta(tile, _terraform_size, _terraform_size);
00424     ta.ClampToMap();
00425 
00426     if (ta.w == 0 || ta.h == 0) return;
00427 
00428     SndPlayTileFx(SND_1F_SPLAT, tile);
00429 
00430     uint h;
00431     if (mode != 0) {
00432       /* Raise land */
00433       h = MAX_TILE_HEIGHT;
00434       TILE_AREA_LOOP(tile2, ta) {
00435         h = min(h, TileHeight(tile2));
00436       }
00437     } else {
00438       /* Lower land */
00439       h = 0;
00440       TILE_AREA_LOOP(tile2, ta) {
00441         h = max(h, TileHeight(tile2));
00442       }
00443     }
00444 
00445     TILE_AREA_LOOP(tile2, ta) {
00446       if (TileHeight(tile2) == h) {
00447         DoCommandP(tile2, SLOPE_N, (uint32)mode, CMD_TERRAFORM_LAND);
00448       }
00449     }
00450   }
00451 }
00452 
00453 static const int8 _multi_terraform_coords[][2] = {
00454   {  0, -2},
00455   {  4,  0}, { -4,  0}, {  0,  2},
00456   { -8,  2}, { -4,  4}, {  0,  6}, {  4,  4}, {  8,  2},
00457   {-12,  0}, { -8, -2}, { -4, -4}, {  0, -6}, {  4, -4}, {  8, -2}, { 12,  0},
00458   {-16,  2}, {-12,  4}, { -8,  6}, { -4,  8}, {  0, 10}, {  4,  8}, {  8,  6}, { 12,  4}, { 16,  2},
00459   {-20,  0}, {-16, -2}, {-12, -4}, { -8, -6}, { -4, -8}, {  0,-10}, {  4, -8}, {  8, -6}, { 12, -4}, { 16, -2}, { 20,  0},
00460   {-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},
00461   {-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},
00462 };
00463 
00465 enum EditorTerraformToolbarWidgets {
00466   ETTW_SHOW_PLACE_DESERT,                
00467   ETTW_START,                            
00468   ETTW_DOTS = ETTW_START,                
00469   ETTW_BUTTONS_START,                    
00470   ETTW_DEMOLISH = ETTW_BUTTONS_START,    
00471   ETTW_LOWER_LAND,                       
00472   ETTW_RAISE_LAND,                       
00473   ETTW_LEVEL_LAND,                       
00474   ETTW_PLACE_ROCKS,                      
00475   ETTW_PLACE_DESERT,                     
00476   ETTW_PLACE_OBJECT,                     
00477   ETTW_BUTTONS_END,                      
00478   ETTW_INCREASE_SIZE = ETTW_BUTTONS_END, 
00479   ETTW_DECREASE_SIZE,                    
00480   ETTW_NEW_SCENARIO,                     
00481   ETTW_RESET_LANDSCAPE,                  
00482 };
00483 
00484 static const NWidgetPart _nested_scen_edit_land_gen_widgets[] = {
00485   NWidget(NWID_HORIZONTAL),
00486     NWidget(WWT_CLOSEBOX, COLOUR_DARK_GREEN),
00487     NWidget(WWT_CAPTION, COLOUR_DARK_GREEN), SetDataTip(STR_TERRAFORM_TOOLBAR_LAND_GENERATION_CAPTION, STR_TOOLTIP_WINDOW_TITLE_DRAG_THIS),
00488     NWidget(WWT_SHADEBOX, COLOUR_DARK_GREEN),
00489     NWidget(WWT_STICKYBOX, COLOUR_DARK_GREEN),
00490   EndContainer(),
00491   NWidget(WWT_PANEL, COLOUR_DARK_GREEN),
00492     NWidget(NWID_HORIZONTAL), SetPadding(2, 2, 7, 2),
00493       NWidget(NWID_SPACER), SetFill(1, 0),
00494       NWidget(WWT_IMGBTN, COLOUR_GREY, ETTW_DEMOLISH), SetMinimalSize(22, 22),
00495                     SetFill(0, 1), SetDataTip(SPR_IMG_DYNAMITE, STR_TOOLTIP_DEMOLISH_BUILDINGS_ETC),
00496       NWidget(WWT_IMGBTN, COLOUR_GREY, ETTW_LOWER_LAND), SetMinimalSize(22, 22),
00497                     SetFill(0, 1), SetDataTip(SPR_IMG_TERRAFORM_DOWN, STR_LANDSCAPING_TOOLTIP_LOWER_A_CORNER_OF_LAND),
00498       NWidget(WWT_IMGBTN, COLOUR_GREY, ETTW_RAISE_LAND), SetMinimalSize(22, 22),
00499                     SetFill(0, 1), SetDataTip(SPR_IMG_TERRAFORM_UP, STR_LANDSCAPING_TOOLTIP_RAISE_A_CORNER_OF_LAND),
00500       NWidget(WWT_IMGBTN, COLOUR_GREY, ETTW_LEVEL_LAND), SetMinimalSize(22, 22),
00501                     SetFill(0, 1), SetDataTip(SPR_IMG_LEVEL_LAND, STR_LANDSCAPING_LEVEL_LAND_TOOLTIP),
00502       NWidget(WWT_IMGBTN, COLOUR_GREY, ETTW_PLACE_ROCKS), SetMinimalSize(22, 22),
00503                     SetFill(0, 1), SetDataTip(SPR_IMG_ROCKS, STR_TERRAFORM_TOOLTIP_PLACE_ROCKY_AREAS_ON_LANDSCAPE),
00504       NWidget(NWID_SELECTION, INVALID_COLOUR, ETTW_SHOW_PLACE_DESERT),
00505         NWidget(WWT_IMGBTN, COLOUR_GREY, ETTW_PLACE_DESERT), SetMinimalSize(22, 22),
00506                       SetFill(0, 1), SetDataTip(SPR_IMG_DESERT, STR_TERRAFORM_TOOLTIP_DEFINE_DESERT_AREA),
00507       EndContainer(),
00508       NWidget(WWT_IMGBTN, COLOUR_GREY, ETTW_PLACE_OBJECT), SetMinimalSize(23, 22),
00509                     SetFill(0, 1), SetDataTip(SPR_IMG_TRANSMITTER, STR_SCENEDIT_TOOLBAR_PLACE_OBJECT),
00510       NWidget(NWID_SPACER), SetFill(1, 0),
00511     EndContainer(),
00512     NWidget(NWID_HORIZONTAL),
00513       NWidget(NWID_SPACER), SetFill(1, 0),
00514       NWidget(WWT_EMPTY, COLOUR_DARK_GREEN, ETTW_DOTS), SetMinimalSize(59, 31), SetDataTip(STR_EMPTY, STR_NULL),
00515       NWidget(NWID_SPACER), SetFill(1, 0),
00516       NWidget(NWID_VERTICAL),
00517         NWidget(NWID_SPACER), SetFill(0, 1),
00518         NWidget(WWT_IMGBTN, COLOUR_GREY, ETTW_INCREASE_SIZE), SetMinimalSize(12, 12), SetDataTip(SPR_ARROW_UP, STR_TERRAFORM_TOOLTIP_INCREASE_SIZE_OF_LAND_AREA),
00519         NWidget(NWID_SPACER), SetMinimalSize(0, 1),
00520         NWidget(WWT_IMGBTN, COLOUR_GREY, ETTW_DECREASE_SIZE), SetMinimalSize(12, 12), SetDataTip(SPR_ARROW_DOWN, STR_TERRAFORM_TOOLTIP_DECREASE_SIZE_OF_LAND_AREA),
00521         NWidget(NWID_SPACER), SetFill(0, 1),
00522       EndContainer(),
00523       NWidget(NWID_SPACER), SetMinimalSize(2, 0),
00524     EndContainer(),
00525     NWidget(NWID_SPACER), SetMinimalSize(0, 6),
00526     NWidget(WWT_TEXTBTN, COLOUR_GREY, ETTW_NEW_SCENARIO), SetMinimalSize(160, 12),
00527                 SetFill(1, 0), SetDataTip(STR_TERRAFORM_SE_NEW_WORLD, STR_TERRAFORM_TOOLTIP_GENERATE_RANDOM_LAND), SetPadding(0, 2, 0, 2),
00528     NWidget(WWT_TEXTBTN, COLOUR_GREY, ETTW_RESET_LANDSCAPE), SetMinimalSize(160, 12),
00529                 SetFill(1, 0), SetDataTip(STR_TERRAFORM_RESET_LANDSCAPE, STR_TERRAFORM_RESET_LANDSCAPE_TOOLTIP), SetPadding(1, 2, 2, 2),
00530   EndContainer(),
00531 };
00532 
00538 static void ResetLandscapeConfirmationCallback(Window *w, bool confirmed)
00539 {
00540   if (confirmed) {
00541     /* Set generating_world to true to get instant-green grass after removing
00542      * company property. */
00543     _generating_world = true;
00544 
00545     /* Delete all companies */
00546     Company *c;
00547     FOR_ALL_COMPANIES(c) {
00548       ChangeOwnershipOfCompanyItems(c->index, INVALID_OWNER);
00549       delete c;
00550     }
00551 
00552     _generating_world = false;
00553 
00554     /* Delete all station signs */
00555     BaseStation *st;
00556     FOR_ALL_BASE_STATIONS(st) {
00557       /* There can be buoys, remove them */
00558       if (IsBuoyTile(st->xy)) DoCommand(st->xy, 0, 0, DC_EXEC | DC_BANKRUPT, CMD_LANDSCAPE_CLEAR);
00559       if (!st->IsInUse()) delete st;
00560     }
00561 
00562     MarkWholeScreenDirty();
00563   }
00564 }
00565 
00567 struct ScenarioEditorLandscapeGenerationWindow : Window {
00568   int last_user_action; 
00569 
00570   ScenarioEditorLandscapeGenerationWindow(const WindowDesc *desc, WindowNumber window_number) : Window()
00571   {
00572     this->CreateNestedTree(desc);
00573     NWidgetStacked *show_desert = this->GetWidget<NWidgetStacked>(ETTW_SHOW_PLACE_DESERT);
00574     show_desert->SetDisplayedPlane(_settings_game.game_creation.landscape == LT_TROPIC ? 0 : SZSP_NONE);
00575     this->FinishInitNested(desc, window_number);
00576     this->last_user_action = WIDGET_LIST_END;
00577   }
00578 
00579   virtual void OnPaint()
00580   {
00581     this->DrawWidgets();
00582 
00583     if (this->IsWidgetLowered(ETTW_LOWER_LAND) || this->IsWidgetLowered(ETTW_RAISE_LAND)) { // change area-size if raise/lower corner is selected
00584       SetTileSelectSize(_terraform_size, _terraform_size);
00585     }
00586   }
00587 
00588   virtual void DrawWidget(const Rect &r, int widget) const
00589   {
00590     if (widget != ETTW_DOTS) return;
00591 
00592     int center_x = RoundDivSU(r.left + r.right, 2);
00593     int center_y = RoundDivSU(r.top + r.bottom, 2);
00594 
00595     int n = _terraform_size * _terraform_size;
00596     const int8 *coords = &_multi_terraform_coords[0][0];
00597 
00598     assert(n != 0);
00599     do {
00600       DrawSprite(SPR_WHITE_POINT, PAL_NONE, center_x + coords[0], center_y + coords[1]);
00601       coords += 2;
00602     } while (--n);
00603   }
00604 
00605   virtual EventState OnKeyPress(uint16 key, uint16 keycode)
00606   {
00607     int num = CheckHotkeyMatch(terraform_editor_hotkeys, keycode, this);
00608     if (num == -1) return ES_NOT_HANDLED;
00609     this->OnClick(Point(), num, 1);
00610     return ES_HANDLED;
00611   }
00612 
00613   virtual void OnClick(Point pt, int widget, int click_count)
00614   {
00615     if (widget < ETTW_BUTTONS_START) return;
00616 
00617     switch (widget) {
00618       case ETTW_DEMOLISH: // Demolish aka dynamite button
00619         HandlePlacePushButton(this, ETTW_DEMOLISH, ANIMCURSOR_DEMOLISH, HT_RECT | HT_DIAGONAL);
00620         this->last_user_action = widget;
00621         break;
00622 
00623       case ETTW_LOWER_LAND: // Lower land button
00624         HandlePlacePushButton(this, ETTW_LOWER_LAND, ANIMCURSOR_LOWERLAND, HT_POINT);
00625         this->last_user_action = widget;
00626         break;
00627 
00628       case ETTW_RAISE_LAND: // Raise land button
00629         HandlePlacePushButton(this, ETTW_RAISE_LAND, ANIMCURSOR_RAISELAND, HT_POINT);
00630         this->last_user_action = widget;
00631         break;
00632 
00633       case ETTW_LEVEL_LAND: // Level land button
00634         HandlePlacePushButton(this, ETTW_LEVEL_LAND, SPR_CURSOR_LEVEL_LAND, HT_POINT | HT_DIAGONAL);
00635         this->last_user_action = widget;
00636         break;
00637 
00638       case ETTW_PLACE_ROCKS: // Place rocks button
00639         HandlePlacePushButton(this, ETTW_PLACE_ROCKS, SPR_CURSOR_ROCKY_AREA, HT_RECT);
00640         this->last_user_action = widget;
00641         break;
00642 
00643       case ETTW_PLACE_DESERT: // Place desert button (in tropical climate)
00644         HandlePlacePushButton(this, ETTW_PLACE_DESERT, SPR_CURSOR_DESERT, HT_RECT);
00645         this->last_user_action = widget;
00646         break;
00647 
00648       case ETTW_PLACE_OBJECT: // Place transmitter button
00649         if (HandlePlacePushButton(this, ETTW_PLACE_OBJECT, SPR_CURSOR_TRANSMITTER, HT_RECT)) {
00650           ShowBuildObjectPicker(this);
00651           this->last_user_action = widget;
00652         }
00653         break;
00654 
00655       case ETTW_INCREASE_SIZE:
00656       case ETTW_DECREASE_SIZE: { // Increase/Decrease terraform size
00657         int size = (widget == ETTW_INCREASE_SIZE) ? 1 : -1;
00658         this->HandleButtonClick(widget);
00659         size += _terraform_size;
00660 
00661         if (!IsInsideMM(size, 1, 8 + 1)) return;
00662         _terraform_size = size;
00663 
00664         SndPlayFx(SND_15_BEEP);
00665         this->SetDirty();
00666         break;
00667       }
00668 
00669       case ETTW_NEW_SCENARIO: // gen random land
00670         this->HandleButtonClick(widget);
00671         ShowCreateScenario();
00672         break;
00673 
00674       case ETTW_RESET_LANDSCAPE: // Reset landscape
00675         ShowQuery(STR_QUERY_RESET_LANDSCAPE_CAPTION, STR_RESET_LANDSCAPE_CONFIRMATION_TEXT, NULL, ResetLandscapeConfirmationCallback);
00676         break;
00677 
00678       default: NOT_REACHED();
00679     }
00680   }
00681 
00682   virtual void OnTimeout()
00683   {
00684     for (uint i = ETTW_START; i < this->nested_array_size; i++) {
00685       if (i == ETTW_BUTTONS_START) i = ETTW_BUTTONS_END; // skip the buttons
00686       if (this->IsWidgetLowered(i)) {
00687         this->RaiseWidget(i);
00688         this->SetWidgetDirty(i);
00689       }
00690     }
00691   }
00692 
00693   virtual void OnPlaceObject(Point pt, TileIndex tile)
00694   {
00695     switch (this->last_user_action) {
00696       case ETTW_DEMOLISH: // Demolish aka dynamite button
00697         PlaceProc_DemolishArea(tile);
00698         break;
00699 
00700       case ETTW_LOWER_LAND: // Lower land button
00701         CommonRaiseLowerBigLand(tile, 0);
00702         break;
00703 
00704       case ETTW_RAISE_LAND: // Raise land button
00705         CommonRaiseLowerBigLand(tile, 1);
00706         break;
00707 
00708       case ETTW_LEVEL_LAND: // Level land button
00709         VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_LEVEL_AREA);
00710         break;
00711 
00712       case ETTW_PLACE_ROCKS: // Place rocks button
00713         VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_CREATE_ROCKS);
00714         break;
00715 
00716       case ETTW_PLACE_DESERT: // Place desert button (in tropical climate)
00717         VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_CREATE_DESERT);
00718         break;
00719 
00720       case ETTW_PLACE_OBJECT: // Place transmitter button
00721         PlaceProc_Object(tile);
00722         break;
00723 
00724       default: NOT_REACHED();
00725     }
00726   }
00727 
00728   virtual void OnPlaceDrag(ViewportPlaceMethod select_method, ViewportDragDropSelectionProcess select_proc, Point pt)
00729   {
00730     VpSelectTilesWithMethod(pt.x, pt.y, select_method);
00731   }
00732 
00733   virtual void OnPlaceMouseUp(ViewportPlaceMethod select_method, ViewportDragDropSelectionProcess select_proc, Point pt, TileIndex start_tile, TileIndex end_tile)
00734   {
00735     if (pt.x != -1) {
00736       switch (select_proc) {
00737         default: NOT_REACHED();
00738         case DDSP_CREATE_ROCKS:
00739         case DDSP_CREATE_DESERT:
00740         case DDSP_RAISE_AND_LEVEL_AREA:
00741         case DDSP_LOWER_AND_LEVEL_AREA:
00742         case DDSP_LEVEL_AREA:
00743         case DDSP_DEMOLISH_AREA:
00744           GUIPlaceProcDragXY(select_proc, start_tile, end_tile);
00745           break;
00746       }
00747     }
00748   }
00749 
00750   virtual void OnPlaceObjectAbort()
00751   {
00752     this->RaiseButtons();
00753     this->SetDirty();
00754     DeleteWindowById(WC_BUILD_OBJECT, 0);
00755   }
00756 
00757   static Hotkey<ScenarioEditorLandscapeGenerationWindow> terraform_editor_hotkeys[];
00758 };
00759 
00760 Hotkey<ScenarioEditorLandscapeGenerationWindow> ScenarioEditorLandscapeGenerationWindow::terraform_editor_hotkeys[] = {
00761   Hotkey<ScenarioEditorLandscapeGenerationWindow>('D' | WKC_GLOBAL_HOTKEY, "dynamite", ETTW_DEMOLISH),
00762   Hotkey<ScenarioEditorLandscapeGenerationWindow>('Q' | WKC_GLOBAL_HOTKEY, "lower", ETTW_LOWER_LAND),
00763   Hotkey<ScenarioEditorLandscapeGenerationWindow>('W' | WKC_GLOBAL_HOTKEY, "raise", ETTW_RAISE_LAND),
00764   Hotkey<ScenarioEditorLandscapeGenerationWindow>('E' | WKC_GLOBAL_HOTKEY, "level", ETTW_LEVEL_LAND),
00765   Hotkey<ScenarioEditorLandscapeGenerationWindow>('R', "rocky", ETTW_PLACE_ROCKS),
00766   Hotkey<ScenarioEditorLandscapeGenerationWindow>('T', "desert", ETTW_PLACE_DESERT),
00767   Hotkey<ScenarioEditorLandscapeGenerationWindow>('O', "object", ETTW_PLACE_OBJECT),
00768   HOTKEY_LIST_END(ScenarioEditorLandscapeGenerationWindow)
00769 };
00770 
00771 Hotkey<ScenarioEditorLandscapeGenerationWindow> *_terraform_editor_hotkeys = ScenarioEditorLandscapeGenerationWindow::terraform_editor_hotkeys;
00772 
00773 static const WindowDesc _scen_edit_land_gen_desc(
00774   WDP_AUTO, 0, 0,
00775   WC_SCEN_LAND_GEN, WC_NONE,
00776   WDF_CONSTRUCTION,
00777   _nested_scen_edit_land_gen_widgets, lengthof(_nested_scen_edit_land_gen_widgets)
00778 );
00779 
00780 Window *ShowEditorTerraformToolbar()
00781 {
00782   return AllocateWindowDescFront<ScenarioEditorLandscapeGenerationWindow>(&_scen_edit_land_gen_desc, 0);
00783 }
00784 
00785 EventState TerraformToolbarEditorGlobalHotkeys(uint16 key, uint16 keycode)
00786 {
00787   int num = CheckHotkeyMatch<ScenarioEditorLandscapeGenerationWindow>(_terraform_editor_hotkeys, keycode, NULL, true);
00788   if (num == -1) return ES_NOT_HANDLED;
00789   Window *w = ShowEditorTerraformToolbar();
00790   if (w == NULL) return ES_NOT_HANDLED;
00791   return w->OnKeyPress(key, keycode);
00792 }

Generated on Fri Dec 31 17:15:40 2010 for OpenTTD by  doxygen 1.6.1