Partridge_Male Class Reference

The partridge male class. More...

#include <Partridge_All.h>

Inheritance diagram for Partridge_Male:

Public Member Functions
int	AmIaMember ()
	A debug function. More...
virtual void	Dying ()
	General dying handler. More...
virtual void	BeginStep (void)
	Male BeginStep. More...
virtual void	Step (void)
	Male Step. More...
virtual void	EndStep (void)
	Male EndStep. More...
virtual bool	DailyMortality ()
	Background mortality check. More...
virtual bool	OnFarmEvent (FarmToDo event)
	Management event handler. More...
virtual void	KillThis ()
	General direct mortality handler. More...
void	UnSetMate (void)
	remove mate pointer More...
virtual bool	ArePaired ()
	Are we paired? More...
Partridge_Female *	GetMate (void)
	Are we paired? More...
	Partridge_Male (int a_born_x, int a_born_y, int a_x, int a_y, Partridge_Covey *a_flock, Landscape *a_map, int a_family_counter, Partridge_Population_Manager *a_manager)
	Constructor. More...
virtual	~Partridge_Male (void)
	Destructor. More...
void	OnLookAfterKids (void)
	Message handler. More...
void	StartBreedingBehaviour (void)
	Message handler. More...
void	OnMating (Partridge_Female *a_mate)
	Message handler. More...
void	OnMateDying ()
	Message handler. More...
void	OnFoundATerrtitory ()
	Message handler. More...
void	OnChicksMatured ()
	Message handler. More...
void	OnChicksDead ()
	Message handler. More...
void	OnStoppingBreeding ()
	Message handler. More...
void	OnFemaleGivingUp ()
	Message handler. More...
void	OnMovingHome ()
	Message handler. More...
void	SetOldMate (Partridge_Female *pf)
	Set old mate pointer. More...
Partridge_Female *	GetOldMate (void)
	Supply old mate pointer. More...
void	RemoveOldMate (bool a_knockon)
	Forget any old mate. More...
Public Member Functions inherited from Partridge_Base
Partridge_Object	GetObjectType ()
	Supply object type. More...
bool	GetUncleStatus ()
	Supply uncle status. More...
void	SetUncleStatus (bool a_Status)
	Set uncle status. More...
bool	PossibleMate (Partridge_Base *a_partridge)
	Can we mate? More...
Partridge_Covey *	GetCovey (void)
	Supply covey pointer. More...
Partridge_State	GetState (void)
	Supply state. More...
void	SetState (Partridge_State a_pars)
	Set state. More...
int	GetFamily (void)
	Supply family ID. More...
int	GetAge (void)
	Supply age. More...
void	SetAge (int a_age)
	Set age. More...
long	GetID (void)
	Supply ID. More...
void	SetFamily (unsigned int family)
	Set family ID. More...
void	SetCovey (Partridge_Covey *a_covey)
	Set covey pointer. More...
void	MakeCovey ()
	Create our own covey. More...
void	SwitchCovey (Partridge_Covey *a_covey)
	Swap coveys. More...
	Partridge_Base (int a_born_x, int a_born_y, int a_x, int a_y, int a_family_counter, Partridge_Covey *a_covey, Landscape *a_map, Partridge_Population_Manager *a_manager)
	Constructor for Partridge_Base. More...
virtual	~Partridge_Base (void)
	Destructor. More...
virtual void	CopyMyself (int a_Ptype)
	Duplicate this object. More...
Public Member Functions inherited from TAnimal
unsigned	SupplyFarmOwnerRef ()
AnimalPosition	SupplyPosition ()
APoint	SupplyPoint ()
int	SupplyPolygonRef ()
int	Supply_m_Location_x ()
int	Supply_m_Location_y ()
virtual void	CopyMyself ()
void	SetX (int a_x)
void	SetY (int a_y)
	TAnimal (int x, int y, Landscape *L)
virtual void	ReinitialiseObject (int x, int y, Landscape *L)
	Used to re-use an object - must be implemented in descendent classes. More...
virtual int	WhatState ()
void	CheckManagement (void)
void	CheckManagementXY (int x, int y)
Public Member Functions inherited from TALMaSSObject
int	GetCurrentStateNo ()
	Returns the current state number. More...
void	SetCurrentStateNo (int a_num)
	Sets the current state number. More...
bool	GetStepDone ()
	Returns the step done indicator flag. More...
void	SetStepDone (bool a_bool)
	Sets the step done indicator flag. More...
virtual void	ReinitialiseObject ()
	Used to re-use an object - must be implemented in descendent classes. More...
	TALMaSSObject ()
	The constructor for TALMaSSObject. More...
virtual	~TALMaSSObject ()
	The destructor for TALMaSSObject. More...
void	OnArrayBoundsError ()
	Used for debugging only, tests basic object properties. More...

Private Member Functions
Partridge_State	MFlocking (void)
	State male flocking. More...
Partridge_State	MFindingMate (void)
	State male finding mate. More...
