// 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(28.1361111111,-15.5072222222,"~~153544.html\">Montana Cardones Mt., Cardones, Arucas, Gran Canaria (Grand Canary), Las Palmas Province, Canary Islands, Spain</a></b><br></div>","Montana Cardones Mt., Cardones, Arucas, Gran Canaria (Grand Canary), Las Palmas Province, Canary Islands, Spain");
cm(28.125,-15.5227777778,"~~153543.html\">Montana Arucas Mt., Arucas, Gran Canaria (Grand Canary), Las Palmas Province, Canary Islands, Spain</a></b><br>~$<a href=\"photo-117977.html\"><img border=0 width=180 height=180 src=\"http://www.mindat.org/gphotos/0873820001188687552.jpg\"></a></th><td><b>Haüyne</b><br>&copy; C.H.M.Schäfer<br><br>Haüyne in Tahitite, field of view 40 mm, collection Ch.&amp;H. Schäfer~%</div>","Montana Arucas Mt., Arucas, Gran Canaria (Grand Canary), Las Palmas Province, Canary Islands, Spain");
cm(27.8219444444,-15.7494444444,"~~155696.html\">Barranco Taurito, Playa de Mogán, Mogán, Gran Canaria (Grand Canary), Las Palmas Province, Canary Islands, Spain</a></b><br>~$<a href=\"photo-179121.html\"><img border=0 width=180 height=180 src=\"http://www.mindat.org/gphotos/0736816001218307350.jpg\"></a></th><td><b>Mogánite</b><br>&copy; Volker Betz<br><br>45x30 mm. A mixture of Moganite and Chalcedone occuring as fissure filling in the Ignimbrites.~%</div>","Barranco Taurito, Playa de Mogán, Mogán, Gran Canaria (Grand Canary), Las Palmas Province, Canary Islands, Spain");
cm(27.8102777778,-15.7494444444,"~~155695.html\">Barranco Tiritana, Playa de Mogán, Mogán, Gran Canaria (Grand Canary), Las Palmas Province, Canary Islands, Spain</a></b><br></div>","Barranco Tiritana, Playa de Mogán, Mogán, Gran Canaria (Grand Canary), Las Palmas Province, Canary Islands, Spain");
cm(27.75,-15.5833330154419,"~~131066.html\">Playa del Inglés, Gran Canaria (Grand Canary), Las Palmas Province, Canary Islands, Spain</a></b><br></div>","Playa del Inglés, Gran Canaria (Grand Canary), Las Palmas Province, Canary Islands, Spain");
cm(27.775,-15.6641666667,"~~155698.html\">Puzzolane quarry, Arguineguin, Playa del Inglés, Gran Canaria (Grand Canary), Las Palmas Province, Canary Islands, Spain</a></b><br></div>","Puzzolane quarry, Arguineguin, Playa del Inglés, Gran Canaria (Grand Canary), Las Palmas Province, Canary Islands, Spain");
cm(27.7891666667,-15.5844444444,"~~155697.html\">Basalt quarry, Barranco de Fataga, Playa del Inglés, Gran Canaria (Grand Canary), Las Palmas Province, Canary Islands, Spain</a></b><br></div>","Basalt quarry, Barranco de Fataga, Playa del Inglés, Gran Canaria (Grand Canary), Las Palmas Province, Canary Islands, Spain");
cm(27.9383333333,-15.6158333333,"~~185528.html\">Phonolite quarry, La Plata, San Bartolome de Tirajana, Gran Canaria (Grand Canary), Las Palmas Province, Canary Islands, Spain</a></b><br></div>","Phonolite quarry, La Plata, San Bartolome de Tirajana, Gran Canaria (Grand Canary), Las Palmas Province, Canary Islands, Spain");
cm(27.9111111111,-15.8227777778,"~~189758.html\">Camino de la Playa del Asno, Tasártico, Gran Canaria (Grand Canary), Las Palmas Province, Canary Islands, Spain</a></b><br>~$<a href=\"photo-176498.html\"><img border=0 width=180 height=180 src=\"http://www.mindat.org/gphotos/0523533001217017207.jpg\"></a></th><td><b>Chabazite</b><br>&copy; Volker Betz<br><br>25x30 mm.~%</div>","Camino de la Playa del Asno, Tasártico, Gran Canaria (Grand Canary), Las Palmas Province, Canary Islands, Spain");
cm(27.9658333333,-15.6011111111,"~~155693.html\">Roque Nublo, Tejeda, Gran Canaria (Grand Canary), Las Palmas Province, Canary Islands, Spain</a></b><br></div>","Roque Nublo, Tejeda, Gran Canaria (Grand Canary), Las Palmas Province, Canary Islands, Spain");
	var	zoombox=new GLatLngBounds(new GLatLng(27.75,-15.8227777778),new GLatLng(28.1361111111,-15.5072222222));
	var zoomlevel = map.getBoundsZoomLevel(zoombox);
	if(zoomlevel>15) zoomlevel=15;
	map.setCenter(zoombox.getCenter(),zoomlevel);

}