Skylark_Nestling Class Reference

#include <skylarks_all.h>

Inheritance diagram for Skylark_Nestling:

Public Member Functions
	Skylark_Nestling (int x, int y, Skylark_Male *Daddy, Landscape *L, SkTerritories *Terrs, Skylark_Population_Manager *SPM, int bx, int by, int mh)
virtual void	ReInit (int x, int y, Skylark_Male *Daddy, Landscape *L, SkTerritories *Terrs, Skylark_Population_Manager *SPM, int bx, int by, int mh)
void	BeginStep (void) override
	BeingStep behaviour - must be implemented in descendent classes. More...
void	Step (void) override
	Step behaviour - must be implemented in descendent classes. More...
void	EndStep (void) override
	EndStep behaviour - must be implemented in descendent classes. More...
double	On_FoodSupply (double food) override
void	OnDadDead ()
void	OnYouHaveBeenEaten ()
void	OnDeserted ()
Public Member Functions inherited from Skylark_Base
	Skylark_Base (int x, int y, SkTerritories *Terrs, Landscape *L, Skylark_Population_Manager *SPM, int bx, int by, int mh)
virtual void	ReInit (int x, int y, SkTerritories *Terrs, Landscape *L, Skylark_Population_Manager *SPM, int bx, int by, int mh)
void	AddStriglingMort (const int lifestage) const
int	WhatState () override
	Returns the objects current state number. More...
bool	InSquare (rectangle R) const
Public Member Functions inherited from TAnimal
	TAnimal (int x, int y, Landscape *L)
	The TAnimal constructor saving the x,y, location and the landscape pointer. More...
	TAnimal (int x, int y)
	The TAnimal constructor saving the x,y used if landscape is already set. More...
void	SetGuardMapIndex (int a_index_x, int a_index_y)
	Set the guard map index, this is used to avoid two animals operating in the same location when using multithread. More...
unsigned	SupplyFarmOwnerRef () const
	Get the current location farm ref if any. More...
AnimalPosition	SupplyPosition () const
	Returns the objects location and habitat type and veg type. More...
APoint	SupplyPoint () const
	Returns the objects location in ALMaSS coordinates. More...
int	SupplyPolygonRef () const
	Returns the polygon reference where the object is located. More...
TTypesOfLandscapeElement	SupplyPolygonType () const
	Returns the polygon type where the object is located. More...
int	Supply_m_Location_x () const
	Returns the ALMaSS x-coordinate. More...
int	Supply_m_Location_y () const
	Returns the ALMaSS y-coordinate. More...
int	SupplyGuardCellX () const
	Returns the x-index to the guard cell. More...
int	SupplyGuardCellY () const
	Returns the y-index to the guard cell. More...
int	SupplyAge () const
	Returns the animals age in days. More...
void	SetAge (int a_age)
	Sets the animals age in days. More...
virtual void	KillThis ()
	Sets all parameters ready for object destruction. More...
virtual void	CopyMyself ()
	Used to copy the object details to another in descendent classes. More...
void	SetX (const int a_x)
	Sets the x-coordinate. More...
void	SetY (const int a_y)
	Sets the y-coordinate. More...
virtual void	ReinitialiseObject (int a_x, int a_y, Landscape *a_l_ptr)
virtual void	ReinitialiseObject (int a_x, int a_y)
	Used to re-use an object - must be implemented in descendent classes. More...
virtual void	Dying ()
	A wrapped for KillThis - ideally should not be used. More...
void	CheckManagement ()
	Used to start a check for any management related effects at the objects current location. More...
void	CheckManagementXY (int a_x, int a_y)
	Used to start a check for any management related effects at x,y. More...
Public Member Functions inherited from TALMaSSObject
int	GetCurrentStateNo () const
	Returns the current state number. More...
void	SetCurrentStateNo (int a_num)
	Sets the current state number. More...
bool	GetStepDone () const
	Returns the step done indicator flag. More...
void	SetStepDone (bool a_bool)
	Sets the step done indicator flag. More...
void	ReinitialiseObjectBase ()
	Used to initialise an object. More...
	TALMaSSObject ()
	The constructor for TALMaSSObject. More...
