//Create marker and set up event window
   function createMarker(point,html,icon){
        var marker = new GMarker(point,icon);
        GEvent.addListener(marker, "click", function() {
            marker.openInfoWindowHtml(html);
        });
        return marker;
  }

   function load() {
     if (GBrowserIsCompatible()) {
       var map = new GMap2(document.getElementById("map"));
	   map.addControl(new GSmallMapControl());//inzoom-element
	   map.addControl(new GMapTypeControl());//satelietbeelden toevoegen
	   
	   //create randomnumber and retrieve xml file
    var randomnumber=Math.floor(Math.random()*11111)
    GDownloadUrl("http://www.aelderhooghekunsten.nl/landkaart/data7.xml?random="+randomnumber, function(data, responseCode) {
    var xml = GXml.parse(data);
	
    //store markers in markers array
    var markers = xml.documentElement.getElementsByTagName("marker");

    //loop over the markers array
    for (var i = 0; i < markers.length; i++) {
        var lat = parseFloat(markers[i].getAttribute("lat"));
        var lng = parseFloat(markers[i].getAttribute("lng"));
        
		var point = new GLatLng(lat,lng);
        var html = markers[i].getAttribute("html");
		icon = getIcon(markers[i].getAttribute("iconimg"));
        
		map.setCenter(point, 8);//punt centreren, zoom getal
        var marker = createMarker(point,html,icon);//coordinaten markers, html tekst
        map.addOverlay(marker);//markers toevoegen
    } //close for loop

	var polyline = new GPolyline([//Aalden-Vancouver
    		new GLatLng(52.78736, 6.71913),
    		new GLatLng(49.26359, -123.13857)
			], "#000000", 5);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Assen
    		new GLatLng(52.78736, 6.71913),
    		new GLatLng(52.99456, 6.56483)
			], "#EE0000", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Assen-Hoogezand
    		new GLatLng(53.15667, 6.75722),
    		new GLatLng(52.99456, 6.56483)
			], "#EE0000", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Hoogezand-Evenos
    		new GLatLng(53.15667, 6.75722),
    		new GLatLng(43.16428, 5.84561)
			], "#EE0000", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Vlagtwedde
    		new GLatLng(52.78736, 6.71913),
    		new GLatLng(52.94979, 7.14269)
			], "#FFD800", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Vlagtwedde-Zeewolde
    		new GLatLng(52.33209, 5.54072),
    		new GLatLng(52.94979, 7.14269)
			], "#FFD800", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Zeewolde-Dantumadeel
    		new GLatLng(52.33209, 5.54072),
    		new GLatLng(53.27298, 5.98593)
			], "#FFD800", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Dantumadeel-JoureGH
    		new GLatLng(52.97025, 5.78967),
    		new GLatLng(53.27298, 5.98593)
			], "#FFD800", 10);
			map.addOverlay(polyline);
			
	var polyline = new GPolyline([//JoureGH-Buenos Aires
    		new GLatLng(52.97025, 5.78967),
    		new GLatLng(-34.59704, -58.38135)
			], "#FFD800", 10);
			map.addOverlay(polyline);			
			
			
	var polyline = new GPolyline([//Meppen
    		new GLatLng(52.78736, 6.71913),
    		new GLatLng(52.68751, 7.29116)
			], "#74E000", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Meppen-Haselüne
    		new GLatLng(52.67418, 7.48365),
    		new GLatLng(52.68751, 7.29116)
			], "#74E000", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Haselüne-Westerbork
    		new GLatLng(52.67418, 7.48365),
    		new GLatLng(52.85041, 6.61104)
			], "#74E000", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Westerbork-Beilen
    		new GLatLng(52.85041, 6.61104),
    		new GLatLng(52.85772, 6.51612)
			], "#74E000", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Beilen-tweede exloermond
    		new GLatLng(52.92049, 6.96445),
    		new GLatLng(52.85772, 6.51612)
			], "#74E000", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Nordhorn
    		new GLatLng(52.78736, 6.71913),
    		new GLatLng(52.43588, 7.07423)
			], "#008000", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Nordhorn-Bassum
    		new GLatLng(52.84554, 8.72228),
    		new GLatLng(52.43588, 7.07423)
			], "#008000", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Bassum-Bad Bederkesa
    		new GLatLng(52.84554, 8.72228),
    		new GLatLng(53.62480, 8.84163)
			], "#008000", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Bad Bederkesa-Osterholz Scharmbeck
    		new GLatLng(53.22621, 8.79462),
    		new GLatLng(53.62480, 8.84163)
			], "#008000", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Hellendoorn
    		new GLatLng(52.78736, 6.71913),
    		new GLatLng(52.38884, 6.44875)
			], "#FF9900", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Hellendoorn-Ibbenburen
    		new GLatLng(52.27625, 7.71856),
    		new GLatLng(52.38884, 6.44875)
			], "#FF9900", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Ibbenburen-Dessau
    		new GLatLng(52.27625, 7.71856),
    		new GLatLng(51.83888, 12.24516)
			], "#FF9900", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Beetsterzwaag
    		new GLatLng(52.78736, 6.71913),
    		new GLatLng(53.06070, 6.07531)
			], "#000080", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Beetsterzwaag-HeerenveenGH
    		new GLatLng(52.96120, 5.92129),
    		new GLatLng(53.06070, 6.07531)
			], "#000080", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//HeerenveenGH-HeerenveenBieb
    		new GLatLng(52.95727, 5.92809),
    		new GLatLng(52.96120, 5.92129)
			], "#000080", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//HeerenveenBieb-JoureBieb
    		new GLatLng(52.95727, 5.92809),
    		new GLatLng(52.96485, 5.80003)
			], "#000080", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//JoureBieb-LemmerBieb
    		new GLatLng(52.84782, 5.71534),
    		new GLatLng(52.96485, 5.80003)
			], "#000080", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Dalfsen
    		new GLatLng(52.78736, 6.71913),
    		new GLatLng(52.50688, 6.26089)
			], "#FFFF00", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Dalfsen-Horstel
    		new GLatLng(52.50688, 6.26089),
    		new GLatLng(52.30012, 7.58707)
			], "#FFFF00", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Horstel-Moletai
    		new GLatLng(55.23187, 25.42120),
    		new GLatLng(52.30012, 7.58707)
			], "#FFFF00", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Moletai-Waltham Abby
    		new GLatLng(55.23187, 25.42120),
    		new GLatLng(51.68722, -0.00419)
			], "#FFFF00", 10);
			map.addOverlay(polyline);   
	var polyline = new GPolyline([//Oosterwolde
    		new GLatLng(52.78736, 6.71913),
    		new GLatLng(52.99128, 6.29203)
			], "#E1004C", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Oosterwolde-Bellingwedde
    		new GLatLng(53.06979, 7.07551),
    		new GLatLng(52.99128, 6.29203)
			], "#E1004C", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Bellingwedde-Ezinge
    		new GLatLng(53.06979, 7.07551),
    		new GLatLng(53.30887, 6.44154)
			], "#E1004C", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Ezinge-Zoutkamp
    		new GLatLng(53.33802, 6.30311),
    		new GLatLng(53.30887, 6.44154)
			], "#E1004C", 10);
			map.addOverlay(polyline);
			
