var timerID = 0;

var delay = 5;

Pset = new Array();

Tset = new Array();

Dset = new Array();

var Pnum = 0;

var current = 1;

var IE4=0;
if(document.all){IE4=1;}

var timerID=0;

	

function reveal(what,which){

//  alert(current);

  if (IE4){

   pic.filters.revealTrans.apply();

   pic.src=Pset[what];

   pic.filters.revealTrans.transition=which;

   pic.filters.revealTrans.play();

//   document.all.gcurrent.innerText=current;
document.getElementById('gcurrent').innerHTML=current;
  } else {

document.getElementById('pic').src=Pset[what];
///////   pic.src=Pset[what];

  }

//  document.all.gcurrent.innerText=current;
document.getElementById('gcurrent').innerHTML=current;
//  document.all.gtext.innerText=Tset[current];
document.getElementById('gtext').innerHTML=Tset[current];

document.getElementById('pic').title=Dset[current];
  pic.title=Dset[current];

}



function next() {

  current=current+1;

  if (current>Pnum){

    current=1;

  }

  return current;

}



function prev() {

  current=current-1;

  if (current<1){

    current=Pnum;

  }

  return current;

}



function UpdateTimer() {

   clearTimeout(timerID);     

   reveal(next(),8);

   timerID = setTimeout("UpdateTimer()", delay*1000);

}



function gplay() {

   clearTimeout(timerID);     

   reveal(next(),8);

   timerID = setTimeout("UpdateTimer()", delay*1000);

}



function gnext() {

   clearTimeout(timerID);     

   reveal(next(),8);

}

function gprev() {

   clearTimeout(timerID);     

   reveal(prev(),8);

}



function gstop() {

   clearTimeout(timerID);     

}



function chTopLink(obj,met,lev,type){if(met==1){showHelp(type,met);} else{ showHelp(type,met);} }



function showHelp(type,met)

{

if(met==1)

{

document.all.help.innerText=type;

}

else

{

document.all.help.innerText=' ';

}

}



function openpic(where,iw,ih, res){

  iLeftPosition = (screen.width) ? (screen.width-iw)/2 : 0; iTopPosition = (screen.height) ? (screen.height-ih)/2 : 0;

  var resize='maximize=no,resizable=0,scrollbars=no';

  if (res==1){

     resize='maximize=yes,resizable=1,scrollbars=yes'

  }

  isettings ='height='+ih+',width='+iw+',top='+iTopPosition+',left='+iLeftPosition+',toolbar=no,directories=no,status=no,menubar=no,location=no,copyhistory=no'+resize

  Neww=open(where,"displayWindow",isettings);

  Neww.focus();

}