28 #include "../../Landscape/ls.h"
29 #include "../../Landscape/cropprogs/OFodderbeet.h"
51 m_field->SetMDates(0, 0, g_date->DayInYear(10, 10));
53 m_field->SetMDates(1, 0, g_date->DayInYear(10, 11));
66 g_msg->Warn(WARN_BUG,
"OFodderBeet::Do(): "
67 "Harvest too late for the next crop to start!!!",
"");
71 for (
int i = 0; i<noDates; i++) {
89 d1 = g_date->OldDays() + g_date->DayInYear(1, 7);
90 if (g_date->Date() < d1)
93 g_msg->Warn(WARN_BUG,
"OFodderBeet::Do(): "
94 "Crop start attempt between 1st Jan & 1st July",
"");
100 if (g_date->Date() > d1)
103 g_msg->Warn(WARN_BUG,
"OFodderBeet::Do(): "
104 "Crop start attempt after last possible start date",
"");
113 SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 3),
122 d1 = g_date->OldDays() + g_date->DayInYear(1, 10);
123 if (g_date->Date() > d1) {
135 g_date->DayInYear(15, 12) -
136 g_date->DayInYear())) {
141 SimpleEvent(g_date->OldDays() + g_date->DayInYear(15, 3) + 365,
145 SimpleEvent(g_date->OldDays() + g_date->DayInYear(15, 3) + 365,
153 g_date->DayInYear(9, 4) -
154 g_date->DayInYear())) {
166 g_date->DayInYear(10, 4) -
167 g_date->DayInYear())) {
182 SimpleEvent(g_date->OldDays() + g_date->DayInYear(5, 4),
184 SimpleEvent(g_date->OldDays() + g_date->DayInYear(5, 4),
190 g_date->DayInYear(11, 4) -
191 g_date->DayInYear())) {
198 SimpleEvent(g_date->OldDays() + g_date->DayInYear(10, 4),
205 g_date->DayInYear(5, 5) -
206 g_date->DayInYear())) {
213 SimpleEvent(g_date->OldDays() + g_date->DayInYear(10, 4),
220 g_date->DayInYear(5, 5) -
221 g_date->DayInYear())) {
228 SimpleEvent(g_date->OldDays() + g_date->DayInYear(10, 4),
235 g_date->DayInYear(1, 5) -
236 g_date->DayInYear())) {
248 g_date->DayInYear(15, 4) -
249 g_date->DayInYear())) {
255 int d1 = g_date->OldDays() + g_date->DayInYear(20, 4);
268 g_date->DayInYear(25, 5) -
269 g_date->DayInYear())) {
276 int d1 = g_date->Date() + 14;
277 if (d1 < g_date->OldDays() + g_date->DayInYear(17, 5)) {
278 d1 = g_date->OldDays() + g_date->DayInYear(17, 5);
290 SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 6),
292 SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 7),
298 g_date->DayInYear(15, 6) -
299 g_date->DayInYear())) {
308 SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 8),
317 g_date->DayInYear(15, 6) -
318 g_date->DayInYear())) {
328 SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 8),
337 g_date->DayInYear(30, 7) -
338 g_date->DayInYear())) {
349 SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 8),
359 g_date->DayInYear(30, 8) -
360 g_date->DayInYear())) {
366 SimpleEvent(g_date->OldDays() + g_date->DayInYear(10, 10),
371 if (
m_field->GetMConstants(0) == 0) {
373 g_msg->Warn(WARN_BUG,
"OFodderbeet::Do(): failure in 'Harvest' execution",
"");
388 g_msg->Warn(WARN_BUG,
"OFodderbeet::Do(): "
389 "Unknown event type! ",
"");