// JavaScript by Timothy Edwards, for Can2Can, copyright Can2Can, 1998, all rights reserved.
// The code behind an animated "Pana Antana Ana Dren", the Bajoran version of a StarFleet PADD.
// The name resulted from my typo (PAAD instead of PADD) that was published before James Dixon caught it.
// I "created" the name from selected words in the Bajoran chants.

function subSplashPAAD()  {
vPAADTrace = 3
vTraceAnimation1 = 1
vTraceAnimation2 = 1
vTraceAnimation3 = 1
  { document.images[ivPAADSwitch].src="Bpadblu.gif" }
  { document.images[ivPAADTracePoint1].src="pana_ant.gif" }
  { document.images[ivPAADTracePoint2].src="sitosig.gif" }
  { document.images[ivPAADTracePoint3].src="notrace.gif" }
  setTimeout("bootPAAD()",700)
   }
function bootPAAD() {
  { document.images[ivPAADTracePoint1].src="statrep.gif" }
  { document.images[ivPAADTracePoint2].src="ufprecog.gif" }
  { document.images[ivPAADTracePoint3].src="stavew.gif" }
  }
function subSwitchTrace(inc) {
vPAADTrace = vPAADTrace + inc
if (vPAADTrace >= 4 ) { vPAADTrace = 1 }
if (vPAADTrace <= 0 ) { vPAADTrace = 3 }
if (vPAADTrace == 3 ) { document.images[ivPAADSwitch].src="Bpadblu.gif" }
if (vPAADTrace == 2 ) { document.images[ivPAADSwitch].src="Bpadgrn.gif" }
if (vPAADTrace == 1 ) { document.images[ivPAADSwitch].src="Bpadred.gif" }
return false
  }
function subChangeTraceAnimation(inc) {
if (vPAADTrace == 3 ) { subSelectTraceAnimation3(inc) }
if (vPAADTrace == 2 ) { subSelectTraceAnimation2(inc) }
if (vPAADTrace == 1 ) { subSelectTraceAnimation1(inc) }
return false
  }
function subSelectTraceAnimation1(inc){
// select top (status) trace datafile/animation
vTraceAnimation1 = vTraceAnimation1 + inc
if (vTraceAnimation1 >= 4 ) { vTraceAnimation1 = 1 }
if (vTraceAnimation1 <= 0 ) { vTraceAnimation1 = 2 }
if (vTraceAnimation1 == 3 ) { document.images[ivPAADTracePoint1].src="Statbaj.gif" }
if (vTraceAnimation1 == 2 ) { document.images[ivPAADTracePoint1].src="stasec.gif" }
if (vTraceAnimation1 == 1 ) { document.images[ivPAADTracePoint1].src="statrep.gif" }
return false
  }
function subSelectTraceAnimation2(inc){
// select middle (lookups) trace datafile/animation
vTraceAnimation2 = vTraceAnimation2 + inc
if (vTraceAnimation2 >= 6 ) {vTraceAnimation2 = 1 }
if (vTraceAnimation2 <= 0 ) { vTraceAnimation2 = 3 }
if (vTraceAnimation2 == 1 ) { document.images[ivPAADTracePoint2].src="ufprecog.gif" }
if (vTraceAnimation2 == 2 ) { document.images[ivPAADTracePoint2].src="amrecog.gif" }
if (vTraceAnimation2 == 3 ) { document.images[ivPAADTracePoint2].src="ranrecog.gif" }
if (vTraceAnimation2 == 4 ) { document.images[ivPAADTracePoint2].src="notrace.gif" }
if (vTraceAnimation2 == 5 ) { document.images[ivPAADTracePoint2].src="statrep.gif" }
return false
  }
function subSelectTraceAnimation3(inc){
// select bottom (stuff) trace datafile/animation
vTraceAnimation3 = vTraceAnimation3 + inc
if (vTraceAnimation3 >= 8 ) { vTraceAnimation3 = 1 }
if (vTraceAnimation3 <= 0 ) { vTraceAnimation3 = 7 }
if (vTraceAnimation3 == 7 ) { document.images[ivPAADTracePoint3].src="ufprecog.gif" }
if (vTraceAnimation3 == 6 ) { document.images[ivPAADTracePoint3].src="amrecog.gif" }
if (vTraceAnimation3 == 5 ) { document.images[ivPAADTracePoint3].src="ranrecog.gif" }
if (vTraceAnimation3 == 4 ) { document.images[ivPAADTracePoint3].src="stasec.gif" }
if (vTraceAnimation3 == 3 ) { document.images[ivPAADTracePoint3].src="notrace.gif" }
if (vTraceAnimation3 == 2 ) { document.images[ivPAADTracePoint3].src="stavew.gif" }
if (vTraceAnimation3 == 1 ) { document.images[ivPAADTracePoint3].src="staircase.gif" }
return false
  }