#!/opt/local/bin/perl

### To run this script: ./recomm.pl > recomission.html
### If problems, george@esa.nascom.nasa.gov
### Change this variable to change the counter of DAY x on the leftmost column
$day_init=1;
### Change this variable for the actual start day 5th of October
$dday=5;
### Change this variable to change the counter of DOY x 
$doy_init=278;
################################################################################

print "<! DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 3.2 Final//EN\">\n";
print "<HTML>\n";
print "<BODY BGCOLOR=\"#FFFFFF\" TEXT=\"#000000\" LINK=\"#0000FF\" VLINK=\"#FFA07A\">\n";
print "<TITLE>SOHO Recommissioning Schedule </TITLE>\n";
print "<H1><IMG SRC=\"/gif/sohologo120.gif\"> SOHO Recommissioning Schedule </H1> \n";
print "<HR><p>\n";
print "<p>\n";

print "<H3 ALIGN=CENTER> SOHO Recommissioning Schedule </H3>\n";
print "<strong> Related URLs: <br></strong>\n";
print "<ul>\n";
print "<li> <A HREF=\"http://orpheus.nascom.nasa.gov/cds/diary/status.html\">CDS status page</A><br>\n";
print "<li> <A HREF=\"http://umtof.umd.edu/~galvin/celias_recovery/\">CELIAS status page</A><br>\n";
print "<li> <A HREF=\"http://lasco-www.nrl.navy.mil/recommiss/recom_sum.html\">LASCO/EIT status page</A><br>\n";
print "<li> <A HREF=\"http://www.cfa.harvard.edu/uvcs/recommission/recommission.html">UVCS status page</A><br>\n";
print "</ul>\n";
print "<hr>\n";

print "<TABLE BORDER WIDTH=100%>\n";
print " <tr>\n";
print "    <th> </th>\n";
print "    <th align=center rowspan=2>Date</th>\n";
print "   <th align=center rowspan=2>Long Contact</th>\n";
print "   <th align=center rowspan=2>Activity<br> Duration <br> (hours) </th>\n";
print "    <th align=center colspan=3>Detailed Schedule</th>\n";
print "  <tr>\n";
print "    <th></th>\n";
print "   <th align=center> Hours </th>\n";
print "    <th align=center> Type </th>\n";
print "    <th align=center> Activities </th>\n";
print "  </tr>\n";

print "<!-- DAY 1 -->\n";

if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print "  <tr>\n";
print "    <td align=center rowspan=2><strong>DAY $day_init</strong></th>\n";
print "    <td align=center rowspan=2> $day <BR> October $dday , 1998 <br> DOY $doy_init</td>\n";
print "    <td align=center rowspan=2>DSS-24 16:50-01:30 UT</td>\n";
print "    <td align=center rowspan=2> 8 </td>\n";
print "    <td align=center>1.0 </td>\n";
print "    <td align=center> TSTOL </td>\n";
print "   <td align=center>  <STRONG>SUMER_ON </STRONG> </td>\n";
print "  </tr>\n";
print "  <tr>\n";
print "    <td align=center> 4.0 </td>\n";
print "    <td align=center> NRT </td>\n";
print "   <td align=center>  <STRONG>SUMER_CHECK-OUT </STRONG> </td>\n";
print "  </tr>\n";

print "<!-- DAY 2 -->\n";
$day_init++;
$doy_init++;
$dday++;

if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print "  <tr>\n";
print "    <td align=center rowspan=2><strong>DAY $day_init</strong></th>\n";
print "    <td align=center rowspan=2> $day <BR> October $dday , 1998 <br> DOY $doy_init</td>\n";
print "    <td align=center rowspan=2>DSS-24 16:50-01:25 UT</td>\n";
print "    <td align=center rowspan=2> 8 </td>\n";
print "    <td align=center>2.5 </td>\n";
print "    <td align=center> TSTOL </td>\n";
print "   <td align=center>  <STRONG>VIRGO_ON </STRONG> </td>\n";
print "  </tr>\n";
print "  <tr>\n";
print "    <td align=center>5.5 </td>\n";
print "   <td align=center> TSTOL </td>\n";
print "   <td align=center>  <STRONG> Contingency </STRONG> </td>\n";
print " </tr>\n";

print "<!-- DAY 3 -->\n";
$day_init++;
$doy_init++;
$dday++;

