Skylark_Clutch Class Reference

#include <skylarks_all.h>

Public Member Functions
virtual void	BeginStep (void)
	BeingStep behaviour - must be implemented in descendent classes. More...
virtual void	Step (void)
	Step behaviour - must be implemented in descendent classes. More...
virtual void	EndStep (void)
	EndStep behaviour - must be implemented in descendent classes. More...
	Skylark_Clutch (Skylark_Female *Mum, SkTerritories *Terrs, Landscape *L, int NoEggs, int x, int y, int mh, Skylark_Population_Manager *SPM)
virtual void	ReInit (Skylark_Female *Mum, SkTerritories *Terrs, Landscape *L, int NoEggs, int x, int y, int mh, Skylark_Population_Manager *SPM)
void	OnMumGone ()
void	AddEgg ()
void	StartDeveloping ()
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)
virtual double	On_FoodSupply (double)
void	AddStriglingMort (int lifestage)
virtual int	WhatState ()
bool	InSquare (rectangle R)
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	KillThis ()
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 void	Dying ()
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...

Public Attributes
int	Clutch_Size
Skylark_Female *	Mother
Public Attributes inherited from Skylark_Base
double	m_pesticide_accumulation
double	m_pcide_conc
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

Protected Member Functions
int	st_Developing ()
int	st_Hatching ()
void	st_Dying ()
virtual bool	OnFarmEvent (FarmToDo event)
Protected Member Functions inherited from Skylark_Base
bool	DailyMortality (int mort)
virtual void	PesticideResponse ()
Protected Member Functions inherited from TAnimal
void	CorrectWrapRound ()
	Corrects wrap around co-ordinate problems. More...

Protected Attributes
int	MinDegrees
int	m_baddays
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...

Constructor & Destructor Documentation

Skylark_Clutch()

Skylark_Clutch::Skylark_Clutch	(	Skylark_Female *	Mum,
		SkTerritories *	Terrs,
		Landscape *	L,
		int	NoEggs,
		int	x,
		int	y,
		int	mh,
		Skylark_Population_Manager *	SPM
	)

                                                      : Skylark_Base( x, y, Terrs, L, SPM, x, y, m_MyHome ) {
       Age = 0;
       Clutch_Size = NoEggs;
       MinDegrees = 0;
       Mother = Mum;
       m_baddays = 0;
}

References Skylark_Base::Age, Clutch_Size, m_baddays, MinDegrees, and Mother.

Member Function Documentation

AddEgg()

void Skylark_Clutch::AddEgg ( )

inline

  {
    Clutch_Size++;
  }

Referenced by Skylark_Female::st_Laying().

BeginStep()

void Skylark_Clutch::BeginStep ( void  )

virtual

BeingStep behaviour - must be implemented in descendent classes.

Reimplemented from TAnimal.

                                     {
  CheckManagement();
}

References TAnimal::CheckManagement().

EndStep()

void Skylark_Clutch::EndStep ( void  )

virtual

EndStep behaviour - must be implemented in descendent classes.

Reimplemented from TAnimal.

                                   {
#ifdef __CJTDebug_5
  if ( IsAlive() != 0x0DEADC0DE ) DEADCODEError();
#endif
  if ( m_CurrentSkState == toss_Destroy ) return;
  switch ( m_CurrentSkState ) {
    case toss_Initiation:
    break;
    case toss_Developing: // Develop
      switch ( st_Developing() ) {
        case 2:
#ifdef TEST_ISSUE_DEATH_WARRANT
          printf( "Skylark_Clutch::EndStep() st_Developing() %d\n", ( int )g_date->Date() );
#endif
          m_CurrentSkState = toss_CDying; // die
        break;
        case 1:
          m_CurrentSkState = toss_Hatching; // hatch
        break;
        case 0:
        break;
      }
    break;
    case toss_Hatching: // Hatching
      switch ( st_Hatching() ) {
        case 0:
#ifdef TEST_ISSUE_DEATH_WARRANT
          printf( "Skylark_Clutch::EndStep() st_Hatching() %d\n", ( int )g_date->Date() );
#endif
          m_CurrentSkState = toss_CDying;
        break;
        case 1: // Successful hatch
          m_CurrentSkState = toss_Destroy; // will kill it at end of step!
          m_CurrentStateNo = -1;
          m_StepDone = true; // otherwise it will loop forever
        break;
      }
    break;
    case toss_CDying: // Dying
      st_Dying();
      m_StepDone = true;
    break;
    default:
      char errornum[ 20 ];
      sprintf( errornum, "%d", m_CurrentSkState );
      g_land->Warn( "Skylark_Clutch::EndStep(): Unknown state: ", errornum );
      exit( 0 );
    break;
  }
}

