// 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(40.55,-75.4,"~~4091.html\">Friedensville Mine, Friedensville, Saucon Valley, Upper Saucon Township, Lehigh Co., Pennsylvania, USA</a></b><br>~$<a href=\"photo-14925.html\"><img border=0 width=180 height=180 src=\"http://www.mindat.org/gphotos/0180329001075599252.jpg\"></a></th><td><b>Sauconite</b><br>&copy; M.Heintzelman<br><br>The zinc rich Phyllosilicate Sauconite, a mineral likely derived from the alteration of Sphalerite. Type locality specimen from the Friedensville Mine, Friedensville,  Saucon valley, Lehigh Co, Pennsylvania.  Specimen size: 3 x 4cm. From the PA  ...~%</div>","Friedensville Mine, Friedensville, Saucon Valley, Upper Saucon Township, Lehigh Co., Pennsylvania, USA");
cm(40.55,-75.4,"~~10353.html\">New Hartman Mine (Correll Mine), Friedensville, Saucon Valley, Upper Saucon Township, Lehigh Co., Pennsylvania, USA</a></b><br></div>","New Hartman Mine (Correll Mine), Friedensville, Saucon Valley, Upper Saucon Township, Lehigh Co., Pennsylvania, USA");
cm(40.55,-75.4,"~~17182.html\">Old Hartman Mine (Hartman Mine), Friedensville, Saucon Valley, Upper Saucon Township, Lehigh Co., Pennsylvania, USA</a></b><br></div>","Old Hartman Mine (Hartman Mine), Friedensville, Saucon Valley, Upper Saucon Township, Lehigh Co., Pennsylvania, USA");
cm(40.55,-75.4,"~~25245.html\">Three Cornered Mine, Friedensville, Saucon Valley, Upper Saucon Township, Lehigh Co., Pennsylvania, USA</a></b><br></div>","Three Cornered Mine, Friedensville, Saucon Valley, Upper Saucon Township, Lehigh Co., Pennsylvania, USA");
cm(40.55,-75.4,"~~25560.html\">Ueberroth Mine, Friedensville, Saucon Valley, Upper Saucon Township, Lehigh Co., Pennsylvania, USA</a></b><br>~$<a href=\"photo-34914.html\"><img border=0 width=180 height=180 src=\"http://www.mindat.org/gphotos/0108353001121181574.jpg\"></a></th><td><b>Bianchite</b><br>&copy; M.Heintzelman<br><br>White encrustantion of Bianchite with secondary coating of bright yellow Greenockite (lower right hand corner). Specimen from the Ueberroth Mine, Friedensville, Saucon Valley, Lehigh Co., Pennsylvania. Area of view:  12 x  9 mm. From the PA Annex of  ...~%</div>","Ueberroth Mine, Friedensville, Saucon Valley, Upper Saucon Township, Lehigh Co., Pennsylvania, USA");
	var	zoombox=new GLatLngBounds(new GLatLng(40.55,-75.4),new GLatLng(40.55,-75.4));
	var zoomlevel = map.getBoundsZoomLevel(zoombox);
	if(zoomlevel>15) zoomlevel=15;
	map.setCenter(zoombox.getCenter(),zoomlevel);

}