//<![CDATA[
function OSGridToLatLong(eastings,northings){var E=eastings,N=northings;var a=6377563.396,b=6356256.910;var F0=0.9996012717;var lat0=49*Math.PI/180,lon0=-2*Math.PI/180;var N0=-100000,E0=400000;var e2=1-(b*b)/(a*a);var n=(a-b)/(a+b),n2=n*n,n3=n2*n;var lat=lat0,M=0,latplus,latminus,m1=5/4,m2=21/24,m3=15/8,m4=35/24;do{lat=(N-N0-M)/(a*F0)+lat;latplus=lat+lat0;latminus=lat-lat0;var Ma=(1+n+m1*n2+m1*n3)*latminus;var Mb=3*(n+n2+m2*n3)*Math.sin(latminus)*Math.cos(latplus);var Mc=m3*(n2+n3)*Math.sin(2*latminus)*Math.cos(2*latplus);var Md=m4*n3*Math.sin(3*latminus)*Math.cos(3*latplus);var M=b*F0*(Ma-Mb+Mc-Md)}while(Math.abs(N-N0-M)>=0.00001);var cosLat=Math.cos(lat),sinLat=Math.sin(lat),sin2lat=sinLat*sinLat;var nu=a*F0/Math.sqrt(1-e2*sin2lat);var rho=a*F0*(1-e2)/Math.pow(1-e2*sin2lat,1.5);var eta2=nu/rho-1;var tanLat=Math.tan(lat);var tan2lat=tanLat*tanLat,tan4lat=tan2lat*tan2lat,tan6lat=tan4lat*tan2lat;var secLat=1/cosLat;var nu2=nu*nu;var nu3=nu2*nu,nu5=nu3*nu2,nu7=nu5*nu2;var VII=tanLat/(2*rho*nu);var VIII=tanLat/(24*rho*nu3)*(5+3*tan2lat+eta2-9*tan2lat*eta2);var IX=tanLat/(720*rho*nu5)*(61+90*tan2lat+45*tan4lat);var X=secLat/nu;var XI=secLat/(6*nu3)*(nu/rho+2*tan2lat);var XII=secLat/(120*nu5)*(5+28*tan2lat+24*tan4lat);var XIIA=secLat/(5040*nu7)*(61+662*tan2lat+1320*tan4lat+720*tan6lat);var dE=(E-E0),dE2=dE*dE,dE3=dE2*dE,dE4=dE2*dE2,dE5=dE3*dE2,dE6=dE4*dE2,dE7=dE5*dE2;lat=lat-VII*dE2+VIII*dE4-IX*dE6;var lon=lon0+X*dE-XI*dE3+XII*dE5-XIIA*dE7;var latlng=new Array(2);latlng[0]=lat*180/Math.PI;latlng[1]=lon*180/Math.PI;return latlng};function toOSLand(eastings,northings,dig){var ret_str,num_east,num_north,i,j,lbit,rbit,OSgrid=new Array(12);OSgrid[0]=['SV','SW','SX','SY','SZ','TV','??'];OSgrid[1]=['??','SR','SS','ST','SU','TQ','TR'];OSgrid[2]=['??','SM','SN','SO','SP','TL','TM'];OSgrid[3]=['??','??','SH','SJ','SK','TF','TG'];OSgrid[4]=['??','??','SC','SD','SE','TA','??'];OSgrid[5]=['??','NW','NX','NY','NZ','OV','??'];OSgrid[6]=['??','NR','NS','NT','NU','??','??'];OSgrid[7]=['NL','NM','NN','NO','??','??','??'];OSgrid[8]=['NF','NG','NH','NJ','NK','??','??'];OSgrid[9]=['NA','NB','NC','ND','??','??','??'];OSgrid[10]=['??','HW','HX','HY','HZ','??','??'];OSgrid[11]=['??','??','??','HT','HU','??','??'];OSgrid[12]=['??','??','??','??','HP','??','??'];num_east=parseInt(eastings);num_north=parseInt(northings);i=Math.floor(num_east/100000);j=Math.floor(num_north/100000);lbit=num_east-i*100000;rbit=num_north-j*100000;ret_str=OSgrid[j][i];switch(dig){case 4:lbit=100000+lbit+5;rbit=100000+rbit+5;ret_str+=lbit.toString().substr(1,4)+rbit.toString().substr(1,4);break;case 5:lbit=100000+lbit;rbit=100000+rbit;ret_str+=lbit.toString().substr(1,5)+rbit.toString().substr(1,5);break;case 3:lbit=Math.floor(lbit/10);rbit=Math.floor(rbit/10);lbit=10000+lbit+5;rbit=10000+rbit+5;ret_str+=lbit.toString().substr(1,3)+rbit.toString().substr(1,3);break;case 2:lbit=Math.floor(lbit/100);rbit=Math.floor(rbit/100);lbit=1000+lbit+5;rbit=1000+rbit+5;ret_str+=lbit.toString().substr(1,2)+rbit.toString().substr(1,2);break};return ret_str};function DayNumber(){var offset=539,currentDate,streetmapDate,streetmapDN,msPerDay=86400000;currentDate=new Date();streetmapDate=new Date();streetmapDate.setDate(27);streetmapDate.setMonth(11);streetmapDate.setFullYear(2008);streetmapDN=currentDate.getTime()-streetmapDate.getTime();streetmapDN=offset+Math.floor(streetmapDN/msPerDay);return(streetmapDN)};function initcounter(){nnn=0};function incrcounter(){nnn++};function do_map(fixed,fixed_num,eastings,northings,desc){var lat,lon,latlng,i,ch,descurl,factr=5100/800,fact,circ_x,circ_y,east_frac,north_frac,east_num,north_num,east,north,map_type,map_type_str,pageid,znum,znum1,znum2,baseURL,map_source=_eid('myform').mapsrc.value;descurl='';for(i=0;i<desc.length;i++){ch=desc.charAt(i);if(ch==' '){descurl+='+'}else{descurl+=ch}};if(fixed){map_source=fixed_num.toString();map_type='1'};latlng=OSGridToLatLong(eastings,northings);lat=latlng[0]+0.0005;lon=latlng[1]-0.0015;lat=lat.toFixed(5);lon=lon.toFixed(5);switch(map_source){case'2':case'3':case'4':{baseURL='http://www.streetmap.co.uk/map.srf?X=';document.write('<A ');document.write(' HREF="'+baseURL+eastings+'&amp;Y='+northings+'&amp;A=Y&amp;Z=');if(map_source=='2'){document.write('120')}else if(map_source=='3'){document.write('115')}else{document.write('106')};document.write('" TARGET="_blank" TITLE="Map at 1:');if(map_source=='2'){document.write('50K')}else if(map_source=='3'){document.write('25K')}else{document.write('2500')};document.write(' scale, from Streetmap, of '+desc);if(fixed){document.write(' [FIXED SOURCE]')};document.write('">');break}case'6':case'7':{baseURL='http://getamap.ordnancesurvey.co.uk/getamap/jsp/map_print.jsp?mapX='+eastings+'&amp;mapY='+northings+'&amp;zoomLevel=';if(map_source=='6'){baseURL+='6'}else{baseURL+='7'};baseURL+='&amp;isNI=n&amp;mapAction=zoomabs&amp;isGeo=y';document.write('<A ');document.write(' HREF="'+baseURL+'" TARGET="_blank" TITLE="Map at 1:');if(map_source=='6'){document.write('50K')}else{document.write('25K')};document.write(' scale, from Get-a-map, of '+desc);if(fixed){document.write(' [FIXED SOURCE]')};document.write('">');break}case'10':case'11':{baseURL='http://www1.getmapping.com/webshop/Web/CommonPages/Main/preview.aspx?srid=27700';if(map_source=='10'){baseURL+='&amp;width=500&amp;height=500';map_type_str='close-up'}else{baseURL+='&amp;width=1414.2&amp;height=1000';map_type_str='wide'};baseURL+='&amp;X='+eastings+'&amp;Y='+northings;document.write('<A ');document.write(' HREF="'+baseURL+'" TARGET="_blank" TITLE="Aerial photo ('+map_type_str+'), from Getmapping, of '+desc);document.write('">');break}case'8':case'9':{baseURL='http://magic.defra.gov.uk/website/magic/opener.htm?startTopic=magadminareas&amp;startScale=';if(map_source=='8'){baseURL+='5';map_type_str='close-up'}else{baseURL+='10';map_type_str='wide'};baseURL+='000&amp;xygridref='+eastings+','+northings;document.write('<A ');document.write(' HREF="'+baseURL+'" TARGET="_blank" TITLE="Map at 1:10K scale ('+map_type_str+'), from MAGIC, of '+desc);if(fixed){document.write(' [FIXED SOURCE]')};document.write('">');break}case'12':case'14':{baseURL='http://maps.google.co.uk/maps?spn=0.02,0.02&amp;t=k&amp;om=1&amp;ll=';latlng=OSGridToLatLong(eastings,northings);lat=latlng[0]+0.0005;lon=latlng[1]-0.0015;lat=lat.toFixed(5);lon=lon.toFixed(5);baseURL+=lat+','+lon+'&amp;q='+lat+','+lon+'+('+descurl+')';if(map_source=='14')baseURL+='&amp;output=kml';document.write('<A ');document.write(' HREF="'+baseURL+'" TARGET="_blank" ');if(map_source=='12'){document.write('TITLE="Aerial photo, from Google Maps, of '+desc)}else{document.write('TITLE="Google Earth KML placemark of '+desc)};if(fixed){document.write(' [FIXED SOURCE]')};document.write('">');break}case'13':{baseURL='http://www.bing.com/maps/default.aspx?v=2&amp;style=o&amp;lvl=17&amp;cp=';latlng=OSGridToLatLong(eastings,northings);lat=latlng[0]+0.0005;lon=latlng[1]-0.0015;lat=lat.toFixed(5);lon=lon.toFixed(5);baseURL+=lat+'~'+lon;document.write('<A ');document.write(' HREF="'+baseURL+'" TARGET="_blank" TITLE="Aerial photo, from Live Local, of '+desc);if(fixed){document.write(' [FIXED SOURCE]')};document.write('">');break}case'5':{baseURL='http://getamap.ordnancesurvey.co.uk/getamap/frames.htm?mapAction=gaz&amp;gazName=g&amp;gazString='+toOSLand(eastings,northings,4);document.write('<A ');document.write(' HREF="'+baseURL+'" TARGET="_blank" TITLE="Map (navigable) from Get-a-map, of '+desc);if(fixed){document.write(' [FIXED SOURCE]')};document.write('">');break}case'1':{baseURL='http://www.bing.com/maps/default.aspx?v=2&amp;style=s&amp;cp=';latlng=OSGridToLatLong(eastings,northings);lat=latlng[0]+0.0005;lon=latlng[1]-0.0015;lat=lat.toFixed(5);lon=lon.toFixed(5);znum='14';baseURL+=lat+'~'+lon+'&amp;eo=1&amp;where1='+lat+','+lon+'&amp;lvl='+znum;document.write('<A ');document.write(' HREF="'+baseURL+'" TARGET="_blank" TITLE="Map at 1:50K');document.write(' scale, from Bing Maps, of '+desc);if(fixed){document.write(' [FIXED SOURCE]')};document.write('">');break}}};
//]]>
