//
// ---------- INITS ----------
//

addEvent(window, 'load', init);


//
// ---------- FUNCTIONS ----------
//

function init(){  // called by load event
  // init system components only when Gmap canvas is present! 
  if(document.getElementById("map_canvas")!=null){
    addEvent(window, 'unload', GUnload);
    initSys();
    initMap();
    toggleMapSize(true);
    searchUpdate();
  }
}


function initSys(){  // called by load event -> init()

  // GLOBAL CONFIG
  
  gInitCenter = [49.366456, 6.866822];
  gInitZoom   = 9;
  gClickZoom  = 13;

  gTypes = ['3', '12', 'X'];
  gCnt3=0, gCnt12=0, gCntX=0;
  
  
  // global var init
  gMap = null;

  gMarkers = [];
  gPolyIds3  = [];
  gPolyIds12 = [];
  gPolyIdsX  = [];
  
  gPoints = [];
  gHtmls = [];
  
  gFiltMinObj   = document.getElementById('filterSizeMin');
  gFiltMaxObj   = document.getElementById('filterSizeMax');
  gFiltDistrObj = document.getElementById('filterDistrict');
  gFiltMuniObj  = document.getElementById('filterMunicipal');


  // init estate lists
  for(var ti=0; ti<gTypes.length; ti++)  makeListHTML(gTypes[ti]);
}

