250 lines
6.9 KiB
C++
250 lines
6.9 KiB
C++
|
#include <iostream>
|
||
|
#include <iomanip>
|
||
|
#include <map>
|
||
|
#include <algorithm>
|
||
|
#include <vector>
|
||
|
#include <string>
|
||
|
|
||
|
#include <dfhack/Core.h>
|
||
|
#include <dfhack/Console.h>
|
||
|
#include <dfhack/Export.h>
|
||
|
#include <dfhack/PluginManager.h>
|
||
|
#include <dfhack/modules/Vegetation.h>
|
||
|
#include <dfhack/modules/Maps.h>
|
||
|
#include <dfhack/modules/Gui.h>
|
||
|
#include <dfhack/TileTypes.h>
|
||
|
#include <dfhack/extra/MapExtras.h>
|
||
|
|
||
|
using std::vector;
|
||
|
using std::string;
|
||
|
using namespace DFHack;
|
||
|
|
||
|
DFhackCExport command_result df_grow (Core * c, vector <string> & parameters);
|
||
|
DFhackCExport command_result df_immolate (Core * c, vector <string> & parameters);
|
||
|
DFhackCExport command_result df_extirpate (Core * c, vector <string> & parameters);
|
||
|
|
||
|
DFhackCExport const char * plugin_name ( void )
|
||
|
{
|
||
|
return "plants";
|
||
|
}
|
||
|
|
||
|
DFhackCExport command_result plugin_init ( Core * c, std::vector <PluginCommand> &commands)
|
||
|
{
|
||
|
commands.clear();
|
||
|
commands.push_back(PluginCommand("grow", "Grows saplings into trees (with active cursor, only the targetted one).", df_grow));
|
||
|
commands.push_back(PluginCommand("immolate", "Set plants on fire (under cursor, 'shrubs', 'trees' or 'all').", df_immolate));
|
||
|
commands.push_back(PluginCommand("extirpate", "Kill plants (same mechanics as immolate).", df_extirpate));
|
||
|
return CR_OK;
|
||
|
}
|
||
|
|
||
|
DFhackCExport command_result plugin_shutdown ( Core * c )
|
||
|
{
|
||
|
return CR_OK;
|
||
|
}
|
||
|
|
||
|
enum do_what
|
||
|
{
|
||
|
do_immolate,
|
||
|
do_extirpate
|
||
|
};
|
||
|
|
||
|
static bool getoptions( vector <string> & parameters, bool & shrubs, bool & trees)
|
||
|
{
|
||
|
for(int i = 0;i < parameters.size();i++)
|
||
|
{
|
||
|
if(parameters[i] == "shrubs")
|
||
|
{
|
||
|
shrubs = true;
|
||
|
}
|
||
|
else if(parameters[i] == "trees")
|
||
|
{
|
||
|
trees = true;
|
||
|
}
|
||
|
else if(parameters[i] == "all")
|
||
|
{
|
||
|
trees = true;
|
||
|
shrubs = true;
|
||
|
}
|
||
|
else
|
||
|
{
|
||
|
return false;
|
||
|
}
|
||
|
}
|
||
|
return true;
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Book of Immolations, chapter 1, verse 35:
|
||
|
* Armok emerged from the hellish depths and beheld the sunny realms for the first time.
|
||
|
* And he cursed the plants and trees for their bloodless wood, turning them into ash and smoldering ruin.
|
||
|
* Armok was pleased and great temples were built by the dwarves, for they shared his hatred for trees and plants.
|
||
|
*/
|
||
|
static command_result immolations (Core * c, do_what what, bool shrubs, bool trees)
|
||
|
{
|
||
|
c->Suspend();
|
||
|
DFHack::Maps *maps = c->getMaps();
|
||
|
if (!maps->Start())
|
||
|
{
|
||
|
c->con.printerr( "Cannot get map info!\n");
|
||
|
c->Resume();
|
||
|
return CR_FAILURE;
|
||
|
}
|
||
|
DFHack::Gui * Gui = c->getGui();
|
||
|
uint32_t x_max, y_max, z_max;
|
||
|
maps->getSize(x_max, y_max, z_max);
|
||
|
MapExtras::MapCache map(maps);
|
||
|
DFHack::Vegetation *veg = c->getVegetation();
|
||
|
if (!veg->all_plants)
|
||
|
{
|
||
|
std::cerr << "Unable to read vegetation!" << std::endl;
|
||
|
return CR_FAILURE;
|
||
|
}
|
||
|
if(shrubs || trees)
|
||
|
{
|
||
|
int destroyed = 0;
|
||
|
for(size_t i = 0 ; i < veg->all_plants->size(); i++)
|
||
|
{
|
||
|
DFHack::df_plant *p = veg->all_plants->at(i);
|
||
|
if(shrubs && p->is_shrub || trees && !p->is_shrub)
|
||
|
{
|
||
|
if (what == do_immolate)
|
||
|
p->is_burning = true;
|
||
|
p->hitpoints = 0;
|
||
|
destroyed ++;
|
||
|
}
|
||
|
}
|
||
|
c->con.print("Praise Armok!\n");
|
||
|
}
|
||
|
else
|
||
|
{
|
||
|
int32_t x,y,z;
|
||
|
if(Gui->getCursorCoords(x,y,z))
|
||
|
{
|
||
|
vector<DFHack::df_plant *> * alltrees;
|
||
|
if(maps->ReadVegetation(x/16,y/16,z,alltrees))
|
||
|
{
|
||
|
bool didit = false;
|
||
|
for(size_t i = 0 ; i < alltrees->size(); i++)
|
||
|
{
|
||
|
DFHack::df_plant * tree = alltrees->at(i);
|
||
|
if(tree->x == x && tree->y == y && tree->z == z)
|
||
|
{
|
||
|
if(what == do_immolate)
|
||
|
tree->is_burning = true;
|
||
|
tree->hitpoints = 0;
|
||
|
didit = true;
|
||
|
break;
|
||
|
}
|
||
|
}
|
||
|
/*
|
||
|
if(!didit)
|
||
|
{
|
||
|
cout << "----==== There's NOTHING there! ====----" << endl;
|
||
|
}
|
||
|
*/
|
||
|
}
|
||
|
}
|
||
|
else
|
||
|
{
|
||
|
c->con.printerr("No mass destruction and no cursor...\n" );
|
||
|
}
|
||
|
}
|
||
|
// Cleanup
|
||
|
veg->Finish();
|
||
|
maps->Finish();
|
||
|
c->Resume();
|
||
|
return CR_OK;
|
||
|
}
|
||
|
|
||
|
DFhackCExport command_result df_immolate (Core * c, vector <string> & parameters)
|
||
|
{
|
||
|
bool shrubs = false, trees = false;
|
||
|
if(getoptions(parameters,shrubs,trees))
|
||
|
{
|
||
|
return immolations(c,do_immolate,shrubs,trees);
|
||
|
}
|
||
|
else
|
||
|
{
|
||
|
c->con.printerr("Invalid parameter!\n");
|
||
|
return CR_FAILURE;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
DFhackCExport command_result df_extirpate (Core * c, vector <string> & parameters)
|
||
|
{
|
||
|
bool shrubs = false, trees = false;
|
||
|
if(getoptions(parameters,shrubs,trees))
|
||
|
{
|
||
|
return immolations(c,do_extirpate,shrubs,trees);
|
||
|
}
|
||
|
else
|
||
|
{
|
||
|
c->con.printerr("Invalid parameter!\n");
|
||
|
return CR_FAILURE;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
DFhackCExport command_result df_grow (Core * c, vector <string> & parameters)
|
||
|
{
|
||
|
//uint32_t x_max = 0, y_max = 0, z_max = 0;
|
||
|
c->Suspend();
|
||
|
DFHack::Maps *maps = c->getMaps();
|
||
|
Console & con = c->con;
|
||
|
if (!maps->Start())
|
||
|
{
|
||
|
con.printerr("Cannot get map info!\n");
|
||
|
c->Resume();
|
||
|
return CR_FAILURE;
|
||
|
}
|
||
|
//maps->getSize(x_max, y_max, z_max);
|
||
|
MapExtras::MapCache map(maps);
|
||
|
DFHack::Vegetation *veg = c->getVegetation();
|
||
|
if (!veg->all_plants)
|
||
|
{
|
||
|
con.printerr("Unable to read vegetation!\n");
|
||
|
c->Resume();
|
||
|
return CR_FAILURE;
|
||
|
}
|
||
|
DFHack::Gui *Gui = c->getGui();
|
||
|
int32_t x,y,z;
|
||
|
if(Gui->getCursorCoords(x,y,z))
|
||
|
{
|
||
|
vector<DFHack::df_plant *> * alltrees;
|
||
|
if(maps->ReadVegetation(x/16,y/16,z,alltrees))
|
||
|
{
|
||
|
for(size_t i = 0 ; i < alltrees->size(); i++)
|
||
|
{
|
||
|
DFHack::df_plant * tree = alltrees->at(i);
|
||
|
if(tree->x == x && tree->y == y && tree->z == z)
|
||
|
{
|
||
|
if(DFHack::tileShape(map.tiletypeAt(DFHack::DFCoord(x,y,z))) == DFHack::SAPLING_OK)
|
||
|
{
|
||
|
tree->grow_counter = DFHack::sapling_to_tree_threshold;
|
||
|
}
|
||
|
break;
|
||
|
}
|
||
|
}
|
||
|
}
|
||
|
}
|
||
|
else
|
||
|
{
|
||
|
int grown = 0;
|
||
|
for(size_t i = 0 ; i < veg->all_plants->size(); i++)
|
||
|
{
|
||
|
DFHack::df_plant *p = veg->all_plants->at(i);
|
||
|
uint16_t ttype = map.tiletypeAt(DFHack::DFCoord(p->x,p->y,p->z));
|
||
|
if(!p->is_shrub && DFHack::tileShape(ttype) == DFHack::SAPLING_OK)
|
||
|
{
|
||
|
p->grow_counter = DFHack::sapling_to_tree_threshold;
|
||
|
}
|
||
|
}
|
||
|
}
|
||
|
|
||
|
// Cleanup
|
||
|
veg->Finish();
|
||
|
maps->Finish();
|
||
|
c->Resume();
|
||
|
return CR_OK;
|
||
|
}
|
||
|
|