Partridge_State	MPairing (void)
	State male pairing. More...
Partridge_State	MGuardingMate (void)
	State male guarding mate. More...
Partridge_State	MCaringForYoung (void)
	State male caring for young. More...
Partridge_State	MFollowingMate (void)
	State male follow mate. More...
void	MDying (void)
	State male dying. More...
virtual void	CheckMatePointers ()
	A debug function. More...

Private Attributes
int	m_lifespan
	Physiological lifespan. More...
Partridge_Female *	m_MyOldWife
	Old mate pointer. More...
Partridge_Female *	m_MyMate
	Current mate pointer. More...

Additional Inherited Members
Public Attributes inherited from Partridge_Base
Partridge_Population_Manager *	m_OurPopulationManager
	Pointer to the population manager. More...
Protected Member Functions inherited from TAnimal
void	CorrectWrapRound ()
	Corrects wrap around co-ordinate problems. More...
Protected Attributes inherited from Partridge_Base
int	m_signal
	Used to pass information to outputs. More...
long	m_id
	Individual bird ID. More...
int	m_family_counter
	Family ID. More...
int	m_age
	Age in days. More...
int	m_born_x
	x-coord of birth More...
int	m_born_y
	y-coord of birth More...
bool	m_UncleStatus
	If has uncle status in the covey. More...
Partridge_Object	m_object_type
	Type of pob object this is. More...
Partridge_Covey *	m_covey
	Pointer to the covey. More...
Partridge_State	m_state
	Current behavioural state. More...
Protected Attributes inherited from TAnimal
int	m_Location_x
int	m_Location_y
Landscape *	m_OurLandscape
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...

Detailed Description

The partridge male class.

Definition at line 657 of file Partridge_All.h.

Constructor & Destructor Documentation

Partridge_Male()

Partridge_Male::Partridge_Male	(	int	a_born_x,
		int	a_born_y,
		int	a_x,
		int	a_y,
		Partridge_Covey *	a_flock,
		Landscape *	a_map,
		int	a_family_counter,
		Partridge_Population_Manager *	a_manager
	)

Constructor.

Definition at line 2183 of file Partridge_All.cpp.

                                                                      :
     Partridge_Base( a_born_x, a_born_y, a_x, a_y, a_family_counter, a_covey, a_map, a_manager )
     {
        m_MyOldWife=NULL; // Cant call removeOldMate due to knock on effects
       m_MyMate = NULL;
       m_object_type = pob_Male;
       m_lifespan = random( cfg_par_max_lifespan.value() - cfg_par_min_lifespan.value() ) + cfg_par_min_lifespan.value();
       //m_visitors_pass = false;
}

References cfg_par_max_lifespan, cfg_par_min_lifespan, m_lifespan, m_MyMate, m_MyOldWife, Partridge_Base::m_object_type, pob_Male, and CfgInt::value().

~Partridge_Male()

virtual Partridge_Male::~Partridge_Male ( void  )

inlinevirtual

Destructor.

Definition at line 728 of file Partridge_All.h.

{;}

Member Function Documentation

AmIaMember()

int Partridge_Male::AmIaMember

(

)

A debug function.

A debug function.

Definition at line 3159 of file Partridge_All.cpp.

{
  if ( m_covey->GetCurrentStateNo() == -1 )
  {
    //exit(0);
    return 1;
  }
  if ( !m_covey->IsMember( this ) ) return 2;
  return 0;
}

References TALMaSSObject::GetCurrentStateNo(), Partridge_Covey::IsMember(), and Partridge_Base::m_covey.

Referenced by Partridge_Population_Manager::DoMaleSanityCheck().

ArePaired()

virtual bool Partridge_Male::ArePaired ( )

inlinevirtual

Are we paired?

Reimplemented from Partridge_Base.

Definition at line 713 of file Partridge_All.h.

                             {
        if (m_MyMate!=NULL) return true;
        return false;
    }

References m_MyMate.

BeginStep()

void Partridge_Male::BeginStep ( void  )

virtual

Male BeginStep.

The BeginStep code for the male partridge. Its only function is the test for mortality of different kinds. Might as well remove him here than waste CPU time thinking about the Step code later this time-step.

Reimplemented from TAnimal.

Definition at line 2202 of file Partridge_All.cpp.

{
#ifdef __PAR_DEBUG
  CheckMatePointers();
#endif
  m_age++; // Get a day older
  if ( m_age >= m_lifespan )
  {
    m_signal = 0;
    MDying();
  }
  else if ( !DailyMortality() ) CheckManagement();
  else
  {
    m_signal = 1;
    MDying();
  }
#ifdef __PAR_DEBUG
  CheckMatePointers();
#endif
}

References TAnimal::CheckManagement(), CheckMatePointers(), DailyMortality(), Partridge_Base::m_age, m_lifespan, Partridge_Base::m_signal, and MDying().

CheckMatePointers()

void Partridge_Male::CheckMatePointers ( )

