var foretag = "SGU";

//globala variabler

var maptypeArcName= new Array();
var maptypeNiceName= new Array();
var maptypeLayer= new Array();
var maptypeScaleinit = new Array();
var addlayer ="";
var kryss= false;
var textInfo="";



//Globala variabler
var choosenLayer;var topoLayer;var map,map2,options2,options;var drawControls,sizeControls,scaleControls;
var xlen = 0;var ylen= 0 ;
var skala = 50000;
var storlek = 'A4';
var stations;
var mapname;
var uppsala;
var beenbefore = 0;
var clickedmap = 0;
var count = 0;
var wms = 0;
var result1 = 0;
var response = 0;
//        


function init(){

      
       var options = {

                           resolutions: [3080,1680,840,280,199.6398,99.95,50.00,25.00],
                           maxResolution: 3080,
                           maxExtent: new OpenLayers.Bounds(9645.68,6039880.63,1107160.61,7831063.00),
                           projection:"EPSG:3006",
                           //controls: [],
                           theme: null
                          };


              map = new OpenLayers.Map( $('map') , options);

               choosenLayer = new OpenLayers.Layer.WMS(
                  "Overview",
                    wmsServer1,
                    {'minResolution': 3080,'layers': 'kageweb:onlyall', 'format': "image/png",'units':"meters"},  
                    { 'isBaseLayer': true}  ,
                   {'singleTile': false}

                    );

         map.addLayer(choosenLayer); //map.addLayer(first);
         map.setBaseLayer(choosenLayer);
         map.zoomToMaxExtent();
          map.events.register("click", map, function(e) { countries.expandit(1);   });  //end click;

// 
//                 var url = 'images/button.png';
//                  var sz = new OpenLayers.Size(10, 10);
//                  var icon = new OpenLayers.Icon(url, sz, null);
//                  var popInfo = "<table border=\'0\' cellspacing=\'5\' style=\'background:#E9EFF8;\'>"
//                          + "<tr><th colspan=\'1\' style=\'font-size:8pt;background:#007AC3;color:white;\'>"
//                          + "Information ang�ende koordinatsystem:<\/th><\/tr><tr><td style=\'font-size:8pt;\'>"
//                          + "Vi har bytt koordinatsystem ifr�n <br>RT90 2.5gonV till SWEREF99TM<\/td><\/tr>"
//                          + "<tr><td style=\'font-size:8pt;\'>L�s mer p� <a href=\'http://www.sgu.se\' target='\_blank\'>http:/www.sgu.se</a></td></tr>"
//                          + "<tr><td style=\'font-size:8pt;\'><br><br><br></td></tr></table>"
//                 popup = new OpenLayers.Popup.AnchoredBubble("chicken",
//                    new OpenLayers.LonLat(150000,7400000),
//                    new OpenLayers.Size(230,110),
//                    popInfo,
//                    icon,
//                    true,
//                    {'closeOnMove' : true});
//                    //{'autoSize' : true});
// 
//                 map.addPopup(popup);
//                 popup.setBackgroundColor('#E9EFF8');



         document.forms['koordinater'].changeW.value = 643596;
		 document.forms['koordinater'].changeS.value = 6635372;
                 document.getElementById('maptext').style.visibility = "hidden";
                 document.getElementById('boxtest').style.visibility = "hidden";

                  

       $('size').value = "A4";
       $('sizeArc').value = ".TRUE.";
       
       $("fns").value=6634000 ;
       $("few").value=1600000 ;
       $("llcy").value=6634000 ;
       $("llcx").value=1600000 ;
       
}  //end init()



