// Copyright (c) mindat.org 1993-2009
function j(lat,long) {var point = new GLatLng(lat,long); map.setCenter(point, 16);}

 function cm(lat,long,html,name) {
var point = new GLatLng(lat,long); var marker = new GMarker(point,{icon:icon, title:name});
GEvent.addListener(marker, "click", function() 
{
          marker.openInfoWindowHtml(jsunpack(html));
      //     
      //  	map.panTo(marker.getPoint());
        	  var zoom = map.getZoom();    
	    if(zoom<9) zoom=9;
        	map.setZoom(zoom);
        	map.setCenter(marker.getPoint(), zoom);
        });
         
        GEvent.addListener(marker,"mouseover", function() {
       		marker.setImage("kml-gm-o.png");
       });    
       
        GEvent.addListener(marker,"mouseout", function() {
       		marker.setImage("kml-gm.png");
       });   
           
     	clus.AddMarker(marker,name);
      }
      
      function jsunpack(txt)
      {
      	txt=txt.replace(/~~/,"<div class=\"gmap\"><b><a href=\"/loc-");
       	txt=txt.replace(/~\$/,"<table class=\"gmt\"><tr><th>");
       	txt=txt.replace(/~!/,"<img width=180 height=180 src=\"http://www.mindat.org/gphotos/");
    	txt=txt.replace(/~%/,"</td></tr></table>");
      	txt=txt.replace(/~\)/,"<br>Reference: ");
      	return (txt);
      }
      
      function loadPoints()
      {
cm(50.7558326721191,7.89833354949951,"~~15123.html\">Grüneau Mine (Grüne Au Mine; Grünau Mine), Schutzbach, Betzdorf, Siegerland, Rhineland-Palatinate, Germany</a></b>~)Weiss: &quot;Mineralfundstellen, Deutschland West&quot;, Weise (Munich), 1990<br></div>","Grüneau Mine (Grüne Au Mine; Grünau Mine), Schutzbach, Betzdorf, Siegerland, Rhineland-Palatinate, Germany");
cm(50.8227777778,8.00972222222,"~~13937.html\">Brüderbund Mine, Kohlenbach Valley, Eiserfeld, Siegerland, North Rhine-Westphalia, Germany</a></b>~)Wittern: &quot;Mineralfundorte in Deutschland&quot;, 2001<br></div>","Brüderbund Mine, Kohlenbach Valley, Eiserfeld, Siegerland, North Rhine-Westphalia, Germany");
cm(46.6333351135254,-81.3833312988281,"~~8082.html\">Strathcona Mine, Levack, Sudbury District, Ontario, Canada</a></b><br></div>","Strathcona Mine, Levack, Sudbury District, Ontario, Canada");
cm(39.5563888889,8.57055555556,"~~13706.html\">Montevecchio Mines, Arbus, Medio Campidano Province, Sardinia, Italy</a></b>~)AA. VV., 1996. Collezionare minerali. Hobby &amp; Work<br></div>","Montevecchio Mines, Arbus, Medio Campidano Province, Sardinia, Italy");
cm(-17.3072222222,-69.1452777778,"~~132149.html\">Joculluni Mine (Anaconda Mine; El Zorro Mine; Yokohama Mine), Berenguela District, Pacajes Province, La Paz Department, Bolivia</a></b>~)USGS Bulletin # 1975, p. 247.<br></div>","Joculluni Mine (Anaconda Mine; El Zorro Mine; Yokohama Mine), Berenguela District, Pacajes Province, La Paz Department, Bolivia");
cm(-17.2933333333,-69.2380555556,"~~146673.html\">Marimarini Mine (Lourdes Ines Mine), Berenguela District, Pacajes Province, La Paz Department, Bolivia</a></b>~)USGS Bulletin # 1975, p. 247.<br></div>","Marimarini Mine (Lourdes Ines Mine), Berenguela District, Pacajes Province, La Paz Department, Bolivia");

}