privatevirtual

A debug function.

This is a debug function.

Reimplemented from Partridge_Base.

Definition at line 2800 of file Partridge_All.cpp.

{
  //**CJT** DEBUG
  if ( m_MyMate )
  {
    // Check for mutual pointers here
    if ( m_MyMate->GetMate() != this )
    {
      m_OurLandscape->Warn( "Partridge_Male::CheckMatePointers(): ""Non-mutual mate pointers", "" );
      exit( 1 );
    }
    if ( m_state == pars_MFlocking )
    {
      m_OurLandscape->Warn( "Partridge_Male::CheckMatePointers(): ""Mated & Flocking", "" );
      exit( 1 );
    }
    if ( m_MyMate->GetCurrentStateNo() == -1 )
    {
      m_OurLandscape->Warn( "Partridge_Male::CheckMatePointers(): ""Dead Mate", "" );
      exit( 1 );
    }
  }
}

References TALMaSSObject::GetCurrentStateNo(), Partridge_Female::GetMate(), m_MyMate, TAnimal::m_OurLandscape, Partridge_Base::m_state, pars_MFlocking, and Landscape::Warn().

Referenced by BeginStep(), MFindingMate(), MFollowingMate(), MPairing(), OnFemaleGivingUp(), OnLookAfterKids(), OnMateDying(), OnMating(), and Step().

DailyMortality()

bool Partridge_Male::DailyMortality ( void  )

virtual

Background mortality check.

Test for background mortality - identical to the female except that the male responds to female activity.

Reimplemented from Partridge_Base.

Definition at line 2446 of file Partridge_All.cpp.

{
 
  double chance = g_rand_uni();
  double extramort=1.0;
 
// extra mortality chance if in a covey alone
  if ( m_covey->GetCoveySize() == 1 )
  {
    extramort=cfg_par_adult_mortality_alone.value();
  }
    // Winter mortality between April and Sept
    int today = m_OurLandscape->SupplyDayInYear();
    // If the female is looking for a territory then the mortality is higher
    if (m_MyMate!=NULL)  {
        if (m_MyMate->WhatState()==pars_FFindingTerritory) {
            if ( chance < cfg_par_adult_mortalitySpring.value() ) return true;
            return false;
        }
    }
    // Is it winter?
    if (( ( today >= October ) || ( today < April )) ) {
        if (m_OurPopulationManager->SupplyShouldFlock())  { // We are in the "Winter Period"
            if ( chance < cfg_par_adult_mortalityWinter.value()*extramort ) {
                return true;
            } else return false;
        } else { // Finding territory value
            if ( chance < cfg_par_adult_mortalitySpring.value()*extramort ) {
                return true;
            } else return false;
        }
    } else // Not winter and not finding territory
    {
            if ( chance < (cfg_par_adult_mortalitySummer.value()*extramort) ) return true;
    }
  return false;
 
}

References April, cfg_par_adult_mortality_alone, cfg_par_adult_mortalitySpring, cfg_par_adult_mortalitySummer, cfg_par_adult_mortalityWinter, g_rand_uni, Partridge_Covey::GetCoveySize(), Partridge_Base::m_covey, m_MyMate, TAnimal::m_OurLandscape, Partridge_Base::m_OurPopulationManager, October, pars_FFindingTerritory, Landscape::SupplyDayInYear(), Partridge_Population_Manager::SupplyShouldFlock(), CfgFloat::value(), and TAnimal::WhatState().

Referenced by BeginStep().

Dying()

virtual void Partridge_Male::Dying ( )

inlinevirtual

General dying handler.

Reimplemented from TAnimal.

Definition at line 687 of file Partridge_All.h.

                         {
        MDying();
    }

References MDying().

EndStep()

void Partridge_Male::EndStep ( void  )

virtual

Male EndStep.

Male EndStep - nothing to do here. Currently just checks for unknown states.

Reimplemented from TAnimal.

Definition at line 2285 of file Partridge_All.cpp.

{
  switch ( m_state )
  {
    case pars_Initiation:
    case pars_MFlocking:
    case pars_MFindingMate:
    case pars_MPairing:
    case pars_MGuardingMate:
    case pars_MFollowingMate:
    case pars_MCaringForYoung:
    case pars_MDying:
    case pars_Destroy:
    break;
    default:
      m_OurLandscape->Warn( "Partridge_Male::EndStep - unknown pars type", NULL );
      exit( 1 );
  }
}

References TAnimal::m_OurLandscape, Partridge_Base::m_state, pars_Destroy, pars_Initiation, pars_MCaringForYoung, pars_MDying, pars_MFindingMate, pars_MFlocking, pars_MFollowingMate, pars_MGuardingMate, pars_MPairing, and Landscape::Warn().

GetMate()

Partridge_Female* Partridge_Male::GetMate ( void  )

inline

Are we paired?

Definition at line 719 of file Partridge_All.h.

                                       {
        return m_MyMate;
    }

References m_MyMate.

