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; }