28 #include "../../Landscape/ls.h"
29 #include "../../Landscape/cropprogs/Fodderbeet.h"
59 m_field->SetMDates(0,0,g_date->DayInYear(10,10));
61 m_field->SetMDates(1,0,g_date->DayInYear(10,11));
74 g_msg->Warn( WARN_BUG,
"FodderBeet::Do(): "
75 "Harvest too late for the next crop to start!!!",
"" );
79 for (
int i=0; i<noDates; i++) {
97 d1 = g_date->OldDays() + g_date->DayInYear( 1,7 );
98 if (g_date->Date() < d1)
101 g_msg->Warn( WARN_BUG,
"FodderBeet::Do(): "
102 "Crop start attempt between 1st Jan & 1st July",
"" );
108 if (g_date->Date() > d1)
111 g_msg->Warn( WARN_BUG,
"FodderBeet::Do(): "
112 "Crop start attempt after last possible start date",
"" );
121 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 1,3 ),
130 d1 = g_date->OldDays() + g_date->DayInYear( 1,10 );
131 if ( g_date->Date() > d1 ) {
143 g_date->DayInYear( 15, 12 ) -
144 g_date->DayInYear())) {
149 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 15, 3 ) + 365,
153 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 15, 3 ) + 365,
161 g_date->DayInYear( 9,4 ) -
162 g_date->DayInYear())) {
174 g_date->DayInYear( 10,4 ) -
175 g_date->DayInYear())) {
190 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 5,4 ),
192 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 5,4 ),
198 g_date->DayInYear( 11,4 ) -
199 g_date->DayInYear())) {
206 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 10,4 ),
213 g_date->DayInYear( 5,5 ) -
214 g_date->DayInYear())) {
221 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 10,4 ),
228 g_date->DayInYear( 5,5 ) -
229 g_date->DayInYear())) {
236 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 10,4 ),
243 g_date->DayInYear( 1,5 ) -
244 g_date->DayInYear())) {
256 g_date->DayInYear( 15,4 ) -
257 g_date->DayInYear())) {
263 int d1 = g_date->OldDays() + g_date->DayInYear( 20,4 );
277 Field * pf = dynamic_cast<Field*>(
m_field);
278 pf->Add_missed_herb_app();
279 if(
m_farm->
DoIt(80)) pf->Add_missed_herb_app();
280 if(
m_farm->
DoIt(60)) pf->Add_missed_herb_app();
292 int d1 = g_date->Date() + 7;
293 if ( d1 < g_date->OldDays() + g_date->DayInYear( 2,5 ) ) {
294 d1 = g_date->OldDays() + g_date->DayInYear( 2,5 );
304 g_date->DayInYear( 18,5 ) -
305 g_date->DayInYear())) {
311 int d1 = g_date->Date() + 7;
312 if ( d1 < g_date->OldDays() + g_date->DayInYear( 10,5 ) ) {
313 d1 = g_date->OldDays() + g_date->DayInYear( 10,5 );
325 g_date->DayInYear( 18,5 ) -
326 g_date->DayInYear())) {
337 g_date->DayInYear( 25,5 ) -
338 g_date->DayInYear())) {
345 int d1 = g_date->Date() + 7;
346 if ( d1 < g_date->OldDays() + g_date->DayInYear( 17,5 ) ) {
347 d1 = g_date->OldDays() + g_date->DayInYear( 17,5 );
359 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 20,5 ),
361 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 1,6 ),
363 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 1,7 ),
369 g_date->DayInYear( 15,6 ) -
370 g_date->DayInYear())) {
380 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 8,6 ),
391 Field * pf = dynamic_cast<Field*>(
m_field);
392 pf->Add_missed_fi_app();
409 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 8,6 ),
418 g_date->DayInYear( 15,6 ) -
419 g_date->DayInYear())) {
430 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 8,6 ),
439 g_date->DayInYear( 30,7 ) -
440 g_date->DayInYear())) {
452 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 8,6 ),
461 g_date->DayInYear( 25,6 ) -
462 g_date->DayInYear())) {
467 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 1,8 ),
475 g_date->DayInYear( 30,8 ) -
476 g_date->DayInYear())) {
482 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 10,10 ),
487 if (
m_field->GetMConstants(0)==0) {
489 g_msg->Warn( WARN_BUG,
"Fodderbeet::Do(): failure in 'Harvest' execution",
"" );
504 g_msg->Warn( WARN_BUG,
"Fodderbeet::Do(): "
505 "Unknown event type! ",
"" );