virtual	~TALMaSSObject ()=default
	The destructor for TALMaSSObject. More...

Protected Member Functions
virtual int	st_Developing ()
virtual void	st_Maturing ()
virtual void	st_Dying ()
bool	OnFarmEvent (FarmToDo event) override
	Must be reimplemented if used in descendent classes. Sets the action on a management event. More...
Protected Member Functions inherited from TAnimal
void	CorrectWrapRound ()
	Corrects wrap around co-ordinate problems. More...

Protected Attributes
bool	Sex
int	m_EM_fail
int	m_NestLeavingChance
Skylark_Male *	m_Dad
double	m_EM
double	m_GrNeed
Protected Attributes inherited from TAnimal
int	m_Location_x
	The objects ALMaSS x coordinate. More...
int	m_Location_y
	The objects ALMaSS y coordinate. More...
int	m_guard_cell_x
	The index x to the guard cell. More...
int	m_guard_cell_y
	The index y to the guard cell. More...
int	m_AgeDays {0}
	To hold the age in days. More...
PesticideToxicity	m_my_pesticide
Protected Attributes inherited from TALMaSSObject
int	m_CurrentStateNo
	The basic state number for all objects - '-1' indicates death. More...
bool	m_StepDone
	Indicates whether the iterative step code is done for this timestep. More...

Additional Inherited Members
Static Public Member Functions inherited from TAnimal
static void	SetSimulationWidth (int a_value)
	Sets the simulation width. More...
static void	SetSimulationHeight (int a_value)
	Sets the simulation height. More...
static void	SetDayInYear (int a_value)
	Sets the day in year attribute. More...
static void	SetOurLandscape (Landscape *a_value)
	Sets the landscape pointer. More...
static void	SetTempToday (double a_value)
	Sets the temperature today attribute. More...
Static Public Member Functions inherited from TALMaSSObject
static void	OnArrayBoundsError ()
	Used for debugging only, tests basic object properties. More...
Public Attributes inherited from Skylark_Base
TTypesOfSkState	m_CurrentSkState
int	Age
double	m_Size
int	m_Born_x
int	m_Born_y
int	m_MyHome
	The vegetation type where the skylark was born. More...
SkTerritories *	m_OurTerritories
Skylark_Population_Manager *	m_OurPopulationManager
Static Protected Member Functions inherited from Skylark_Base
static bool	DailyMortality (int mort)
Static Protected Attributes inherited from TAnimal
static Landscape *	m_OurLandscape = nullptr
	A pointer to the landscape object shared with all TAnimal objects. More...
static int	m_SimulationWidth = 0
	A static member for the simulation width because it is often used by descendent classes. More...
static int	m_SimulationHeight = 0
	A static member for the simulation height because it is often used by descendent classes. More...
static double	m_TemperatureToday = 0.0
	A holder for the temperature today shared with all TAnimal objects. More...
static int	m_DayInYear = 0
	A holder for the day in year shared with all TAnimal objects. More...

Constructor & Destructor Documentation

Skylark_Nestling()

Skylark_Nestling::Skylark_Nestling	(	int	x,
		int	y,
		Skylark_Male *	Daddy,
		Landscape *	L,
		SkTerritories *	Terrs,
		Skylark_Population_Manager *	SPM,
		int	bx,
		int	by,
		int	mh
	)

                                                                                                              : Skylark_Base(
    x, y, Terrs, L, SPM, bx, by, mh) {
    m_Dad = Daddy;
    //Growth = 0;
    // Must choose sex
    if (g_random_fnc(2) == 1) Sex = true;
    else Sex = false; // M or F
    m_Size = MeanHatchingWeight + (g_random_fnc(25) - 11) * MeanHatchingWeight / 1000.0;
    Age = 1;
    m_EM_fail = 0;
    // From Skylarks Energy Calcs Mar05.xls
    m_EM = 0.3058 * m_Size + 0.5221;
    m_GrNeed = cfg_PEmax.value(); // No of Kcals possible to use for growth on day 1
    m_NestLeavingChance = cfg_NestLeavingChance.value();
}