References g_land, Skylark_Base::m_CurrentSkState, TALMaSSObject::m_CurrentStateNo, TALMaSSObject::m_StepDone, st_Developing(), st_Dying(), st_Hatching(), toss_CDying, toss_Destroy, toss_Developing, toss_Hatching, toss_Initiation, and Landscape::Warn().

OnFarmEvent()

bool Skylark_Clutch::OnFarmEvent ( FarmToDo  event )

protectedvirtual

Reimplemented from TAnimal.

                                                 {
  switch ( event ) {
    case sleep_all_day:
    break;
    case autumn_plough:
    case autumn_harrow:
    case autumn_roll:
    case autumn_sow:
    case winter_plough:
    case deep_ploughing:
    case spring_plough:
    case spring_harrow:
    case spring_roll:
    case spring_sow:
    case fp_liquidNH3:
    case fp_greenmanure:
    case row_cultivation:
    case hilling_up:
    case harvest:
    case cut_to_hay:
    case cut_to_silage:
    case straw_chopping:
    case hay_turning:
    case autumn_or_spring_plough:
    case burn_straw_stubble:
    case mow:
#ifdef TEST_ISSUE_DEATH_WARRANT
      printf( "Skylark_Clutch::OnFarmEvent() : %d : %d\n", event, ( int )g_date->Date() );
#endif
      m_CurrentSkState = toss_CDying;
    break;
 
    case fp_npks:
    case fp_npk:
    case fp_pk:
    case fp_manganesesulphate:
    case fp_manure:
    case fp_sludge:
    case fa_npk:
    case fa_pk:
    case fa_ammoniumsulphate:
    case fa_manure:
    case fa_greenmanure:
    case fa_sludge:
    case herbicide_treat:
    case growth_regulator:
    case fungicide_treat:
    case insecticide_treat:
    case trial_insecticidetreat:
    case syninsecticide_treat:
      if ( random( 1000 ) < cfg_insecticide_direct_mortE.value() ) {
#ifdef TEST_ISSUE_DEATH_WARRANT
        printf( "Skylark_Female::OnFarmEvent() : %d : %d\n", event, ( int )g_date->Date() );
#endif
        m_CurrentSkState = toss_CDying;
      }
      break;
    case molluscicide:
    case water:
    case hay_bailing:
    case stubble_harrowing:
    case cut_weeds:
    break;
 
    case fp_slurry:
    case fa_slurry:
    case swathing:
      if ( random( 100 ) < 2 ) {
#ifdef TEST_ISSUE_DEATH_WARRANT
        printf( "Skylark_Clutch::OnFarmEvent() : %d : %d\n", event, ( int )g_date->Date() );
#endif
        m_CurrentSkState = toss_CDying;
      }
    break;
 
    case strigling:
#ifndef __NoStriglingEffect
      if ( random( 100 ) < cfg_strigling_clutch.value() ) {
  #ifdef TEST_ISSUE_DEATH_WARRANT
        printf( "Skylark_Clutch::OnFarmEvent() : %d : %d\n", event, ( int )g_date->Date() );
  #endif
        m_CurrentSkState = toss_CDying;
        AddStriglingMort( 1 );
      }
#endif
    break;
 
 
    case cattle_out:
      if ( m_OurLandscape->SupplyGrazingPressure( m_Location_x, m_Location_y ) > 0)
        if ( random( 1000 ) < 20 ) { // was 20
#ifdef TEST_ISSUE_DEATH_WARRANT
          printf( "Skylark_Clutch::OnFarmEvent() : %d : %d\n", event, ( int )g_date->Date() );
#endif
          m_CurrentSkState = toss_CDying;
        }
    break;
 
    case cattle_out_low:
      if ( m_OurLandscape->SupplyGrazingPressure( m_Location_x, m_Location_y ) > 0)
        if ( random( 1000 ) < 5 ) { //was 5
#ifdef TEST_ISSUE_DEATH_WARRANT
          printf( "Skylark_Clutch::OnFarmEvent() : %d : %d\n", event, ( int )g_date->Date() );
#endif
          m_CurrentSkState = toss_CDying;
        }
    break;
 
    case pigs_out:
#ifndef __NoPigsOutEffect
      if ( random( 100 ) < 20 ) {
  #ifdef TEST_ISSUE_DEATH_WARRANT
        printf( "Skylark_Clutch::OnFarmEvent() : %d : %d\n", event, ( int )g_date->Date() );
  #endif
        m_CurrentSkState = toss_CDying;
      }
#endif
    break;
 
    case strigling_sow:
#ifndef __NoStriglingEffect
      if ( random( 100 ) < cfg_strigling_clutch.value() ) {
  #ifdef TEST_ISSUE_DEATH_WARRANT
        printf( "Skylark_Clutch::OnFarmEvent() : %d : %d\n", event, ( int )g_date->Date() );
  #endif
        m_CurrentSkState = toss_CDying;
        AddStriglingMort( 1 );
      }
#endif
    break;
 
    case product_treat:
    break;
    case glyphosate:
    break;
 
    default:
      g_land->Warn( "Skylark_Clutch::OnFarmEvent(): Unknown event type:", m_OurLandscape->EventtypeToString( event ) );
      exit( 1 );
  }
  if ( m_CurrentSkState == toss_CDying ) return true; else
    return false;
}