Referenced by Partridge_Covey::ArePaired(), Partridge_Female::CheckMatePointers(), Partridge_Covey::FindMeAHusband(), and Partridge_Communication::PassMessage().

GetOldMate()

Partridge_Female* Partridge_Male::GetOldMate ( void  )

inline

Supply old mate pointer.

Definition at line 757 of file Partridge_All.h.

                                          {
        return m_MyOldWife;
    }

References m_MyOldWife.

Referenced by Partridge_Communication::PassMessage().

KillThis()

virtual void Partridge_Male::KillThis ( )

inlinevirtual

General direct mortality handler.

Reimplemented from TAnimal.

Definition at line 703 of file Partridge_All.h.

                            {
        MDying();
    }

References MDying().

Referenced by Partridge_Population_Manager::DoFirst().

MCaringForYoung()

Partridge_State Partridge_Male::MCaringForYoung ( void  )

private

State male caring for young.

This simple ensures that there is a call to a foraging movement, the size of which is dependent upon the age of the young.

Definition at line 2617 of file Partridge_All.cpp.

{
  // dist move is calculated as a function of chick food need-
  // First get the chick age
  int ch_age = m_covey->GetChickAge();
  m_covey->MoveDistance( g_MaxWalk[ch_age], 10, 10000 );
  return pars_MCaringForYoung;
}

References g_MaxWalk, Partridge_Covey::GetChickAge(), Partridge_Base::m_covey, Partridge_Covey::MoveDistance(), and pars_MCaringForYoung.

Referenced by Step().

MDying()

void Partridge_Male::MDying ( void  )

private

State male dying.

Do the housekeeping for dying.

Definition at line 2630 of file Partridge_All.cpp.

{
 
  if ( m_CurrentStateNo != -1 )
  { // Don't kill me twice
    // Tell my mate if I have one
    if ( m_MyMate )
    {
      // The line below is really debug information, this identifies the caller
      m_OurPopulationManager->m_comms_data->m_male = this;
      //  Call the female via the message centre
      m_OurPopulationManager->m_comms_data->m_female = m_MyMate;
      m_OurPopulationManager->m_messagecentre.PassMessage( m_OurPopulationManager->m_comms_data, pcomm_MaleDying );
      m_MyMate = NULL;
    }
    RemoveOldMate(false);
    m_CurrentStateNo = -1;
    m_StepDone = true;
    //m_covey->SanityCheck2(m_covey->GetOurChicks() );
 
    m_covey->RemoveMember( this );
    m_state = pars_Destroy;
    m_OurPopulationManager->m_Ourkfactors->m_ThisYear->incNoDeadMales();
    //  m_OurPopulationManager->WriteParAdMort( m_OurLandscape->SupplyGlobalDate(), m_age, 0, m_signal );
  }
}

References population_attributes::incNoDeadMales(), Partridge_Population_Manager::m_comms_data, Partridge_Base::m_covey, TALMaSSObject::m_CurrentStateNo, PartridgeCommunicationData::m_female, PartridgeCommunicationData::m_male, Partridge_Population_Manager::m_messagecentre, m_MyMate, Partridge_Population_Manager::m_Ourkfactors, Partridge_Base::m_OurPopulationManager, Partridge_Base::m_state, TALMaSSObject::m_StepDone, k_factors::m_ThisYear, pars_Destroy, Partridge_Communication::PassMessage(), pcomm_MaleDying, Partridge_Covey::RemoveMember(), and RemoveOldMate().

Referenced by BeginStep(), Dying(), KillThis(), and OnFarmEvent().

MFindingMate()

Partridge_State Partridge_Male::MFindingMate ( void  )

private

State male finding mate.

Caused by being unpaired on covey dissolve, he must find a mate. If the date is early then he'll try to hop into a nearby covey to find a mate if there is one. Later he goes on a more desparate search alone (which incurs a higher mortality if unsuccessful see Partridge_Male::DailyMortality.

Definition at line 2499 of file Partridge_All.cpp.

