28 #include "../../Landscape/ls.h"
29 #include "../../Landscape/cropprogs/SpringBarleySpr.h"
62 a_field->m_skylarkscrapes=
true;
64 a_field->m_skylarkscrapes=
false;
72 m_field->SetMDates(0,0,g_date->DayInYear(20,8));
74 m_field->SetMDates(1,0,g_date->DayInYear(10,8));
75 m_field->SetMDates(0,1,g_date->DayInYear(10,8));
76 m_field->SetMDates(1,1,g_date->DayInYear(30,8));
87 g_msg->Warn( WARN_BUG,
"SpringBarleySpr::Do(): "
88 "Harvest too late for the next crop to start!!!",
"" );
92 for (
int i = 0; i < noDates; i++) {
105 int today = g_date->Date();
109 g_msg->Warn( WARN_BUG,
"SpringBarleySpr::Do(): " "Crop start attempt after last possible start date",
"" );
114 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 1, 4 ),
123 d1 = g_date->OldDays() + 365 + g_date->DayInYear( 1, 4 );
141 int d1 = g_date->Date();
142 if ( d1 < g_date->OldDays() + g_date->DayInYear( 20,3 ))
144 d1 = g_date->OldDays() + g_date->DayInYear( 20,3 );
152 g_date->DayInYear( 10,4 ) - g_date->DayInYear())) {
157 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 5,4 ),
160 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 20,3 ),
170 g_date->DayInYear( 10,4 ) - g_date->DayInYear())) {
176 int d1 = g_date->Date();
177 if ( d1 < g_date->OldDays() + g_date->DayInYear( 25,3 )) {
178 d1 = g_date->OldDays() + g_date->DayInYear( 25,3 );
188 g_date->DayInYear( 10, 4 ) - g_date->DayInYear())) {
194 int d1 = g_date->Date();
195 if ( d1 < g_date->OldDays() + g_date->DayInYear( 25,3 )) {
196 d1 = g_date->OldDays() + g_date->DayInYear( 25,3 );
207 g_date->DayInYear( 10, 4 ) -
208 g_date->DayInYear())) {
217 g_date->DayInYear( 10, 4 ) -
218 g_date->DayInYear())) {
223 int d1 = g_date->Date();
224 if ( d1 < g_date->OldDays() + g_date->DayInYear( 25,3 )) {
225 d1 = g_date->OldDays() + g_date->DayInYear( 25,3 );
233 g_date->DayInYear( 10,4 ) - g_date->DayInYear())) {
238 int d1 = g_date->Date();
239 if ( d1 < g_date->OldDays() + g_date->DayInYear( 5,4 )) {
240 d1 = g_date->OldDays() + g_date->DayInYear( 5,4 );
250 g_date->DayInYear( 20,4 ) - g_date->DayInYear())) {
260 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 5,5 ),
263 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 10,5 ),
265 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 15,5 ),
283 Field * pf = dynamic_cast<Field*>(
m_field);
284 pf->Add_missed_herb_app();
285 if(
m_farm->
DoIt(47)) pf->Add_missed_herb_app();
298 int d1 = g_date->Date() + 10;
299 if ( d1 < g_date->OldDays() + g_date->DayInYear( 16,5 )) {
300 d1 = g_date->OldDays() + g_date->DayInYear( 16,5 );
315 g_date->DayInYear( 30,5 ) - g_date->DayInYear())) {
333 g_date->DayInYear( 25,5 ) - g_date->DayInYear())) {
352 Field * pf = dynamic_cast<Field*>(
m_field);
353 pf->Add_missed_fi_app();
365 int d1 = g_date->Date() + 10;
366 if ( d1 < g_date->OldDays() + g_date->DayInYear( 25,5 )) {
367 d1 = g_date->OldDays() + g_date->DayInYear( 25,5 );
373 int d1 = g_date->Date();
374 if ( d1 < g_date->OldDays() + g_date->DayInYear( 15,5 )) {
375 d1 = g_date->OldDays() + g_date->DayInYear( 15,5 );
390 g_date->DayInYear( 10,6 ) - g_date->DayInYear())) {
408 g_date->DayInYear( 30,5 ) - g_date->DayInYear())) {
414 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 1,6 ),
426 g_date->DayInYear( 1,7 ) - g_date->DayInYear())) {
445 Field * pf = dynamic_cast<Field*>(
m_field);
446 pf->Add_missed_fi_app();
530 if (
m_field->GetMConstants(0)==0) {
532 g_msg->Warn( WARN_BUG,
"SpringBarleySpr::Do(): failure in 'HayBailing' execution",
"" );
549 if (
m_field->GetMConstants(1)==0) {
551 g_msg->Warn( WARN_BUG,
"SpringBarleySpr::Do(): failure in 'StubbleHarrowing' execution",
"" );
567 g_msg->Warn( WARN_BUG,
"SpringBarleySpr::Do(): "
568 "Unknown event type! ",
"" );