27 #include "../../Landscape/ls.h"
28 #include "../../Landscape/cropprogs/MaizeStrigling.h"
54 m_field->SetMDates(0,0,g_date->DayInYear(10,10));
56 m_field->SetMDates(1,0,g_date->DayInYear(10,11));
57 m_field->SetMDates(0,1,g_date->DayInYear(15,10));
58 m_field->SetMDates(1,1,g_date->DayInYear(30,11));
71 for (
int i=0; i<noDates; i++)
83 int today=g_date->Date();
85 d1 = g_date->OldDays() + g_date->DayInYear( 1,7 );
89 g_msg->Warn( WARN_BUG,
"Maize::Do(): "
90 "Crop start attempt between 1st Jan & 1st July",
"" );
99 g_msg->Warn( WARN_BUG,
"Maize::Do(): "
100 "Crop start attempt after last possible start date",
"" );
107 SimpleEvent( g_date->OldDays() + g_date->DayInYear(25,4),
115 if ( g_date->Date() > d1 ) {
125 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 20, 3 ) + 365,
133 g_date->DayInYear( 30, 11 ) - g_date->DayInYear())) {
142 g_date->DayInYear( 30, 11 ) - g_date->DayInYear())) {
146 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 1, 4 ) + 365,
152 g_date->DayInYear( 25, 4 ) - g_date->DayInYear())) {
157 d1 = g_date->OldDays() + g_date->DayInYear( 1, 4 );
158 if ( g_date->Date()+1 > d1 ) {
159 d1 = g_date->Date()+1;
167 g_date->DayInYear( 30, 4 ) - g_date->DayInYear())) {
176 g_date->DayInYear( 1, 5 ) - g_date->DayInYear())) {
185 g_date->DayInYear( 10, 5 ) - g_date->DayInYear())) {
190 d1 = g_date->OldDays() + g_date->DayInYear( 25, 4 );
191 if ( g_date->Date() > d1 ) {
200 g_date->DayInYear( 15, 5 ) - g_date->DayInYear())) {
210 g_date->DayInYear( 20, 5 ) - g_date->DayInYear())) {
216 d1 = g_date->OldDays() + g_date->DayInYear( 1, 5 );
224 d1 = g_date->OldDays() + g_date->DayInYear( 2, 5 );
236 g_date->DayInYear( 25, 5 ) - g_date->DayInYear())) {
243 d1 = g_date->OldDays() + g_date->DayInYear( 1, 5 );
253 g_date->DayInYear( 25, 5 ) - g_date->DayInYear())) {
258 d1 = g_date->OldDays() + g_date->DayInYear( 1, 5 );
268 g_date->DayInYear( 25, 5 ) - g_date->DayInYear())) {
274 d1 = g_date->OldDays() + g_date->DayInYear( 10, 5 );
282 d1 = g_date->OldDays() + g_date->DayInYear( 21, 5 );
283 if ( g_date->Date() + 1 > d1 ) {
284 d1 = g_date->Date() + 1;
294 g_date->DayInYear( 5, 6 ) - g_date->DayInYear())) {
299 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 1, 7 ),
305 g_date->DayInYear( 20, 6 ) - g_date->DayInYear())) {
309 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 1, 7 ),
316 g_date->DayInYear( 15, 7 ) - g_date->DayInYear())) {
322 d1 = g_date->OldDays() + g_date->DayInYear( 16, 7 );
323 if ( g_date->Date() + 7 > d1 ) {
324 d1 = g_date->Date() + 7;
332 g_date->DayInYear( 30, 7 ) - g_date->DayInYear())) {
336 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 10, 10 ),
342 m_field->GetMDates(1,0) - g_date->DayInYear())) {
347 d1 = g_date->OldDays() +
m_field->GetMDates(0,1);
348 if ( g_date->Date() > d1 ) {
359 g_date->DayInYear())) {
364 d1=g_date->DayInYear();
369 g_msg->Warn( WARN_BUG,
"Maize::Do(): "
370 "Unknown event type! ",
"" );