{
    if ( m_UncleStatus )
    {
        // This is no good - he can't stay an uncle anymore - must leave
        m_covey->RemoveMember( this );
        MakeCovey();
        m_UncleStatus = false; // just in case
        return pars_MFlocking; // this will send him back here eventually.
    }
    if ( m_OurPopulationManager->SupplyShouldFlock() )
    {
        m_UncleStatus = false; // just in case
        m_covey->SetFixed( false ); // ensure we do not have a fixed territory loc
        //}
        return pars_MFlocking;
    }
  // Depends on the date what happens.
  // If early then he will keep hopping if possible, if late and breeding is
  // starting then he must wander.
  //
  if ( ( cfg_par_start_dissolve.value() + 30 ) > m_OurLandscape->SupplyDayInYear() )
  {
    // Still early so we need a list of possible coveys to hop to
    if ( m_OurPopulationManager->FillCoveyNeigbourList( m_covey, 500, m_Location_x, m_Location_y ) )
    {
      Partridge_Covey * pc = m_covey->FindNeighbour();
      if ( pc )
      {
        m_MyMate = pc->FindMeAMateInCovey( m_family_counter );
        if ( m_MyMate )
        {
          m_covey->RemoveMember( this ); // NB the next two lines MUST come after a call to RemoveMember for adults if they are not dying
          m_UncleStatus = false;
          MakeCovey(); // Has his own now.
        }
      }
    }
  }
  else
  {
    // Must leave the covey he is with if he is not already alone
    if ( m_covey->GetCoveySize() > 1 )
    {
      m_covey->RemoveMember( this );
//      m_visitors_pass = false;
      m_UncleStatus = false;
      MakeCovey();
    }
    m_covey->FlyTo( cfg_par_MaleFlyingDistance.value() );
    m_MyMate = m_covey->FindMateInArea( cfg_par_MaleMateSearchArea.value() );
  }
  // If he has found a mate he will have made his covey and now calls her to him
  if ( m_MyMate )  {
    // The line below is really debug information, this identifies the caller
    m_OurPopulationManager->m_comms_data->m_male = this;
    //  Call the female via the message centre
    m_OurPopulationManager->m_comms_data->m_female = m_MyMate;
    m_OurPopulationManager->m_comms_data->m_covey = m_covey;
    // This message also sets the females covey to the male's
    m_OurPopulationManager->m_messagecentre.PassMessage( m_OurPopulationManager->m_comms_data, pcomm_Mating );
#ifdef __PAR_DEBUG
    CheckMatePointers();
#endif
    if ( !m_MyMate->HaveTerritory() ) return pars_MFollowingMate;
    return pars_MGuardingMate;
  }
  return pars_MFindingMate;
}

References cfg_par_MaleFlyingDistance, cfg_par_MaleMateSearchArea, cfg_par_start_dissolve, CheckMatePointers(), Partridge_Population_Manager::FillCoveyNeigbourList(), Partridge_Covey::FindMateInArea(), Partridge_Covey::FindMeAMateInCovey(), Partridge_Covey::FindNeighbour(), Partridge_Covey::FlyTo(), Partridge_Covey::GetCoveySize(), Partridge_Female::HaveTerritory(), Partridge_Population_Manager::m_comms_data, PartridgeCommunicationData::m_covey, Partridge_Base::m_covey, Partridge_Base::m_family_counter, PartridgeCommunicationData::m_female, TAnimal::m_Location_x, TAnimal::m_Location_y, PartridgeCommunicationData::m_male, Partridge_Population_Manager::m_messagecentre, m_MyMate, TAnimal::m_OurLandscape, Partridge_Base::m_OurPopulationManager, Partridge_Base::m_UncleStatus, Partridge_Base::MakeCovey(), pars_MFindingMate, pars_MFlocking, pars_MFollowingMate, pars_MGuardingMate, Partridge_Communication::PassMessage(), pcomm_Mating, Partridge_Covey::RemoveMember(), Partridge_Covey::SetFixed(), Landscape::SupplyDayInYear(), Partridge_Population_Manager::SupplyShouldFlock(), and CfgInt::value().

Referenced by Step().

MFlocking()

Partridge_State Partridge_Male::MFlocking ( void  )

private

State male flocking.

Flocking. Do Nothing but wait for the covey to tell us OnStartBreedingBehaviour

Definition at line 2489 of file Partridge_All.cpp.

{
  m_covey->MoveDistance( 1000, 10, 10000 );
  return pars_MFlocking;
}

References Partridge_Base::m_covey, Partridge_Covey::MoveDistance(), and pars_MFlocking.

Referenced by Step().

MFollowingMate()

Partridge_State Partridge_Male::MFollowingMate ( void  )

private

State male follow mate.

Will enter this state if he is paired, but the female has not yet found a territory.
Waits here until the mate has found a territory

Definition at line 2587 of file Partridge_All.cpp.

{
#ifdef __PAR_DEBUG
  CheckMatePointers();
 
#endif
  if ( !m_MyMate->HaveTerritory() ) return pars_MFollowingMate;
  return pars_MGuardingMate;
}

References CheckMatePointers(), Partridge_Female::HaveTerritory(), m_MyMate, pars_MFollowingMate, and pars_MGuardingMate.

Referenced by Step().

MGuardingMate()

Partridge_State Partridge_Male::MGuardingMate ( void  )

private

State male guarding mate.

He will sit here until he is told to do otherwise - either mate dead, eggs have hatched or female given up.

Definition at line 2605 of file Partridge_All.cpp.

{
  return pars_MGuardingMate;
}

References pars_MGuardingMate.

Referenced by Step().

MPairing()

Partridge_State Partridge_Male::MPairing ( void  )

private

State male pairing.

If he has a territory then he is must go to mate guarding otherwise he must carry on and find one by following her lead.

Definition at line 2576 of file Partridge_All.cpp.

