#!/usr/bin/perl -wT
use CGI qw(:standard);
use CGI::Carp qw(warningsToBrowser fatalsToBrowser);
use strict;

my $k = param('k');
my $n1 = param('n1');
my $n2 = param('n2');
my $e1 = param('e1');
my $e2 = param('e2');
my $z = param('z');

#my $k1 = $k

print header;
print start_html("Get Form");

print " <html>\n";
print " <head>\n";
print " <meta http-equiv=\"Content-Language\" content=\"no-bok\">\n";
print " <meta http-equiv=\"Content-Type\" content=\"text/html; charset=windows-1252\">\n";
print " <meta name=\"GENERATOR\" content=\"Microsoft FrontPage 4.0\">\n";
print " <meta name=\"ProgId\" content=\"FrontPage.Editor.Document\">\n";
print " <title>Karttyper</title>\n";
print " <base target=\"kart\">\n";
print " </head>\n";

print " <body bgcolor=\"#CCCCCC\">\n";


print " <p style=\"margin-top: 0\"><font size=\"4\"><font color=\"#800040\"><b>Karttyper</b> <b>(wms)</b></font></font><br>\n";
print " <a target=\"meny\" style=\"text-decoration: none; color: #000000\" onclick=\"parent.kart.location.href='http://jarlegp.net/cgi-bin/kart.pl?k=topo2&n1=$n1&n2=$n2&e1=$e1&e2=$e2&z=$z'\" onfocus=\"this.blur()\" href=\"http://jarlegp.net/cgi-bin/meny.pl?k=topo2&n1=$n1&n2=$n2&e1=$e1&e2=$e2&z=$z\">Topografisk kart 2</font></a><br>\n";
print " <a target=\"meny\" style=\"text-decoration: none; color: #000000\" onclick=\"parent.kart.location.href='http://jarlegp.net/cgi-bin/kart.pl?k=topo2graatone&n1=$n1&n2=$n2&e1=$e1&e2=$e2&z=$z'\" onfocus=\"this.blur()\" href=\"http://jarlegp.net/cgi-bin/meny.pl?k=topo2graatone&n1=$n1&n2=$n2&e1=$e1&e2=$e2&z=$z\">Topografisk kart 2 grå</font></a><br>\n";
print " <a target=\"meny\" style=\"text-decoration: none; color: #000000\" onclick=\"parent.kart.location.href='http://jarlegp.net/cgi-bin/kart.pl?k=toporaster2&n1=$n1&n2=$n2&e1=$e1&e2=$e2&z=$z'\" onfocus=\"this.blur()\" href=\"http://jarlegp.net/cgi-bin/meny.pl?k=toporaster2&n1=$n1&n2=$n2&e1=$e1&e2=$e2&z=$z\">Topografisk rasterkart 2</font></a><br>\n";
print " <a target=\"meny\" style=\"text-decoration: none; color: #000000\" onclick=\"parent.kart.location.href='http://jarlegp.net/cgi-bin/kart.pl?k=kartdata2&n1=$n1&n2=$n2&e1=$e1&e2=$e2&z=$z'\" onfocus=\"this.blur()\" href=\"http://jarlegp.net/cgi-bin/meny.pl?k=kartdata2&n1=$n1&n2=$n2&e1=$e1&e2=$e2&z=$z\">Kartdata 2</font></a><br>\n";
print " <a target=\"meny\" style=\"text-decoration: none; color: #000000\" onclick=\"parent.kart.location.href='http://jarlegp.net/cgi-bin/kart.pl?k=sjo_hovedkart2&n1=$n1&n2=$n2&e1=$e1&e2=$e2&z=$z'\" onfocus=\"this.blur()\" href=\"http://jarlegp.net/cgi-bin/meny.pl?k=sjo_hovedkart2&n1=$n1&n2=$n2&e1=$e1&e2=$e2&z=$z\">Sjøkart hovedserien 2</font></a><br>\n";
print " <a target=\"meny\" style=\"text-decoration: none; color: #000000\" onclick=\"parent.kart.location.href='http://jarlegp.net/cgi-bin/kart.pl?k=europa&n1=$n1&n2=$n2&e1=$e1&e2=$e2&z=$z'\" onfocus=\"this.blur()\" href=\"http://jarlegp.net/cgi-bin/meny.pl?k=europa&n1=$n1&n2=$n2&e1=$e1&e2=$e2&z=$z\">Europakart</font></a><br>\n";
print " <a target=\"meny\" style=\"text-decoration: none; color: #000000\" onclick=\"parent.kart.location.href='http://jarlegp.net/cgi-bin/kart.pl?k=basemap&n1=$n1&n2=$n2&e1=$e1&e2=$e2&z=$z'\" onfocus=\"this.blur()\" href=\"http://jarlegp.net/cgi-bin/meny.pl?k=basemap&n1=$n1&n2=$n2&e1=$e1&e2=$e2&z=$z\">BaseMap Road/Aerial</font></a><br>\n";
print " <hr>\n";
print " <p><font size=\"4\"><font color=\"#800040\"><b>Lokale kartutsnitt</b></font></font><br>\n";
#print " <font size=\"2\">\n";
print " <a target=\"meny\" style=\"text-decoration: none; color: #000000\" onclick=\"parent.kart.location.href='http://jarlegp.net/cgi-bin/kart.pl?k=$k&n1=69&n2=17&e1=18&e2=04&z=12'\" onfocus=\"this.blur()\" href=\"http://jarlegp.net/cgi-bin/meny.pl?k=$k&n1=69&n2=17&e1=18&e2=04&z=12\">Oversiktskart</font></a><br>\n";
print " <a target=\"meny\" style=\"text-decoration: none; color: #000000\" onclick=\"parent.kart.location.href='http://jarlegp.net/cgi-bin/kart.pl?k=$k&n1=69&n2=16&e1=17&e2=89&z=15'\" onfocus=\"this.blur()\" href=\"http://jarlegp.net/cgi-bin/meny.pl?k=$k&n1=69&n2=16&e1=17&e2=89&z=15\">Solberg</font></a><br>\n";
print " <a target=\"meny\" style=\"text-decoration: none; color: #000000\" onclick=\"parent.kart.location.href='http://jarlegp.net/cgi-bin/kart.pl?k=$k&n1=69&n2=17&e1=17&e2=93&z=15'\" onfocus=\"this.blur()\" href=\"http://jarlegp.net/cgi-bin/meny.pl?k=$k&n1=69&n2=17&e1=17&e2=93&z=15\">Russevåg</font></a><br>\n";
print " <a target=\"meny\" style=\"text-decoration: none; color: #000000\" onclick=\"parent.kart.location.href='http://jarlegp.net/cgi-bin/kart.pl?k=$k&n1=69&n2=19&e1=18&e2=01&z=15'\" onfocus=\"this.blur()\" href=\"http://jarlegp.net/cgi-bin/meny.pl?k=$k&n1=69&n2=19&e1=18&e2=01&z=15\">Klauva</font></a><br>\n";
print " <a target=\"meny\" style=\"text-decoration: none; color: #000000\" onclick=\"parent.kart.location.href='http://jarlegp.net/cgi-bin/kart.pl?k=$k&n1=69&n2=19&e1=17&e2=95&z=15'\" onfocus=\"this.blur()\" href=\"http://jarlegp.net/cgi-bin/meny.pl?k=$k&n1=69&n2=19&e1=17&e2=95&z=15\">Vågan</font></a><br>\n";
print " <a target=\"meny\" style=\"text-decoration: none; color: #000000\" onclick=\"parent.kart.location.href='http://jarlegp.net/cgi-bin/kart.pl?k=$k&n1=69&n2=20&e1=17&e2=93&z=15'\" onfocus=\"this.blur()\" href=\"http://jarlegp.net/cgi-bin/meny.pl?k=$k&n1=69&n2=20&e1=17&e2=93&z=15\">Vassjord</font></a><br>\n";
print " <a target=\"meny\" style=\"text-decoration: none; color: #000000\" onclick=\"parent.kart.location.href='http://jarlegp.net/cgi-bin/kart.pl?k=$k&n1=69&n2=22&e1=17&e2=88&z=15'\" onfocus=\"this.blur()\" href=\"http://jarlegp.net/cgi-bin/meny.pl?k=$k&n1=69&n2=22&e1=17&e2=88&z=15\">Laksfjord</font></a><br>\n";
print " <hr>\n";
print " <p><font size=\"4\"><font color=\"#800040\"><b>Andre områder</b></font></font><br>\n";
#print " <font size=\"2\">\n";
print " <a target=\"meny\" style=\"text-decoration: none; color: #000000\" onclick=\"parent.kart.location.href='http://jarlegp.net/cgi-bin/kart.pl?k=$k&n1=69&n2=23&e1=18&e2=00&z=14'\" onfocus=\"this.blur()\" href=\"http://jarlegp.net/cgi-bin/meny.pl?k=$k&n1=69&n2=23&e1=18&e2=00&z=14\">Silsand/Finnsnes</font></a><br>\n";
print " <a target=\"meny\" style=\"text-decoration: none; color: #000000\" onclick=\"parent.kart.location.href='http://jarlegp.net/cgi-bin/kart.pl?k=$k&n1=69&n2=14&e1=18&e2=17&z=14'\" onfocus=\"this.blur()\" href=\"http://jarlegp.net/cgi-bin/meny.pl?k=$k&n1=69&n2=14&e1=18&e2=17&z=14\">Sørreisa</font></a><br>\n";
print " <a target=\"meny\" style=\"text-decoration: none; color: #000000\" onclick=\"parent.kart.location.href='http://jarlegp.net/cgi-bin/kart.pl?k=$k&n1=69&n2=24&e1=17&e2=94&z=10'\" onfocus=\"this.blur()\" href=\"http://jarlegp.net/cgi-bin/meny.pl?k=$k&n1=69&n2=24&e1=17&e2=94&z=10\">Senja</font></a><br>\n";
print " <a target=\"meny\" style=\"text-decoration: none; color: #000000\" onclick=\"parent.kart.location.href='http://jarlegp.net/cgi-bin/kart.pl?k=$k&n1=69&n2=65&e1=19&e2=04&z=12'\" onfocus=\"this.blur()\" href=\"http://jarlegp.net/cgi-bin/meny.pl?k=$k&n1=69&n2=65&e1=19&e2=04&z=12\">Tromsø</font></a><br>\n";
print " <a target=\"meny\" style=\"text-decoration: none; color: #000000\" onclick=\"parent.kart.location.href='http://jarlegp.net/cgi-bin/kart.pl?k=$k&n1=68&n2=77&e1=16&e2=60&z=12'\" onfocus=\"this.blur()\" href=\"http://jarlegp.net/cgi-bin/meny.pl?k=$k&n1=68&n2=77&e1=16&e2=60&z=12\">Harstad</font></a><br>\n";
print " <a target=\"meny\" style=\"text-decoration: none; color: #000000\" onclick=\"parent.kart.location.href='http://jarlegp.net/cgi-bin/kart.pl?k=$k&n1=68&n2=90&e1=19&e2=98&z=8'\" onfocus=\"this.blur()\" href=\"http://jarlegp.net/cgi-bin/meny.pl?k=$k&n1=68&n2=90&e1=19&e2=98&z=8\">Troms Fylke</font></a><br>\n";
print " <a target=\"meny\" style=\"text-decoration: none; color: #000000\" onclick=\"parent.kart.location.href='http://jarlegp.net/cgi-bin/kart.pl?k=$k&n1=61&n2=20&e1=26&e2=94&z=5'\" onfocus=\"this.blur()\" href=\"http://jarlegp.net/cgi-bin/meny.pl?k=$k&n1=61&n2=20&e1=26&e2=94&z=5\">Norge</font></a><br>\n";
print " </font>\n";