if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print "  <tr>\n";
print "    <td align=center rowspan=1><strong>DAY $day_init</strong></th>\n";
print "    <td align=center rowspan=1> $day <BR> October $dday , 1998 <br> DOY $doy_init</td>\n";
print "    <td align=center rowspan=1>DSS-16 19:30-01:50 UT</td>\n";
print "    <td align=center rowspan=1> 6 </td>\n";
print "    <td align=center> 4 </td>\n";
print "    <td align=center> NRT </td>\n";
print "   <td align=center>  <STRONG> SUMER_CHECK-OUT <br> (if needed) <br> 
	     minimal activities due <br> to various constraints </STRONG> </td>\n";
print "  </tr>\n";

print "<!-- DAY 4 -->\n";
$day_init++;
$doy_init++;
$dday++;

if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print "  <tr>\n";
print "    <td rowspan=3 align=center><strong>DAY $day_init</strong></td>\n";
print "    <td align=center rowspan=3> $day <BR> October $dday, 1998 <br>DOY $doy_init</td>\n";
print "    <td align=center rowspan=3>DSS-66 15:30-16:50 UT<br>DSS-16 16:25-01:50 UT</td>\n";
print "    <td align=center rowspan=3> 8 </td>\n";
print "    <td align=center> 1 </td>\n";
print "    <td align=center> TSTOL </td>\n";
print "    <td align=center>  <STRONG>GOLF_ON</STRONG> </td>\n";
print "  </tr>\n";
print "  <tr>\n";
 print "   <td align=center> 2 </td>\n";
 print "   <td align=center> NRT-d </td>\n";
 print "   <td align=center>  <STRONG>GOLF_CHECK-OUT</STRONG> </td>\n";
print "  </tr>\n";
print "  <tr>\n";
print "    <td align=center> 5 </td>\n";
print "    <td align=center> NRT-d </td>\n";
print "    <td align=center>  <STRONG>Contingency</STRONG> </td>\n";
print "  </tr>\n";

print "<!-- DAY 5 -->\n";
$day_init++;
$doy_init++;
$dday++;
if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print "  <tr>\n";
print "   <td rowspan=3 align=center><strong>DAY $day_init</strong></td>\n";
print "   <td align=center rowspan=3> $day <BR> October $dday, 1998 <br>DOY $doy_init</td>\n";
print "   <td align=center rowspan=3>DSS-66 09:20-15:50 UT<br>DSS-16 17:30-19:20<br>DSS-24 19:35-01:20 UT</td>\n";
print "   <td align=center rowspan=3> 8 </td>\n";
print "   <td align=center> 1.0 </td>\n";
print "    <td align=center> TSTOL </td>\n";
print "    <td align=center>  <STRONG>CEPAC_ON</STRONG> </td>\n";
print "  </tr>\n";
print "  <tr>\n";
print "    <td align=center> 4.5 </td>\n";
print "    <td align=center> TSTOL </td>\n";
print "   <td align=center> <STRONG>CEPAC_CHECK-OUT</STRONG> </td>\n";
print " </tr>\n";
print "  <tr>\n";
print "   <td align=center> 2.5 </td>\n";
print "    <td align=center> TSTOL </td>\n";
print "    <td align=center> <STRONG>Contingency</STRONG> </td>\n";
print " </tr>\n";

print "<!-- DAY 6 -->\n";
$day_init++;
$doy_init++;
$dday++;
if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print " <tr>\n";
print "  <td rowspan=3 align=center><strong>DAY $day_init</strong></td>\n";
print " <td align=center rowspan=3> $day <BR> October $dday, 1998 <br>DOY $doy_init</td>\n";
print "  <td align=center rowspan=3>DSS-24 16:55-19:45 UT<br>DSS-16 19:30-01:40 UT</td>\n";
print "  <td align=center rowspan=3> 8 </td>\n";
print "  <td align=center> 0.5 </td>\n";
print "   <td align=center> TSTOL </td>\n";
print "  <td align=center>  <STRONG>UVCS_ON </STRONG> </td>\n";
print " </tr>\n";
print " <tr>\n";
print "    <td align=center> 2 </td>\n";
print "   <td align=center> TSTOL and <br> NRT-d </td>\n";
print "    <td align=center> <STRONG>UVCS_CHECK-OUT</STRONG> </td>\n";
print " </tr>\n";
print "  <tr>\n";
print "    <td align=center> 5.5 </td>\n";
print "   <td align=center> NRT-s </td>\n";
print "   <td align=center> <STRONG>UVCS_CHECK-OUT </STRONG> </td>\n";
print " </tr>\n";

