void CDlgDeiceQueue::setTreeItemText(HTREEITEM hItem,ALTObject* AltObj,CString strItemText)
{
ASSERT(AltObj);
switch(GetTreeCount(hItem))
{
case 0:
break;
case 1:
{
if (AltObj->GetType() == ALT_TAXIWAY)
{
m_wndTreeCtrl.SetItemText(hItem,_T("Taxiway :") + strItemText);
}
else if (AltObj->GetType() == ALT_GROUNDROUTE)
{
m_wndTreeCtrl.SetItemText(hItem,_T("Taxi route :") + strItemText);
}
m_pCurRoute = (DeicePadQueueRoute*)m_wndTreeCtrl.GetItemData(hItem);
}
break;
default:
{
if (AltObj->GetType() == ALT_TAXIWAY)
{
m_wndTreeCtrl.SetItemText(hItem,_T("Taxiway :") + strItemText);
}
else if (AltObj->GetType() == ALT_GROUNDROUTE)
{
m_wndTreeCtrl.SetItemText(hItem,_T("Taxi route :") + strItemText);
}
m_pCurRoute->UpdataItem(GetTreeCount(hItem)-1,(int)m_wndTreeCtrl.GetItemData(hItem));
}
break;
}
}
HTREEITEM CDlgDeiceQueue::GetParentItem(HTREEITEM hItem,int lCount)
{
if (GetTreeCount(hItem) <= lCount)
{
return hItem;
}
HTREEITEM hParentItem = m_wndTreeCtrl.GetParentItem(hItem);
while (hParentItem && GetTreeCount(hParentItem) != lCount)
{
hParentItem = m_wndTreeCtrl.GetParentItem(hParentItem);
}
return hParentItem;
}
void CDlgDeiceQueue::OnDelTaxiWayPath()
{
HTREEITEM hItem = m_wndTreeCtrl.GetSelectedItem();
m_pCurRoute = (DeicePadQueueRoute*)m_wndTreeCtrl.GetItemData(GetParentItem(hItem,1));
ASSERT(m_pCurRoute);
if (GetTreeCount(hItem) == 1)
{
int nIndex = GetIndexByTree(hItem);
m_pCurDeiceItem->DeleteItem(nIndex);
}
m_pCurRoute->DeleteItem(GetTreeCount(hItem)-1);
m_wndTreeCtrl.DeleteItem(hItem);
m_wndTreeCtrl.SelectItem(NULL);
GetDlgItem(IDC_BUTTON_SAVE)->EnableWindow(TRUE);
}
static CommandCost ClearTile_Trees(TileIndex tile, DoCommandFlag flags)
{
uint num;
if (Company::IsValidID(_current_company)) {
Town *t = ClosestTownFromTile(tile, _settings_game.economy.dist_local_authority);
if (t != NULL) ChangeTownRating(t, RATING_TREE_DOWN_STEP, RATING_TREE_MINIMUM, flags);
}
num = GetTreeCount(tile);
if (IsInsideMM(GetTreeType(tile), TREE_RAINFOREST, TREE_CACTUS)) num *= 4;
if (flags & DC_EXEC) DoClearSquare(tile);
return CommandCost(EXPENSES_CONSTRUCTION, num * _price[PR_CLEAR_TREES]);
}
void CDlgDeiceQueue::OnNewTaxiWayPath()
{
std::vector<ALTObject> vObject;
ALTObject::GetObjectList(ALT_TAXIWAY,m_nProjID,vObject);
if ((int)vObject.size() == 0)
{
::AfxMessageBox(_T("No taxiway to be selected"),MB_OK|MB_ICONQUESTION);
return;
}
HTREEITEM hItem = m_wndTreeCtrl.GetSelectedItem();
HTREEITEM hchildItem = NULL;
COOLTREE_NODE_INFO cni;
CCoolTree::InitNodeInfo(this,cni);
cni.nt = NT_NORMAL;
cni.net = NET_COMBOBOX;
switch(GetTreeCount(hItem))
{
case 0:
{
m_pCurRoute = new DeicePadQueueRoute();
hchildItem = m_wndTreeCtrl.InsertItem(_T("Taxiway :"),cni,FALSE,FALSE,hItem,TVI_LAST);
m_pCurDeiceItem->AddItem(m_pCurRoute);
m_pCurRoute->Additem(-1);
m_wndTreeCtrl.SetItemData(hchildItem,(DWORD_PTR)m_pCurRoute);
}
break;
default:
{
m_pCurRoute = (DeicePadQueueRoute*)m_wndTreeCtrl.GetItemData(GetParentItem(hItem,1));
hchildItem = m_wndTreeCtrl.InsertItem(_T("Taxiway :"),cni,FALSE,FALSE,hItem,TVI_LAST);
m_pCurRoute->Additem(-1);
}
break;
}
m_wndTreeCtrl.SetFocus();
m_wndTreeCtrl.SelectItem(hchildItem);
m_wndTreeCtrl.DoEdit(hchildItem);
m_wndTreeCtrl.Expand(hItem,TVE_EXPAND);
}
void CDlgDeiceQueue::SetComboBoxItem(CComboBox* pCB)
{
HTREEITEM hItem = m_wndTreeCtrl.GetSelectedItem();
ALTObject altObject;
std::vector<ALTObject> vObject;
ALTObjectID objName;
int nCount = 0;
GroundRoutes* pRoute = new GroundRoutes(m_nAirportID);
pRoute->ReadData();
std::vector<int> vTaxiwayIDs;
ALTAirport::GetTaxiwaysIDs(m_nAirportID, vTaxiwayIDs);
int n = GetTreeCount(hItem);
switch(GetTreeCount(hItem))
{
case 0:
break;
case 1:
{
for (std::vector<int>::iterator iter = vTaxiwayIDs.begin(); iter != vTaxiwayIDs.end(); ++iter)
{
Taxiway taxiway;
taxiway.ReadObject(*iter);
CString strTaxiwayMark;
strTaxiwayMark.Format("%s", taxiway.GetMarking().c_str());
int nItemIndex = pCB->AddString(strTaxiwayMark);
int ncount = taxiway.getID();
pCB->SetItemData(nItemIndex, (DWORD_PTR)(taxiway.getID()));
}
nCount = pRoute->GetCount();
for (int i = 0; i< nCount; i++)
{
pRoute->GetItem(i)->getObjName(objName);
int nItemIndex = pCB->AddString(objName.GetIDString());
pCB->SetItemData(nItemIndex,(DWORD_PTR)pRoute->GetItem(i)->getID());
}
}
break;
default:
{
GroundRouteVector grVector;
CAirportGroundNetwork AirportNetWork(m_nProjID);
IntersectionNodeList InNodeList;
HTREEITEM hParentItem = m_wndTreeCtrl.GetParentItem(hItem);
ALTObject *AltObj;
if (GetTreeCount(hItem) == 2)
{
m_pCurRoute = (DeicePadQueueRoute*)m_wndTreeCtrl.GetItemData(hParentItem);
AltObj = ALTObject::ReadObjectByID(m_pCurRoute->getRouteID(0));
}
else
{
AltObj = ALTObject::ReadObjectByID((int)m_wndTreeCtrl.GetItemData(hParentItem));
}
if (AltObj == NULL)
{
::AfxMessageBox(_T("Please define parent item type"));
m_pCurRoute->DeleteItem(GetTreeCount(hItem)-1);
m_wndTreeCtrl.DeleteItem(hItem);
return;
}
if (AltObj->GetType() == ALT_TAXIWAY)
{
int nIndex = 0;
for (std::vector<int>::iterator iter = vTaxiwayIDs.begin(); iter != vTaxiwayIDs.end(); ++iter)
{
Taxiway taxiway;
taxiway.ReadObject(*iter);
if (AltObj->getID() != taxiway.getID())
{
InNodeList.clear();
AirportNetWork.GetTaxiwayTaxiwayIntersectNodeList((Taxiway*)AltObj,&taxiway,InNodeList);
if((int)InNodeList.size() > 0)
{
nIndex = pCB->AddString(taxiway.GetMarking().c_str());
pCB->SetItemData(nIndex,(DWORD_PTR)taxiway.getID());
}
}
}
AirportNetWork.GetTaxiwayIntersectGroundRoutes((Taxiway*)AltObj,&grVector);
for (GroundRouteVector::iterator it = grVector.begin(); it != grVector.end(); ++it)
{
(*it)->getObjName(objName);
int nIndexItem = pCB->AddString(objName.GetIDString());
pCB->SetItemData(nIndexItem,(DWORD_PTR)(*it)->getID());
}
if (pCB->GetCount() == 0)
{
m_pCurRoute->DeleteItem(GetTreeCount(hItem)-1);
m_wndTreeCtrl.DeleteItem(hItem);
::AfxMessageBox(_T("No taxiway to be selected"),MB_ICONQUESTION|MB_OK);
}
}
else if (AltObj->GetType() == ALT_GROUNDROUTE)
{
std::vector<IntersectionNode>::iterator it;
for (std::vector<int>::iterator iter = vTaxiwayIDs.begin(); iter != vTaxiwayIDs.end(); ++iter)
{
Taxiway taxiway;
taxiway.ReadObject(*iter);
InNodeList.clear();
AirportNetWork.GetTaxiwayGroundRouteIntersectNodeList(&taxiway,(GroundRoute*)AltObj,&InNodeList);
if ((int)InNodeList.size() > 0)
{
int nItemIndex = pCB->AddString(taxiway.GetMarking().c_str());
pCB->SetItemData(nItemIndex,(DWORD_PTR)taxiway.getID());
}
}
int nCount = pRoute->GetCount();
for (int i =0; i < nCount; i++)
{
if (pRoute->GetItem(i)->getID() != AltObj->getID()
&& AirportNetWork.IsALTObjIntersectWithGroundRoute(AltObj->getID(),pRoute->GetItem(i)))
{
pRoute->GetItem(i)->getObjName(objName);
int nItemIndex = pCB->AddString(objName.GetIDString());
pCB->SetItemData(nItemIndex,(DWORD_PTR)pRoute->GetItem(i)->getID());
}
}
if (pCB->GetCount() == 0)
{
m_pCurRoute->DeleteItem(GetTreeCount(hItem)-1);
m_wndTreeCtrl.DeleteItem(hItem);
::AfxMessageBox(_T("No taxiway to be selected"),MB_ICONQUESTION|MB_OK);
}
}
}
break;
}
}
LRESULT CDlgDeiceQueue::DefWindowProc(UINT message, WPARAM wParam, LPARAM lParam)
{
if(message == UM_CEW_COMBOBOX_BEGIN)
{
CWnd* pWnd = m_wndTreeCtrl.GetEditWnd((HTREEITEM)wParam);
CRect rectWnd;
HTREEITEM hItem = (HTREEITEM)wParam;
m_wndTreeCtrl.GetItemRect((HTREEITEM)wParam,rectWnd,TRUE);
pWnd->SetWindowPos(NULL,rectWnd.right,rectWnd.top,0,0,SWP_NOSIZE);
CComboBox* pCB=(CComboBox*)pWnd;
if(pCB->GetCount()!=0)
{
pCB->ResetContent();
}
SetComboBoxItem(pCB);
int nObjID = -1;
switch(GetTreeCount((HTREEITEM)wParam))
{
case 0:
return 0;
case 1:
{
m_pCurRoute = (DeicePadQueueRoute*)m_wndTreeCtrl.GetItemData((HTREEITEM)wParam);
nObjID = m_pCurRoute->getRouteID(0);
}
break;
default:
nObjID = m_wndTreeCtrl.GetItemData((HTREEITEM)wParam);
break;
}
if (-1 == nObjID)
{
ALTObject* AltObj = NULL;
pCB->SetCurSel(0);
if (GetTreeCount((HTREEITEM)wParam) == 1)
{
m_pCurRoute->UpdataItem(0,pCB->GetItemData(0));
m_wndTreeCtrl.SetItemData((HTREEITEM)wParam,(DWORD_PTR)m_pCurRoute);
}
else
{
m_wndTreeCtrl.SetItemData((HTREEITEM)wParam,(DWORD_PTR)pCB->GetItemData(0));
}
AltObj = ALTObject::ReadObjectByID((int)pCB->GetItemData(0));
CString strItemText = _T("");
pCB->GetLBText(0,strItemText);
setTreeItemText((HTREEITEM)wParam,AltObj,strItemText);
}
else
{
int i;
for (i=0; i<pCB->GetCount(); i++)
{
int nALTObjID = (int)pCB->GetItemData(i);
if (nALTObjID == nObjID)
{
pCB->SetCurSel(i);
break;
}
}
if (i==pCB->GetCount())
{
pCB->SetCurSel(0);
ALTObject* AltObj = NULL;
pCB->SetCurSel(0);
if (GetTreeCount((HTREEITEM)wParam) == 1)
{
m_pCurRoute->UpdataItem(0,pCB->GetItemData(0));
m_wndTreeCtrl.SetItemData((HTREEITEM)wParam,(DWORD_PTR)m_pCurRoute);
}
else
{
m_wndTreeCtrl.SetItemData((HTREEITEM)wParam,(DWORD_PTR)pCB->GetItemData(0));
}
AltObj = ALTObject::ReadObjectByID((int)pCB->GetItemData(0));
CString strItemText = _T("");
pCB->GetLBText(0,strItemText);
setTreeItemText((HTREEITEM)wParam,AltObj,strItemText);
}
}
}
else if(message == UM_CEW_COMBOBOX_SELCHANGE)
{
CString strItemText = m_wndTreeCtrl.GetItemText((HTREEITEM)wParam);
CWnd* pWnd = m_wndTreeCtrl.GetEditWnd((HTREEITEM)wParam);
CComboBox* pCB=(CComboBox*)pWnd;
for (int i = 0; i < pCB->GetCount(); i++)
{
CString strComboxItemtext;
pCB->GetLBText(i,strComboxItemtext);
if (!strItemText.CompareNoCase(strComboxItemtext))
{
if (GetTreeCount((HTREEITEM)wParam) == 1)
{
m_pCurRoute->UpdataItem(0,pCB->GetItemData(i));
m_wndTreeCtrl.SetItemData((HTREEITEM)wParam,(DWORD_PTR)m_pCurRoute);
}
else
{
m_wndTreeCtrl.SetItemData((HTREEITEM)wParam,(DWORD_PTR)pCB->GetItemData(i));
}
break;
}
}
ALTObject* AltObj = NULL;
if (GetTreeCount((HTREEITEM)wParam) == 1)
{
m_pCurRoute = (DeicePadQueueRoute*)m_wndTreeCtrl.GetItemData((HTREEITEM)wParam);
AltObj = ALTObject::ReadObjectByID(m_pCurRoute->getRouteID(0));
}
else
{
AltObj = ALTObject::ReadObjectByID((int)m_wndTreeCtrl.GetItemData((HTREEITEM)wParam));
}
setTreeItemText((HTREEITEM)wParam,AltObj,strItemText);
GetDlgItem(IDC_BUTTON_SAVE)->EnableWindow(TRUE);
}
else if (message == UM_CEW_COMBOBOX_END)
{
CString strItemText = m_wndTreeCtrl.GetItemText((HTREEITEM)wParam);
ALTObject* AltObj = NULL;
if (GetTreeCount((HTREEITEM)wParam) == 1)
{
m_pCurRoute = (DeicePadQueueRoute*)m_wndTreeCtrl.GetItemData((HTREEITEM)wParam);
AltObj = ALTObject::ReadObjectByID(m_pCurRoute->getRouteID(0));
}
else
{
AltObj = ALTObject::ReadObjectByID((int)m_wndTreeCtrl.GetItemData((HTREEITEM)wParam));
}
setTreeItemText((HTREEITEM)wParam,AltObj,strItemText);
}
else if(message == UM_CEW_COMBOBOX_SETWIDTH)
{
m_wndTreeCtrl.SetWidth(200);
}
// else if (message == WM_COMBO_IN_LISTBOX)
// {
// ALTObject* pAltObject = NULL;
// ALTObjectID objName;
// int nSelItem = (int)lParam;
// CString strDeiceName = m_strDeicePadList.GetAt(m_strDeicePadList.FindIndex(nSelItem));
// //std::vector<ALTObject> vObject;
// int nObjID = -1;
// //ALTObject::GetObjectList(ALT_DEICEBAY,m_nProjID,vObject);
// for (int i = 0; i< (int)m_vPadList.size(); i++)
// {
// pAltObject = m_vPadList.at(i).get();
// pAltObject->getObjName(objName);
// if (!objName.GetIDString().CompareNoCase(strDeiceName))
// {
// nObjID = pAltObject->getID();
// break;
// }
// }
// m_pCurDeiceItem->setDeicePadID(nObjID);
// CString strPadName = _T("");
// for (int i = 0; i < m_wndListbox.GetCount()-1; i++)
// {
// m_wndListbox.GetText(i,strPadName);
// if (!strDeiceName.CompareNoCase(strPadName))
// {
// m_wndTreeCtrl.DeleteAllItems();
// delete m_pCurDeiceItem;
// m_pCurDeiceItem = NULL;
// break;
// }
// }
// if (m_pCurDeiceItem != NULL)
// {
// m_QueueList->AddItem(m_pCurDeiceItem);
// }
// DisplayDeicePad();
// GetDlgItem(IDC_BUTTON_SAVE)->EnableWindow(TRUE);
// }
return CXTResizeDialog::DefWindowProc(message, wParam, lParam);
}
static void TileLoop_Trees(TileIndex tile)
{
if (GetTreeGround(tile) == TREE_GROUND_SHORE) {
TileLoop_Water(tile);
} else {
switch (_settings_game.game_creation.landscape) {
case LT_TROPIC: TileLoopTreesDesert(tile); break;
case LT_ARCTIC: TileLoopTreesAlps(tile); break;
}
}
TileLoopClearHelper(tile);
uint treeCounter = GetTreeCounter(tile);
/* Handle growth of grass (under trees/on MP_TREES tiles) at every 8th processings, like it's done for grass on MP_CLEAR tiles. */
if ((treeCounter & 7) == 7 && GetTreeGround(tile) == TREE_GROUND_GRASS) {
uint density = GetTreeDensity(tile);
if (density < 3) {
SetTreeGroundDensity(tile, TREE_GROUND_GRASS, density + 1);
MarkTileDirtyByTile(tile);
}
}
if (GetTreeCounter(tile) < 15) {
AddTreeCounter(tile, 1);
return;
}
SetTreeCounter(tile, 0);
switch (GetTreeGrowth(tile)) {
case 3: // regular sized tree
if (_settings_game.game_creation.landscape == LT_TROPIC &&
GetTreeType(tile) != TREE_CACTUS &&
GetTropicZone(tile) == TROPICZONE_DESERT) {
AddTreeGrowth(tile, 1);
} else {
switch (GB(Random(), 0, 3)) {
case 0: // start destructing
AddTreeGrowth(tile, 1);
break;
case 1: // add a tree
if (GetTreeCount(tile) < 4) {
AddTreeCount(tile, 1);
SetTreeGrowth(tile, 0);
break;
}
/* FALL THROUGH */
case 2: { // add a neighbouring tree
/* Don't plant extra trees if that's not allowed. */
if ((_settings_game.game_creation.landscape == LT_TROPIC && GetTropicZone(tile) == TROPICZONE_RAINFOREST) ?
_settings_game.construction.extra_tree_placement == ETP_NONE :
_settings_game.construction.extra_tree_placement != ETP_ALL) {
break;
}
TreeType treetype = GetTreeType(tile);
tile += TileOffsByDir((Direction)(Random() & 7));
/* Cacti don't spread */
if (!CanPlantTreesOnTile(tile, false)) return;
/* Don't plant trees, if ground was freshly cleared */
if (IsTileType(tile, MP_CLEAR) && GetClearGround(tile) == CLEAR_GRASS && GetClearDensity(tile) != 3) return;
PlantTreesOnTile(tile, treetype, 0, 0);
break;
}
default:
return;
}
}
break;
case 6: // final stage of tree destruction
if (GetTreeCount(tile) > 1) {
/* more than one tree, delete it */
AddTreeCount(tile, -1);
SetTreeGrowth(tile, 3);
} else {
/* just one tree, change type into MP_CLEAR */
switch (GetTreeGround(tile)) {
case TREE_GROUND_SHORE: MakeShore(tile); break;
case TREE_GROUND_GRASS: MakeClear(tile, CLEAR_GRASS, GetTreeDensity(tile)); break;
case TREE_GROUND_ROUGH: MakeClear(tile, CLEAR_ROUGH, 3); break;
case TREE_GROUND_ROUGH_SNOW: {
uint density = GetTreeDensity(tile);
MakeClear(tile, CLEAR_ROUGH, 3);
MakeSnow(tile, density);
break;
}
default: // snow or desert
if (_settings_game.game_creation.landscape == LT_TROPIC) {
MakeClear(tile, CLEAR_DESERT, GetTreeDensity(tile));
} else {
uint density = GetTreeDensity(tile);
MakeClear(tile, CLEAR_GRASS, 3);
MakeSnow(tile, density);
}
break;
}
}
break;
default:
AddTreeGrowth(tile, 1);
break;
}
MarkTileDirtyByTile(tile);
}
static void DrawTile_Trees(TileInfo *ti)
{
switch (GetTreeGround(ti->tile)) {
case TREE_GROUND_SHORE: DrawShoreTile(ti->tileh); break;
case TREE_GROUND_GRASS: DrawClearLandTile(ti, GetTreeDensity(ti->tile)); break;
case TREE_GROUND_ROUGH: DrawHillyLandTile(ti); break;
default: DrawGroundSprite(_clear_land_sprites_snow_desert[GetTreeDensity(ti->tile)] + SlopeToSpriteOffset(ti->tileh), PAL_NONE); break;
}
DrawClearLandFence(ti);
/* Do not draw trees when the invisible trees setting is set */
if (IsInvisibilitySet(TO_TREES)) return;
uint tmp = CountBits(ti->tile + ti->x + ti->y);
uint index = GB(tmp, 0, 2) + (GetTreeType(ti->tile) << 2);
/* different tree styles above one of the grounds */
if ((GetTreeGround(ti->tile) == TREE_GROUND_SNOW_DESERT || GetTreeGround(ti->tile) == TREE_GROUND_ROUGH_SNOW) &&
GetTreeDensity(ti->tile) >= 2 &&
IsInsideMM(index, TREE_SUB_ARCTIC << 2, TREE_RAINFOREST << 2)) {
index += 164 - (TREE_SUB_ARCTIC << 2);
}
assert(index < lengthof(_tree_layout_sprite));
const PalSpriteID *s = _tree_layout_sprite[index];
const TreePos *d = _tree_layout_xy[GB(tmp, 2, 2)];
/* combine trees into one sprite object */
StartSpriteCombine();
TreeListEnt te[4];
/* put the trees to draw in a list */
uint trees = GetTreeCount(ti->tile);
for (uint i = 0; i < trees; i++) {
SpriteID sprite = s[0].sprite + (i == trees - 1 ? GetTreeGrowth(ti->tile) : 3);
PaletteID pal = s[0].pal;
te[i].sprite = sprite;
te[i].pal = pal;
te[i].x = d->x;
te[i].y = d->y;
s++;
d++;
}
/* draw them in a sorted way */
byte z = ti->z + GetSlopeMaxZ(ti->tileh) / 2;
for (; trees > 0; trees--) {
uint min = te[0].x + te[0].y;
uint mi = 0;
for (uint i = 1; i < trees; i++) {
if ((uint)(te[i].x + te[i].y) < min) {
min = te[i].x + te[i].y;
mi = i;
}
}
AddSortableSpriteToDraw(te[mi].sprite, te[mi].pal, ti->x + te[mi].x, ti->y + te[mi].y, 16 - te[mi].x, 16 - te[mi].y, 0x30, z, IsTransparencySet(TO_TREES), -te[mi].x, -te[mi].y);
/* replace the removed one with the last one */
te[mi] = te[trees - 1];
}
EndSpriteCombine();
}
/**
* Plant a tree.
* @param tile start tile of area-drag of tree plantation
* @param flags type of operation
* @param p1 tree type, TREE_INVALID means random.
* @param p2 end tile of area-drag
* @param text unused
* @return the cost of this operation or an error
*/
CommandCost CmdPlantTree(TileIndex tile, DoCommandFlag flags, uint32 p1, uint32 p2, const char *text)
{
StringID msg = INVALID_STRING_ID;
CommandCost cost(EXPENSES_OTHER);
const byte tree_to_plant = GB(p1, 0, 8); // We cannot use Extract as min and max are climate specific.
if (p2 >= MapSize()) return CMD_ERROR;
/* Check the tree type within the current climate */
if (tree_to_plant != TREE_INVALID && !IsInsideBS(tree_to_plant, _tree_base_by_landscape[_settings_game.game_creation.landscape], _tree_count_by_landscape[_settings_game.game_creation.landscape])) return CMD_ERROR;
TileArea ta(tile, p2);
TILE_AREA_LOOP(tile, ta) {
switch (GetTileType(tile)) {
case MP_TREES:
/* no more space for trees? */
if (_game_mode != GM_EDITOR && GetTreeCount(tile) == 4) {
msg = STR_ERROR_TREE_ALREADY_HERE;
continue;
}
if (flags & DC_EXEC) {
AddTreeCount(tile, 1);
MarkTileDirtyByTile(tile);
}
/* 2x as expensive to add more trees to an existing tile */
cost.AddCost(_price[PR_BUILD_TREES] * 2);
break;
case MP_WATER:
if (!IsCoast(tile) || IsSlopeWithOneCornerRaised(GetTileSlope(tile, NULL))) {
msg = STR_ERROR_CAN_T_BUILD_ON_WATER;
continue;
}
/* FALL THROUGH */
case MP_CLEAR: {
if (IsBridgeAbove(tile)) {
msg = STR_ERROR_SITE_UNSUITABLE;
continue;
}
TreeType treetype = (TreeType)tree_to_plant;
/* Be a bit picky about which trees go where. */
if (_settings_game.game_creation.landscape == LT_TROPIC && treetype != TREE_INVALID && (
/* No cacti outside the desert */
(treetype == TREE_CACTUS && GetTropicZone(tile) != TROPICZONE_DESERT) ||
/* No rain forest trees outside the rain forest, except in the editor mode where it makes those tiles rain forest tile */
(IsInsideMM(treetype, TREE_RAINFOREST, TREE_CACTUS) && GetTropicZone(tile) != TROPICZONE_RAINFOREST && _game_mode != GM_EDITOR) ||
/* And no subtropical trees in the desert/rain forest */
(IsInsideMM(treetype, TREE_SUB_TROPICAL, TREE_TOYLAND) && GetTropicZone(tile) != TROPICZONE_NORMAL))) {
msg = STR_ERROR_TREE_WRONG_TERRAIN_FOR_TREE_TYPE;
continue;
}
if (IsTileType(tile, MP_CLEAR)) {
/* Remove fields or rocks. Note that the ground will get barrened */
switch (GetRawClearGround(tile)) {
case CLEAR_FIELDS:
case CLEAR_ROCKS: {
CommandCost ret = DoCommand(tile, 0, 0, flags, CMD_LANDSCAPE_CLEAR);
if (ret.Failed()) return ret;
cost.AddCost(ret);
break;
}
default: break;
}
}
if (_game_mode != GM_EDITOR && Company::IsValidID(_current_company)) {
Town *t = ClosestTownFromTile(tile, _settings_game.economy.dist_local_authority);
if (t != NULL) ChangeTownRating(t, RATING_TREE_UP_STEP, RATING_TREE_MAXIMUM, flags);
}
if (flags & DC_EXEC) {
if (treetype == TREE_INVALID) {
treetype = GetRandomTreeType(tile, GB(Random(), 24, 8));
if (treetype == TREE_INVALID) treetype = TREE_CACTUS;
}
/* Plant full grown trees in scenario editor */
PlantTreesOnTile(tile, treetype, 0, _game_mode == GM_EDITOR ? 3 : 0);
MarkTileDirtyByTile(tile);
/* When planting rainforest-trees, set tropiczone to rainforest in editor. */
if (_game_mode == GM_EDITOR && IsInsideMM(treetype, TREE_RAINFOREST, TREE_CACTUS)) {
SetTropicZone(tile, TROPICZONE_RAINFOREST);
}
}
cost.AddCost(_price[PR_BUILD_TREES]);
break;
}
default:
msg = STR_ERROR_SITE_UNSUITABLE;
break;
}
}
if (cost.GetCost() == 0) {
return_cmd_error(msg);
} else {
return cost;
}
}