References Skylark_Base::Age, cfg_NestLeavingChance, cfg_PEmax, g_random_fnc(), m_Dad, m_EM, m_EM_fail, m_GrNeed, m_NestLeavingChance, Skylark_Base::m_Size, MeanHatchingWeight, Sex, CfgInt::value(), and CfgFloat::value().

Member Function Documentation

BeginStep()

void Skylark_Nestling::BeginStep ( void  )

overridevirtual

BeingStep behaviour - must be implemented in descendent classes.

Reimplemented from TALMaSSObject.

Reimplemented in Skylark_PreFledgeling.

                                     {
    // If you are not dead already find out if you are killed today by agriculture
    if (m_CurrentStateNo != -1) CheckManagement();
}

References TAnimal::CheckManagement(), and TALMaSSObject::m_CurrentStateNo.

EndStep()

void Skylark_Nestling::EndStep ( void  )

overridevirtual

EndStep behaviour - must be implemented in descendent classes.

Reimplemented from TALMaSSObject.

Reimplemented in Skylark_PreFledgeling.

                                   {
#ifdef __CJTDebug_5
  if ( IsAlive() != 0x0DEADC0DE ) DEADCODEError();
#endif
    if (m_CurrentSkState == toss_Destroy) return;
#ifdef __CJTDebug_5
  if ( Dad )
    if ( !Dad->DoIExistN( this ) ) {
      g_land->Warn( "Skylark_Nestling::EndStep - Do I ExistN ", NULL ); exit( 1 );
    }
#endif
    switch (m_CurrentSkState)
    {
    case toss_NDeveloping: // Develop
        switch (st_Developing())
        {
        case 3:
            if (m_Dad != nullptr) m_Dad->OnNestPredatation(); // Kill the whole brood
            break;
        case 2:
#ifdef TEST_ISSUE_DEATH_WARRANT
          printf( "Skylark_Nestling::EndStep() : st_Developing() %d\n", ( int )g_date->Date() );
#endif
            m_CurrentSkState = toss_NDying; // die
            break;
        case 1:
            // Maturing must be called here because it happens the same day as develop
            st_Maturing(); // Do Maturing
            m_CurrentSkState = toss_Destroy;
            m_CurrentStateNo = -1;
            m_StepDone = true;
            break;
        }
        break;
    case toss_NDying: // Dying
        st_Dying();
        m_StepDone = true;
        break;
    default:
        /* char errornum[20]; sprintf(errornum, "%d", m_CurrentSkState );
        g_land->Warn("Skylark_Nestling::EndStep(): Unknown state: ", errornum); exit(0); */
        break;
    }
#ifdef __PESTICIDE_RA
    PesticideResponse();
#endif
}

References Calendar::Date(), g_date, g_land, Skylark_Base::m_CurrentSkState, TALMaSSObject::m_CurrentStateNo, m_Dad, TALMaSSObject::m_StepDone, Skylark_Male::OnNestPredatation(), st_Developing(), st_Dying(), st_Maturing(), and Landscape::Warn().

On_FoodSupply()

double Skylark_Nestling::On_FoodSupply ( double  food )

overridevirtual

Reimplemented from Skylark_Base.

                                                    {
#ifdef __CJTDebug_5
  if ( IsAlive() != 0xDEADC0DE )
    DEADCODEError();
#endif
 
    if (m_EM > 0) // Must maintain this
    {
        if (a_food > m_EM)
        {
            a_food -= m_EM;
            m_EM = 0;
        }
        else
        {
            m_EM -= a_food;
            a_food = 0;
        }
    }
    if (m_GrNeed > a_food)
    {
        m_GrNeed -= a_food;
        // Does the growing here
        m_Size += a_food * CE_nest[Age]; // Conv Eff is g dw insect to g ww bird
        a_food = 0;
    }
    else
    {
        // Does the growing here at the maximum allowed rate
        m_Size += m_GrNeed * CE_nest[Age]; // Conv Eff is g dw insect to g ww bird
        a_food -= m_GrNeed;
        m_GrNeed = 0;
    }
    return a_food;
}

References Skylark_Base::Age, CE_nest, m_EM, m_GrNeed, and Skylark_Base::m_Size.

Referenced by Skylark_Male::OnFoodMessage(), and Skylark_Male::st_CaringForYoung().