print "<!-- DAY 7 -->\n";
$day_init++;
$doy_init++;
$dday++;
if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print " <tr>\n";
print "   <td rowspan=1 align=center><strong>DAY $day_init</strong></td>\n";
print "   <td align=center rowspan=1> $day <BR> October $dday, 1998 <br>DOY $doy_init</td>\n";
print "  <td align=center rowspan=1>DSS-27 16:25-18:15 UT D/L <br> DSS-16 19:05-01:40 UT</td>\n";
print "  <td align=center rowspan=1> 8 </td>\n";
print "  <td align=center> 8 </td>\n";
print "   <td align=center> NRT-s </td>\n";
print "   <td align=center><STRONG> NRT cancelled. <br> Lost DSN antenna. </STRONG> </td>\n";
print "  </tr>\n";

print "<!-- DAY 8 -->\n";
$day_init++;
$doy_init++;
$dday++;
if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print "  <tr>\n";
print "    <td rowspan=4 align=center><strong>DAY $day_init </strong></td>\n";
print "    <td align=center rowspan=4> $day <BR> October $dday, 1998 <br>DOY $doy_init</td>\n";
print "    <td align=center rowspan=4>DSS-24 17:30-18:55 UT<br>DSS-16 18:40-01:40 UT</td>\n";
print "    <td align=center rowspan=4> 8 </td>\n";
print "    <td align=center> 2 </td>\n";
print "    <td align=center> TSTOL </td>\n";
print "    <td align=center>  <STRONG> MDI_ON <BR>DEP + OP heaters </STRONG> </td>\n";
print "  </tr>\n";
print "  <tr>\n";
print "   <td align=center> 2 </td>\n";
print "   <td align=center> TSTOL <br> or NRT </td>\n";
print "   <td align=center> <STRONG>MDI_ON <br> Power Up IP</STRONG></td>\n";
print "  </tr>\n";
print " <tr>\n";
print "    <td align=center> 2 </td>\n";
print "    <td align=center> TSTOL <br> or NRT </td>\n";
print "   <td align=center><STRONG>MDI_ON <br>  Camera & Mech.</STRONG></td>\n";
print "  </tr>\n";
print "  <tr>\n";
print "    <td align=center> 2 </td>\n";
print "   <td align=center> NRT-s </td>\n";
print "   <td align=center><STRONG> UVCS, MDI  </STRONG></td>\n";
print "  </tr>\n";

print "<!-- DAY 9 -->\n";
$day_init++;
$doy_init++;
$dday++;
if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print " <tr>\n";
print "   <td rowspan=3 align=center><strong>DAY $day_init</strong></td>\n";
print "   <td align=center rowspan=3> $day <BR> October $dday, 1998 <br>DOY $doy_init</td>\n";
print "   <td align=center rowspan=3>DSS-66 15:25-17:00 UT<br>DSS-24 16:50-01:10 UT</td>\n";
print "   <td align=center rowspan=3> 8 </td>\n";
print "    <td align=center> 0.5 </td>\n";
print "    <td align=center> TSTOL </td>\n";
print "    <td align=center>  <STRONG> COSTEP:  LION ON <br> LION_CHECK-OUT</STRONG> </td>\n";
print "  </tr>\n";
print "  <tr>\n";
print "   <td align=center> 0.5 </td>\n";
print "   <td align=center> TSTOL </td>\n";
print "   <td align=center><STRONG> LASCO/EIT_ON </STRONG> </td>\n";
print " </tr>\n";
print " <tr>\n";
print "   <td align=center> 7 </td>\n";
print "   <td align=center> NRT-s </td>\n";
print "   <td align=center><STRONG> UVCS, MDI, <br> LASCO/EIT </STRONG> </td>\n";
print " </tr>\n";

print "<!-- DAY 10 -->\n";
$day_init++;
$doy_init++;
$dday++;

if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print "  <tr>\n";
print "    <td rowspan=1 align=center><strong>DAY $day_init</strong></td>\n";
print "    <td align=center rowspan=1> $day <BR> October $dday, 1998 <br>DOY $doy_init</td>\n";
print "    <td align=center rowspan=1>DSS-27 16:25-19:50 UT D/L<br>DSS-16 19:35-22:10 UT</td>\n";
print "    <td align=center rowspan=1> 8 </td>\n";
print "    <td align=center> 8 </td>\n";
print "    <td align=center> NRT-s </td>\n";
print "    <td align=center>  <STRONG> UVCS, MDI, <br> LASCO/EIT  </STRONG> </td>\n";
print "  </tr>\n";

