28 #include "../../Landscape/ls.h"
29 #include "../../Landscape/cropprogs/OWinterBarley.h"
49 m_field->SetMDates(0,0,g_date->DayInYear(20,7));
51 m_field->SetMDates(1,0,g_date->DayInYear(1,8));
52 m_field->SetMDates(0,1,g_date->DayInYear(25,7));
53 m_field->SetMDates(1,1,g_date->DayInYear(5,8));
61 g_msg->Warn( WARN_BUG,
"OWinterBarley::Do(): "
62 "Harvest too late for the next crop to start!!!",
"" );
66 for (
int i=0; i<noDates; i++)
79 int today=g_date->Date();
81 d1 = g_date->OldDays() + g_date->DayInYear( 1,7 );
85 g_msg->Warn( WARN_BUG,
"OWinterBarley::Do(): "
86 "Crop start attempt between 1st Jan & 1st July",
"" );
95 g_msg->Warn( WARN_BUG,
"OWinterBarley::Do(): "
96 "Crop start attempt after last possible start date",
"" );
103 SimpleEvent( g_date->OldDays() + g_date->DayInYear(20,7 ),
111 if ( g_date->Date() > d1 ) {
130 g_date->DayInYear( 30, 9 ) -
131 g_date->DayInYear())) {
137 int d1 = g_date->Date();
138 if ( d1 < g_date->OldDays() + g_date->DayInYear( 25, 8 )) {
139 d1 = g_date->OldDays() + g_date->DayInYear( 25, 8 );
149 g_date->DayInYear( 30, 9 ) -
150 g_date->DayInYear())) {
156 int d1 = g_date->Date();
157 if ( d1 < g_date->OldDays() + g_date->DayInYear( 25, 8 )) {
158 d1 = g_date->OldDays() + g_date->DayInYear( 25, 8 );
166 g_date->DayInYear( 25, 9 ) -
167 g_date->DayInYear())) {
176 g_date->DayInYear( 25, 9 ) -
177 g_date->DayInYear())) {
182 int d1 = g_date->Date();
183 if ( d1 < g_date->OldDays() + g_date->DayInYear( 10, 9 )) {
184 d1 = g_date->OldDays() + g_date->DayInYear( 10, 9 );
192 g_date->DayInYear( 25,9 ) -
193 g_date->DayInYear())) {
198 int d1 = g_date->Date() + 10;
199 if ( d1 < g_date->OldDays() + g_date->DayInYear( 25, 9 )) {
200 d1 = g_date->OldDays() + g_date->DayInYear( 25, 9 );
208 g_date->DayInYear( 10,10 ) -
209 g_date->DayInYear())) {
215 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 1, 4 ) + 365,
220 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 5,4 ) + 365,
225 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 25, 3 ) + 365,
237 g_date->DayInYear( 15,4 ) -
238 g_date->DayInYear())) {
244 int d1 = g_date->Date();
245 if ( d1 < g_date->OldDays() + g_date->DayInYear( 1, 4 )) {
246 d1 = g_date->OldDays() + g_date->DayInYear( 1, 4 );
250 if ( d1 < g_date->OldDays() + g_date->DayInYear( 5, 4 )) {
251 d1 = g_date->OldDays() + g_date->DayInYear( 5, 4 );
264 g_date->DayInYear( 25,4 ) -
265 g_date->DayInYear())) {
275 g_date->DayInYear( 30,4 ) -
276 g_date->DayInYear())) {
280 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 20,7 ),
286 g_date->DayInYear( 30,4 ) -
287 g_date->DayInYear())) {
291 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 20,7 ),
298 g_date->DayInYear())) {
310 g_date->DayInYear())) {
320 int d1 = g_date->Date();
321 if ( d1 < g_date->OldDays() +
m_field->GetMDates(0,1)) {
322 d1 = g_date->OldDays() +
m_field->GetMDates(0,1);
332 g_date->DayInYear())) {
344 g_date->DayInYear())) {
353 g_msg->Warn( WARN_BUG,
"OWinterBarley::Do(): "
354 "Unknown event type! ",
"" );