OnDadDead()

void Skylark_Nestling::OnDadDead

(

)

                                 {
#ifdef __CJTDebug_5
  if ( IsAlive() != 0xDEADC0DE )
    DEADCODEError();
#endif
    // Dad is dead - so must not send him a message
    // So forget who he is (messaging to Dad must be checked for NULL on sending)
    m_Dad = nullptr;
}

References m_Dad.

Referenced by Skylark_Male::OnMateDying(), Skylark_Male::OnMateLeaving(), Skylark_Male::st_Dying(), and Skylark_Male::st_ScaringOffChicks().

OnDeserted()

void Skylark_Nestling::OnDeserted

(

)

                                  {
    // Nobody to tell, nothing to do but vanish as soon as possible
    m_CurrentSkState = toss_Destroy;
    m_CurrentStateNo = -1;
#ifdef __SKPOM
  m_OurPopulationManager->WriteSKPOM2(m_OurLandscape->SupplyDayInYear(),2005);
#endif
}

References Skylark_Base::m_CurrentSkState, TALMaSSObject::m_CurrentStateNo, TAnimal::m_OurLandscape, Skylark_Base::m_OurPopulationManager, Landscape::SupplyDayInYear(), and Skylark_Population_Manager::WriteSKPOM2().

Referenced by Skylark_Male::OnBroodDesertion().

OnFarmEvent()

bool Skylark_Nestling::OnFarmEvent ( FarmToDo  )

overrideprotectedvirtual

Must be reimplemented if used in descendent classes. Sets the action on a management event.

Reimplemented from TAnimal.