function prepareAddLayer(select,tindex,kindex){
//alert(tindex);
if (tindex == 1 && kindex == 1){$("scale").value='50000';addLayer(berg50,wmsServer1,"image/png",false);
}else if (tindex == 1 && kindex == 2){$("scale").value='250000';addLayer(berg100,wmsServer1,"image/png",false);
}else if (tindex == 1 && kindex == 3){addLayer(berg100,wmsServer1,"image/png",false);

}else if (tindex == 2 && kindex == 1){$("scale").value='50000';addLayer(jord50,wmsServer1,"image/png",false);
}else if (tindex == 2 && kindex == 2){$("scale").value='100000';addLayer(jord100,wmsServer1,"image/png",false);
//}else if (tindex == 2 && kindex == 3){$("scale").value='100000';addLayer(jord100,wmsServer2,"image/png8",true);
//}else if (tindex == 2 && kindex == 4){$("scale").value='100000';addLayer(jord_n,wmsServer2,"image/png8",true);
//}else if (tindex == 2 && kindex == 5){$("scale").value='100000';addLayer(jord_e,wmsServer2,"image/png8",true);

}else if (tindex == 3 && kindex == 1){addLayer(magnet,wmsServer1,"image/png",false);
}else if (tindex == 3 && kindex == 2){addLayer(uran,wmsServer1,"image/png",false);
}else if (tindex == 3 && kindex == 3){addLayer(kalium,wmsServer1,"image/png",false);
}else if (tindex == 3 && kindex == 4){addLayer(torium,wmsServer1,"image/png",false);
}else if (tindex == 3 && kindex == 5){addLayer(cesium,wmsServer1,"image/png",false);
}else if (tindex == 3 && kindex == 6){addLayer(resistivitet,wmsServer1,"image/png",false);
}else if (tindex == 3 && kindex == 7){addLayer(tyngdkraft,wmsServer1,"image/png",false);

}else if (tindex == 4 && kindex == 1){$("scale").value='100000';addLayer(geokemi,wmsServer1,"image/png",false);

}else if (tindex == 5 && kindex == 1){$("scale").value='100000';addLayer(hydro50,wmsServer1,"image/png",false);
}else if (tindex == 5 && kindex == 2){$("scale").value='250000';addLayer(hydro100,wmsServer1,"image/png",false);

}else if (tindex == 6 && kindex == 1){$("scale").value='100000';addLayer(marin,wmsServer1,"image/png",false);
}else if (tindex == 6 && kindex == 2){addLayer(marin,wmsServer1,"image/png",false);

}else if (tindex == 7 && kindex == 1){addLayer(paleo1000,wmsServer1,"image/png8",false);
}else if (tindex == 7 && kindex == 2){addLayer(paleo2000,wmsServer1,"image/png8",false);
}else if (tindex == 7 && kindex == 3){addLayer(paleo3000,wmsServer1,"image/png8",false);
}else if (tindex == 7 && kindex == 4){addLayer(paleo4000,wmsServer1,"image/png8",false);
}else if (tindex == 7 && kindex == 5){addLayer(paleo5000,wmsServer1,"image/png8",false);
}else if (tindex == 7 && kindex == 6){addLayer(paleo6000,wmsServer1,"image/png8",false);
}else if (tindex == 7 && kindex == 7){addLayer(paleo7000,wmsServer1,"image/png8",false);
}else if (tindex == 7 && kindex == 8){addLayer(paleo8000,wmsServer1,"image/png8",false);
}else if (tindex == 7 && kindex == 9){addLayer(paleo9000,wmsServer1,"image/png8",false);
}else if (tindex == 7 && kindex == 10){addLayer(paleo10000,wmsServer1,"image/png8",false);
}else if (tindex == 7 && kindex == 11){addLayer(paleo11000,wmsServer1,"image/png8",false);
}else if (tindex == 7 && kindex == 12){addLayer(paleo12000,wmsServer1,"image/png8",false);
}else if (tindex == 7 && kindex == 13){addLayer(paleo13000,wmsServer1,"image/png8",false);
}else if (tindex == 7 && kindex == 14){addLayer(paleo14000,wmsServer1,"image/png8",false);
}else if (tindex == 7 && kindex == 15){addLayer(paleo15000,wmsServer1,"image/png8",false);
}else if (tindex == 7 && kindex == 16){addLayer(paleo16000,wmsServer1,"image/png8",false);
}else if (tindex == 7 && kindex == 17){addLayer(paleo1000f,wmsServer1,"image/png8",false);
}else if (tindex == 7 && kindex == 18){addLayer(paleo2000f,wmsServer1,"image/png8",false);
}else if (tindex == 7 && kindex == 19){addLayer(paleo3000f,wmsServer1,"image/png8",false);
}else if (tindex == 7 && kindex == 20){addLayer(paleo4000f,wmsServer1,"image/png8",false);
}else if (tindex == 7 && kindex == 21){addLayer(paleo5000f,wmsServer1,"image/png8",false);
}else if (tindex == 7 && kindex == 22){addLayer(paleo10000f,wmsServer1,"image/png8",false);
}else if (tindex == 7 && kindex == 23){addLayer(paleo15000f,wmsServer1,"image/png8",false);
}else if (tindex == 7 && kindex == 24){addLayer(paleo1,wmsServer1,"image/png8",false);

}


}
function addLayer(select_node,server,format,tile){

             document.getElementById('params').innerHTML = "";
             document.getElementById('epostuppgifter').style.visibility = "hidden";
             document.getElementById('boxtest').style.visibility = "visible";
             document.getElementById('maptext').style.visibility = "visible";

             var lager = 2;  firstname = "";
             lager = select_node;
             checker = map.getResolution();
             map.removeLayer(choosenLayer);


choosenLayer = new OpenLayers.Layer.WMS(
                                lager ,
                                server,
                                {layers: lager, format: format, units:"meters"},
                                {'singleTile': tile},
                                {'transitionEffect': 'resize'}
                                 );


                              map.addLayer(choosenLayer);
                             map.addControl(new OpenLayers.Control.MouseDefaults());
                              map.addControl(new OpenLayers.Control.LoadingPanel());
                              map.addControl(new OpenLayers.Control.PanZoom());
                             map.addControl(new OpenLayers.Control.KeyboardDefaults());
                              if (lang == "sv") {map.addControl( new OpenLayers.Control.MousePosition({numDigits:0,prefix: 'Markörens koordinat: '}) )}
                               else {map.addControl( new OpenLayers.Control.MousePosition({numDigits:0,prefix: 'Position: '}) )};

                   if (beenbefore == 0) {map.zoomToMaxExtent();
                                        //Kartutsnitt init
                                        boxes = new OpenLayers.Layer.Boxes("Kartutsnitt");
                                        map.addLayer(boxes);
                                        //bounds = new OpenLayers.Bounds(2, 2, 4, 4);
                                        bounds = new OpenLayers.Bounds(643596, 6635372, 651096, 6642872);
                                        box = new OpenLayers.Marker.Box(bounds);
                                        boxes.addMarker(box);}
 
                   beenbefore = beenbefore + 1;




 //onclick
 map.events.register("click", map, function(e) { 
				clickedmap = 1;
                  document.getElementById('params').innerHTML = "";
                  document.getElementById('epostuppgifter').style.visibility = "hidden";
                 var lonlat = map.getLonLatFromPixel(e.xy);
                
                        //varf�r dra bort 10 sk�rmpixlar????
                 var lonlat_mod = map.getLonLatFromPixel(new OpenLayers.Pixel(e.xy.x, e.xy.y));
                    
                 var calculateOffset = function(size) {return new OpenLayers.Pixel(-(size.w), -(size.h));};         
                          

                   map.panTo(new OpenLayers.LonLat(lonlat_mod.lon,lonlat_mod.lat));
                   //map.panTo(lonlat_mod);
                //document.getElementById("few").value=parseFloat($('scale').value);
                 $("few").value=parseInt(lonlat_mod.lon);
                 $("fns").value=parseInt(lonlat_mod.lat);

                  //var zoomniva = map.getZoom();
                  //alert(zoomniva);


         //Box
                if(storlek == 'A1'){xlen = skala*0.5/2;ylen = skala*0.5/2;}
                 if(storlek == 'A3'){xlen = skala*0.25/2;ylen = skala*0.25/2;}
                  if(storlek == 'A4'){xlen = skala*0.15/2;ylen = skala*0.15/2;} 
                 
                 $("llcx").value=parseInt($('few').value) ;
                 $("llcy").value=parseInt($('fns').value) ;
                 
                 boxes.removeMarker(box);
                 bounds = new OpenLayers.Bounds(lonlat_mod.lon-xlen, lonlat_mod.lat-xlen, lonlat_mod.lon+xlen, lonlat_mod.lat+ylen);
                 //alert (bounds);
                 box = new OpenLayers.Marker.Box(bounds);
                 boxes.addMarker(box);


		 document.forms['koordinater'].changeW.value = parseInt(lonlat_mod.lon-xlen);
		 document.forms['koordinater'].changeS.value = parseInt(lonlat_mod.lat-xlen);



               showInfo();


});  //end click;



           storlek = $("size").value;
          skala = $("scale").value;
          //alert(storlek + skala);
             if(storlek == 'A1'){xlen = skala*0.5/2;ylen = skala*0.5/2;}
              if(storlek == 'A3'){xlen = skala*0.25/2;ylen = skala*0.25/2;} 
               if(storlek == 'A4'){xlen = skala*0.15/2;ylen = skala*0.15/2;} 
               
           boxes.removeMarker(box);
           bounds = new OpenLayers.Bounds(document.forms['koordinater'].changeW.value, document.forms['koordinater'].changeS.value, (parseInt(document.forms['koordinater'].changeW.value)+2*xlen), (parseInt(document.forms['koordinater'].changeS.value)+2*ylen));
           box = new OpenLayers.Marker.Box(bounds);
           boxes.addMarker(box);
          
           //first.setVisibility(false) ;
          //if (first.getVisibility()== true){map.raiseLayer(first,-2);}
          showInfo();

}