print "<!-- DAY 11 -->\n";
$day_init++;
$doy_init++;
$dday++;
if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print "  <tr>\n";
print "    <td rowspan=2 align=center><strong>DAY $day_init</strong></td>\n";
print "    <td align=center rowspan=2> $day <BR> October $dday, 1998 <br>DOY $doy_init</td>\n";
print "    <td align=center rowspan=2>DSS-16 16:25-01:30 UT</td>\n";
print "    <td align=center rowspan=2> 8 </td>\n";
print "    <td align=center> 1 </td>\n";
print "    <td align=center> Cmd Loads </td>\n";
print "    <td align=center>  <STRONG><A HREF=\"submode.html\"> Uplink Submode <br> 2, 3, and 6 Patches </A></STRONG> </td>\n";
print "  </tr>\n";
print "  <tr>\n";
print "    <td align=center> 7 </td>\n";
print "    <td align=center> NRT-s </td>\n";
print "    <td align=center>  <STRONG> LASCO/EIT, UVCS, <br> MDI, GOLF </STRONG> </td>\n";
print "  </tr>\n";

print "<!-- DAY 12 -->\n";
$day_init++;
$doy_init++;
$dday++;

if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print "  <tr>\n";
print "    <td rowspan=1 align=center><strong>DAY $day_init</strong></td>\n";
print "    <td align=center rowspan=1> $day <BR> October $dday, 1998 <br>DOY $doy_init</td>\n";
print "    <td align=center rowspan=1>DSS-16 18:15-01:30 UT</td>\n";
print "    <td align=center rowspan=1> 8 </td>\n";
print "    <td align=center> 8 </td>\n";
print "    <td align=center> - </td>\n";
print "    <td align=center><STRONG> S/C Maneuver Activities </STRONG></td>\n";
print "  </tr>\n";

print "<!-- DAY 13 -->\n";
$day_init++;
$doy_init++;
$dday++;
if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print "  <tr>\n";
print "    <td rowspan=2 align=center><strong>DAY $day_init</strong></td>\n";
print "    <td align=center rowspan=2>$day <BR> October $dday, 1998 <br>DOY $doy_init</td>\n";
print "    <td align=center rowspan=2>DSS-16 18:15-01:25 UT</td>\n";
print "    <td align=center rowspan=2> 8 </td>\n";
print "    <td align=center> 1 </td>\n";
print "    <td align=center> TSTOL </td>\n";
print "    <td align=center>  <STRONG> CDS_ON </STRONG> </td>\n";
print "  </tr>\n";
print "  <tr>\n";
print "    <td align=center> 7 </td>\n";
print "    <td align=center> NRT-s </td>\n";
print "    <td align=center>  <STRONG> LASCO/EIT, UVCS, <br> MDI, GOLF </STRONG> </td>\n";
print "  </tr>\n";

print "<!-- DAY 14 -->\n";
$day_init++;
$doy_init++;
$dday++;
if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print "  <tr>\n";
print "    <td rowspan=3 align=center><strong>DAY $day_init</strong></td>\n";
print "    <td align=center rowspan=3>$day <BR> October $dday, 1998 <br>DOY $doy_init</td>\n";
print "    <td align=center rowspan=3>DSS-16 16:25-01:20 UT</td>\n";
print "    <td align=center rowspan=3> 8 </td>\n";
print "    <td align=center> 0.5 </td>\n";
print "    <td align=center> TSTOL </td>\n";
print "    <td align=center>  <STRONG>SWAN_ON</STRONG> </td>\n";
print "  </tr>\n";
print "  <tr>\n";
print "    <td align=center> 4 </td>\n";
print "    <td align=center> NRT-d / <br> NRT-s </td>\n";
print "    <td align=center>  <STRONG> CDS<BR> (30 mins NRT-d +<BR>\n";
print "		     30 mins NRT-s) x 4 </STRONG> </td>\n";
print "  </tr>\n";
print "  <tr>\n";
print "    <td align=center> 3.5 </td>\n";
print "    <td align=center> NRT-s </td>\n";
print "    <td align=center>  <STRONG> CDS, LASCO/EIT, <br> UVCS, MDI, GOLF </STRONG> </td>\n";
print "  </tr>\n";

print "<!-- DAY 15 -->\n";
$day_init++;
$doy_init++;
$dday++;
if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print "  <tr>\n";
print "    <td rowspan=1 align=center><strong>DAY $day_init</strong></td>\n";
print "    <td align=center rowspan=1> $day <BR> October $dday, 1998 <br>DOY $doy_init</td>\n";
print "    <td align=center rowspan=1>DSS-24 16:50-00:40 UT <br> DSS-34 00:10-08:45 UT</td>\n";
print "    <td align=center rowspan=1> 8 </td>\n";
print "    <td align=center> 8 </td>\n";
print "    <td align=center> NRT-s </td>\n";
print "    <td align=center>  <STRONG> SWAN_CHECK-OUT <br> UVCS, LASCO/EIT, <br> CDS, MDI, GOLF </STRONG> </td>\n";
print "  </tr>\n";