var polyline = new GPolyline([//Zoutkamp-Delfzijl
    		new GLatLng(53.33802, 6.30311),
    		new GLatLng(53.33164, 6.90700)
			], "#E1004C", 10);
			map.addOverlay(polyline);	
			
	var polyline = new GPolyline([//Aalden-Emlichheim
    		new GLatLng(52.78736, 6.71913),
    		new GLatLng(52.60571, 6.85340)
			], "#ACACAC", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Emlichheim-Uelsen
    		new GLatLng(52.49548, 6.88853),
    		new GLatLng(52.60571, 6.85340)
			], "#ACACAC", 10);
			map.addOverlay(polyline);
	var polyline = new GPolyline([//Uelsen-Tubbergen
    		new GLatLng(52.49548, 6.88853),
    		new GLatLng(52.40719, 6.78182)
			], "#ACACAC", 10);
			map.addOverlay(polyline);
				
	// create marker icon
    function getIcon(iconimg){
        icon = new GIcon();
		icon.image = "../images/"+iconimg;
		icon.iconSize = new GSize(22, 43);
		icon.iconAnchor = new GPoint(10, 37);
		icon.infoWindowAnchor = new GPoint(10, 10);
		return icon;
		}

	  
          }
        ); //close GDownloadUrl
  } //close GBrowserIsCompatible
} //close load