var ROOTURL="http://www.arthursmiths.co.uk/";

function roll_over(image_id,change_to) {
   var this_img=document.getElementById(image_id);
   this_img.src=ROOTURL+change_to;
}
function post_form($form_id){document.getElementById($form_id).submit();}
function add_event($object,$type,$fn){ 
   if($object.attachEvent){ 
      $object['e'+$type+$fn] = $fn; 
      $object[$type+$fn] = function(){$object['e'+$type+$fn]( window.event );} 
      $object.attachEvent( 'on'+$type, $object[$type+$fn] ); 
   }else{
      $object.addEventListener($type,$fn,false); 
   }
}
function remove_event($object,$type,$fn){
   if($object.detachEvent){
      $object.detachEvent('on'+$type,$object[$type+$fn]);
      $object[$type+$fn]=null;
   }else{
      $object.removeEventListener($type,$fn,false);
   }
} 
function elements_with_class($elem,$tag_name,$class_name){
   var $arr_elems=($tag_name=="*" && document.all)? document.all : $elem.getElementsByTagName($tag_name);
   var $found = new Array();
   for($i=0;$i<$arr_elems.length;$i++){  
      if($arr_elems[$i].className==$class_name) $found.push($arr_elems[$i]);
   }
   return ($found);
}
function http_location($filename){
   window.location=$filename;
}
function confirm_action($message,$url) {
	var $answer=confirm($message);
	if($answer)window.location($url);
}
function picture_window($url,$width,$height,$window) {
   window.open($url+'&width='+$width+'&height='+$height,$window,"width="+$width+",height="+$height+",scrollbars=no,left=100,top=100");
}
function external_links(){
   if (!document.getElementsByTagName) return;
   var anchors = document.getElementsByTagName("a");
   for (var i=0; i<anchors.length; i++) {
   var anchor = anchors[i];
   if (anchor.getAttribute("href") && anchor.getAttribute("rel") == "external")anchor.target = "_blank";
   }
}
window.onload=external_links;

function load_map($map_id) {
   $elem=document.getElementById($map_id);
	 if (GBrowserIsCompatible()) {
      var $map = new GMap2($elem);
      $point=new GLatLng(53.54454,-2.63129);
      $map.setCenter($point,13);
      var $marker = new GMarker($point);
      $map.addOverlay($marker);
      $marker.openInfoWindowHtml('Arthur Smiths<br />Solicitors in Wigan, Lancashire');
      $map.addControl(new GLargeMapControl());
   }
	 return true;
}
var $showing_comment=0;

function comment_flicker(){
   $hidden=elements_with_class(document,"*",'hiddencomment');
	 $total=$hidden.length;
	 if(!$total)return false;
	 
	 $showing_comment++;
	 if($showing_comment>$total)$showing_comment=1;
	 
	 for($i=0;$i<$hidden.length;$i++){
	    $hidden[$i].style.display='none';
	 }
	 document.getElementById('hiddencomment'+$showing_comment).style.display='block';
	 setTimeout('comment_flicker()',7000);
}