#include <skylarks_all.h>

Public Member Functions
double	GetVirtualDiameter ()

void	SetVirtualDiameter (double dia)

int	GetQuality (void)

void	SetQuality (int a_qual)

	skTTerritory (int x, int y, int TheSize, int TheQuality, int a_x_div10, int a_y_div10, int a_range_div10)

void	TestNestPossibility ()

void	SetNestPossibility (bool valid, int nx, int ny)

Public Attributes
vector< int >	m_polys

vector< int >	m_sizes

vector< int >	m_hr_polys

vector< int >	m_hr_sizes

int	m_x_div10

int	m_y_div10

int	m_range_div10

bool	m_nest_valid

int	m_nest_pos_validx

int	m_nest_pos_validy

double	m_competitionscaler

int	Size

int	m_Location_x

int	m_Location_y

Skylark_Male *	Owner

Skylark_Female *	F_Owner

Protected Attributes
double	m_VirtualDiameter

double	m_heterogeneity

int	m_Quality

Constructor & Destructor Documentation

◆ skTTerritory()

skTTerritory::skTTerritory	(	int	x,
		int	y,
		int	TheSize,
		int	TheQuality,
		int	a_x_div10,
		int	a_y_div10,
		int	a_range_div10
	)

                                                                                                                        {
   m_x_div10 = a_x_div10;
   m_y_div10 = a_y_div10;
   m_range_div10 = a_range_div10;
   m_Location_x = x;
   m_Location_y = y;
   Size = TheSize;
   m_VirtualDiameter = Size;
   m_Quality = TheQuality;
   Owner = NULL;
   F_Owner = NULL;
   m_competitionscaler = 1.0;
   m_heterogeneity = 1.0;
   m_nest_valid=false;
   m_nest_pos_validx=x;
   m_nest_pos_validy=y;
 }

References F_Owner, m_competitionscaler, m_heterogeneity, m_Location_x, m_Location_y, m_nest_pos_validx, m_nest_pos_validy, m_nest_valid, m_Quality, m_range_div10, m_VirtualDiameter, m_x_div10, m_y_div10, Owner, and Size.

Member Function Documentation

◆ GetQuality()

int skTTerritory::GetQuality ( void )

inline

284 { return m_Quality; }

Referenced by Skylark_Male::OnMateLeaving(), Skylark_Male::ReEvaluateTerritory(), and SkTerritories::Supply_quality().

◆ GetVirtualDiameter()

double skTTerritory::GetVirtualDiameter ( )

inline

277 { return m_VirtualDiameter; }

Referenced by Skylark_Male::ReEvaluateTerritory(), and SkTerritories::Split().

◆ SetNestPossibility()

void skTTerritory::SetNestPossibility	(	bool	valid,
		int	nx,
		int	ny
	)

inline

                                                       {
       m_nest_valid=valid;
       m_nest_pos_validx=nx;
       m_nest_pos_validy=ny;
   }

Referenced by SkTerritories::Split().

◆ SetQuality()

void skTTerritory::SetQuality ( int a_qual )

inline

285 { m_Quality = a_qual; }

Referenced by SkTerritories::EvaluateHabitatN().

◆ SetVirtualDiameter()

void skTTerritory::SetVirtualDiameter ( double dia )

inline

278 { m_VirtualDiameter = dia; }

Referenced by SkTerritories::Split().

◆ TestNestPossibility()

void skTTerritory::TestNestPossibility ( )

                                       {
     bool result=false;
     bool* terrsurface = new bool [m_range_div10*m_range_div10];
     for (int i=0; i<m_range_div10; i++) {
         for (int j=0; j<m_range_div10; j++) {
             terrsurface[i+j*m_range_div10]=true;
         }
     }
  
     int skAvoid = __SKTALLAVOIDENCE/10;
  
     for (int rx=-skAvoid; rx<m_range_div10+skAvoid; rx++) {
         int rrx=rx*10;
         for (int ry=-skAvoid; ry<m_range_div10+skAvoid; ry++) {
             int rry=ry*10;
             for (int sx=0; sx<10; sx++) {
                 for (int sy=0; sy<10; sy++) {
                     int x = m_Location_x+sx+rrx;
                     int y = m_Location_y+sy+rry;
                     if ((x<0) || (y<0) || (x>=g_land->SupplySimAreaWidth()) || (y>=g_land->SupplySimAreaHeight())) {
                         ;
                     }
                     else {
                         TTypesOfLandscapeElement ele = g_land->SupplyElementType(x,y);
                         switch (ele) {
                           case tole_Hedges:
                           //case tole_HedgeBank: // ***CJT*** testing with and without this, h desigination to exe
                           case tole_RiversideTrees: // 97
                           case tole_DeciduousForest: // 40
                           case tole_MixedForest:     // 60
                           case tole_ConiferousForest: // 50
                           case tole_StoneWall: // 15
                           case tole_Fence: //225
                           case tole_Building: // 5
                           case tole_Garden: // 10
                           case tole_ActivePit: // 115
                           case tole_IndividualTree:
                           case tole_PlantNursery:
                           case tole_WindTurbine:
                           case tole_WoodyEnergyCrop:
                           case tole_WoodlandMargin:
                           case tole_Pylon:
                               result = true;
                                 // No point in testing the rest of this square
                                 sx=11;
                                 sy=11;
                                 break;
                           default:
                             ;
                         }
                     }
                 }
             }
             if (result) {
                 // Get the location in our 10x10m grid
                 int gx = rx;
                 int gy = ry;
                 // Invalidate the area around this point
                 int tx1 = gx+skAvoid;
                 int tx2 = gx-skAvoid;
                 int ty1 = gy+skAvoid;
                 int ty2 = gy-skAvoid;
                 if (tx1>m_range_div10) tx1=m_range_div10;
                 if (ty1>m_range_div10) ty1=m_range_div10;
                 if (tx2<0) tx2=0;
                 if (ty2<0) ty2=0;
                 for (int xx=tx2; xx<tx1; xx++) {
                     for (int yy=ty2; yy<ty1; yy++) {
                         terrsurface[xx+yy*m_range_div10]=false;
                     }
                 }
             }
             result=false;
         }
     }
     m_nest_valid = false;
  
     for (int i=0; i<m_range_div10; i++) {
         for (int j=0; j<m_range_div10; j++) {
             if (terrsurface[i+j*m_range_div10]) {
                 m_nest_valid=true;
                 m_nest_pos_validx = m_Location_x + (10*i);
                 m_nest_pos_validy = m_Location_y + (10*j);
                 i=m_range_div10;
                 break;
             }
         }
     }
     delete [] terrsurface;
     if (!m_nest_valid) m_Quality=0;
 }