Reimplemented in Skylark_PreFledgeling.

                                                 {
    switch (event)
    {
    case sleep_all_day:
        break;
// Here begins non-mortality events
    case fp_npks:
    case fp_npk:
    case fp_pk:
    case fp_k:
    case fp_p:
    case fp_ammoniumsulphate:
    case fp_manganesesulphate:
    case fp_manure:
    case fp_greenmanure:
    case fp_sludge:
    case fp_rsm:
    case fp_calcium:
    case fp_boron:
    case fp_cu:
    case fp_n:
    case fp_nc:
    case fp_nk:
    case fp_ns:
    case fp_pks:
    case fp_sk:
    case fa_npk:
    case fa_npks:
    case fa_n:
    case fa_pk:
    case fa_k:
    case fa_p:
    case fa_ammoniumsulphate:
    case fa_manganesesulphate:
    case fa_manure:
    case fa_sludge:
    case fa_rsm:
    case fa_calcium:
    case fa_boron:
    case fa_cu:
    case fa_nk:
    case fa_pks:
    case fa_sk:
    case herbicide_treat:
    case growth_regulator:
    case fungicide_treat:
    case insecticide_treat:
    case trial_insecticidetreat:
    case trial_control:
    case trial_toxiccontrol:
    case molluscicide:
    case water:
    case hay_bailing:
    case cut_weeds:
    case manual_weeding:
    case straw_covering:
    case fiber_covering:
    case fiber_removal: 
    case straw_removal:
    case product_treat:
    case glyphosate:
    case biocide:
    case org_insecticide:
    case last_treatment:
    case org_fungicide:
    case org_herbicide:
    case pheromone:
    case suckering:
        break;
// Here begins soil cultivation and cutting mortality
    case stubble_plough:
    case stubble_cultivator_heavy:
    case heavy_cultivator_aggregate:
    case autumn_harrow:
    case preseeding_cultivator:
    case preseeding_cultivator_sow:
    case autumn_roll:
    case autumn_sow:
    case autumn_sow_with_ferti:
    case burn_top:
    case flammebehandling:
    case winter_plough:
    case deep_ploughing:
    case spring_plough:
    case spring_harrow:
    case green_harvest:
    case harvestshoots:
    case shallow_harrow:
    case pruning:
    case shredding:
    case summer_harrow:
    case summer_plough:
    case summer_sow:
    case winter_harrow:
    case spring_roll:
    case spring_sow:
    case spring_sow_with_ferti:
    case autumn_plough:
    case fp_liquidNH3:
    case fa_greenmanure:
    case row_cultivation:
    case hilling_up:
    case harvest:
    case harvest_bushfruit:
    case cut_to_hay:
    case cut_to_silage:
    case straw_chopping:
    case hay_turning:
    case stubble_harrowing:
    case autumn_or_spring_plough:
    case burn_straw_stubble:
    case mow:
    case bed_forming:
    case flower_cutting:
    case bulb_harvest:
#ifdef TEST_ISSUE_DEATH_WARRANT
      printf( "Skylark_Nestling::OnFarmEvent() : %d : %d\n", event, ( int )g_date->Date() );
#endif
        m_CurrentSkState = toss_NDying;
        break;
/*\todo what is the special case with the below three? */
    case fp_slurry:
    case fa_slurry:
    case swathing:
        if (g_random_fnc(100) < 2)
        {
#ifdef TEST_ISSUE_DEATH_WARRANT
        printf( "Skylark_Nestling::OnFarmEvent() : %d : %d\n", event, ( int )g_date->Date() );
#endif
            m_CurrentSkState = toss_NDying;
        }
        break;
// Here begins spray mortality
    case syninsecticide_treat:
        if (g_random_fnc(1000) < cfg_insecticide_direct_mortN.value())
        {
#ifdef TEST_ISSUE_DEATH_WARRANT
        printf( "Skylark_Nestling::OnFarmEvent() : %d : %d\n", event, ( int )g_date->Date() );
#endif
            m_CurrentSkState = toss_NDying;
        }
        break;
// Here begins strigling mortality
    case strigling:
    case strigling_sow:
    case strigling_hill:
#ifndef __NoStriglingEffect
        if (g_random_fnc(100) < cfg_strigling_nestling.value())
        {
#ifdef TEST_ISSUE_DEATH_WARRANT
        printf( "Skylark_Nestling::OnFarmEvent() : %d : %d\n", event, ( int )g_date->Date() );
#endif
            m_CurrentSkState = toss_NDying;
            AddStriglingMort(2);
        }
#endif
        break;
// Here begins grazing mortality
    case cattle_out:
        if (m_OurLandscape->SupplyGrazingPressure(m_Location_x, m_Location_y) > 0)
            if (g_random_fnc(1000) < 20)
            {
#ifdef TEST_ISSUE_DEATH_WARRANT
          printf( "Skylark_Nestling::OnFarmEvent() : %d : %d\n", event, ( int )g_date->Date() );
#endif
                m_CurrentSkState = toss_NDying;
            }
        break;
    case cattle_out_low:
        if (m_OurLandscape->SupplyGrazingPressure(m_Location_x, m_Location_y) > 0)
            if (g_random_fnc(1000) < 5)
            {
#ifdef TEST_ISSUE_DEATH_WARRANT
          printf( "Skylark_Nestling::OnFarmEvent() : %d : %d\n", event, ( int )g_date->Date() );
#endif
                m_CurrentSkState = toss_NDying;
            }
        break;
    case pigs_out:
#ifndef __NoPigsOutEffect
        if (g_random_fnc(100) < 20)
        {
#ifdef TEST_ISSUE_DEATH_WARRANT
        printf( "Skylark_Nestling::OnFarmEvent() : %d : %d\n", event, ( int )g_date->Date() );
#endif
            m_CurrentSkState = toss_NDying;
        }
#endif
        break;
    default:
        g_land->Warn("Skylark_Nestling::OnFarmEvent(): ""Unknown event type:", m_OurLandscape->EventtypeToString(event));
        exit(1);
    }
    if (m_CurrentSkState == toss_NDying) return true;
    return false;
}