print "<!-- DAY 16 -->\n";
$day_init++;
$doy_init++;
$dday++;
if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print "  <tr>\n";
print "    <td rowspan=1 align=center><strong>DAY $day_init</strong></td>\n";
print "    <td align=center rowspan=1> $day <BR> October $dday, 1998 <br>DOY $doy_init</td>\n";
print "    <td align=center rowspan=1>DSS-24 16:50-00:50 UT</td>\n";
print "    <td align=center rowspan=1> 8 </td>\n";
print "    <td align=center> 8 </td>\n";
print "    <td align=center> NRT-s </td>\n";
print "   <td align=center> <STRONG> ALL TEAMS </STRONG> </td>\n";
print "  </tr>\n";

print "<!-- DAY 17 -->\n";
$day_init++;
$doy_init++;
$dday++;
if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print "  <tr>\n";
print "    <td rowspan=1 align=center><strong>DAY $day_init</strong></td>\n";
print "    <td align=center rowspan=1> $day <BR> October $dday, 1998 <br>DOY $doy_init</td>\n";
print "    <td align=center rowspan=1>DSS-16 16:20-01:15 UT</td>\n";
print "    <td align=center rowspan=1> 8 </td>\n";
print "    <td align=center> 8 </td>\n";
print "    <td align=center> NRT-s </td>\n";
print "    <td align=center>  <STRONG> ALL TEAMS </STRONG> </td>\n";
print "  </tr>\n";

print "<!-- DAY 18 -->\n";
$day_init++;
$doy_init++;
$dday++;
if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print "  <tr>\n";
print "    <td rowspan=1 align=center><strong>DAY $day_init</strong></td>\n";
print "    <td align=center rowspan=1> $day <BR> October $dday, 1998 <br>DOY $doy_init</td>\n";
print "    <td align=center rowspan=1>DSS-16 16:20-01:10 UT </td>\n";
print "    <td align=center rowspan=1> 8 </td>\n";
print "    <td align=center> 8</td>\n";
print "    <td align=center> NRT-s </td>\n";
print "    <td align=center>  <STRONG> ALL TEAMS </STRONG> </td>\n";
print "    </tr>\n";

print "<!-- DAY 19 -->\n";
$day_init++;
$doy_init++;
$dday++;
if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print "  <tr>\n";
print "    <td rowspan=1 align=center><strong>DAY $day_init</strong></td>\n";
print "    <td align=center rowspan=1 > $day <BR> October $dday, 1998 <br>DOY $doy_init</td>\n";
print "    <td align=center rowspan=1>DSS-61 13:45-17:25 UT<br>DSS-16 18:20-22:55 UT<br> DSS-46 22:40-05:10 UT</td>\n";
print "    <td align=center rowspan=1> 8 </td>\n";
print "    <td align=center rowspan=1> 8 </td>\n";
print "    <td align=center rowspan=1> NRT-s </td>\n";
print "    <td align=center rowspan=1>  <STRONG> ALL TEAMS </STRONG> </td>\n";
print "    </tr>\n";

print "<!-- DAY 20 -->\n";
$day_init++;
$doy_init++;
$dday++;
if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print "<!-- NOTE THIS CELIAS DPU ACTIVITY MUST BE ON 23rd OCT -->\n";

print "  <tr>\n";
print "    <td rowspan=3 align=center><strong>DAY $day_init</strong></td>\n";
print "    <td align=center rowspan=3>$day <BR> October $dday, 1998 <br>DOY $doy_init</td>\n";
print "    <td align=center rowspan=3>DSS-24 16:50-00:30 UT<br>DSS-46 00:15-04:50 UT</td>\n";
print "    <td align=center rowspan=3> 8 </td>\n";
print "    <td align=center> 1.5 </td>\n";
print "    <td align=center> TSTOL </td>\n";
print "    <td align=center>  <STRONG> CELIAS DPU ON </STRONG> </td>\n";
print "  </tr>\n";
print "  <tr>\n";
print "    <td align=center> 1.5 </td>\n";
print "    <td align=center> TSTOL </td>\n";
print "    <td align=center>  <STRONG> CELIAS DPU <br> CHECK-OUT </STRONG> </td>\n";
print "  </tr>\n";
print "  <tr>\n";
print "    <td align=center> 5 </td>\n";
print "    <td align=center> NRT-s </td>\n";
print "    <td align=center>  <STRONG> ALL TEAMS </STRONG> </td>\n";
print "  </tr>\n";