function changeScale(select_node){

           document.getElementById('params').innerHTML = "";
           document.getElementById('epostuppgifter').style.visibility = "hidden";
          $("scale").value=select_node;
          skala = select_node; //.value;

          storlek = $("size").value;
          //alert(storlek + skala);
             if(storlek == 'A1'){xlen = skala*0.5/2;ylen = skala*0.5/2;}
              if(storlek == 'A3'){xlen = skala*0.25/2;ylen = skala*0.25/2;}
               if(storlek == 'A4'){xlen = skala*0.15/2;ylen = skala*0.15/2;}

           boxes.removeMarker(box);
             bounds = new OpenLayers.Bounds(document.forms['koordinater'].changeW.value, document.forms['koordinater'].changeS.value, (parseInt(document.forms['koordinater'].changeW.value)+2*xlen), (parseInt(document.forms['koordinater'].changeS.value)+2*ylen));
             box = new OpenLayers.Marker.Box(bounds);
           boxes.addMarker(box);

          showInfo();

}

function changeSize(select_node){
             document.getElementById('params').innerHTML = "";
     document.getElementById('epostuppgifter').style.visibility = "hidden";

            $("size").value=select_node
            storlek = select_node; //.value;
            skala = $("scale").value;
           // alert(storlek + skala);
             if(storlek == 'A1'){xlen = skala*0.5/2;ylen = skala*0.5/2; $("sizeArc").value=".FALSE." ; }
              if(storlek == 'A3'){xlen = skala*0.25/2;ylen = skala*0.25/2; $("sizeArc").value=".FALSE." ;}
               if(storlek == 'A4'){xlen = skala*0.15/2;ylen = skala*0.15/2; $("sizeArc").value=".TRUE." ;}


           boxes.removeMarker(box);               
           bounds = new OpenLayers.Bounds(document.forms['koordinater'].changeW.value, document.forms['koordinater'].changeS.value, (parseInt(document.forms['koordinater'].changeW.value)+2*xlen), (parseInt(document.forms['koordinater'].changeS.value)+2*ylen));
           box = new OpenLayers.Marker.Box(bounds);
           boxes.addMarker(box);

          showInfo();

}


 function changeWest(select_node){
            document.getElementById('params').innerHTML = "";
     document.getElementById('epostuppgifter').style.visibility = "hidden";
          storlek = $("size").value;
          skala = $("scale").value;
             if(storlek == 'A1'){xlen = skala*0.5/2;ylen = skala*0.5/2; $("sizeArc").value=".FALSE." ; }
              if(storlek == 'A3'){xlen = skala*0.25/2;ylen = skala*0.25/2; $("sizeArc").value=".FALSE." ;}
               if(storlek == 'A4'){xlen = skala*0.15/2;ylen = skala*0.15/2; $("sizeArc").value=".TRUE." ;}

          document.forms['koordinater'].changeW.value = parseInt(select_node.value);


            boxes.removeMarker(box);
              bounds = new OpenLayers.Bounds(parseInt(select_node.value), parseInt(document.forms['koordinater'].changeS.value),(parseInt(select_node.value)+2*xlen), (parseInt(document.forms['koordinater'].changeS.value)+2*ylen));
              box = new OpenLayers.Marker.Box(bounds);
            boxes.addMarker(box);
           
           showInfo();
           //changeExtent();

 }
