28 #include "../../Landscape/ls.h"
29 #include "../../Landscape/cropprogs/WWheatPToxicControl.h"
53 int d1 = g_date->OldDays() + g_date->DayInYear( 15,8 );
54 if (g_date->Date() >= d1)
57 if (g_date->DayInYear()>g_date->DayInYear(1,10)) {
63 if (g_date->Date() >= d1) d1 += 365;
76 g_date->DayInYear( 1,10 ) - g_date->DayInYear())) {
86 g_date->DayInYear( 1,10 ) - g_date->DayInYear())) {
100 g_date->DayInYear( 1,10 ) - g_date->DayInYear())) {
112 g_date->DayInYear( 1,10 ) - g_date->DayInYear())) {
128 g_date->DayInYear( 10,10 ) - g_date->DayInYear())) {
132 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 10,9 ),
138 g_date->DayInYear( 10,10 ) - g_date->DayInYear())) {
142 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 10,9 ),
148 g_date->DayInYear( 20,10 ) - g_date->DayInYear())) {
162 g_date->DayInYear( 27,10 ) - g_date->DayInYear())) {
167 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 15,9 ),
174 if (
m_field->GetVegBiomass()>0)
178 g_date->DayInYear( 30,10 ) - g_date->DayInYear()))
185 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 20,9 ),
193 g_date->DayInYear( 5,10 ) - g_date->DayInYear())) {
198 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 1,4 )+365,
206 g_date->DayInYear( 30,4 ) - g_date->DayInYear())) {
214 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 10,4 ),
218 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 25,3 ),
221 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 15,4 ),
223 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 25,4 ),
225 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 20,4 ),
227 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 1,5 ),
229 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 10,4 ),
231 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 1,5 ),
239 g_date->DayInYear( 30,4 ) - g_date->DayInYear())) {
252 g_date->DayInYear( 10,5 ) - g_date->DayInYear())) {
264 g_date->DayInYear( 10,5 ) - g_date->DayInYear())) {
269 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 20,5 ),
277 g_date->DayInYear( 15,5 ) - g_date->DayInYear())) {
294 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 1,6 ),
310 if ((g_date->Date()+7)<( g_date->OldDays() + g_date->DayInYear( 15,6 )))
311 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 15,6 ),
335 g_date->DayInYear( 25,4 ) - g_date->DayInYear())) {
341 if ((g_date->Date()+7)<( g_date->OldDays() + g_date->DayInYear( 15,6 )))
342 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 25,4),
352 g_date->DayInYear( 5,5 ) - g_date->DayInYear())) {
363 g_date->DayInYear( 15,5 ) - g_date->DayInYear())) {
368 if ((g_date->Date()+5)<( g_date->OldDays() + g_date->DayInYear( 2,5 )))
369 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 2,5 ),
378 g_date->DayInYear( 1,6 ) - g_date->DayInYear())) {
387 g_date->DayInYear( 15,4 ) - g_date->DayInYear())) {
392 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 25,4 ),
394 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 1,4 ),
402 g_date->DayInYear( 15,5 ) - g_date->DayInYear())) {
409 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 5,8 ),
417 g_date->DayInYear( 5,5 ) - g_date->DayInYear())) {
426 g_date->DayInYear( 30,5 ) - g_date->DayInYear())) {
431 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 5,8 ),
439 g_date->DayInYear( 20,4 ) - g_date->DayInYear())) {
443 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 21,4 ),
452 g_date->DayInYear( 1,5 ) - g_date->DayInYear())) {
461 g_date->DayInYear( 20,8 ) - g_date->DayInYear()))
473 g_date->DayInYear( 20,8 ) - g_date->DayInYear())) {
479 if ((g_date->Date()+5)<( g_date->OldDays() + g_date->DayInYear( 2,5 )))
480 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 10,8 ),
494 g_date->DayInYear( 20,8 ) - g_date->DayInYear())) {
499 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 5,8 ),
505 g_date->DayInYear( 25,8 ) - g_date->DayInYear())) {
509 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 10,8 ),
517 g_date->DayInYear( 15,9 ) - g_date->DayInYear())) {
522 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 15,8 ),
530 g_date->DayInYear( 15,10 ) - g_date->DayInYear())) {
540 g_msg->Warn( WARN_BUG,
"WheatPControl::Do(): "
541 "Unknown event type! ",
"" );