echo "SELECTED ";
}
echo ">DD mm.mmm</option>";
echo "\t<option value=\"dms\" ";
if ($selectedFormat == "dms") {
echo "SELECTED ";
}
echo ">DD mm ss</option>";
echo "</select></td>\n</tr>\n</table></form>\n";
$displayQuadrant = " - " . $selectedQuadrant;
if ($selectedQuadrant == "E") {
$displayQuadrant = "";
}
$cellWidth = 100;
$result = grid2lonlat($sectional, $selectedGrid, $selectedQuadrant, $selectedFormat);
$resultRaw = grid2lonlat($sectional, $selectedGrid, $selectedQuadrant, "raw");
$SurroundingGrids = GetSurroundingGridIDs($sectional, $selectedGrid, $selectedQuadrant, $selectedFormat);
$avgLon = ($resultRaw['NW']['lon'] + $result['NE']['lon']) / 2;
$avgLat = ($resultRaw['NW']['lat'] + $result['SW']['lat']) / 2;
$variation = magVariation($avgLat, $avgLon);
$varDir = "W";
if ($variation < 0) {
$varDir = "E";
$variation = abs($variation);
}
echo "<br><table border=\"1\" cellspacing=\"0\" cellpadding=\"10\" width=\"375\" align=\"center\" style=\"border-width:10px;border-style:solid;border-color:#c0c0c0;\"><tr><td><table border=\"0\" cellspacing=\"0\" cellpadding=\"0\" width=\"100%\" align=\"center\">\n<tr><td width=\"{$cellWidth}\" valign=\"bottom\" align=\"right\" class=\"coord\">" . $result['NW']['lat'] . "<br>" . $result['NW']['lon'] . "</td><td width=\"({$cellWidth} + 75)\"> </td><td valign=\"bottom\" align=\"left\" width=\"{$cellWidth}\" class=\"coord\">" . $result['NE']['lat'] . "<br>" . $result['NE']['lon'] . "</td></tr>\n<tr><td> </td><td align=\"center\" valign=\"middle\" style=\"border-width:2px;border-style:solid;width:" . $cellWidth . "px;height:80px;background-color:#f0f0f0;\">" . $coordinates[$sectional]['Abbrev'] . "<br>{$selectedGrid} {$displayQuadrant}<br><img src=\"/images/spacer.gif\" style=\"width:" . $cellWidth . "px;height:1px;\"></td><td width=\"{$cellWidth}\"> </td></tr>\n<tr><td valign=\"top\" align=\"right\" class=\"coord\">" . $result['SW']['lat'] . "<br>" . $result['SW']['lon'] . "</td><td align=\"center\" valign=\"top\" class=\"coord\"><nobr><small><i>Mag Variation:</i></small></nobr><br><nobr><i>{$variation}° {$varDir}</i></nobr></td><td valign=\"top\" align=\"left\" class=\"coord\">" . $result['SE']['lat'] . "<br>" . $result['SE']['lon'] . "</td></tr>\n</table></td></tr></table></div>\n";
?>
<!-- Printed Material -- not normally displayed onscreen -->
<div class="printonly">
}
if (isset($_GET['lat'])) {
$pointLatitude = $_GET['lat'];
}
if ($myquadrant != "E") {
$quadrantDisplay = "-" . $myquadrant;
}
# Determine the raw lon/lat of the top-left grid corner
$gridLon = $gridLat = $longitude = $latitude = 0;
if ($lonlatflag) {
$result1 = lonlat2grid($pointLongitude, $pointLatitude);
$sectional = $result1['sectional'];
$mygrid = $result1['grid'];
$myquadrant = $result1['quadrant'];
}
$result = grid2lonlat($sectional, $mygrid, $myquadrant, "raw");
$abbrev = $coordinates[$sectional]['Abbrev'];
$gridLon = $result['NW']['lon'];
$gridLat = $result['NW']['lat'];
$gridLabel = "{$abbrev} - {$mygrid}";
$filenameHeader = "Content-Disposition: attachment; filename=\"" . $abbrev . "_" . $mygrid . "-" . $myquadrant . ".kml\"";
$sectionalName = ucwords(strtolower(preg_replace("/_/", " ", $sectional)));
#echo "Lon: $gridLon Lat: $gridLat $abbrev - $mygrid \n";
?>
<!doctype html>
<html lang="en">
<head>
<meta charset="utf-8" />
<script src="js/jquery-1.9.1.js"></script>
<script src="js/jquery-ui.js"></script>
function GetSurroundingGridIDs($sectional, $gridNum, $quadrant = "E", $format = "dmm")
{
$CenterGridCoords = grid2lonlat($sectional, $gridNum, $quadrant, "raw");
$CenterGrid = array("sectional" => $sectional, "grid" => $gridNum, "quadrant" => $quadrant);
$NorthGridLat = $CenterGridCoords['NE']['lat'] + 0.05;
$NorthGridLon = ($CenterGridCoords['NE']['lon'] + $CenterGridCoords['NW']['lon']) / 2;
$NorthGrid = lonlat2grid($NorthGridLon, $NorthGridLat);
$SouthGridLat = $CenterGridCoords['SE']['lat'] - 0.05;
$SouthGridLon = $NorthGridLon;
$SouthGrid = lonlat2grid($SouthGridLon, $SouthGridLat);
$EastGridLat = ($CenterGridCoords['NE']['lat'] + $CenterGridCoords['SE']['lat']) / 2;
$EastGridLon = $CenterGridCoords['NE']['lon'] + 0.05;
$EastGrid = lonlat2grid($EastGridLon, $EastGridLat);
$WestGridLat = $EastGridLat;
$WestGridLon = $CenterGridCoords['NW']['lon'] - 0.05;
$WestGrid = lonlat2grid($WestGridLon, $WestGridLat);
if ($CenterGrid['quadrant'] == "E") {
$NorthGrid['quadrant'] = "";
$SouthGrid['quadrant'] = "";
$EastGrid['quadrant'] = "";
$WestGrid['quadrant'] = "";
} else {
$NorthGrid['quadrant'] = " - " . $NorthGrid['quadrant'];
$SouthGrid['quadrant'] = " - " . $SouthGrid['quadrant'];
$EastGrid['quadrant'] = " - " . $EastGrid['quadrant'];
$WestGrid['quadrant'] = " - " . $WestGrid['quadrant'];
}
$SurroundingGrids = array("Center" => $CenterGrid, "North" => $NorthGrid, "South" => $SouthGrid, "East" => $EastGrid, "West" => $WestGrid);
return $SurroundingGrids;
}