References Skylark_Base::AddStriglingMort(), autumn_harrow, autumn_or_spring_plough, autumn_plough, autumn_roll, autumn_sow, burn_straw_stubble, cattle_out, cattle_out_low, cfg_insecticide_direct_mortE, cfg_strigling_clutch, 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_land, glyphosate, growth_regulator, harvest, hay_bailing, hay_turning, herbicide_treat, hilling_up, insecticide_treat, Skylark_Base::m_CurrentSkState, TAnimal::m_Location_x, TAnimal::m_Location_y, TAnimal::m_OurLandscape, molluscicide, mow, pigs_out, product_treat, row_cultivation, sleep_all_day, spring_harrow, spring_plough, spring_roll, spring_sow, straw_chopping, strigling, strigling_sow, stubble_harrowing, Landscape::SupplyGrazingPressure(), swathing, syninsecticide_treat, toss_CDying, trial_insecticidetreat, Landscape::Warn(), water, and winter_plough.

OnMumGone()

void Skylark_Clutch::OnMumGone

(

void

)

                                     {
#ifdef __CJTDebug_5
  if ( IsAlive() != 0x0DEADC0DE )
    DEADCODEError();
#endif
  // the clutch cannot survive so go directly to die and do not pass go
  Mother = NULL;
#ifdef TEST_ISSUE_DEATH_WARRANT
  printf( "Skylark_Clutch::OnMumGone() %d\n", ( int )g_date->Date() );
#endif
  m_CurrentSkState = toss_Destroy; // will kill it at end of step!
  m_CurrentStateNo = -1;
}

References Skylark_Base::m_CurrentSkState, TALMaSSObject::m_CurrentStateNo, Mother, and toss_Destroy.

Referenced by Skylark_Female::OnMateDying(), Skylark_Female::OnMateHomeless(), Skylark_Female::st_Dying(), Skylark_Female::st_GivingUpTerritory(), Skylark_Female::st_StartingNewBrood(), Skylark_Female::st_StoppingBreeding(), and Skylark_Female::Step().

ReInit()

void Skylark_Clutch::ReInit ( Skylark_Female *  Mum, SkTerritories *  Terrs, Landscape *  L, int  NoEggs, int  x, int  y, int  mh, Skylark_Population_Manager *  SPM  )

