//************************************************************************//
//******* © 2006 Pete Cramblit. All Rights Reserved. *******//
//************************************************************************//

//var now = new Date();
//fixDate(now);
//now.setTime(now.getTime() + 365 * 24 * 60 * 60 * 1000);

// ---------------------- //
//function openwindow(strimage, strtitle, page){
//  var winpop = window.open("expand.htm?imagename=" + strimage + "&title=" + strtitle + "&page=" + page, "View", "width=750, height=650, menubar=1, toolbar=1, scrollbars=1, resizable=1");
//  winpop.focus();
//}

function findarrayindex(gtitle, arrpage){
  var intindex = 0;
  for(i=1;i<arrpage.length;i++){
    if(arrpage[i].split("|")[1].indexOf(gtitle) >= 0){
      intindex = i;
    }
  }
  return intindex;
}

function getqstringvalue(name,inpara){
  var indexname = inpara.indexOf(name)
  if(indexname!=-1){
    var indexvalue    = inpara.indexOf("=",inpara.indexOf(name)) + 1
    var indexvalueend = inpara.indexOf("&",indexvalue)
    if(indexvalueend==-1){
      indexvalueend=inpara.length
    }
      var strscrub = unescape(inpara.substring(indexvalue,indexvalueend))
      return strscrub
  }
  else{
    return ""
  }
}

function replacechar(strvalue,charin,charreplace){
  var strstart,strend
  var startpos = 0
  var indexpos = strvalue.indexOf(charin,startpos)
  while (indexpos!=-1){
    strstart = strvalue.slice(0,indexpos)
//alert("strstart: " + strstart)
    strend = strvalue.slice(indexpos + charin.length, strvalue.length)
//alert("strend: " + strend)
    strvalue = strstart + charreplace + strend
//alert(strvalue)
    startpos = indexpos
    indexpos = strvalue.indexOf(charin,startpos)
  }
  return strvalue
}

function closewin(){
  window.close();
}

function adjustpicsize(catlength){
  var strformat;
  var intwidth, intheight;
  for(aps=1;aps<catlength;aps++){
      if(aps<10){
        strformat = "0" + aps;
      }else{
        strformat = aps;
      }
    intwidth = document.all["img" + strformat].width;
    intheight = document.all["img" + strformat].height;
    if(intheight>intwidth){
      document.all["img" + strformat].height=170;
      document.all["img" + strformat].width*=170/intheight;
    }
//    alert(strformat + ":\n" + intwidth + "\n" + intheight)
  }
}

///////////////////////////////////////////////////
/////////////////POP UP SCRIPT ////////////////////
///////////////////////////////////////////////////
// Copyright 1999 - 2002 by Ray Stott, Pop-up Windows Script ver 2.0
// OK to use if this copyright is included
// Script is available at http://www.crays.com/jsc          

var popWin = null    // use this when referring to pop-up window
var winCount = 0
var winName = "popWin"
function openPopWin(winURL, winWidth, winHeight, winFeatures, winLeft, winTop){
  var d_winLeft = 20  // default, pixels from screen left to window left
  var d_winTop = 20   // default, pixels from screen top to window top
  winName = "popWin" + winCount++ //unique name for each pop-up window
  closePopWin()           // close any previously opened pop-up window
  if (openPopWin.arguments.length >= 4)  // any additional features? 
    winFeatures = "," + winFeatures
  else 
    winFeatures = "" 
  if (openPopWin.arguments.length == 6)  // location specified
    winFeatures += getLocation(winWidth, winHeight, winLeft, winTop)
  else
    winFeatures += getLocation(winWidth, winHeight, d_winLeft, d_winTop)
  popWin = window.open(winURL, winName, "width=" + winWidth 
           + ",height=" + winHeight + winFeatures)
  }
function closePopWin(){    // close pop-up window if it is open 
  if (navigator.appName != "Microsoft Internet Explorer" 
      || parseInt(navigator.appVersion) >=4) //do not close if early IE
    if(popWin != null) if(!popWin.closed) popWin.close() 
  }

function getLocation(winWidth, winHeight, winLeft, winTop){
  return ""
}

function getLocation(winWidth, winHeight, winLeft, winTop){
  var winLocation = ""
  if (winLeft < 0)
    winLeft = screen.width - winWidth + winLeft
  if (winTop < 0)
    winTop = screen.height - winHeight + winTop
  if (winTop == "cen")
    winTop = (screen.height - winHeight)/2 - 20
  if (winLeft == "cen")
    winLeft = (screen.width - winWidth)/2
  if (winLeft>0 & winTop>0)
    winLocation =  ",screenX=" + winLeft + ",left=" + winLeft	
                + ",screenY=" + winTop + ",top=" + winTop
  else
    winLocation = ""
  return winLocation
  }
///////////////////////////////////////////////////



///////////////////////////////////////////////////
//////////////// MACROMEDIA CODE //////////////////
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_nbGroup(event, grpName) { //v6.0
var i,img,nbArr,args=MM_nbGroup.arguments;
  if (event == "init" && args.length > 2) {
    if ((img = MM_findObj(args[2])) != null && !img.MM_init) {
      img.MM_init = true; img.MM_up = args[3]; img.MM_dn = img.src;
      if ((nbArr = document[grpName]) == null) nbArr = document[grpName] = new Array();
      nbArr[nbArr.length] = img;
      for (i=4; i < args.length-1; i+=2) if ((img = MM_findObj(args[i])) != null) {
        if (!img.MM_up) img.MM_up = img.src;
        img.src = img.MM_dn = args[i+1];
        nbArr[nbArr.length] = img;
    } }
  } else if (event == "over") {
    document.MM_nbOver = nbArr = new Array();
    for (i=1; i < args.length-1; i+=3) if ((img = MM_findObj(args[i])) != null) {
      if (!img.MM_up) img.MM_up = img.src;
      img.src = (img.MM_dn && args[i+2]) ? args[i+2] : ((args[i+1])?args[i+1] : img.MM_up);
      nbArr[nbArr.length] = img;
    }
  } else if (event == "out" ) {
    for (i=0; i < document.MM_nbOver.length; i++) { img = document.MM_nbOver[i]; img.src = (img.MM_dn) ? img.MM_dn : img.MM_up; }
  } else if (event == "down") {
    nbArr = document[grpName];
    if (nbArr) for (i=0; i < nbArr.length; i++) { img=nbArr[i]; img.src = img.MM_up; img.MM_dn = 0; }
    document[grpName] = nbArr = new Array();
    for (i=2; i < args.length-1; i+=2) if ((img = MM_findObj(args[i])) != null) {
      if (!img.MM_up) img.MM_up = img.src;
      img.src = img.MM_dn = (args[i+1])? args[i+1] : img.MM_up;
      nbArr[nbArr.length] = img;
  } }
}

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){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}