References Skylark_Base::AddStriglingMort(), autumn_harrow, autumn_or_spring_plough, autumn_plough, autumn_roll, autumn_sow, autumn_sow_with_ferti, bed_forming, biocide, bulb_harvest, burn_straw_stubble, burn_top, cattle_out, cattle_out_low, cfg_insecticide_direct_mortN, cfg_strigling_nestling, cut_to_hay, cut_to_silage, cut_weeds, Calendar::Date(), deep_ploughing, Landscape::EventtypeToString(), fa_ammoniumsulphate, fa_boron, fa_calcium, fa_cu, fa_greenmanure, fa_k, fa_manganesesulphate, fa_manure, fa_n, fa_nk, fa_npk, fa_npks, fa_p, fa_pk, fa_pks, fa_rsm, fa_sk, fa_sludge, fa_slurry, fiber_covering, fiber_removal, flammebehandling, flower_cutting, fp_ammoniumsulphate, fp_boron, fp_calcium, fp_cu, fp_greenmanure, fp_k, fp_liquidNH3, fp_manganesesulphate, fp_manure, fp_n, fp_nc, fp_nk, fp_npk, fp_npks, fp_ns, fp_p, fp_pk, fp_pks, fp_rsm, fp_sk, fp_sludge, fp_slurry, fungicide_treat, g_date, g_land, g_random_fnc(), glyphosate, green_harvest, growth_regulator, harvest, harvest_bushfruit, harvestshoots, hay_bailing, hay_turning, heavy_cultivator_aggregate, herbicide_treat, hilling_up, insecticide_treat, last_treatment, Skylark_Base::m_CurrentSkState, TAnimal::m_Location_x, TAnimal::m_Location_y, TAnimal::m_OurLandscape, manual_weeding, molluscicide, mow, org_fungicide, org_herbicide, org_insecticide, pheromone, pigs_out, preseeding_cultivator, preseeding_cultivator_sow, product_treat, pruning, row_cultivation, shallow_harrow, shredding, sleep_all_day, spring_harrow, spring_plough, spring_roll, spring_sow, spring_sow_with_ferti, straw_chopping, straw_covering, straw_removal, strigling, strigling_hill, strigling_sow, stubble_cultivator_heavy, stubble_harrowing, stubble_plough, suckering, summer_harrow, summer_plough, summer_sow, Landscape::SupplyGrazingPressure(), swathing, syninsecticide_treat, trial_control, trial_insecticidetreat, trial_toxiccontrol, CfgInt::value(), Landscape::Warn(), water, winter_harrow, and winter_plough.

OnYouHaveBeenEaten()

void Skylark_Nestling::OnYouHaveBeenEaten

(

)

                                          {
    // Nobody to tell, nothing to do but vanish as soon as possible
    m_CurrentSkState = toss_Destroy;
    m_CurrentStateNo = -1;
#ifdef __SKPOM
  m_OurPopulationManager->WriteSKPOM2(m_OurLandscape->SupplyDayInYear(),2001);
#endif
}

References Skylark_Base::m_CurrentSkState, TALMaSSObject::m_CurrentStateNo, TAnimal::m_OurLandscape, Skylark_Base::m_OurPopulationManager, Landscape::SupplyDayInYear(), and Skylark_Population_Manager::WriteSKPOM2().

Referenced by Skylark_Male::OnNestPredatation().

ReInit()

void Skylark_Nestling::ReInit ( int  x, int  y, Skylark_Male *  Daddy, Landscape *  L, SkTerritories *  Terrs, Skylark_Population_Manager *  SPM, int  bx, int  by, int  mh  )

virtual

                                                                        {
    Skylark_Base::ReInit(x, y, Terrs, L, SPM, bx, by, mh);
    m_Dad = Daddy;
    //Growth = 0;
    // Must choose sex
    if (g_random_fnc(2) == 1) Sex = true;
    else Sex = false; // M or F
    m_Size = MeanHatchingWeight + (g_random_fnc(25) - 11) * MeanHatchingWeight / 1000.0;
    Age = 1;
    m_EM_fail = 0;
    // From Skylarks Energy Calcs Mar05.xls
    m_EM = 0.3058 * m_Size + 0.5221;
    m_GrNeed = cfg_PEmax.value(); // No of Kcals possible to use for growth on day 1
    m_NestLeavingChance = cfg_NestLeavingChance.value();
}

References Skylark_Base::Age, cfg_NestLeavingChance, cfg_PEmax, g_random_fnc(), m_Dad, m_EM, m_EM_fail, m_GrNeed, m_NestLeavingChance, Skylark_Base::m_Size, MeanHatchingWeight, Skylark_Base::ReInit(), Sex, CfgInt::value(), and CfgFloat::value().