print "<!-- DAY 21 -->\n";
$day_init++;
$doy_init++;
$dday++;
if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }
print "  <tr>\n";
print "    <td rowspan=3 align=center><strong>DAY $day_init</strong></td>\n";
print "    <td align=center rowspan=3> $day <BR> October $dday, 1998 <br>DOY $doy_init</td>\n";
print "    <td align=center rowspan=3>DSS-24 16:45-00:35 UT</td>\n";
print "    <td align=center rowspan=3> 8 </td>\n";
print "    <td align=center> 1.5 </td>\n";
print "    <td align=center> TSTOL </td>\n";
print "    <td align=center>  <STRONG>STOF SESSION #1</STRONG> </td>\n";
print "  </tr>\n";
print "  <tr>\n";
print "	   <td align=center>1.5</td>\n";
print "	   <td align=center>TSTOL</td>\n";
print "	   <td align=center>  <STRONG>CTOF SESSION #1</STRONG> </td>\n";
print "  </tr>\n";
print "  <tr>\n";
print "    <td align=center> 5 </td>\n";
print "    <td align=center> NRT-s </td>\n";
print "    <td align=center>  <STRONG> ALL TEAMS <STRONG> </td>\n";
print "  </tr>\n";

print "<!-- DAY 22 -->\n";
$day_init++;
$doy_init++;
$dday++;
if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print "  <tr>\n ";
print "    <td rowspan=4 align=center><strong>DAY $day_init</strong></td>\n";
print "    <td align=center rowspan=4> $day <BR> October $dday, 1998 <br>DOY $doy_init</td>\n";
print "    <td align=center rowspan=4>DSS-27 16:15-20:00 UT D/L<br>DSS-46 20:35-09:20 UT</td>\n";
print "    <td align=center rowspan=4> 8 </td>\n";
print "    <td align=center> 1 </td>\n";
print "    <td align=center> TSTOL </td>\n";
print "    <td align=center>  <STRONG>STOF SESSION #2</STRONG> </td>\n";
print "  </tr>\n";
print "  <tr>\n ";
print "    <td align=center> 1 </td>\n";
print "    <td align=center> TSTOL </td>\n";
print "    <td align=center>  <STRONG>CTOF SESSION #1B</STRONG> </td>\n";
print "  </tr>\n";
print "  <tr>\n ";
print "    <td align=center> 1 </td>\n";
print "    <td align=center> TSTOL </td>\n";
print "    <td align=center>  <STRONG>STOF SESSION #3</STRONG> </td>\n";
print "  </tr>\n";
print "  <tr>\n ";
print "    <td align=center> 5 </td>\n";
print "    <td align=center> NRT-s </td>\n";
print "    <td align=center>  <STRONG>ALL TEAMS </STRONG> </td>\n";
print "  </tr>\n";

print "<!-- DAY 23 -->\n";
$day_init++;
$doy_init++;
$dday++;
if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print "  <tr>\n ";
print "    <td rowspan=3 align=center><strong>DAY $day_init</strong></td>\n";
print "    <td align=center rowspan=3> $day <BR> October $dday, 1998 <br>DOY $doy_init</td>\n";
print "    <td align=center rowspan=3>DSS-27 16:15-18:35 UT D/L<br>DSS-16 18:20-00:50
UT,<br>DSS-42
                                      00:35-04:30 UT</td>\n";
print "    <td align=center rowspan=3> 8 </td>\n";
print "    <td align=center> 2 </td>\n";
print "    <td align=center> TSTOL </td>\n";
print "    <td align=center>  <STRONG>STOF SESSION #4</STRONG> </td>\n";
print "  </tr>\n";
print "  <tr>\n";
print "    <td align=center> 1 </td>\n";
print "    <td align=center> TSTOL </td>\n";
print "    <td align=center>  <STRONG>CTOF SESSION #1C <br> cancelled, not needed </STRONG> </td>\n";
print "  </tr>\n";
print "  <tr>\n";
print "    <td align=center> 5 </td>\n";
print "    <td align=center> NRT-s </td>\n";
print "    <td align=center>  <STRONG>ALL TEAMS </STRONG> </td>\n";
print "  </tr>\n";