function changeSouth(select_node){

document.getElementById('params').innerHTML = "";
document.getElementById('epostuppgifter').style.visibility = "hidden";
          storlek = $("size").value;
          skala = $("scale").value;
             if(storlek == 'A1'){xlen = skala*0.5/2;ylen = skala*0.5/2; $("sizeArc").value=".FALSE." ; }
              if(storlek == 'A3'){xlen = skala*0.25/2;ylen = skala*0.25/2; $("sizeArc").value=".FALSE." ;}
               if(storlek == 'A4'){xlen = skala*0.15/2;ylen = skala*0.15/2; $("sizeArc").value=".TRUE." ;}


              document.forms['koordinater'].changeS.value = select_node.value;

             
            
            showInfo();
            changeExtent();
            
             boxes.removeMarker(box);
                bounds = new OpenLayers.Bounds(parseInt(document.forms['koordinater'].changeW.value), parseInt(select_node.value),(parseInt(document.forms['koordinater'].changeW.value)+2*xlen), parseInt(select_node.value)+2*ylen);
                box = new OpenLayers.Marker.Box(bounds);
              boxes.addMarker(box);
 }

function changeExtent(select_node){

             storlek = $("size").value;
             skala = $("scale").value;
             if(storlek == 'A1'){xlen = skala*0.5/2;ylen = skala*0.5/2; $("sizeArc").value=".FALSE." ; }
              if(storlek == 'A3'){xlen = skala*0.25/2;ylen = skala*0.25/2; $("sizeArc").value=".FALSE." ;}
               if(storlek == 'A4'){xlen = skala*0.15/2;ylen = skala*0.15/2; $("sizeArc").value=".TRUE." ;}
               var w =(document.forms['koordinater'].changeW.value);
               var s =(document.forms['koordinater'].changeS.value);
               
               if (w > 1000000){ 									 //rt90
               		var wsproj = xy2xy(parseInt(w),parseInt(s));
               		wsp = wsproj.split(',');   
              		w = parseInt(wsp[0]); s = parseInt(wsp[1]);
              		document.forms['koordinater'].changeW.value = w;
                    document.forms['koordinater'].changeS.value= s;
              		}
               
               var e = parseInt(w) + 2*xlen;
               var n = parseInt(s) + 2*xlen;
               var ce = parseInt(w) + xlen;
               var cn = parseInt(s) + xlen;
               //var ww = parseInt(w) + 500;
               //var ss = parseInt(s) + 500;
             bounds = new OpenLayers.Bounds(w, s, e, n);
var lager=2;
lager=map.baseLayer.name;
//Zoom to red rectangle as good as zoomlimit
if (storlek == 'A4'){
      if (skala == 20000 && lager.substring(0,5) != "paleo") {map.setCenter(new OpenLayers.LonLat(ce,cn),'7','true','true');}
      if (skala == 20000 && lager.substring(0,5) == "paleo") {map.setCenter(new OpenLayers.LonLat(ce,cn),'6','true','true');}

      if (skala == 50000 && lager.substring(0,5) != "paleo") {map.setCenter(new OpenLayers.LonLat(ce,cn),'7','true','true');}
      if (skala == 50000 && lager.substring(0,5) == "paleo") {map.setCenter(new OpenLayers.LonLat(ce,cn),'6','true','true');}

      if (skala == 100000) {map.setCenter(new OpenLayers.LonLat(ce,cn),'6','true','true');}
      if (skala == 250000) {map.setCenter(new OpenLayers.LonLat(ce,cn),'5','true','true');}
      if (skala == 500000) {map.setCenter(new OpenLayers.LonLat(ce,cn),'4','true','true');}
      }
if (storlek == 'A3'){
      if (skala == 20000) {map.setCenter(new OpenLayers.LonLat(ce,cn),'6','true','true');}
      if (skala == 50000) {map.setCenter(new OpenLayers.LonLat(ce,cn),'6','true','true');}
      if (skala == 100000) {map.setCenter(new OpenLayers.LonLat(ce,cn),'5','true','true');}
      if (skala == 250000) {map.setCenter(new OpenLayers.LonLat(ce,cn),'4','true','true');}
      if (skala == 500000) {map.setCenter(new OpenLayers.LonLat(ce,cn),'3','true','true');}
      }
if (storlek == 'A1'){
      if (skala == 20000) {map.setCenter(new OpenLayers.LonLat(ce,cn),'6','true','true');}
      if (skala == 50000) {map.setCenter(new OpenLayers.LonLat(ce,cn),'5','true','true');}
      if (skala == 100000) {map.setCenter(new OpenLayers.LonLat(ce,cn),'4','true','true');}
      if (skala == 250000) {map.setCenter(new OpenLayers.LonLat(ce,cn),'3','true','true');}
      if (skala == 500000) {map.setCenter(new OpenLayers.LonLat(ce,cn),'2','true','true');}
      }
      
    showInfo();


    if (lager.substring(0,5) != "paleo"){
        checktype = lager.substring(0,lager.lastIndexOf("all"));  //name of wms layer is chachelayer minus all
        if (proxy1 != "No"){ OpenLayers.ProxyHost = proxy1; }  //used only if geoserver and webapp at different machines
    	var wms = new OpenLayers.Layer.WMS( "OpenLayers WMS",
    	    wmsServer2,
    	    {'layers':checktype},{'queryable': 'true'} );
    	map.addLayer(wms); 

    count = 0;
	//Alert if nodata allover
    checkNodata(ce,cn,wms,bounds);  //center
    checkNodata(w,s,wms,bounds)   ; //sw
    checkNodata(w,n,wms,bounds)  ; //nw
    checkNodata(e,n,wms,bounds); //ne
    checkNodata(e,s,wms,bounds) ; //se
    
    map.removeLayer(wms);
    } //end if not paleo

 }   //end changeextent
 
 
 

 