function initMap() {  // called by load event -> init()
  var i,k;
  if (GBrowserIsCompatible()) {
    // Display the map, with some controls and set the initial location 
    gMap = new GMap2(document.getElementById("map_canvas"));
    //var myIconBig = MapIconMaker.createMarkerIcon({width: 32, height: 32, primaryColor: "#DA1442", strokeColor: "#333333"});
//ACHTUNG: MEHR MÖGLICHKEITEN MIT DIESEN NEUEN PINS:
//http://econym.org.uk/gmap/chartpins.htm
//http://groups.google.com/group/google-chart-api/web/chart-types-for-map-pins
//ABER ACHTUNG: WIE IN ERSTEM LINK BESCHRIEBEN, ERSCHEINEN DIE PINS MANCHMAL NICHT!
//EVTL MAL NACH 3D-PINS IN DIESEM DEMO SCHAUEN:  http://econym.org.uk/gmap/label.htm

//VIELEN EINZELLÖSUNGEN HIER http://econym.org.uk/gmap/  (z.B. Restricting the range of map zooms and pans)
// - Using cookies to remember the map state.   http://econym.org.uk/gmap/cookies.htm

    gIcon3  = MapIconMaker.createMarkerIcon({width: 26, height: 26, primaryColor: "#0000FF", strokeColor: "#000000"});
    gIcon12 = MapIconMaker.createMarkerIcon({width: 26, height: 26, primaryColor: "#02DC00", strokeColor: "#000000"});
    gIconX  = MapIconMaker.createMarkerIcon({width: 26, height: 26, primaryColor: "#FFFF00", strokeColor: "#000000"});
    
    _mPreferMetric = true;  // undocumented! metric units on top (instead of below) for GScaleControl
// CURRENTLY OFF TO IMPROVE PERFORMANCE
    gMap.addControl(new GOverviewMapControl());

    // ZUM EINBAU VON CHECKBOXEN (z.B. WP & Panoramico) ETC.:  statt GMapTypeControl verwendet man GHierarchicalMapTypeControl
    // SIEHE:  http://code.google.com/intl/de-DE/apis/maps/documentation/controls.html#Control_Modification
    // gMap.addControl(new GHierarchicalMapTypeControl(), new GControlPosition(G_ANCHOR_TOP_RIGHT, new GSize(3,17)));

    // NOW DONE BY gMap.setUIToDefault(); - see below
    //gMap.addControl(new GMapTypeControl(), new GControlPosition(G_ANCHOR_TOP_RIGHT, new GSize(3,17)));
    //gMap.addControl(new GLargeMapControl3D());
    //gMap.addControl(new GScaleControl());
    //gMap.enableScrollWheelZoom();
    //gMap.enableContinuousZoom();
    
    // activate map!
    gMap.setCenter(new GLatLng(gInitCenter[0], gInitCenter[1]), gInitZoom);
    gMap.setUIToDefault();


// BAD WORKAROUND TO INCREASE PERFORMANCE:
// IMAGE OVERLAY INSTEAD OF KML VECTOR FILES
//gKMLground = new GGeoXml('http://gewiss.strukturholding.de/typo3conf/ext/dl_gewiss_gmaps/data/test_groundoverlay_09lres.kml');
//gMap.addOverlay(gKMLground);
    
    // KMLs to show on live & testing system

    // **********
    // PART 1 of 2 of strategy against interfering infowindows of markers and KML layer polies:
    // --
    // The infowindow contents can be modified as it opens.
    // THIS IS UNDOCUMENTED!!!
    // See  http://econym.org.uk/gmap/interceptor.htm  and  http://econym.org.uk/gmap/gevent.htm
    GEvent.addListener(gMap,"infowindowprepareopen", function(iwtabs) {
      var infoHtm = iwtabs[0].contentElem.innerHTML;
      var infoTxt = infoHtm.replace(/<[^>]+>/g, '').replace(/^\s+/, '').replace(/\s+$/, '');
      
      // InfoWin empty -> force to close info win immediatelly
      // InfoWin contains %d+ (flächen-code or masterplan-id) -> replace infowin content with the html content of that poly or that masterplan
      // otherwise -> content is HTML, so show the infowin unchanged
      var now = new Date();
      if(infoTxt==''){
        // empty
        gInfoWinForceClose = true;
      }else if(infoTxt.search(/^\d+$/)>=0){
        // masterplan id (1 to 2 digits) or flächen code (7 digits)
        if(infoTxt.length<3){
          // masterplan id
          if(typeof(gMplans[parseInt(infoTxt)])!='undefined'){
            iwtabs[0].contentElem.innerHTML = buildMplanInfoHtml(gMplans[parseInt(infoTxt)]);
            gInfoWinForceClose = false;
          }else{
            gInfoWinForceClose = true;
          }
        }else{
          // flächen code
          for(i=0; i<gPolys.length; i++){
            if(gPolys[i].f==infoTxt)  break;
          }
          if(i<gPolys.length){
            iwtabs[0].contentElem.innerHTML = buildPolyInfoHtml(gPolys[i]);
            gInfoWinForceClose = false;
          }else{
            gInfoWinForceClose = true;
          }
        }
      }else{
        // content is HTML
        gInfoWinForceClose = false;
      }
    });
    
    GEvent.addListener(gMap,"infowindowopen", function() {
      if(gInfoWinForceClose)  gMap.closeInfoWindow();
      gInfoWinForceClose = false;
    });

    gKMLnwlinkList=[];
    for(var f in gNwlinkFiles)  gKMLnwlinkList[f] = new GGeoXml(gNwlinkFiles[f]);
    gMap.addOverlay(gKMLnwlinkList[0]);
    gKMLdistrActive=0;  // which of the files in the above list is currently addOverlayed?


   
    // KMLs to show only on live system
    if(location.href.indexOf('.dl01.loc')==-1 && location.href.indexOf('.dllt3.de')==-1){
    }

    //DEBUG: show bounds of current map
    //alert(gMap.getBounds());

    // put the assembled gList?Html contents into the side_bar div
    document.getElementById('gwListProgress3').style.visibility =
    document.getElementById('gwListProgress12').style.visibility =
    document.getElementById('gwListProgressX').style.visibility = 'hidden';

  }
  
  // display a warning if the browser was not compatible
  else {
    alert(gTxts.browserNotGmapsCompatible);
  }
}



function toggleMapSize(doReset){
  gMapZoomStep = 35;
  if(doReset){
    gMapSizeSmall = true;
    gMapSizeOrgW = parseInt(document.getElementById('map_canvas').style.width);
    gMapSizeOrgH = parseInt(document.getElementById('map_canvas').style.height);
  }else{
    gMapSizeSmall = !gMapSizeSmall;
  }
  if(gMapSizeSmall){
    // make map small
    document.getElementById('mapResizeButton').innerHTML = gTxts.enlargeMap;
    gResizeInt = window.setInterval("mapResizeLoop(gMapSizeOrgW,gMapSizeOrgH,-gMapZoomStep)", 50);
  }else{
    // make map big
    document.getElementById('mapResizeButton').innerHTML = gTxts.shrinkMap;
    gResizeInt = window.setInterval("mapResizeLoop(746,540,gMapZoomStep)", 50);
  }
  document.getElementById('map_resize_frame').style.display = '';
  document.getElementById('mapResizeButton').style.visibility = 'visible';
  return true;
}