Referenced by Skylark_PreFledgeling::ReInit().

st_Developing()

int Skylark_Nestling::st_Developing ( )

protectedvirtual

Reimplemented in Skylark_PreFledgeling.

                                    {
    // On entry GrNeed is set to the remaining food that could have been eaten
    // today
#ifdef __CJTDebug_5
  if ( IsAlive() != 0x0DEADC0DE ) DEADCODEError();
#endif
    // Timing of this function call is at the last moment of each day
    if (DailyMortality(NestlingMortProb))
    {
        return 3; //send brood eaten to Dad, will call OnYouHaveBeenEaten for all nestlings
    }
    // EM will be 0 if enough food has been given
    /*
    if ( m_EM > 0 )
      {
          if ( m_EM_fail > 2 )
          {
    #ifdef __SKPOM
              m_OurPopulationManager->WriteSKPOM2( m_OurLandscape->SupplyDayInYear(), 2002 );
    #endif
              return 2; //TransferToState(Die) Did not get EM for 2 days
          }
      } else
      {
          m_EM_fail = 0; // got EM so unset flag
      }
    */
    if (Age >= 6)
    {
        if (m_Size >= NestLeavingWeight)
        {
            if (g_random_fnc(100) < m_NestLeavingChance)
            {
#ifdef __SKPOM
              m_OurPopulationManager->WriteSKPOM2( m_OurLandscape->SupplyDayInYear(), Age );
#endif
                return 1;
            }
            m_NestLeavingChance *= 4;
        }
    }
    if (Age == 11)
    {
#ifdef __SKPOM
      m_OurPopulationManager->WriteSKPOM2( m_OurLandscape->SupplyDayInYear(), 2004 );
#endif
        return 2; // Taken too long so die
    }
    Age++; // age
    // From Skylarks Energy Calcs Mar05.xls
    if (Age < 6) m_EM = 0.31 * m_Size + 0.52;
    else m_EM = 0.24 * m_Size + 6.83;
    // Below is the correction for thermoregulation (Below 4days this is really a
    // female cost - but it is subtracted here instead).
    // Assumes that 50% of the time (night) that the chicks are covered and at 36)
    //  EM += EM_nest_T[ Age ] * ( 36 - ( ( 0.5 * m_OurLandscape->SupplyTemp() ) + 18 ) );
    m_EM += EM_nest_T[Age] * (36 - m_OurLandscape->SupplyTemp());
    m_GrNeed = cfg_PEmax.value();
    return 0; // still growing and not dead
}

References Skylark_Base::Age, cfg_PEmax, Skylark_Base::DailyMortality(), EM_nest_T, g_random_fnc(), m_EM, m_GrNeed, m_NestLeavingChance, TAnimal::m_OurLandscape, Skylark_Base::m_OurPopulationManager, Skylark_Base::m_Size, NestLeavingWeight, NestlingMortProb, Landscape::SupplyDayInYear(), Landscape::SupplyTemp(), CfgFloat::value(), and Skylark_Population_Manager::WriteSKPOM2().

Referenced by EndStep().

st_Dying()

void Skylark_Nestling::st_Dying ( void  )

protectedvirtual

Reimplemented in Skylark_PreFledgeling.

                                {
#ifdef __CJTDebug_5
  if ( IsAlive() != 0x0DEADC0DE ) DEADCODEError();
#endif
    // Timing: Zero time
    // Only called before object is destroyed
    // Checks that Dad exists
    if (m_Dad != nullptr) m_Dad->OnNestlingDeath(this);
    m_CurrentSkState = toss_Destroy; // will kill it at end of step!
    m_CurrentStateNo = -1;
}

References Skylark_Base::m_CurrentSkState, TALMaSSObject::m_CurrentStateNo, m_Dad, and Skylark_Male::OnNestlingDeath().

Referenced by EndStep().

st_Maturing()

void Skylark_Nestling::st_Maturing ( )

protectedvirtual

