29 #include "../../Landscape/ls.h"
30 #include "../../Landscape/cropprogs/Oats.h"
58 m_field->SetMDates(0, 0, g_date->DayInYear(11, 8));
60 m_field->SetMDates(1, 0, g_date->DayInYear(20, 8));
61 m_field->SetMDates(0, 1, g_date->DayInYear(25, 8));
62 m_field->SetMDates(1, 1, g_date->DayInYear(25, 8));
74 g_msg->Warn(WARN_BUG,
"Oats::Do(): "
75 "Harvest too late for the next crop to start!!!",
"");
79 for (
int i = 0; i < noDates; i++) {
93 int today = g_date->Date();
95 d1 = g_date->OldDays() + g_date->DayInYear(1, 7);
99 g_msg->Warn(WARN_BUG,
" Oats::Do(): "
100 "Crop start attempt between 1st Jan & 1st July",
"");
109 g_msg->Warn(WARN_BUG,
" Oats::Do(): "
110 "Crop start attempt after last possible start date",
"");
117 SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 4),
127 if (g_date->Date() > d1) {
133 SimpleEvent(g_date->OldDays() + g_date->DayInYear(5, 5),
155 Field * pf = dynamic_cast<Field*>(
m_field);
156 pf->Add_missed_herb_app();
157 if (
m_farm->
DoIt(72)) pf->Add_missed_herb_app();
169 d1 = g_date->Date() + 10;
170 if (d1 < g_date->OldDays() + g_date->DayInYear(16, 5)) {
171 d1 = g_date->OldDays() + g_date->DayInYear(16, 5);
192 g_date->DayInYear(31, 12) -
193 g_date->DayInYear())) {
198 SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 4) + 365,
203 SimpleEvent(g_date->OldDays() + g_date->DayInYear(5, 3) + 365,
207 SimpleEvent(g_date->OldDays() + g_date->DayInYear(5, 3) + 365,
216 g_date->DayInYear(30, 3) -
217 g_date->DayInYear())) {
227 g_date->DayInYear(30, 3) -
228 g_date->DayInYear())) {
232 SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 4),
238 g_date->DayInYear(20, 4) -
239 g_date->DayInYear())) {
253 g_date->DayInYear(20, 4) -
254 g_date->DayInYear())) {
263 g_date->DayInYear(20, 4) -
264 g_date->DayInYear())) {
271 if (d1 < g_date->OldDays() + g_date->DayInYear(5, 4)) {
272 d1 = g_date->OldDays() + g_date->DayInYear(5, 4);
285 g_date->DayInYear(22, 4) -
286 g_date->DayInYear())) {
292 SimpleEvent(g_date->OldDays() + g_date->DayInYear(5, 4),
300 g_date->DayInYear(20, 4) -
301 g_date->DayInYear())) {
306 d1 = g_date->OldDays() + g_date->DayInYear(15, 4);
319 Field * pf = dynamic_cast<Field*>(
m_field);
320 pf->Add_missed_fi_app();
336 if (
m_field->GetMConstants(0) == 0) {
338 g_msg->Warn(WARN_BUG,
"Oats::Do(): failure in 'Harvest' execution",
"");
354 if (
m_field->GetMConstants(1) == 0) {
356 g_msg->Warn(WARN_BUG,
"Oats::Do(): failure in 'StrawChopping' execution",
"");
373 if (
m_field->GetMConstants(1) == 0) {
375 g_msg->Warn(WARN_BUG,
"Oats::Do(): failure in 'HayBailing' execution",
"");
389 g_msg->Warn(WARN_BUG,
"Oats::Do(): "
390 "Unknown event type! ",
"");