// Copyright © At Hand Creations

var olc='SetExe();';
var shopfiles="w.gif,PayPal,2AddB,2InfoB,8ViewB,2Itm"

var ci=0;
var cio=0;
var cic=new Array();
var cicr=new Array();

var tte="";
var anl=null;
var os="";
var op=0;
var ot=1;
var ot2;
var OTO=780;

var ldi=new Array();
var lmk;

var scw=400;
var sch=400;
var sci=0; 
var sct=new Array();
var sce;
var scysz; 
var scd=0;
var scy=".";

var d=document;
var NS=d.layers?1:0;
var IE=d.all?1:0;
var DM=d.getElementById?1:0;

var hide="hidden";
var show="visible";
var d_="<div class=d id=";
var _d="</div>";
if(NS)
{
 hide="hide";
 show="show";
 d_="<div><layer visibility=hidden id=";
 _d="</layer>"+_d;
 ogw=innerWidth; 
 ogh=innerHeight;
}

function EndOS(v)
{
 os+='|60location="'+v+'"|0location.replace(location)';
}

function EvMDn(e)
{
 var i;
 if(IE&&!window.opera)
 {
  e=window.event;
  i=e.button;
 }
 else i=e.which;
 switch(i)
 {
 case 2:
 case 3:
  if(ci&&!cio) eval(cicr[ci-1]); 
  return false;
 case 1:
  if(ci&&!cio)
  {
   eval(cic[ci-1]);
   return false;
  }
 default:
  return true;
 }
}

function EvCM() {return false}

function SetExe()
{
 if(NS) d.captureEvents(Event.MOUSEDOWN);
 d.onmousedown=EvMDn;
 d.oncontextmenu=EvCM;
 if(IE) with(d.body.style)
 {
  scrollbarBaseColor='#2F2F3F'
  scrollbarArrowColor='#2F2F3F'
  scrollbarFaceColor='#8080C0'
  scrollbarHighlightColor='#F0F0FF'
  scrollbarShadowColor='#202030'
 }
 Tick();
}

function df(v) {return typeof(v)=='undefined'?"":v}

function TxBox(i,f,t,b,x,y,oc,ov,oo)
{
if(f=="") f="x.gif";
else if(f.indexOf(".")<0) f+=".jpg";
oc="'"+df(oc)+";return false'><IMG SRC='i/"+f+"' align=middle title='"+t+"' alt='"+t+"' NAME='"+i+"' BORDER="+b+" WIDTH="+x+" HEIGHT="+y;
 return hrf(t,ov,oo)+oc+"></a>";
}

function hrf(t,v,o)
{
 return "<a href='http://www.athand.org/jerr.htm' onfocus='this.blur()' onmouseover='window.status="+'"'+t+'";'+df(v)+";return true' onmouseout='window.status="+'"";'+df(o)+"' onclick=";
}

function SetSrc(e,t)
{
 if(NS)
 { 
  e.document.open();
  e.document.write(t);
  e.document.close();
 } 
 else e.innerHTML=t; 
}

function SetScr()
{
 var e=GetEle("scdv");
 if(sci>=sct.length) sci=0;
 var t=sct[sci++];
 scy=".";
 scd=parseInt(t);
 var i=t.indexOf("<");
 t="<CENTER><b><font color=#0000"+(t.charAt(i-1)=="@"?"99":"28")+" size="+t.substring(i+1)+"</font></b></CENTER>";
 if(sce)
 {
  sce.visibility=hide;
  setTimeout("GetSty('scdv').visibility=show",10);
 }
 else sce=Sty(e);
 
 SetSrc(e,t);
 scysz=yh(e);
 if(scd<20)
 {
  scd/=4; 
  scy=sch;  
  sce.top=scy;
 }
 else sce.top=(sch-scysz)/2;
}

function Tick()
{
 var c=anl;
 var p=null;
 var t;
 eval(tte);
 while(c)
 {
  var s=Sty(c);
  t=c.t;
  c.xa+=(c.xb-c.xa)/t;
  s.left=Math.floor(c.xa);
  t--;
  s.top=Math.floor(c.yb-c.a*t*t);
  s.visibility=show;
  c.t=t;
  if(t) 
  {
   p=c;
   c=c.nxt;
  }
  else
  {
   c=c.nxt;
   if(p) p.nxt=c;
   else anl=c;
  }
 }

 if(scy==".")
 {
  if(scd)
  {
   scd--;
   if(!scd) SetScr();
  }
 }
 else
 {
  scy-=scd;
  sce.top=Math.floor(scy);
  if(scy<=-scysz) SetScr();
 } 

 if(ot)
 {
  if(ot>0) ot--;
  else if(ot<-1) ot++;
  else
  {
   t=lmk;
   p=0;
   while(t<ldi.length&&ldi[t].lmk<=lmk) if(!ldi[t++].lok) p++;
   if(!p) 
   {
    ot=0;
    lmk=t;
   }
   else if(!--ot2) ot=0;
  }
  if(!ot)
  {
   c=0;
   var s=os.substring(op);
   if(s.charAt(0)=='"')
   {
    c=s.substring(1).indexOf('"')+1;
    lmk=ICache(s.substring(1,c));
    c++;
   }
   ot=parseInt(s.substring(c));
   ot2=OTO;
   p=s.indexOf("|");
   op+=p+1;
   if(p<0) 
   {
    op=0; 
    p=s.length;
   }    
   eval(s.substring(c+String(ot).length,p));
   if(c) ot=-ot;
  }
 }
 setTimeout("Tick();",35);
}

function ciOv()
{
 ci=this.ci;
}
function ciOt()
{
 ci=0;
}

