// 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(46.5152777778,8.32611111111,"~~107727.html\">Obergesteln, Goms, Wallis (Valais), Switzerland</a></b>~)Ref.: Stalder, H. A., de Quervain, Niggli, E., Graeser, St., Die Mineralfunde der Schweiz, (1973), p. 116<br></div>","Obergesteln, Goms, Wallis (Valais), Switzerland");
cm(46.533332824707,8.39999961853027,"~~61119.html\">Gere Valley (Geren Valley), Gere (Geren), Oberwald, Goms, Wallis (Valais), Switzerland</a></b>~)Stalder, H. A., Wagner, A., Graeser, S. and Stuker, P. (1998): &quot;Mineralienlexikon der Schweiz&quot;, Verlag Wepf &amp; Co. (Basel), p. 28<br>~$~!0811366001199367189.jpg\"></th><td><b>Pericline</b><br>&copy; Christian Bracke<br><br>Pericline crystals up to 1.5 cm length. Specimen size 8.6 x 8 x 5.5 cm. See second image. Christian Bracke Collection.~%</div>","Gere Valley (Geren Valley), Gere (Geren), Oberwald, Goms, Wallis (Valais), Switzerland");
cm(46.5816666667,8.83194444444,"~~4399.html\">Piz Vallatscha, Medel Valley, Grischun (Grisons; Graubünden), Switzerland</a></b>~)Stalder, H. A., Wagner, A., Graeser, S. and Stuker, P. (1998): &quot;Mineralienlexikon der Schweiz&quot;, Verlag Wepf &amp; Co. (Basel), p. 28<br></div>","Piz Vallatscha, Medel Valley, Grischun (Grisons; Graubünden), Switzerland");
cm(45.9277777778,7.78527777778,"~~121017.html\">Pollux Mt., Gorner glacier area, Zermatt, Matt Valley, Zermatt - Saas Fee area, Wallis (Valais), Switzerland</a></b>~)Stalder, H. A., Wagner, A., Graeser, S. and Stuker, P. (1998): &quot;Mineralienlexikon der Schweiz&quot;, Verlag Wepf &amp; Co. (Basel), p. 28<br></div>","Pollux Mt., Gorner glacier area, Zermatt, Matt Valley, Zermatt - Saas Fee area, Wallis (Valais), Switzerland");
cm(46.0752777778,7.93,"~~108287.html\">Egginer Mt. (Egginerhorn Mt.), Saas Almagell, Saas Valley, Zermatt - Saas Fee area, Wallis (Valais), Switzerland</a></b>~)Stalder, H. A., Wagner, A., Graeser, S. and Stuker, P. (1998): &quot;Mineralienlexikon der Schweiz&quot;, Verlag Wepf &amp; Co. (Basel), p. 28<br></div>","Egginer Mt. (Egginerhorn Mt.), Saas Almagell, Saas Valley, Zermatt - Saas Fee area, Wallis (Valais), Switzerland");
cm(46.3822222222,8.14888888889,"~~159176.html\">Ausserbinn, Binn Valley, Wallis (Valais), Switzerland</a></b>~)Christian Bracke Collection.<br>~$~!0747933001197717341.jpg\"></th><td><b>Pericline</b><br>&copy; Christian Bracke<br><br>White pericline crystals up to 1.7 cm length. See two other images for another detail and complete specimen. Specimen size 12.5 x 7.6 x 5.1 cm. Christian Bracke Collection.~%</div>","Ausserbinn, Binn Valley, Wallis (Valais), Switzerland");

}