virtual

                                                                                                                                                                {
    Skylark_Base::ReInit(x, y, Terrs, L, SPM, x, y, a_MyHome);
    Age = 0;
    Clutch_Size = NoEggs;
    MinDegrees = 0;
    Mother = Mum;
    m_baddays = 0;
}

References Skylark_Base::Age, Clutch_Size, m_baddays, MinDegrees, Mother, and Skylark_Base::ReInit().

st_Developing()

int Skylark_Clutch::st_Developing ( )

protected

                                  {
#ifdef __CJTDebug_5
  if ( IsAlive() != 0x0DEADC0DE ) DEADCODEError();
#endif
  if ( DailyMortality( ClutchMortProb ) ) {
#ifdef __SKPOM
    m_OurPopulationManager->WriteSKPOM1( m_OurLandscape->SupplyDayInYear(), 1001 );
#endif
    return 2; //transfer to state die
  }
  if ( Age > 0 ) // No development on the first day when just laid
  {
    // Timing : This function is called once at the end of each day before
    // the next day
    // Develop according to ambient temperature, and how long the female
    // is incubating for
    int incubated_time = Mother->Supply_NestTime(); // this includes night
    int off_nest_time = 24 * 60 - incubated_time;
    //double Rain = m_OurLandscape->SupplyRain();
    //int Daylength = m_OurLandscape->SupplyDaylength();
 
    //m_OurPopulationManager->WriteToTest2File(m_OurLandscape->SupplyDayInYear(),off_nest_time);
    // they start at EggTemp degrees and cool to 'cool'
    double cool_rate_pmin = Cooling_Rate_Eggs / 60.0;
    double Temp = m_OurLandscape->SupplyTemp(); // 9.97 = COrrection for day/night temps in �tjylland
    if ( Temp >= EggTemp ) Temp = EggTemp - 0.000001;
 
    // If off_nest_time > daylength/2 then the birds are spending more time off the nest than on.
    // in this case the trip length must go up
    //double TripNumber=cfg_FoodTripsPerDay.value();
    double TripLength=cfg_sk_triplength.value();
/*
    if ( off_nest_time >= ( Daylength - 10 ) ) { // -10 allows us not to get a division by zero later
        if ( ++m_baddays > 5 ) {
            #ifdef __SKPOM
                    m_OurPopulationManager->WriteSKPOM1( m_OurLandscape->SupplyDayInYear(), 1003 );
            #endif
            return 2; //TransferToState(Die);
        }
    } else {
          if ( off_nest_time > ( Daylength / 2.0 ) ) {
            // getting cold, so assume a different strategy or maximising the number of on nest times of 10 minutes
            int on_nest = Daylength - off_nest_time;
            TripNumber = on_nest / 10.0;
            TripLength = off_nest_time / TripNumber;
          }
          else {
                TripLength = 10;
          }
    }
    */
    //
    // We have the time incubated - but this includes re-warming time. So make
    // the assumption that warming/cooling are linear and equal rates
    // Now calculate the minimum temperature
    //    double cool = EggTemp - ( ( cool_rate_pmin * TripLength ) * ( ( EggTemp - Temp ) / 2.0 ) );
    double cool = EggTemp - ( ( cool_rate_pmin * TripLength ) * ( ( EggTemp - Temp ) / 2.0 ) );
    // This cannot be lower than ambient (There is a problem here since ambient
    // temperature when the eggs are not incubated is higher than the mean used
    // here because foraging is in the daytime
    if ( cool < Temp ) cool = Temp;
    // Now calculate how many minutes were spent cooling down to this temp (if
    // cool is higher than Temp then cooltime should be the same as TripLength
    // Next line to prevent overflow
    double cooltime = ( EggTemp - cool ) / ( cool_rate_pmin * ( ( EggTemp - Temp ) / 2.0 ) );
    // Eggs will spend incubated time-cooltime at EggTemp, off_nest_time-cooltime
    // at cool, and 2xcooltime at the mean of EggTemp and cool
    double AverageOffNestTemp = ( cool + EggTemp ) / 2.0;
    /* if ( Rain > 5 ) { MinDegrees += ( ( 24 * 60 ) - Daylength ) * ( EggTemp - MD_Threshold ); if ( m_baddays++ > 5 ) {
    m_OurPopulationManager->WriteToTest2File( m_OurLandscape->SupplyDayInYear(), 1009 );
    return 2; //TransferToState(Die); } } else */
    {
      MinDegrees += (int) (( incubated_time - ( cooltime * 2.0 ) ) * ( EggTemp - MD_Threshold )); // took *2 away
      double offnesttemp = cool - MD_Threshold;
      if ( offnesttemp < 0 ) offnesttemp = 0; // No development, rather than minus
      MinDegrees += int (( off_nest_time - cooltime ) * ( offnesttemp ));
      double transitiontemp = (int) AverageOffNestTemp - MD_Threshold;
      if ( transitiontemp < 0 ) transitiontemp = 0; // No development, rather than minus
      MinDegrees += (int) (( 2.0 * cooltime ) * ( transitiontemp )); // was 1.0 - this change assumes immediate re-heating
    }
    /* double scalingfactor = 1.0; int Daylength = m_OurLandscape->SupplyDaylength( );
    int daytimeonnest=Daylength-off_nest_time; double Rain = m_OurLandscape->SupplyRain(); if (Rain >10) {
    MinDegrees+=(24*60)-Daylength; if (m_baddays++>5) {
    m_OurPopulationManager->WriteToTest2File( m_OurLandscape->SupplyDayInYear(), 1009 ); return 2; //TransferToState(Die); } }
    else { if ((daytimeonnest * scalingfactor) >= off_nest_time) { MinDegrees+=24*60;  // No problem, got all day } else {
    if (daytimeonnest<=0) { MinDegrees+=incubated_time; if (m_baddays++>5) {
    m_OurPopulationManager->WriteToTest2File( m_OurLandscape->SupplyDayInYear(), 1009 ); return 2; //TransferToState(Die);
    }; // This counter just keeps going up until death } else { // Here we have used some time being cold, but not too much
    int uncompensatedtime=off_nest_time-(daytimeonnest*scalingfactor);
    MinDegrees+=(24*60)-uncompensatedtime;  // Only part of the day } } } */
  }
 
  // Have we achieved enough minute degrees
  if ( MinDegrees > MD_Hatch ) {
#ifdef __SKPOM
    m_OurPopulationManager->WriteSKPOM1(m_OurLandscape->SupplyDayInYear(),Age);
#endif
    return 1; //TransferToState(Hatch);
  } else // if they reach the age of 18 they die if not hatched
  if ( Age == 18 ) {
#ifdef __SKPOM
    m_OurPopulationManager->WriteSKPOM1( m_OurLandscape->SupplyDayInYear(), 1002 );
#endif
    return 2; //TransferToState(Die);
  } else {
    Age++;
    return 0;
  }
}