Reimplemented in Skylark_PreFledgeling.

                                   {
#ifdef __CJTDebug_5
  if ( IsAlive() != 0x0DEADC0DE ) DEADCODEError();
#endif
    if (!m_Dad) return; // If Dad is gone then something went wrong and we died
    // Timing: Occurs at 1 minute to midnight
    // When created they must update dads pointer
    const auto fps = new PreFledgeling_struct;
    fps->x = m_Location_x;
    fps->y = m_Location_y;
    fps->size = m_Size;
    fps->Dad = m_Dad;
    fps->age = Age;
    fps->L = m_OurLandscape;
    fps->Terrs = m_OurTerritories;
    fps->sex = Sex;
    fps->bx = m_Born_x;
    fps->by = m_Born_y;
    fps->mh = m_MyHome;
    m_OurPopulationManager->CreateObjects(2, this, nullptr, fps, 1);
    delete fps;
    // m_OurPopulationManager will destroy object
}

References Skylark_Base::Age, Skylark_Population_Manager::CreateObjects(), Skylark_Base::m_Born_x, Skylark_Base::m_Born_y, m_Dad, TAnimal::m_Location_x, TAnimal::m_Location_y, Skylark_Base::m_MyHome, TAnimal::m_OurLandscape, Skylark_Base::m_OurPopulationManager, Skylark_Base::m_OurTerritories, Skylark_Base::m_Size, Sex, and Skylark_struct::x.

Referenced by EndStep().

Step()

void Skylark_Nestling::Step ( void  )

overridevirtual

Step behaviour - must be implemented in descendent classes.

Reimplemented from TALMaSSObject.

Reimplemented in Skylark_PreFledgeling.

                                {
#ifdef __CJTDebug_5
  if ( IsAlive() != 0x0DEADC0DE ) DEADCODEError();
#endif
    if (m_StepDone) return;
    switch (m_CurrentSkState)
    {
    case toss_Initiation: // Initial
        m_CurrentSkState = toss_NDeveloping;
        m_StepDone = true;
        break;
    case toss_Destroy:
        m_StepDone = true;
        break;
    case toss_NDeveloping: // Develop
        m_StepDone = true;
        break;
    case toss_NDying: // Dying
        m_StepDone = true;
        break;
    default:
        g_land->Warn("Skylark_Nestling::Step(): Unknown State ", nullptr);
        exit(1);
    }
}

References g_land, Skylark_Base::m_CurrentSkState, TALMaSSObject::m_StepDone, and Landscape::Warn().

Member Data Documentation

m_Dad

Skylark_Male* Skylark_Nestling::m_Dad

protected

Referenced by EndStep(), OnDadDead(), ReInit(), Skylark_Nestling(), st_Dying(), Skylark_PreFledgeling::st_Dying(), st_Maturing(), and Skylark_PreFledgeling::st_Maturing().

m_EM

double Skylark_Nestling::m_EM

protected

Referenced by On_FoodSupply(), ReInit(), Skylark_PreFledgeling::ReInit(), Skylark_Nestling(), Skylark_PreFledgeling::Skylark_PreFledgeling(), st_Developing(), and Skylark_PreFledgeling::st_Developing().

m_EM_fail

int Skylark_Nestling::m_EM_fail

protected

Referenced by ReInit(), and Skylark_Nestling().

m_GrNeed

double Skylark_Nestling::m_GrNeed

protected

Referenced by On_FoodSupply(), ReInit(), Skylark_PreFledgeling::ReInit(), Skylark_Nestling(), Skylark_PreFledgeling::Skylark_PreFledgeling(), st_Developing(), and Skylark_PreFledgeling::st_Developing().

m_NestLeavingChance

int Skylark_Nestling::m_NestLeavingChance

protected

Referenced by ReInit(), Skylark_Nestling(), and st_Developing().

Sex

bool Skylark_Nestling::Sex

protected

Referenced by ReInit(), Skylark_PreFledgeling::ReInit(), Skylark_Nestling(), Skylark_PreFledgeling::Skylark_PreFledgeling(), st_Maturing(), and Skylark_PreFledgeling::st_Maturing().

---

The documentation for this class was generated from the following files:

• /builds/ALMaSS/ALMaSS_MIDox/Skylark/skylarks_all.h
• /builds/ALMaSS/ALMaSS_MIDox/Skylark/skylarks_all.cpp