print "<!-- DAY 24 -->\n";
$day_init++;
$doy_init++;
$dday++;
if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print "  <tr>\n ";
print "    <td rowspan=3 align=center><strong>DAY $day_init</strong></td>\n";
print "    <td align=center rowspan=3> $day <BR> October $dday, 1998 <br>DOY $doy_init</td>\n";
print "    <td align=center rowspan=3>DSS-27 16:15-18:25 UT D/L<br>DSS-16 18:10-00:50 UT</td>\n";
print "    <td align=center rowspan=3> 8 </td>\n";
print "    <td align=center> 2 </td>\n";
print "    <td align=center> TSTOL </td>\n";
print "    <td align=center>  <STRONG>MTOF_ON </STRONG> </td>\n";
print "  </tr>\n";
print "  <tr>\n ";
print "    <td align=center> 3 </td>\n";
print "    <td align=center> NRT-d /<br>TSTOL</td>\n";
print "    <td align=center> <STRONG>MTOF_CHECK-OUT</STRONG></td>\n";
print "  <tr>\n";
print "    <td align=center> 3 </td>\n";
print "    <td align=center> NRT-s </td>\n";
print "    <td align=center>  <STRONG> MTOF_CHECK-OUT <br>+OTHER TEAMS </STRONG> </td>\n";
print "  </tr>\n";

print "<!-- DAY 25 -->\n";
$day_init++;
$doy_init++;
$dday++;
if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print "  <tr>\n";
print "    <td rowspan=3 align=center><strong>DAY $day_init</strong></td>\n";
print "    <td align=center rowspan=3> $day <BR> October $dday, 1998 <br>DOY $doy_init</td>\n";
print "    <td align=center rowspan=3>DSS-16 16:10-21:50 UT<br>DSS-42 21:30-03:35 UT</td>\n";
print "    <td align=center rowspan=3> 8 </td>\n";
print "    <td align=center> 2 </td>\n";
print "    <td align=center> TSTOL </td>\n";
print "    <td align=center>  <STRONG>CTOF SESSION #2</STRONG> </td>\n";
print "  </tr>\n";
print "  <tr>\n";
print "    <td align=center> 0.5 </td>\n";
print "    <td align=center> TSTOL </td>\n";
print "    <td align=center>  <STRONG> STOF SESSION #5 </STRONG> </td>\n";
print "  </tr>\n";
print "  <tr>\n";
print "    <td align=center> 5.5 </td>\n";
print "    <td align=center> NRT-s </td>\n";
print "    <td align=center>  <STRONG> ALL TEAMS </STRONG> </td>\n";
print "  </tr>\n";

print "<!-- DAY 26 -->\n";
$day_init++;
$doy_init++;
$dday++;
if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print "  <tr>\n";
print "    <td rowspan=1 align=center><strong>DAY $day_init</strong></td>\n";
print "    <td align=center rowspan=1>$day <BR> October $dday, 1998 <br>DOY $doy_init</td>\n";
print "    <td align=center rowspan=1>DSS-16 16:10-23:50 UT<br>DSS-34 23:30-08:50 UT</td>\n";
print "    <td align=center rowspan=1> 8 </td>\n";
print "    <td align=center rowspan=1> 8 </td>\n";
print "    <td align=center> NRT-s </td>\n";
print "    <td align=center><STRONG> ALL TEAMS </STRONG> </td>\n";
print "  </tr>\n";

print "<!-- DAY 27 -->\n";
$day_init++;
$doy_init++;
$dday++;
if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print "  <tr>\n ";
print "    <td rowspan=1 align=center><strong>DAY $day_init</strong></td>\n";
print "    <td align=center rowspan=1>$day <BR> October $dday, 1998 <br>DOY $doy_init</td>\n";
print "    <td align=center rowspan=1>DSS-66 08:45-16:25 UT<br>DSS-16 16:10-00:40 UT
	    <br>DSS-46 00:30-09:00 UT</td>\n";
print "    <td align=center rowspan=1> 8 </td>\n";
print "    <td align=center> 8 </td>\n";
print "    <td align=center> NRT-s </td>\n";
print "    <td align=center>  <STRONG>ALL TEAMS</STRONG> </td>\n";
print "  </tr>\n";

