// 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(56.9107289652,-3.32708874769,"~~5350.html\">Coir Loch Kander, Braemar, Buchan Grampian (Aberdeenshire), Scotland, UK</a></b>~)BMS Database<br></div>","Coir Loch Kander, Braemar, Buchan Grampian (Aberdeenshire), Scotland, UK");
cm(-31.9666666667,141.466666667,"~~72.html\">Broken Hill, Yancowinna Co., New South Wales, Australia</a></b>~)Birch BH Book<br></div>","Broken Hill, Yancowinna Co., New South Wales, Australia");
cm(47.4958343505859,-121.783332824707,"~~23417.html\">North Bend, King Co., Washington, USA</a></b><br></div>","North Bend, King Co., Washington, USA");
cm(47.7488888889,-79.1741666667,"~~68490.html\">Rémigny armenite occurrence, Rémigny, Témiscamingue RCM, Abitibi-Témiscamingue, Québec, Canada</a></b>~)Canadian Mineralogist 22, 453-464 (1984); Sabina, A.P. (2000) Rocks &amp; Minerals for the collector; Cobalt - Belleterre - Timmins, Ontario and Quebec. GSC Misc. Report 57, 96 p.<br></div>","Rémigny armenite occurrence, Rémigny, Témiscamingue RCM, Abitibi-Témiscamingue, Québec, Canada");

}