References Skylark_Base::Age, cfg_sk_triplength, ClutchMortProb, Cooling_Rate_Eggs, Skylark_Base::DailyMortality(), EggTemp, TAnimal::m_OurLandscape, Skylark_Base::m_OurPopulationManager, MD_Hatch, MD_Threshold, MinDegrees, Mother, Skylark_Female::Supply_NestTime(), Landscape::SupplyDayInYear(), Landscape::SupplyTemp(), and Skylark_Population_Manager::WriteSKPOM1().

Referenced by EndStep().

st_Dying()

void Skylark_Clutch::st_Dying ( )

protected

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

References Skylark_Base::m_CurrentSkState, TALMaSSObject::m_CurrentStateNo, Mother, Skylark_Female::OnClutchDeath(), and toss_Destroy.

Referenced by EndStep().

st_Hatching()

int Skylark_Clutch::st_Hatching ( )

protected

                                {
#ifdef __CJTDebug_5
  if ( IsAlive() != 0x0DEADC0DE ) DEADCODEError();
#endif
  // Timing: Occurs at the end of a day (e.g. midnight-1 minute)
  // Must create Clutch_Size number of Skylark_Hatchling Objects
  // They tell Mother that they have been created when they exist in the system
 
  Nestling_struct * Ch;
  if ( Mother->Paired ) {
    Ch = new Nestling_struct;
    Ch->Dad = Mother->MyMate; // Needs a pointer to dad not mum
    Ch->x = m_Location_x;
    Ch->y = m_Location_y;
    Ch->L = m_OurLandscape;
    Ch->Terrs = m_OurTerritories;
    Ch->bx = m_Born_x;
    Ch->by = m_Born_y;
    Ch->mh = m_MyHome;
#ifdef __CJTDebug_7
    if ( Clutch_Size == 0 ) {
      g_land->Warn( "Skylark_Clutch::st_Hatching(): DeBug7 ", NULL ); exit( 1 );
    }
#endif
    m_OurPopulationManager->CreateObjects( 1, this, NULL, Ch, Clutch_Size );
    // object destroyed by m_OurPopulationManager
    delete Ch;
    Mother->OnEggsHatch(); // Sets in motion feeding and she tells male
    return 1;
  } else {
    return 0;
  }
}