function mapResizeLoop(endW, endH, n){
    var zoomFrmW = parseInt(document.getElementById('map_resize_frame').style.width);
    var zoomFrmH = parseInt(document.getElementById('map_resize_frame').style.height);
    if(zoomFrmW==endW && zoomFrmH==endH){
      clearInterval(gResizeInt);
      var ctr = gMap.getCenter();
      document.getElementById('map_canvas').style.width  = endW+'px';
      document.getElementById('map_canvas').style.height = endH+'px';
      gMap.checkResize();
      var infoWin = gMap.getInfoWindow();
      if(infoWin.isHidden()){
        gMap.panTo(ctr);
      }else{
        // use infowin coords, but add a bit of lat, so infowin is does not collide with top tool buttons
        var lat=infoWin.getPoint().lat();
        var lng=infoWin.getPoint().lng();
        var mapBnds = gMap.getBounds();
        var dist = 0.08 * (mapBnds.getNorthEast().lat() - mapBnds.getSouthWest().lat());
        gMap.panTo(new GLatLng(lat+dist,lng));
      }
      document.getElementById('map_resize_frame').style.display = 'none';
    }else{
      zoomFrmW+=n;
      zoomFrmH+=n;
      if( (zoomFrmW-endW>0)==(n>0) || (zoomFrmH-endH>0)==(n>0) ){
        zoomFrmW = endW;
        zoomFrmH = endH;
      }
      document.getElementById('map_resize_frame').style.width  = zoomFrmW+'px';
      document.getElementById('map_resize_frame').style.height = zoomFrmH+'px';
    }
  return true;
}



function makeListHTML(t){
  var s;
  s ='<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">';
  s+='<html>';
  s+='<head>';
  s+='<meta http-equiv="Content-Type" content="text/html; charset=utf-8">';
  s+='<link href="/fileadmin/templates/gewiss/css/central.css" rel="stylesheet" type="text/css" >'
  s+='</head>';
  s+='<body class="gwIfrmBody'+t+'">';
  s+='<div id="listDiv" class="gwListData">&nbsp;</div>';
  s+='</body>';
  s+='</html>';
  var ifd = window['ifd'+t] = window['ifr'+t].document;
  ifd.write(s);
  ifd.close();
}
function writeList(t, s){
  if(window['ifd'+t].getElementById('listDiv')!=null){
    window['ifd'+t].getElementById('listDiv').innerHTML = s;
    setIfrmHeight();
  }
}
function writeListMsg(s, d){
  if(d!=undefined)  s=s.split('%s').join(d);
  lm = document.getElementById('gwListMsg');
  lm.style.display = (s==''?'none':'block');
  lm.innerHTML = s;
}

function setIfrmHeight(){
  var hRemain = 239;
  if(navigator.userAgent.indexOf("MSIE")>=0)  hRemain -= 6;
  var hAddGap = 5;
  var tArr = ['3','12','X'];
  for(i=0; i<tArr.length; i++){
    t=tArr[i];
    var hNeed = window['ifd'+t].getElementById('listDiv').offsetHeight+hAddGap;
    var hMax = hRemain/tArr.length;
    if(hNeed <= hMax){
      // needed height for this block is less than available height (= total height/count of blocks)
      // => this block gets all the height it needs, is taken out of the list and subtracted from available height, and loop is restarted
      document.getElementById('ifr'+t).height = hNeed;
      tArr.splice(i,1);
      hRemain -= hNeed;
      i=-1;  // restart loop
    }else{
      // block higher than available space. Give it the available height (= total height/count of blocks)
      // => will have a scroll bar
      document.getElementById('ifr'+t).height = hMax;
    }
  }
}