{
#ifdef __PAR_DEBUG
  CheckMatePointers();
 
#endif
  if ( m_MyMate->HaveTerritory() ) return pars_MGuardingMate;
  return pars_MFollowingMate;
}

References CheckMatePointers(), Partridge_Female::HaveTerritory(), m_MyMate, pars_MFollowingMate, and pars_MGuardingMate.

Referenced by Step().

OnChicksDead()

void Partridge_Male::OnChicksDead

(

void

)

Message handler.

Response to pcomm_AllChicksDead message arriving when the last chick dies.

Definition at line 2689 of file Partridge_All.cpp.

{
  m_MyMate = NULL;
  m_state = pars_MFlocking;
}

References m_MyMate, Partridge_Base::m_state, and pars_MFlocking.

Referenced by Partridge_Communication::PassMessage().

OnChicksMatured()

void Partridge_Male::OnChicksMatured

(

void

)

Message handler.

Response to pcomm_ChicksMature message arriving when the last chick matures.

Definition at line 2699 of file Partridge_All.cpp.

{
  m_MyMate = NULL;
  m_state = pars_MFlocking;
}

References m_MyMate, Partridge_Base::m_state, and pars_MFlocking.

Referenced by Partridge_Communication::PassMessage().

OnFarmEvent()

bool Partridge_Male::OnFarmEvent ( FarmToDo  event )

virtual

Management event handler.

Check for and respond to management events.

Reimplemented from TAnimal.

Definition at line 2309 of file Partridge_All.cpp.

{
  switch ( event )
  {
    case sleep_all_day:
    break;
    case autumn_plough:
    break;
    case autumn_harrow:
    break;
    case autumn_roll:
    break;
    case autumn_sow:
    break;
    case winter_plough:
    break;
    case deep_ploughing:
    break;
    case spring_plough:
    break;
    case spring_harrow:
    break;
    case spring_roll:
    break;
    case spring_sow:
    break;
    case fp_npks:
    break;
    case fp_npk:
    break;
    case fp_pk:
    break;
    case fp_liquidNH3:
    break;
    case fp_slurry:
    break;
    case fp_manganesesulphate:
    break;
    case fp_manure:
    break;
    case fp_greenmanure:
    break;
    case fp_sludge:
    break;
    case fa_npk:
    break;
    case fa_pk:
    break;
    case fa_slurry:
    break;
    case fa_ammoniumsulphate:
    break;
    case fa_manure:
    break;
    case fa_greenmanure:
    break;
    case fa_sludge:
    break;
    case glyphosate:
    case herbicide_treat:
    break;
    case growth_regulator:
    break;
    case fungicide_treat:
    break;
    case syninsecticide_treat:
    case insecticide_treat:
    case product_treat:
    break;
    case molluscicide:
    break;
    case row_cultivation:
    break;
    case strigling:
      if ( g_rand_uni() < 0.01 ) MDying();
    break;
    case hilling_up:
    break;
    case water:
    break;
    case swathing:
    break;
    case harvest:
      if ( g_rand_uni() < cfg_par_ad_cut.value() ) MDying();
    break;
    case cattle_out:
    break;
    case cattle_out_low:
    break;
    case cut_to_hay:
      if ( g_rand_uni() < cfg_par_ad_cut.value() ) MDying();
    break;
    case cut_to_silage:
      if ( g_rand_uni() < cfg_par_ad_cut.value() ) MDying();
    break;
    case straw_chopping:
    break;
    case hay_turning:
    break;
    case hay_bailing:
      if ( g_rand_uni() < cfg_par_ad_cut.value() ) MDying();
    break;
    case stubble_harrowing:
    break;
    case autumn_or_spring_plough:
    break;
    case burn_straw_stubble:
    break;
    case mow:
      if ( g_rand_uni() < cfg_par_ad_cut.value() ) MDying();
    break;
    case cut_weeds:
      if ( g_rand_uni() < cfg_par_ad_cut.value() ) MDying();
    break;
    case pigs_out:
    break;
    case strigling_sow:
      if ( g_rand_uni() < 0.01 ) MDying();
    break;
    default:
      m_OurLandscape->Warn( "Skylark_Clutch::OnFarmEvent(): Unknown event type:", m_OurLandscape->EventtypeToString( event ) );
      exit( 1 );
  }
  // Must incorporate a test here in case the animal is dead - killing it twice
  // can be a bad idea
  if ( m_state == pars_Destroy ) return true;
  else
    return false;
}