print "<!-- DAY 28 -->\n";
$day_init++;
$doy_init++;
$dday++;
if ($dday == 5 || $dday == 12 || $dday == 19 || $dday == 26) { $day = "Monday" ; }
if ($dday == 6 || $dday == 13 || $dday == 20 || $dday == 27) { $day = "Tuesday" ; }
if ($dday == 7 || $dday == 14 || $dday == 21 || $dday == 28) { $day = "Wednesday" ; }
if ($dday == 8 || $dday == 15 || $dday == 22 || $dday == 29) { $day = "Thursday" ; }
if ($dday == 9 || $dday == 16 || $dday == 23 || $dday == 30) { $day = "Friday" ; }
if ($dday == 10 || $dday == 17 || $dday == 24 || $dday == 31) { $day = "Saturday" ; }
if ($dday == 11 || $dday == 18 || $dday == 25 || $dday == 1) { $day = "Sunday" ; }

print "  <tr>\n ";
print "    <td rowspan=1 align=center><strong>DAY $day_init</strong></td>\n";
print "    <td align=center rowspan=1> Sunday <br> November 1, 1998 <br> DOY $doy_init</td>\n";
print "    <td align=center rowspan=1>DSS-66 08:55-16:15 UT<br>DSS-16 16:05-21:30 UT<br>DSS-46 21:20-08:50 UT</td>\n";
print "    <td align=center rowspan=1> 8 </td>\n";
print "    <td align=center> 8 </td>\n";
print "    <td align=center> NRT-s </td>\n";
print "    <td align=center>  <STRONG>ALL TEAMS </STRONG> </td>\n";
print "  </tr>\n";

print "<!-- DAY 29 -->\n";
$day_init++;
$doy_init++;
$dday++;

print "  <tr>\n";
print "    <td rowspan=2 align=center><strong>DAY $day_init </strong></td>\n";
print "    <td align=center rowspan=2> Monday <br> November 2, 1998 <br> DOY $doy_init</td>\n";
print "    <td align=center rowspan=2>DSS-## nn:nn-nn:nn UT<br>DSS-## nn:nn-nn:nn UT</td>\n";
print "    <td align=center rowspan=2> 8 </td>\n";
print "    <td align=center> 4 </td>\n";
print "    <td align=center> NRT-d / <br> NRT-s </td>\n";
print "    <td align=center><STRONG> SUMER_CHECK-OUT <BR> PHASE 2 </STRONG> </td>\n";
print "  </tr>\n";
print "  <tr>\n";
print "    <td align=center>4 </td>\n";
print "    <td align=center>NRT-s </td>\n";
print "    <td align=center><STRONG>ALL TEAMS </STRONG></td>\n";

print "<!-- DAY 30 -->\n";
$day_init++;
$doy_init++;
$dday++;

print "  <tr>\n";
print "    <td rowspan=1 align=center><strong>DAY $day_init</strong></td>\n";
print "    <td align=center rowspan=1> Tuesday <br> November 3, 1998 <br>DOY $doy_init</td>\n";
print "    <td align=center rowspan=1>DSS-## nn:nn-nn:nn UT<br>DSS-## nn:nn-nn:nn UT</td>\n";
print "    <td align=center rowspan=1> 8 </td>\n";
print "    <td align=center> 8 </td>\n";
print "    <td align=center> NRT-s </td>\n";
print "    <td align=center> <STRONG> SUMER_CHECK-OUT, ALL TEAMS </STRONG></td>\n";
print "  </tr>\n";

print "<!-- DAY 31 - 50 -->\n";
$day_init++;
$doy_init++;
$dday++;

print "  <tr>\n";
print "    <td rowspan=1 align=center><strong>DAY 31 </strong></td>\n";
print "    <td align=center rowspan=1> Wednesday <br> November 4, 1998 <br>DOY $doy_init </td>\n";
print "    <td align=center rowspan=1>DSS-## nn:nn-nn:nn UT<br>DSS-## nn:nn-nn:nn UT</td>\n";
print "    <td align=center rowspan=1> 8 </td>\n";
print "    <td align=center> 8 </td>\n";
print "    <td align=center>NRT-s </td>\n";
print "    <td align=center><STRONG> SUMER_CHECK-OUT, ALL TEAMS </STRONG></td>\n";
print "  </tr>\n";

print "</TABLE>\n";

print "</BODY>\n";

print "<p><hr>\n";
print "<address>\n";
print "Please direct your questions about Science Operations and Planning to\n";
print "the <a href=\"mailto:calendar\@esa.nascom.nasa.gov\">Science\n";
print "Operations Coordinators(SOCs)</a>, while any feedback about this web site\n";
print "to the SOHO<a href=\"mailto:webmaster\@esa.nascom.nasa.gov\">\n";
print "Webmaster</a>.<p>\n";

print "</address>\n";

print "<b>Last modification:</b> Wednesday, 21-Oct-1998 19:54:05 EDT\n";

print "</HTML>\n";