function callListUpdate(){
//  alert("callListUpdate!!!");
  document.getElementById('gwListProgress3').style.visibility =
  document.getElementById('gwListProgress12').style.visibility=
  document.getElementById('gwListProgressX').style.visibility = 'visible';
  document.getElementById('list3').innerHTML =
  document.getElementById('list12').innerHTML =
  document.getElementById('listX').innerHTML = '';
  var url = "index.php";
  var sizeMin =   gFiltMinObj.value;
  var sizeMax =   gFiltMaxObj.value;
  var municipal = gFiltMuniObj.value;
  var pars = "eID=dl_gewiss_gmaps&action=listUpdate&sizeMin="+sizeMin+"&sizeMax="+sizeMax+"&municipal="+municipal;
  var myAjax = new Ajax.Request(url, {method: 'get', parameters: pars, onComplete: listUpdate});
}
 
 
function listUpdate(orgRequest){
  var result;
  var xmldoc = orgRequest.responseXML;
  document.getElementById('gwListProgress3').style.visibility =
  document.getElementById('gwListProgress12').style.visibility=
  document.getElementById('gwListProgressX').style.visibility = 'hidden';
  result = xmldoc.getElementsByTagName("data3")[0].firstChild.data;
  document.getElementById('list3').innerHTML = result;
  result = xmldoc.getElementsByTagName("data12")[0].firstChild.data;
  document.getElementById('list12').innerHTML = result;
  result = xmldoc.getElementsByTagName("dataX")[0].firstChild.data;
  document.getElementById('listX').innerHTML = result;
}