References autumn_harrow, autumn_or_spring_plough, autumn_plough, autumn_roll, autumn_sow, burn_straw_stubble, cattle_out, cattle_out_low, cfg_par_ad_cut, cut_to_hay, cut_to_silage, cut_weeds, deep_ploughing, Landscape::EventtypeToString(), fa_ammoniumsulphate, fa_greenmanure, fa_manure, fa_npk, fa_pk, fa_sludge, fa_slurry, fp_greenmanure, fp_liquidNH3, fp_manganesesulphate, fp_manure, fp_npk, fp_npks, fp_pk, fp_sludge, fp_slurry, fungicide_treat, g_rand_uni, glyphosate, growth_regulator, harvest, hay_bailing, hay_turning, herbicide_treat, hilling_up, insecticide_treat, TAnimal::m_OurLandscape, Partridge_Base::m_state, MDying(), molluscicide, mow, pars_Destroy, pigs_out, product_treat, row_cultivation, sleep_all_day, spring_harrow, spring_plough, spring_roll, spring_sow, straw_chopping, strigling, strigling_sow, stubble_harrowing, swathing, syninsecticide_treat, CfgFloat::value(), Landscape::Warn(), water, and winter_plough.

OnFemaleGivingUp()

void Partridge_Male::OnFemaleGivingUp

(

)

Message handler.

Response to a pcomm_FemaleGivingUp message received if the female gives up during territory finding.

Definition at line 2783 of file Partridge_All.cpp.

{
#ifdef __PAR_DEBUG
  CheckMatePointers();
 
#endif
    m_MyMate = NULL;
    RemoveOldMate(false);
    m_state = pars_MFlocking;
    m_covey->SetFixed( false );
}

References CheckMatePointers(), Partridge_Base::m_covey, m_MyMate, Partridge_Base::m_state, pars_MFlocking, RemoveOldMate(), and Partridge_Covey::SetFixed().

Referenced by Partridge_Communication::PassMessage().

OnFoundATerrtitory()

void Partridge_Male::OnFoundATerrtitory

(

)

Message handler.

OnLookAfterKids()

void Partridge_Male::OnLookAfterKids

(

void

)

Message handler.

Response to pcomm_EggsHatch message arriving on clutch hatching.

Definition at line 2675 of file Partridge_All.cpp.

{
  // He doesn't actually do anything, just records that fact that this is
  // what his biological counterpart would be doing now.
  m_state = pars_MCaringForYoung;
#ifdef __PAR_DEBUG
  CheckMatePointers();
#endif
}

References CheckMatePointers(), Partridge_Base::m_state, and pars_MCaringForYoung.

Referenced by Partridge_Communication::PassMessage().

OnMateDying()

void Partridge_Male::OnMateDying

(

)

Message handler.

Response to a pcomm_MumDeadC message received when the female dies.

Definition at line 2761 of file Partridge_All.cpp.

{
#ifdef __PAR_DEBUG
  CheckMatePointers();
 
#endif
    RemoveOldMate(false);
    m_MyMate = NULL;
    // This will send him to finding a mate if it is early, otherwise
    // indirectly to flocking unless he still has kids in which case he has to
    // look after them
    //
    if ( m_covey->GetOurChicks() == 0 ) m_state = pars_MFindingMate;
}

References CheckMatePointers(), Partridge_Covey::GetOurChicks(), Partridge_Base::m_covey, m_MyMate, Partridge_Base::m_state, pars_MFindingMate, and RemoveOldMate().

Referenced by Partridge_Communication::PassMessage().

OnMating()

void Partridge_Male::OnMating

(

Partridge_Female *

a_mate

)

Message handler.

Arrives here following pcomm_MatingM message from Partridge_Population_Manager::DissolveCovey.

Definition at line 2738 of file Partridge_All.cpp.

{
#ifdef __PAR_DEBUG
  if ( m_MyMate != NULL )
  {
    m_OurLandscape->Warn( "Partridge_Male::OnMating(): ""m_MyMate is not NULL on Mating", "" );
    exit( 1 );
  }
#endif
    m_MyMate = a_mate;
    RemoveOldMate(false);
    m_state = pars_MPairing;
    SetFamily( m_MyMate->GetFamily() ); // synchronize families
#ifdef __PAR_DEBUG
  CheckMatePointers();
#endif
 
}

References CheckMatePointers(), Partridge_Base::GetFamily(), m_MyMate, TAnimal::m_OurLandscape, Partridge_Base::m_state, pars_MPairing, RemoveOldMate(), Partridge_Base::SetFamily(), and Landscape::Warn().

Referenced by Partridge_Communication::PassMessage().

OnMovingHome()

void Partridge_Male::OnMovingHome

(

void

)

Message handler.

A pcomm_MovingHome message from the female if she cannot find a nest location in the current 'territory'.

Definition at line 2729 of file Partridge_All.cpp.

{
  m_state = pars_MGuardingMate;
}

References Partridge_Base::m_state, and pars_MGuardingMate.

Referenced by Partridge_Communication::PassMessage().

OnStoppingBreeding()

void Partridge_Male::OnStoppingBreeding

(

void

)

Message handler.

Response to the pcomm_StoppingBreeding message, caused by the female giving up breeding.

Definition at line 2709 of file Partridge_All.cpp.

{
  m_MyMate = NULL;
  m_state = pars_MFlocking;
 
}

References m_MyMate, Partridge_Base::m_state, and pars_MFlocking.