function SetFs(m,v)
{
 var i=0;
 while(i++<m)
 {
  var f=GetEle("f"+i);
  f.onmouseover=f.onmousedown=ciOv;
  f.ci=Number(v.charAt(0));
  if(v.length>1) v=v.substring(1);
  f.onmouseout=ciOt;
  if(!NS) Sty(f).cursor="pointer";
 }
}

function cid(n,i,w)
{
 var q='';
 n=d_+'"'+n+'" onmousedown="ci='+i+'" onmouseover="ci='+i+'" onmouseout="ci=0"';
 if(!NS) 
 {
  n+=' style="';
  if(i) n+='cursor:pointer;';
  q='"';
 }
 if(w)
 {
  if(NS) n+=" width="+w;
  else n+="width:"+w+"px";
 }
 return n+q;
}

function Anim(c,x,y,t,xa,ya)
{
 var e=GetEle(c);
 var w=(IE?d.body.offsetWidth:window.innerWidth)/2;
 var h=NS?e.document.height:e.offsetHeight;
 if(df(xa)=="")
 {
  xa=e.xb;
  ya=e.yb;
  if(typeof(xa)=="undefined") return;
 }
 if(!e.t)
 {
  e.nxt=anl;
  anl=e;
 }
 if(typeof(x)!="number") x=w+Number(x);
 e.xb=x;
 if(typeof(xa)!="number") xa=w+Number(xa);
 if(typeof(y)!="number") y-=h;
 if(typeof(ya)!="number") ya-=h;
 e.yb=y;
 e.a=(y-ya)/(t*t);
 e.xa=xa;
 e.ya=ya;
 e.t=t;
 h+=y;
 if(NS&&d.height<h) d.height=h;
}

function EvRsz()
{
 if(NS&&(ogw!=innerWidth||ogh!=innerHeight)) location.reload();
}

function IChg(i,v)
{
 if(v.indexOf(".")<0) v+=".jpg";
 GetImg(i).src="i/"+v;
}

function lok1() {this.lok=1}

function ICache(v)
{
 var l=ldi.length;
 while(v.length)
 {
  var c=v.charAt(0);
  var i="i/";
  if(c==".")
  {
   c=v.charAt(1);
   i="../"+i;
   v=v.substring(1);
  }
  if(c>"0"&&c<="9")
  {
   c=parseInt(v);
   v=v.substring(String(c).length);
  }
  else c=1;
  var j=v.indexOf(",");
  if(j<0) j=v.length;
  var n=v.substring(0,j);
  v=v.substring(j+1);
  var x=".jpg";
  j=n.indexOf(".");
  if(j>0)
  {
   x=n.substring(j);
   n=n.substring(0,j);
  }
  if(n.charAt(0)=="@") n=n.substring(1);
  else n=i+n;
  j=0;
  while(j<c)
  {
   var g=new Image();
   ldi[ldi.length]=g;
   g.lmk=l;
   g.lok=0;
   g.onload=lok1;
   if(c==1) g.src=n+x;
   else g.src=n+String(1000+j).substring(1)+x;
   j++;
  }
 }
 return l;
}

function GetImg(i)
{
 var e=d.images[i];
 if(NS) 
 {
  if(!df(e))
  {
   var l=0;
   while(l<d.layers.length)
   {
    e=d.layers[l].document.images[i];
    if(df(e)) return e;
    l++;
   }
   return false;
  }
 }
 return e;
}

function GetEle(i)
{
 if(NS) 
 {
  var e=d.layers[i];
  if(!df(e))
  {
   var l=0;
   while(l<d.layers.length)
   {
    e=d.layers[l].document.layers[i];
    if(df(e)) return e;
    l++;
   }
  }
  return e;
 }
 return DM?d.getElementById(i):d.all[i];
}

function GetV(v)
{
 var n=window.name;
 var i=4;
 var j=4;
 if(n.length<4||n.substring(0,3)!="Ah_") return "";
 while(i<n.length)
 {
  var c=n.substring(i,i+4);
  j=n.substring(i+4).indexOf("_")+1;
  if(j) j+=i+4;
  else j=n.length;
  if(v==c)
  {
   if(j!=n.length) j--;
   return n=n.substring(i+4,j);
  }
  if(v<=c) return "";
  i=j;
 }
 return "";
}

function SetV(v,q)
{
 var n=window.name;
 var i=4;
 var j=4;
 if(n.length<4||n.substring(0,3)!="Ah_") n="Ah_0";
 while(i<n.length)
 {
  var c=n.substring(i,i+4);
  j=n.substring(i+4).indexOf("_")+1;
  if(j) j+=i+4;
  else j=n.length;
  if(v==c)
  {
   if(j==n.length&&i>4) n=n.substring(0,i-1);
   else n=n.substring(0,i)+n.substring(j);
   j=i;
  }
  if(v<=c) break;
  i=j;
 }
 if(q!="")
 {
  q=v+q;
  if(i<n.length) q+="_";
  else if(i!=4) q="_"+q;
 }
 window.name=n.substring(0,i)+q+n.substring(i);
}

function GetSty(i) { return NS?GetEle(i):GetEle(i).style; }
function Sty(i) { return NS?i:i.style }
function yh(g) { return NS?g.document.height:g.offsetHeight }
function GetView(v) { return GetV("view").indexOf(v)+1 }
function ClrView(v)
{
 var s=GetV("view");
 var i=s.indexOf(v);
 if(i>=0) SetV("view",s.substring(0,i)+s.substring(i+v.length));
}
function SetView(v)
{
 var s=GetV("view");
 if(s.indexOf(v)<0) SetV("view",s+v);
}