function searchUpdate(){
  var i;       
  
  if(gParams.markerlight){
    var maxMarkers = 500;
  }else{
    var maxMarkers = 150;
  }

//  // show progress indicators
//  document.getElementById('gwListProgress3').style.visibility =
//  document.getElementById('gwListProgress12').style.visibility=
//  document.getElementById('gwListProgressX').style.visibility = 'visible';

  // clear estate lists
  writeList('3',  '');
  writeList('12', '');
  writeList('X',  '');
  writeListMsg('');
  // clear estate cnts
  document.getElementById('listCntTotal').innerHTML = 
  document.getElementById('listCnt3').innerHTML  = 
  document.getElementById('listCnt12').innerHTML = 
  document.getElementById('listCntX').innerHTML  = '';
  // hide markers
  while(gMarkers.length>0){
    var marker = gMarkers.shift();
    
    //GEvent.removeListener(marker.listenHandle);
    GEvent.clearNode(marker);
    
    gMap.removeOverlay(marker);
  }
  // clear poly lists
  gPolyIds3  = [];
  gPolyIds12 = [];
  gPolyIdsX  = [];
  
  // read filter settings - part A
  var district  = gFiltDistrObj.value;

  // muni drop not yet initialized or district changed? => (re)build muni drop
  if(gFiltMuniObj.options.length==0 || gMuniDropDistr!=district){
    // store current  muni selection
    var oldMuniVal = gFiltMuniObj.value;
    // clear existing list
    gFiltMuniObj.options.length=0;
    if(district==0){
      // all munis
      for(i=0; i<gMunis.length; i++){
        gFiltMuniObj.options[i] = new Option(gMunis[i], i, i==0, i==oldMuniVal);
      }
    }else{
      // only munis in district
      var curMunis = gDistrMunis[district];
      gFiltMuniObj.options[0] = new Option(gTxts.filtersAll, 0, true);
      for(i=0; i<curMunis.length; i++){
        gFiltMuniObj.options[i+1] = new Option(gMunis[curMunis[i]], curMunis[i], false, false);
      }
    }
    // store new muni drop district
    gMuniDropDistr = district;
  }
  if(gKMLdistrActive!=district){
    // hide any old KML networklink file
    gMap.removeOverlay(gKMLnwlinkList[gKMLdistrActive]);
    // show KML networklink file matching current district
    gMap.addOverlay(gKMLnwlinkList[district]);
    gKMLdistrActive=district;
  }
  
  // read filter settings - part B
  var sizeMin =   parseInt(gFiltMinObj.value);
  var sizeMax =   parseInt(gFiltMaxObj.value);
  var municipal = gFiltMuniObj.value;

  // any filters used?
  if(sizeMin==0 && sizeMax>1000000 && district==0 && municipal==0){
    // -- no filters active
    // hide/unhide CEs with class ce_on_when_filters/ce_off_when_filters
    $$('.ce_on_when_filters' ).each(function(s){s.style.display='none';});
    $$('.ce_off_when_filters').each(function(s){s.style.display='block';});
    // clear result panes
    for(var ti=0; ti<gTypes.length; ti++)  writeList(gTypes[ti], '<p>&nbsp;<br>&nbsp;<br>&nbsp;<br>&nbsp;</p>');
  }else{
    // -- filters active
    // unhide/hide CEs with class ce_on_when_filters/ce_off_when_filters
    $$('.ce_on_when_filters' ).each(function(s){s.style.display='block';});
    $$('.ce_off_when_filters').each(function(s){s.style.display='none';});
    // fill result panes...
    // build poly lists matching filter settings
    for(i=0; i<gPolys.length; i++){
      var py = gPolys[i];
      if(parseInt(py.g)>=sizeMin && parseInt(py.g)<=sizeMax && (district==0 || py.f.substr(0,2)==district) && (municipal==0 || py.m==municipal))  window['gPolyIds'+py.t].push(i);
    }
    // calc total match cnt
    var cntTotal = gPolyIds3.length+gPolyIds12.length+gPolyIdsX.length;
    
    
    if(cntTotal>maxMarkers){
      // to many results - show warning
      writeListMsg(gTxts.toManyRes, maxMarkers);
      
      for(var ti=0; ti<gTypes.length; ti++){
        var t=gTypes[ti];
        writeList(t, '<p style="color:red;">...</p>');
      }
    }else{
      // result cnt ok - show them
      for(var ti=0; ti<gTypes.length; ti++){
        var t=gTypes[ti];
        var s='';
        var ids = window['gPolyIds'+t];
        for(i=0; i<ids.length; i++){
          py = gPolys[ids[i]];

          if(gParams.markerlight){
            var marker = createPolyMarkerLight(py);
          }else{
            var marker = createPolyMarker(py);
          }
          gMarkers.push(marker);
          s+='<a class="gwListItem" href="javascript:parent.mClick('+(gMarkers.length-1)+')"><b>'+py.n+'</b><br>'+gTxts.filtersApprox+' '+addNumDot(py.g)+' m² – '+py.a+'</a>';
          gMap.addOverlay(marker);
//s+='<a class="gwListItem" href="javascript:void(0);"><b>'+py.n+'</b><br>ca. '+addNumDot(py.g)+' m² – '+py.a+'</a>';

        }
        writeList(t, s);
      }
    }
    document.getElementById('listCntTotal').innerHTML = '&nbsp;('+(cntTotal)+')';
    document.getElementById('listCnt3').innerHTML  = '&nbsp;('+gPolyIds3.length+')';
    document.getElementById('listCnt12').innerHTML = '&nbsp;('+gPolyIds12.length+')';
    document.getElementById('listCntX').innerHTML  = '&nbsp;('+gPolyIdsX.length+')';
  }

//  // hide progress indicators
//  document.getElementById('gwListProgress3').style.visibility =
//  document.getElementById('gwListProgress12').style.visibility=
//  document.getElementById('gwListProgressX').style.visibility = 'hidden';
}


// This function picks up the click and opens the corresponding info window
function mClick(n) {
  parent.gMarkers[n].showBubl(false, gClickZoom);  
  //gMap.openInfoWindowHtml(gPoints[i], gHtmls[i]);
}



function filterAdaptSizeMin(){
  while(parseInt(gFiltMinObj.value) >= parseInt(gFiltMaxObj.value))  --gFiltMinObj.selectedIndex;
}

function filterAdaptSizeMax(){
  while(parseInt(gFiltMinObj.value) >= parseInt(gFiltMaxObj.value))  ++gFiltMaxObj.selectedIndex;
}