print " <hr>\n";

print " <!-- Begin Motigo Webstats counter code -->\n";
print " <a id=\"mws4695858\" href=\"http://webstats.motigo.com/\">\n";
print " <img width=\"80\" height=\"15\" border=\"0\" alt=\"Free counter and web stats\" src=\"http://m1.webstats.motigo.com/n80x15.gif?id=AEenMgsjAaMVEVct7snUwPx7xj0g\" /></a>\n";
print " <script src=\"http://m1.webstats.motigo.com/c.js?id=4695858&amp;lang=EN&amp;i=27\" type=\"text/javascript\"></script>\n";
print " <!-- End Motigo Webstats counter code -->\n";



#print " <p>&nbsp;</p>\n";
#print " <p>&nbsp;</p>\n";
#print " <p>&nbsp;</p>\n";

print " <hr>\n";
print " <font size=\"1\">\n";
print " Kart: $k<br>\n";
print " Zoom level: $z<br>\n";
print " N $n1.$n2 &nbsp; E $e1.$e2<br>\n";

print " <hr>\n";
print "  Kartgrunnlag:&nbsp; <a href=\"http://www.statkart.no\">Statens kartverk</a>,\n";
print "  <a href=\"http://www.statkart.no/nor/Land/Fagomrader/Geovekst/\">Geovekst</a> og\n";
print "  <a href=\"http://www.statkart.no/?module=Articles;action=Article.publicShow;ID=14194\">kommuner</a>\n";
print " </font>\n";
#print " <hr>\n";

print " </body>\n";
print " <font size=\"1\">\n";

print " </html>\n";


