
// JavaScript Document
function wm_SetDivText(theObj,x,theText) { //Modification of MM_setTextOfLayer
  if ((obj=MM_findObj(theObj))!=null) with (obj)
    if (document.layers) {document.write(unescape(theText)); document.close();}
    else innerHTML = unescape(theText);
}

function MM_setTextOfLayer(objName,x,newText) { //v4.01
  if ((obj=MM_findObj(objName))!=null) with (obj)
    if (document.layers) {document.write(unescape(newText)); document.close();}
    else innerHTML = unescape(newText);
}

function ImagePopup() {

  // load the popup image into a temporary Image structure
  // once its finished loading, open the window with the correct Image dimensions
  // pulled from the Image structure

  var img=new Image;
  
  img.src=this.href;
  
  img.onload=function () {
    var win=window.open(img.src, "popup", "width="+(img.width+16)+",height="+(img.height+16))
		win.focus();
  };
}

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.	MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

var imgCount=0;

function MM_preloadImages() { //v3.0
  var d=document; 
  if(d.images){ 
  	if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; 
	for(i=0; i<a.length; i++)
		if (a[i].indexOf("#")!=0) { 
			imgCount++;
			d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];
		}
	}
	window.status = imgCount + ' Image(s) Pre-Loaded';
	setTimeout('window.status=\'\'', 2000);
}

function MM_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=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);

function MM_openBrWindow(theURL,winName,features) { //v2.0
  window.open(theURL,winName,features);
}




/* Smooth scrolling
   Changes links that link to other parts of this page to scroll
   smoothly to those links rather than jump to them directly, which
   can be a little disorienting.
   
   sil, http://www.kryogenix.org/
   
   v1.0 2003-11-11
*/

function ss_fixAllLinks() {
  // Get a list of all links in the page
  var allLinks = document.getElementsByTagName('a');
  // Walk through the list
  for (var i=0;i<allLinks.length;i++) {
    var lnk = allLinks[i];
    if ((lnk.href && lnk.href.indexOf('#') != -1) && 
        ( (lnk.pathname == location.pathname) ||
	  ('/'+lnk.pathname == location.pathname) ) && 
        (lnk.search == location.search)) {
      // If the link is internal to the page (begins in #)
      // then attach the smoothScroll function as an onclick
      // event handler
      ss_addEvent(lnk,'click',smoothScroll);
    }
  }
}

function smoothScroll(e) {
  // This is an event handler; get the clicked on element,
  // in a cross-browser fashion
  if (window.event) {
    target = window.event.srcElement;
  } else if (e) {
    target = e.target;
  } else return;
  
  // Make sure that the target is an element, not a text node
  // within an element
  if (target.nodeType == 3) {
    target = target.parentNode;
  }
  
  // Paranoia; check this is an A tag
  if (target.nodeName.toLowerCase() != 'a') return;
  
  // Find the <a name> tag corresponding to this href
  // First strip off the hash (first character)
  anchor = target.hash.substr(1);
  // Now loop all A tags until we find one with that name
  var allLinks = document.getElementsByTagName('a');
  var destinationLink = null;
  for (var i=0;i<allLinks.length;i++) {
    var lnk = allLinks[i];
    if (lnk.name && (lnk.name == anchor)) {
      destinationLink = lnk;
      break;
    }
  }
  
  // If we didn't find a destination, give up and let the browser do
  // its thing
  if (!destinationLink) return true;
  
  // Find the destination's position
  var destx = destinationLink.offsetLeft; 
  var desty = destinationLink.offsetTop;
  var thisNode = destinationLink;
  while (thisNode.offsetParent && 
        (thisNode.offsetParent != document.body)) {
    thisNode = thisNode.offsetParent;
    destx += thisNode.offsetLeft;
    desty += thisNode.offsetTop;
  }
  
  // Stop any current scrolling
  clearInterval(ss_INTERVAL);
  
  cypos = ss_getCurrentYPos();
  
  ss_stepsize = parseInt((desty-cypos)/ss_STEPS);
  ss_INTERVAL = setInterval('ss_scrollWindow('+ss_stepsize+','+desty+',"'+anchor+'")',10);
  
  // And stop the actual click happening
  if (window.event) {
    window.event.cancelBubble = true;
    window.event.returnValue = false;
  }
  if (e && e.preventDefault && e.stopPropagation) {
    e.preventDefault();
    e.stopPropagation();
  }
}

function ss_scrollWindow(scramount,dest,anchor) {
  wascypos = ss_getCurrentYPos();
  isAbove = (wascypos < dest);
  window.scrollTo(0,wascypos + scramount);
  iscypos = ss_getCurrentYPos();
  isAboveNow = (iscypos < dest);
  if ((isAbove != isAboveNow) || (wascypos == iscypos)) {
    // if we've just scrolled past the destination, or
    // we haven't moved from the last scroll (i.e., we're at the
    // bottom of the page) then scroll exactly to the link
    window.scrollTo(0,dest);
    // cancel the repeating timer
    clearInterval(ss_INTERVAL);
    // and jump to the link directly so the URL's right
    location.hash = anchor;
  }
}