// 123456.789 --> 123.456,789
function addNumDot(n){
  return n.toString().replace(/^(\d*?)(\d{0,3}?)(\d{1,3})([\.,](\d*))?$/, function($1,$2,$3,$4,$5,$6){return ($2!=undefined&&$2!=''?$2+gTxts.sepThousands:'') + ($3!=undefined&&$3!=''?$3+gTxts.sepThousands:'') + $4 + ($6!=undefined&&$6!=''?gTxts.sepDecimals+$6:'') }); //alert($1+'---'+ $2+'---'+ $3+'---'+ $4+'---'+ $5)});
}


function buildPolyInfoHtml(py){
  var earthRad = 6371000;
  var avail = '';
  switch(py.t){
    case '3':
      avail = gTxts.bubbleAvail3+'<br>';
      break;
    case '12':
      avail = gTxts.bubbleAvail12+'<br>';
      break;
    case 'X':
      avail = gTxts.bubbleAvailX+'<br>';
      break;
  }
  // blanks added to first line end to avoid collision with closing [X]
  var st = 
    '<b>'+py.n+'&nbsp;&nbsp;&nbsp;&nbsp;</b><br>'+
    gTxts.bubbleSiteNo+' '+py.f+'<br>'+
    gTxts.bubbleSize+' '+addNumDot(py.g)+' m²<br>'+
    gTxts.bubbleDesig+' '+py.a+'<br>'+
    avail+
    gTxts.bubbleDimEW+' '+10*Math.round(0.1*earthRad*Math.cos(py.u*Math.PI/180)*2*Math.PI/360*(py.r-py.l))+' m, '+gTxts.bubbleDimNS+' '+10*Math.round(0.1*earthRad*2*Math.PI/360*(py.o-py.u))+' m';
  return st;
}

function buildMplanInfoHtml(mp){
  // blanks added to first line end to avoid collision with closing [X]
  var st = 
    '<b>'+gTxts.bubbleMplanHead+'</b><br>'+
    gTxts.bubbleMplanSubhead+'<br>&nbsp;<br>'+
    '<b>'+mp.n+'</b><br>'+
    gTxts.bubbleMplanSize+' '+addNumDot(mp.q)+' m²<br>&nbsp;<br>'+
    gTxts.bubbleMplanFoot+'<br><a href="http://'+gTxts.bubbleMplanURL+'" target="_blank">http://www.masterplan-saarland.de</a>';
  return st;
}

// A function to create the marker and set up the event window
function createPolyMarker(py) {
  //new GLatLng(py.c[0], py.c[1]), py.n, ''
  var markOpts = {};
  markOpts.icon = window['gIcon'+py.t];
  markOpts.title = py.n;
  var marker = new GMarker(new GLatLng(py.c[0], py.c[1]), markOpts);
  var html = buildPolyInfoHtml(py);
   
  marker.listenHandle = GEvent.addListener(marker, "click", marker.showBubl=function(point, minZoom){
    if(minZoom!=undefined && minZoom>gMap.getZoom()+2)  gMap.setZoom(minZoom);  // add 2, so zoom kicks in only at larger differences
    marker.show();
    marker.openInfoWindowHtml(html);
  });
  // save the info we need to use later for the side_bar
//  var i=gGmarkers.length;
//  gGmarkers[i] = marker;
//  gHtmls[i] = html;
  // add a line to the side_bar html
//  gListHtml += '<a class="gwListItem" href="javascript:myclick(' + i + ')"><b>' + label + '</b><br>' + data + '</a>';
  return marker;
}