References Skylark_struct::bx, Skylark_struct::by, Clutch_Size, Skylark_Population_Manager::CreateObjects(), Nestling_struct::Dad, g_land, Skylark_struct::L, Skylark_Base::m_Born_x, Skylark_Base::m_Born_y, TAnimal::m_Location_x, TAnimal::m_Location_y, Skylark_Base::m_MyHome, TAnimal::m_OurLandscape, Skylark_Base::m_OurPopulationManager, Skylark_Base::m_OurTerritories, Skylark_struct::mh, Mother, Skylark_Female::MyMate, Skylark_Female::OnEggsHatch(), Skylark_Adult::Paired, Skylark_struct::Terrs, Landscape::Warn(), Skylark_struct::x, and Skylark_struct::y.

Referenced by EndStep().

StartDeveloping()

void Skylark_Clutch::StartDeveloping ( )

inline

  {
    m_CurrentSkState = toss_Developing;
    // Must tell the pop man how many eggs were made
    m_OurPopulationManager->incTotalEggs(Clutch_Size);
  }

References toss_Developing.

Referenced by Skylark_Female::st_Laying().

Step()

void Skylark_Clutch::Step ( void  )

virtual

Step behaviour - must be implemented in descendent classes.

Reimplemented from TAnimal.

                                {
#ifdef __CJTDebug_5
  if ( IsAlive() != 0x0DEADC0DE ) DEADCODEError();
#endif
  if ( m_StepDone || m_CurrentSkState == toss_Destroy ) return;
#ifdef __CJTDebug_5
  if ( Mother ) {
    if ( Mother->SupplyMyClutch() != this ) {
      g_land->Warn( "Skylark_Step::Step(): Debug_5 ", "" );
      exit( 1 );
    }
  }
#endif
  switch ( m_CurrentSkState ) {
    case toss_Initiation: // Initial state. Will wait here until told by female that she is incubatig
      m_StepDone = true;
      m_CurrentSkState = toss_Initiation;
    break;
    case toss_Developing:
      m_StepDone = true;
    break;
    case toss_Hatching:
      m_StepDone = true;
    break;
    case toss_CDying:
      m_StepDone = true;
    break;
    default:
      g_land->Warn( "Skylark_CLutch::Step(): Unknown State ", "" );
      exit( 1 );
  }
}

References g_land, Skylark_Base::m_CurrentSkState, TALMaSSObject::m_StepDone, Mother, Skylark_Female::SupplyMyClutch(), toss_CDying, toss_Destroy, toss_Developing, toss_Hatching, toss_Initiation, and Landscape::Warn().

Member Data Documentation

Clutch_Size

int Skylark_Clutch::Clutch_Size

Referenced by ReInit(), Skylark_Clutch(), and st_Hatching().

m_baddays

int Skylark_Clutch::m_baddays

protected

Referenced by ReInit(), and Skylark_Clutch().

MinDegrees

int Skylark_Clutch::MinDegrees

protected

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

Mother

Skylark_Female* Skylark_Clutch::Mother

Referenced by OnMumGone(), ReInit(), Skylark_Clutch(), st_Developing(), st_Dying(), st_Hatching(), Step(), and Skylark_Female::Step().

---

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

• C:/Repo/ALMaSS_All/Skylark/skylarks_all.h
• C:/Repo/ALMaSS_All/Skylark/skylarks_all.cpp