function checkNodata(xlon,ylat,wms,bounds)
 {
 
 var checkXYc=map.getPixelFromLonLat(new OpenLayers.LonLat(xlon,ylat));
            var url =  wms.getFullRequestString({
                            REQUEST: "GetFeatureInfo",
                            EXCEPTIONS: "application/vnd.ogc.se_xml",
                            BBOX: ( bounds.left + ',' + bounds.bottom + ',' + bounds.right + ',' + bounds.top ),
                            X: checkXYc.x,
                            Y: checkXYc.y,
                            //INFO_FORMAT: 'application/vnd.ogc.gml',
                            INFO_FORMAT: 'text/plain',
                            QUERY_LAYERS: wms.params.LAYERS,
                            FEATURE_COUNT: 1,
                            LAYERS: wms.params.LAYERS,
                            Styles: '',
                            WIDTH: wms.map.size.w,
                            HEIGHT: wms.map.size.h});
            //OpenLayers.loadURL(url, '', this, setHTML);
            
   response1 = OpenLayers.Request.GET({
    	url: url,
    	callback: setHTML
	});
	
	
     function setHTML(response) {
     		     
          var txt = response.responseText;
		  var red_index = txt.indexOf('RED_BAND =');
		  var blue_index = txt.indexOf('BLUE_BAND =');
		  var green_index = txt.indexOf('GREEN_BAND =');
          var palette_index = txt.indexOf('PALETTE_INDEX ='); 
          
		  if (red_index != -1){ 
                               var red = parseInt(txt.substr(red_index + 10,6));
                               var blue = parseInt(txt.substr(blue_index + 11,6));
                               var green = parseInt(txt.substr(green_index + 12,6));
                               if ((red == 255) && (blue == 255) && (green == 255))  {count = count + 1; };
           }
         if (palette_index != -1){
                               var palette = parseInt(txt.substr(palette_index + 15,6));
                               if (palette == 1) {count = count + 1; };
           }
       
         if (count == 5){
 							if (lang == "sv") {alert("Tyvärr verkar det inte finnas heltäckande data här. Fortsätt eller välj ett annat område.");}
                            else {alert("Sorry no data from SGU here. Please continue or choose another area.")};
                        }
       
     	}   //end setHTML  
     	
 } // end countNodata
 
 
 
 

 
 function showInfoTool()
 {
        

  return textInfo ;
 }

 function showInfo(){
   
            storlek = $("size").value;
             skala = $("scale").value;
             if(storlek == 'A1'){xlen = skala*0.5/2;ylen = skala*0.5/2; $("sizeArc").value=".FALSE." ; }
              if(storlek == 'A3'){xlen = skala*0.25/2;ylen = skala*0.25/2; $("sizeArc").value=".FALSE." ;}
               if(storlek == 'A4'){xlen = skala*0.15/2;ylen = skala*0.15/2; $("sizeArc").value=".TRUE." ;}

           
               var w =(document.forms['koordinater'].changeW.value);
               var s =(document.forms['koordinater'].changeS.value);
               var e = parseInt(w) + 2*xlen;
               var n = parseInt(s) + 2*xlen;
                
               
               var wsproj = xy2xy(parseInt(w),parseInt(s));
               
               wsp = wsproj.split(',');   
               wp = parseInt(wsp[0]); sp = parseInt(wsp[1]);
               
               var enproj = xy2xy(e,n);
               enp = enproj.split(',');   
               ep =parseInt(enp[0]); np = parseInt(enp[1]);
               
               var wsll = xy2lonlat(wp,sp);
               var enll = xy2lonlat(ep,np);
               
              // var zoomniva = map.getZoom();


if (lang == "sv") {
         textInfo = "<table border=\'0\' cellspacing=\'5\'><tr><th colspan=\'3\' style=\'font-size:8pt;background:#007AC3;color:white;\'>"
                         + "Information om utsnittets koordinater:<\/th><\/tr><tr><td style=\'font-weight:bold;font-size:8pt;background:#ffffff;\'>" 
                         + "Koordinatsystem<\/td><td style=\'font-weight:bold;font-size:8pt;background:#ffffff;\'>" 
                         + "[väst,syd  ost,nord]<\/td><td style=\'font-weight:bold;font-size:8pt;background:#ffffff;\'> <\/tr><tr><td style=\'font-size:8pt;background:#ffffff;\'>"
                         + "SWEREF99 TM<\/td><td style=\'font-size:8pt;background:#ffffff;\'> " 
                         + w + ',' + s + "&nbsp;&nbsp;"
                         + e + "," + n
                         + "<\/td><\/tr><tr><td style=\'font-size:8pt;background:#ffffff;\'>RT90 2.5 gon V<\/td><td style=\'font-size:8pt;background:#ffffff;\'>" 
                         + wp + ',' + sp + "&nbsp;&nbsp;"
                         + ep + ',' + np 
                         + "<\/td><\/tr><tr><td style=\'font-size:8pt;background:#ffffff;\'>SWEREF99,<br>WGS84(lon,lat)<\/td><td style=\'font-size:8pt;background:#ffffff;\'>"
                         + wsll+" <br>"
                         + enll
                         + "<\/td><\/tr><tr><td style=\'font-size:8pt;background:#ffffff;\'>Map sheet <br>(rt90/sweref)<\/td><td style=\'font-size:8pt;background:#ffffff;\'>"
                         + rn2blad(wp,sp)+" <br>"
                         + rn2blad2(w,s)
                         + "<\/td><\/tr><\/table>   "                   ;
                         
                         


                      }
else {   
                         
                        
           textInfo = "<table border=\'0\' cellspacing=\'5\'><tr><th colspan=\'3\' style=\'font-size:8pt;background:#007AC3;color:white;\'>"
                         + "Coordinates of choosen area:<\/th><\/tr><tr><td style=\'font-weight:bold;font-size:8pt;background:#ffffff;\'>" 
                         + "Coordinate system<\/td><td style=\'font-weight:bold;font-size:8pt;background:#ffffff;\'>" 
                         + "[west,south  east,north]<\/td><td style=\'font-weight:bold;font-size:8pt;background:#ffffff;\'> <\/tr><tr><td style=\'font-size:8pt;background:#ffffff;\'>"
                         + "SWEREF99 TM<\/td><td style=\'font-size:8pt;background:#ffffff;\'> "
                         + w + ',' + s + "&nbsp;&nbsp;"
                         + e + "," + n
                         + "<\/td><\/tr><tr><td style=\'font-size:8pt;background:#ffffff;\'>RT90 2.5 gon V<\/td><td style=\'font-size:8pt;background:#ffffff;\'>" 
                         + wp + ',' + sp + "&nbsp;&nbsp;"
                         + ep + ',' + np 
                         + "<\/td><\/tr><tr><td style=\'font-size:8pt;background:#ffffff;\'>SWEREF99,<br>WGS84(lon,lat)<\/td><td style=\'font-size:8pt;background:#ffffff;\'>"
                         + wsll+" <br>"
                         + enll
                         + "<\/td><\/tr><tr><td style=\'font-size:8pt;background:#ffffff;\'>Map sheet <br>(rt90/sweref)<\/td><td style=\'font-size:8pt;background:#ffffff;\'>"
                         + rn2blad(wp,sp)+" <br>"
                         + rn2blad2(w,s)
                         + "<\/td><\/tr><\/table>   "                   ;
}


 }