// A function to create the marker and set up the event window - MARKERLIGHT VERSION!
function createPolyMarkerLight(py) {
  //new GLatLng(py.c[0], py.c[1]), py.n, ''

  var markOpts = {};
  var knownAs = ['GE','GI','G','SO','MI'];
  var tmpA = py.a.toUpperCase();
  var myA = '';
  var i;
  for(i in knownAs){
    if(tmpA.indexOf(knownAs[i])==0){
      myA=knownAs[i];
      break;
    }
  }
  markOpts.image = '/typo3conf/ext/dl_gewiss_gmaps/res/js/markerlight/pin'+py.t+myA+'.gif';
  markOpts.width  = 16;
  markOpts.height = 18;
  //markOpts.icon = window['gIcon'+py.t];
  //markOpts.title = py.n;
  var marker = new MarkerLight(new GLatLng(py.c[0], py.c[1]), markOpts);
  var html = buildPolyInfoHtml(py);
   
  marker.listenHandle = GEvent.addListener(marker, "click", marker.showBubl=function(point, minZoom){
    if(minZoom!=undefined && minZoom>gMap.getZoom()+2)  gMap.setZoom(minZoom);  // add 2, so zoom kicks in only at larger differences
    
    // **********
    // PART 2 of 2 of strategy against interfering infowindows of markers and KML layer polies:
    //--
    // show delayed info bubble. 
    // This way we avoid the event to bubble up to the kml layer and open up another info window which overrides our marker info.
    //gMap.openInfoWindowHtml(marker.getPoint(), html);
    gMap.closeInfoWindow();
    setTimeout(function(){gMap.openInfoWindowHtml(marker.getPoint(), html)}, 300);
  });

  // save the info we need to use later for the side_bar
//  var i=gGmarkers.length;
//  gGmarkers[i] = marker;
//  gHtmls[i] = html;
  // add a line to the side_bar html
//  gListHtml += '<a class="gwListItem" href="javascript:myclick(' + i + ')"><b>' + label + '</b><br>' + data + '</a>';
  return marker;
}

/*
// NOT USED!!!
function createPoly(py, n){
  // count and limit the polies of each type (using window[] to address global dynamic vars)
//  if(++window['gCnt'+py.t] >10)  return null;

  // add a line to the side_bar html
  window['gList'+py.t+'Html']  += '<a class="gwListItem" href="javascript:myclick('+n+')"><b>'+py.n+'</b><br>ca. '+py.g+' m² – '+py.a+'</a>';

  var lcol = '#000000';
  var lwid = 0.5;
  var lopa = 1;
  var fcol = {c3:'#0000ff', c12:'#02dc00', cX:'#ffff00'}['c'+py.t];
  var fopa = 0.5;
  // read each point on that line
  var pts = [];
  for(var i=0; i<py.p.length; i+=2)  pts[i] = new GLatLng(py.p[i],py.p[i+1]);
  var myPoly = new GPolygon(pts,lcol,lwid,lopa,fcol,fopa);
  gMap.addOverlay(myPoly);
  var myPoint= new GLatLng(py.m[0], py.m[1]);
  var earthRad = 6371000;
  var myHtml = '<b>'+py.n+'</b><br>Flächennr. '+py.f+'<br>Größe ca. '+py.g+' m²<br>Ausweisung '+py.a+'<br>Ausdehnung ca. '+Math.round(earthRad*Math.cos(py.u*Math.PI/180)*2*Math.PI/360*(py.r-py.l))+' m O-W, '+Math.round(earthRad*2*Math.PI/360*(py.o-py.u))+' m N-S';
  function showInfoBubble() { gMap.openInfoWindowHtml(myPoint, myHtml); };
  // click event shows info bubble
  GEvent.addListener(myPoly, "click", showInfoBubble);
  
  // save the info we need to use later for the side_bar
  gHtmls[n] = myHtml;
  gPoints[n]= myPoint;
  return myPoly
}

// NOT USED!!!
function randomPoly(){
  // count and limit the polies of each type (using window[] to address global dynamic vars)
//  if(++window['gCnt'+py.t] >10)  return null;

  var lcol = '#000000';
  var lwid = 2.0;
  var lopa = 1;
  var fcol = '#ff0000';
  var fopa = 0.5;
  // read each point on that line
  var pts = [];
  for(var i=0; i<150; i++)  pts[i] = new GLatLng(49.36077+(-0.5+Math.random())*0.7, 7.01898+(-0.5+Math.random())*1);
  pts[i]=pts[0]; // close poly
  var myPoly = new GPolygon(pts,lcol,lwid,lopa,fcol,fopa);

  if(typeof(gRandomPoly)!='undefined'){
    gMap.removeOverlay(gRandomPoly);
  }
  gRandomPoly = myPoly;
  gMap.addOverlay(gRandomPoly);

  return myPoly
}
*/