28 #include "../../Landscape/ls.h"
29 #include "../../Landscape/cropprogs/OCarrots.h"
47 m_field->SetMDates(0,0,g_date->DayInYear(30,11));
49 m_field->SetMDates(1,0,g_date->DayInYear(30,11));
57 g_msg->Warn( WARN_BUG,
"OCarrots::Do(): "
58 "Harvest too late for the next crop to start!!!",
"" );
66 int today=g_date->Date();
72 g_msg->Warn( WARN_BUG,
"OCarrots::Do(): "
73 "Crop start attempt after last possible start date",
"" );
78 if ( g_date->Date() > d1 ) {
92 g_date->DayInYear( 30, 3 ) -
93 g_date->DayInYear())) {
99 int d1 = g_date->OldDays() + g_date->DayInYear( 20, 3 );
100 if ( g_date->Date() > d1 ) {
110 g_date->DayInYear( 30, 3 ) -
111 g_date->DayInYear())) {
117 int d1 = g_date->OldDays() + g_date->DayInYear( 20, 3 );
118 if ( g_date->Date() > d1 ) {
127 g_date->DayInYear( 10, 4 ) -
128 g_date->DayInYear())) {
133 int d1 = g_date->OldDays() + g_date->DayInYear( 1, 4 );
134 if ( g_date->Date() > d1 ) {
143 g_date->DayInYear( 15, 4 ) -
144 g_date->DayInYear())) {
149 int d1 = g_date->OldDays() + g_date->DayInYear( 20, 4 );
150 if ( g_date->Date() + 14 > d1 ) {
151 d1 = g_date->Date() + 14;
159 g_date->DayInYear( 15, 5 ) -
160 g_date->DayInYear())) {
165 int d1 = g_date->OldDays() + g_date->DayInYear( 25, 4 );
166 if ( g_date->Date() > d1 ) {
175 g_date->DayInYear( 25, 5 ) -
176 g_date->DayInYear())) {
181 int d1 = g_date->OldDays() + g_date->DayInYear( 3, 5 );
182 if ( g_date->Date() + 7 > d1 ) {
183 d1 = g_date->Date() + 7;
191 g_date->DayInYear( 3, 6 ) -
192 g_date->DayInYear())) {
197 int d1 = g_date->OldDays() + g_date->DayInYear( 14, 5 );
198 if ( g_date->Date() + 10 > d1 ) {
199 d1 = g_date->Date() + 10;
207 g_date->DayInYear( 14, 6 ) -
208 g_date->DayInYear())) {
213 int d1 = g_date->OldDays() + g_date->DayInYear( 25, 5 );
214 if ( g_date->Date() + 10 > d1 ) {
215 d1 = g_date->Date() + 10;
223 g_date->DayInYear( 25, 6 ) -
224 g_date->DayInYear())) {
229 int d1 = g_date->OldDays() + g_date->DayInYear( 8, 6 );
230 if ( g_date->Date() + 10 > d1 ) {
231 d1 = g_date->Date() + 10;
236 int d1 = g_date->OldDays() + g_date->DayInYear( 1, 7 );
237 if ( g_date->Date() + 3 > d1 ) {
238 d1 = g_date->Date() + 3;
251 g_date->DayInYear( 10, 7 ) -
252 g_date->DayInYear())) {
261 g_date->DayInYear( 20, 7 ) -
262 g_date->DayInYear())) {
269 int d1 = g_date->OldDays() + g_date->DayInYear( 21, 7 );
270 if ( g_date->Date() + 7 > d1 ) {
271 d1 = g_date->Date() + 7;
279 g_date->DayInYear( 10, 8 ) -
280 g_date->DayInYear())) {
284 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 11, 8 ),
291 g_date->DayInYear( 5, 9 ) -
292 g_date->DayInYear())) {
298 int d1 = g_date->OldDays() + g_date->DayInYear( 1, 9 );
299 if ( g_date->Date() + 7 > d1 ) {
300 d1 = g_date->Date() + 7;
308 g_date->DayInYear( 30, 11 ) - g_date->DayInYear())) {
316 g_msg->Warn( WARN_BUG,
"OCarrots::Do(): "
317 "Unknown event type! ",
"" );