Referenced by Partridge_Communication::PassMessage().

RemoveOldMate()

void Partridge_Male::RemoveOldMate

(

bool

a_knockon

)

Forget any old mate.

Removes a memory of the old mate. If knockon is true this is reciprocal.

Definition at line 2661 of file Partridge_All.cpp.

                                                   {
      if (m_MyOldWife!= NULL) {
          if (!a_knockon) m_MyOldWife->RemoveOldMate(true);
          m_MyOldWife= NULL;
      }
  }

References m_MyOldWife, and Partridge_Female::RemoveOldMate().

Referenced by MDying(), OnFemaleGivingUp(), OnMateDying(), OnMating(), Partridge_Communication::PassMessage(), Partridge_Female::RemoveOldMate(), and StartBreedingBehaviour().

SetOldMate()

void Partridge_Male::SetOldMate ( Partridge_Female *  pf )

inline

Set old mate pointer.

Definition at line 752 of file Partridge_All.h.

                                            {
        m_MyOldWife=pf;
    }

References m_MyOldWife.

Referenced by Partridge_Female::FLaying().

StartBreedingBehaviour()

void Partridge_Male::StartBreedingBehaviour

(

void

)

Message handler.

Got this message from Partridge_Population_Manager::DissolveCovey because he has no mate and covey dissolve has happended.

Definition at line 2719 of file Partridge_All.cpp.

{
    m_state = pars_MFindingMate;
    RemoveOldMate(false);
}

References Partridge_Base::m_state, pars_MFindingMate, and RemoveOldMate().

Referenced by Partridge_Population_Manager::DissolveCovey().

Step()

void Partridge_Male::Step ( void  )

virtual

Male Step.

Male Step code is where all his behaviour is carried out.

Reimplemented from TAnimal.

Definition at line 2228 of file Partridge_All.cpp.

{
#ifdef __PAR_DEBUG
  CheckMatePointers();
 
#endif
  if ( m_CurrentStateNo == -1 || m_StepDone )
    return;
  switch ( m_state )
  {
    case pars_Initiation:
      m_state = pars_MFlocking;
    break;
    case pars_MFlocking:
      m_state = MFlocking();
      m_StepDone = true;
    break;
    case pars_MFindingMate:
      m_state = MFindingMate();
      m_StepDone = true;
    break;
    case pars_MPairing:
      m_state = MPairing();
      m_StepDone = true;
    break;
    case pars_MGuardingMate:
      m_state = MGuardingMate();
      m_StepDone = true;
    break;
    case pars_MCaringForYoung:
      m_state = MCaringForYoung();
      m_StepDone = true;
    break;
    case pars_MDying:
    case pars_Destroy:
      m_StepDone = true;
    break;
    case pars_MFollowingMate:
      m_state = MFollowingMate();
      m_StepDone = true;
    break;
    default:
      m_OurLandscape->Warn( "Partridge_Male::Step - unknown pars type", NULL );
      exit( 1 );
  }
#ifdef __PAR_DEBUG
  CheckMatePointers();
#endif
}

References CheckMatePointers(), TALMaSSObject::m_CurrentStateNo, TAnimal::m_OurLandscape, Partridge_Base::m_state, TALMaSSObject::m_StepDone, MCaringForYoung(), MFindingMate(), MFlocking(), MFollowingMate(), MGuardingMate(), MPairing(), pars_Destroy, pars_Initiation, pars_MCaringForYoung, pars_MDying, pars_MFindingMate, pars_MFlocking, pars_MFollowingMate, pars_MGuardingMate, pars_MPairing, and Landscape::Warn().

UnSetMate()

void Partridge_Male::UnSetMate ( void  )

inline

remove mate pointer

Definition at line 708 of file Partridge_All.h.

                           {
        m_MyMate=NULL;
    }

References m_MyMate.

Member Data Documentation

m_lifespan

int Partridge_Male::m_lifespan

private

Physiological lifespan.

Definition at line 674 of file Partridge_All.h.

Referenced by BeginStep(), and Partridge_Male().

m_MyMate

Partridge_Female* Partridge_Male::m_MyMate

private

Current mate pointer.

Definition at line 678 of file Partridge_All.h.

Referenced by ArePaired(), CheckMatePointers(), DailyMortality(), GetMate(), MDying(), MFindingMate(), MFollowingMate(), MPairing(), OnChicksDead(), OnChicksMatured(), OnFemaleGivingUp(), OnMateDying(), OnMating(), OnStoppingBreeding(), Partridge_Male(), and UnSetMate().

m_MyOldWife

Partridge_Female* Partridge_Male::m_MyOldWife

private

Old mate pointer.

Definition at line 676 of file Partridge_All.h.

Referenced by GetOldMate(), Partridge_Male(), RemoveOldMate(), and SetOldMate().

---

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

• C:/Repo/ALMaSS_All/Partridge/Partridge_All.h
• C:/Repo/ALMaSS_All/Partridge/Partridge_All.cpp