<!--
<!-- This script and many more are available free online at -->
<!-- The JavaScript Source!! http://javascript.internet.com -->

<!-- Begin
function mklist(n)
{
  this.length=n;
  for (var c=1 ; c <= n ; c++) {
    this[c]=0;
  }
  return this;
}

function browserdelay()
{
  var retval=500;
  if (navigator.userAgent.indexOf("Win") != 0) {
    retval=150;
  }
  else if (navigator.userAgent.indexOf("Mac") != 0) {
    retval=500;
  }
  else if (navigator.userAgent.indexOf("X11") != 0) {
    retval=750;
  }
  return retval;
}

function mkcfg(n)
{
  this.num=1;
  this.seed=0;
  this.list=new mklist(n);
  this.type=new mklist(n);
  this.delay=browserdelay();
  this.timer=0;
  this.showurl=(5 * 1000);
  this.looping=true;
  this.msgdisp=(4 * 1000);
  this.barwidth=100;
  return this;
}

function urlfix(obj)
{
  window.clearTimeout(window.config.timer);
  window.defaultStatus=obj.href;
  window.config.timer=window.setTimeout("sbprint()",window.config.showurl);
  return true;
}

function scrollit_r2l()
{
  var out=" ";
  var c=0;

  if (window.config.seed <= window.config.barwidth && window.config.seed > 0) {
    for (c=0 ; c < window.config.seed ; c++) {
      out+=" ";
    }
    out+=window.config.list[window.config.num];
    window.config.seed--;
    window.status=out;
    window.config.timer=window.setTimeout("scrollit_r2l()",window.config.delay);
  }
  else if (window.config.seed <= 0) {
    if (-window.config.seed < window.config.list[window.config.num].length) {
      out+=window.config.list[window.config.num].substring(-window.config.seed,window.config.list[window.config.num].length);
      window.config.seed--;
      window.status=out;
      window.config.timer=window.setTimeout("scrollit_r2l()",window.config.delay);
    }
    else {
      window.status=" ";
      window.config.num++;
      window.config.timer=window.setTimeout("sbprint()",window.config.msgdisp);
    }
  }
}

window.config=new mkcfg(7);
window.config.list[1]="The Shrubbery, Sligo ";
window.config.type[1]=0;
window.config.list[2]="Tel (UK): 00353 71 916 1756 Tel (Eire): 071 916 1756   Email: maeve@shrubberysligo.com ";
window.config.type[2]=0;
window.config.list[3]="Fish on Lough Gill";
window.config.type[3]=0;
window.config.list[4]="Tel (UK): 00353 71 916 1756 Tel (Eire): 071 916 1756   Email: maeve@shrubberysligo.com ";
window.config.type[4]=0;
window.config.list[5]="Climb the Ox Mountains ";
window.config.type[5]=0;
window.config.list[6]="Tel (UK): 00353 71 916 1756 Tel (Eire): 071 916 1756   Email: maeve@shrubberysligo.com ";
window.config.type[6]=0;
window.config.list[7]="Centre yourself in Sligo ";
window.config.type[7]=0;

function sbprint()
{
  if (window.config.num <= window.config.list.length) {
    if (window.config.type[window.config.num] == 0) {
      window.status=window.config.list[window.config.num];
      window.config.num++;
      window.clearTimeout(window.config.timer);
      window.config.timer=window.setTimeout('sbprint()',window.config.msgdisp);
    }
    else if (window.config.type[window.config.num] == 1) {
      window.config.seed=window.config.barwidth;
      scrollit_r2l();
    }
  }
  else if (window.config.looping) {
    window.config.num=1;
    window.clearTimeout(window.config.timer);
    window.config.timer=window.setTimeout('sbprint()',window.config.delay);
  }
}
//  End -->

function TT_swapImgRestore() { //v3.0
  var i,x,a=document.TT_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function TT_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.TT_p) d.TT_p=new Array();
    var i,j=d.TT_p.length,a=TT_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.TT_p[j]=new Image; d.TT_p[j++].src=a[i];}}
}

function TT_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=TT_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function TT_swapImage() { //v3.0
  var i,j=0,x,a=TT_swapImage.arguments; document.TT_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=TT_findObj(a[i]))!=null){document.TT_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
//-->