function ss_getCurrentYPos() {
  if (document.body && document.body.scrollTop)
    return document.body.scrollTop;
  if (document.documentElement && document.documentElement.scrollTop)
    return document.documentElement.scrollTop;
  if (window.pageYOffset)
    return window.pageYOffset;
  return 0;
}

function ss_addEvent(elm, evType, fn, useCapture)
// addEvent and removeEvent
// cross-browser event handling for IE5+,  NS6 and Mozilla
// By Scott Andrew
{
  if (elm.addEventListener){
    elm.addEventListener(evType, fn, useCapture);
    return true;
  } else if (elm.attachEvent){
    var r = elm.attachEvent("on"+evType, fn);
    return r;
  } else {
    alert("Handler could not be removed");
  }
} 

var ss_INTERVAL;
var ss_STEPS = 25;

ss_addEvent(window,"load",ss_fixAllLinks);
ss_addEvent(window, "resize", SnapLayer );

function SnapLayer()
{
	P7_Snap('imgAnchor','divDescription',0,0)
}

function P7_autoLayers() { //v1.4 by PVII
 var g,b,k,f,args=P7_autoLayers.arguments;a=parseInt(args[0]);if(isNaN(a))a=0;
 if(!document.p7setc){p7c=new Array();document.p7setc=true;for(var u=0;u<10;u++){
 p7c[u]=new Array();}}for(k=0;k<p7c[a].length;k++){if((g=MM_findObj(p7c[a][k]))!=null){
 b=(document.layers)?g:g.style;b.visibility="hidden";}}for(k=1;k<args.length;k++){
 if((g=MM_findObj(args[k]))!=null){b=(document.layers)?g:g.style;b.visibility="visible";f=false;
 for(var j=0;j<p7c[a].length;j++){if(args[k]==p7c[a][j]) {f=true;}}
 if(!f){p7c[a][p7c[a].length++]=args[k];}}}
}

function P7_Snap() { //v2.63 by PVII
 var x,y,ox,bx,oy,p,tx,a,b,k,d,da,e,el,tw,q0,xx,yy,w1,pa='px',args=P7_Snap.arguments;a=parseInt(a);
 if(document.layers||window.opera){pa='';}for(k=0;k<(args.length);k+=4){
 if((g=MM_findObj(args[k]))!=null){if((el=MM_findObj(args[k+1]))!=null){
 a=parseInt(args[k+2]);b=parseInt(args[k+3]);x=0;y=0;ox=0;oy=0;p="";tx=1;
 da="document.all['"+args[k]+"']";if(document.getElementById){
 d="document.getElementsByName('"+args[k]+"')[0]";if(!eval(d)){
 d="document.getElementById('"+args[k]+"')";if(!eval(d)){d=da;}}
 }else if(document.all){d=da;}if(document.all||document.getElementById){while(tx==1){
 p+=".offsetParent";if(eval(d+p)){x+=parseInt(eval(d+p+".offsetLeft"));y+=parseInt(eval(d+p+".offsetTop"));
 }else{tx=0;}}ox=parseInt(g.offsetLeft);oy=parseInt(g.offsetTop);tw=x+ox+y+oy;
 if(tw==0||(navigator.appVersion.indexOf("MSIE 4")>-1&&navigator.appVersion.indexOf("Mac")>-1)){
  ox=0;oy=0;if(g.style.left){x=parseInt(g.style.left);y=parseInt(g.style.top);}else{
  w1=parseInt(el.style.width);bx=(a<0)?-5-w1:-10;a=(Math.abs(a)<1000)?0:a;b=(Math.abs(b)<1000)?0:b;
  x=document.body.scrollLeft+event.clientX+bx;y=document.body.scrollTop+event.clientY;}}
 }else if(document.layers){x=g.x;y=g.y;q0=document.layers,dd="";for(var s=0;s<q0.length;s++){
  dd='document.'+q0[s].name;if(eval(dd+'.document.'+args[k])){x+=eval(dd+'.left');y+=eval(dd+'.top');
  break;}}}e=(document.layers)?el:el.style;xx=parseInt(x+ox+a),yy=parseInt(y+oy+b);
 if(navigator.appVersion.indexOf("MSIE 5")>-1 && navigator.appVersion.indexOf("Mac")>-1){
  xx+=parseInt(document.body.leftMargin);yy+=parseInt(document.body.topMargin);}
 e.left=xx+pa;e.top=yy+pa;}}}
}

function ss_getCurrentYPos() {
  if (document.body && document.body.scrollTop)
    return document.body.scrollTop;
  if (document.documentElement && document.documentElement.scrollTop)
    return document.documentElement.scrollTop;
  if (window.pageYOffset)
    return window.pageYOffset;
  return 0;
}

function PopupPic(sPicURL) { 
     window.open( "popup.htm?"+sPicURL, "pop",  
     "resizable=1,HEIGHT=200,WIDTH=200"); 
   }


function addEvent(obj, evType, fn){ 
 if (obj.addEventListener){ 
   obj.addEventListener(evType, fn, true); 
   return true; 
 } else if (obj.attachEvent){ 
   var r = obj.attachEvent("on"+evType, fn); 
   return r; 
 } else { 
   return false; 
 } 
}
