/* copyright Tomas Young 2008 */

/*
if(navigator.appName != "Microsoft Internet Explorer") {
    document.write('<meta http-equiv="Refresh" content="0;url=../error-non-IE.htm">');
}
*/

var seqComplete = true;

document.write('<div style="position:absolute; left:220px; top:200px;"> \
                <img name="loading-i" src="blank.gif" align="left" border="0" width=50 height=50> \
                </div>');

function showLoading() {
    document["loading-i"].src = "loading.gif";
}

function hideLoading() {
    document["loading-i"].src = "blank.gif";
}

var clickLock = false;

function lockClick() {
    clickLock = true;
}

function unlockClick() {
    clickLock = false;
}

function wait(t) {
    var d = new Date();
    t = d.getTime();
    while((d.getTime() - t) < (t*1));
}

function Sin(stag,sfile) {
    if(/MSIE (\d+\.\d+);/.test(navigator.userAgent)) {
	document.all[stag].src = sfile;
    }
    else {
	document.getElementById(stag).src = sfile;
	// document.getElementById(stag).value = sfile; -- safari
    }
}

function SinCheck(stag,sfile) {
    if(seqComplete) {
	if(/MSIE (\d+\.\d+);/.test(navigator.userAgent)) {
	    document.all[stag].src = sfile;
	}
	else {
	    document.getElementById(stag).src = sfile;
	    // document.getElementById(stag).value = sfile; -- safari
	}
    }
}

function Sout(stag) {
    if(/MSIE (\d+\.\d+);/.test(navigator.userAgent)) {
	document.all[stag].src = "";
    }
    else {
	document.getElementById(stag).src = "blank.wav";
    }
}

function IinSin(itag,ifile,stag,sfile) {
    document[itag].src = ifile;
    Sin(stag,sfile);
}

function Iin2Sin(itag1,ifile1,itag2,ifile2,stag,sfile) {
    document[itag1].src = ifile1;
    document[itag2].src = ifile2;
    Sin(stag,sfile);
}

function Iin3Sin(itag1,ifile1,itag2,ifile2,itag3,ifile3,stag,sfile) {
    document[itag1].src = ifile1;
    document[itag2].src = ifile2;
    document[itag3].src = ifile3;
    Sin(stag,sfile);
}

var toggle = 0;
function IinSinAlt(itag,ifile1,ifile2,stag,sfile1,sfile2) {
    if(toggle == 0) {
	document[itag].src = ifile1;
	Sin(stag,sfile1);
	toggle = 1;
    }
    else {
	document[itag].src = ifile2;
	Sin(stag,sfile2);
	toggle = 0;
    }
}

function IinSout(itag,ifile,stag) {
    document[itag].src = ifile;
    Sout(stag);
}

function Iin(itag,ifile) {
    document[itag].src = ifile;
}

function IinCheck(itag,ifile) {
    if(seqComplete) {
	document[itag].src = ifile;
    }
}

function Iout(itag) {
    document[itag].src = "blank.gif";
}

function Iin5(itag1,ifile1,itag2,ifile2,itag3,ifile3,itag4,ifile4,itag5,ifile5) {
    window.status = "started";
    document[itag1].src = ifile1;
    document[itag2].src = ifile2;
    document[itag3].src = ifile3;
    document[itag4].src = ifile4;
    document[itag5].src = ifile5;
}

var _Iin5_itag1,_Iin5_itag2,_Iin5_itag3,_Iin5_itag4,_Iin5_itag5;
var _Iin5_ifile1,_Iin5_ifile2,_Iin5_ifile3,_Iin5_ifile4,_Iin5_ifile5;

function _Iin5() {
    window.status = "started";
    document[_Iin5_itag1].src = _Iin5_ifile1;
    document[_Iin5_itag2].src = _Iin5_ifile2;
    document[_Iin5_itag3].src = _Iin5_ifile3;
    document[_Iin5_itag4].src = _Iin5_ifile4;
    document[_Iin5_itag5].src = _Iin5_ifile5;
}

function Iin5D(itag1,ifile1,itag2,ifile2,itag3,ifile3,itag4,ifile4,itag5,ifile5,d) {
    _Iin5_itag1 = itag1;
    _Iin5_itag2 = itag2;
    _Iin5_itag3 = itag3;
    _Iin5_itag4 = itag4;
    _Iin5_itag5 = itag5;
    _Iin5_ifile1 = ifile1;
    _Iin5_ifile2 = ifile2;
    _Iin5_ifile3 = ifile3;
    _Iin5_ifile4 = ifile4;
    _Iin5_ifile5 = ifile5;
    setTimeout("_Iin5()",d);
}

var obj = new Array;
var obj2 = new Array;
var xsz = new Array;
var ysz = new Array;
var xpos = new Array;
var ypos = new Array;
var altObj = new Array;
var index = 0;
var count = 0;
var sz = 0;
var imageExtension = "jpg";
var soundExtension = "wav";
var loops = 2;
var loopCount = 0;
var timeout = 1500;
var timeouts = new Array;
var nextEnable = false;

var useWord = false;
var wordEnable = false;
var word = new Array;
var wordImgExt = "bmp";
var lastIndex = 0;

var usePic = false;
var pic = new Array;
var picitag = new Array;
var picImgExt = "gif";

var useAltSfile = false;
var altSfile = new Array;

var usePrompt = false;
var promptFile = "";

var useImg2 = false;
var img2Ext = "";

for(i = 0; i < 100; i++) {
    altObj[i] = "";
    picitag[i] = "";
    obj2[i] = "";
    xsz[i] = 0;
    ysz[i] = 0;
    xpos[i] = 0;
    ypos[i] = 0;
    timeouts[i] = 0;
}

var useSameImg = true;

function IinSinLoop() {
    if(useSameImg) {
	ifile = obj[index]+"."+imageExtension;
    }
    else {
	ifile = obj[index]+altObj[loopCount]+"."+imageExtension;
    }
    if(useImg2) {
	if(obj2[index] == "") {
	    ifile2 = obj[index]+img2Ext+"."+imageExtension;
	}
	else {
	    ifile2 = obj2[index]+"."+imageExtension;
	}
    }
    if(useAltSfile) {
	sfile = altSfile[index]+altObj[loopCount]+"."+soundExtension;
    }
    else {
	sfile = obj[index]+altObj[loopCount]+"."+soundExtension;
    }
    if(xsz[index] > 0) {
	document["clip-i"].width = xsz[index];
    }
    if(ysz[index] > 0) {
	document["clip-i"].height = ysz[index];
    }
    if(xpos[index] > 0) {
	document.getElementById("clip-st").style.left = xpos[index];
    }
    if(ypos[index] > 0) {
	document.getElementById("clip-st").style.top = ypos[index];
    }
    document["clip-i"].src = ifile;
    if(useImg2) {
	document["clip-i2"].src = ifile2;
    }
    Sin("clip-s",sfile);
    if(useWord) {
	ifile = word[index]+"-0."+wordImgExt;
	document["word-i"].src = ifile;
    }
    if(usePic) {
	ifile = pic[index]+"."+picImgExt;
	if(picitag[index] == "") {
	    document["pic-i"].src = ifile;
	}
	else {
	    document[picitag[index]].src = ifile;
	}
    }
    var to = timeout;
    if(timeouts[index] > 0) {
	to = timeouts[index];
    }
    index = (index + 1) % sz;
    count++;
    if(count < sz*loops) {
        setTimeout('IinSinLoop()',to);
    }
    else {
	nextEnable = true;
	if(usePrompt) {
	    document["prompt-i"].src = promptFile;
	}
    }
    if(count % sz == 0) {
	loopCount++;
    }
}

function IinSinNext() {
    if(!nextEnable) {
	return;
    }
    wordEnable = true;
    ifile = obj[index]+"."+imageExtension;
    if(useImg2) {
	if(obj2[index] == "") {
	    ifile2 = obj[index]+img2Ext+"."+imageExtension;
	}
	else {
	    ifile2 = obj2[index]+"."+imageExtension;
	}
    }
    if(useAltSfile) {
	sfile = altSfile[index]+"."+soundExtension;
    }
    else {
	sfile = obj[index]+"."+soundExtension;
    }
    if(xsz[index] > 0) {
	document["clip-i"].width = xsz[index];
    }
    if(ysz[index] > 0) {
	document["clip-i"].height = ysz[index];
    }
    if(xpos[index] > 0) {
	document.getElementById("clip-st").style.left = xpos[index];
    }
    if(ypos[index] > 0) {
	document.getElementById("clip-st").style.top = ypos[index];
    }
    document["clip-i"].src = ifile;
    if(useImg2) {
	document["clip-i2"].src = ifile2;
    }
    Sin("clip-s",sfile);
    if(useWord) {
	ifile = word[index]+"-0."+wordImgExt;
	document["word-i"].src = ifile;
    }
    if(usePic) {
	ifile = pic[index]+"."+picImgExt;
	if(picitag[index] == "") {
	    document["pic-i"].src = ifile;
	}
	else {
	    document[picitag[index]].src = ifile;
	}
    }
    lastIndex = index;
    index = (index + 1) % sz;
}

function IinAltCurrent(x) {
    if(wordEnable) {
	ifile = word[lastIndex]+"-"+x+"."+wordImgExt;
	document["word-i"].src = ifile;
    }
}

var useObjSoundForWord = false;
var useAltSfileForWord = false;

function SinAltCurrent() {
    if(wordEnable) {
	if(useObjSoundForWord) {
	    sfile = obj[lastIndex]+"."+soundExtension;
	}
	else if(useAltSfileForWord) {
	    sfile = altSfile[lastIndex]+"."+soundExtension;
	}
	else {
	    sfile = word[lastIndex]+"."+soundExtension;
	}
	Sin("clip-s",sfile);
    }
}

var seqItag = new Array;
var seqIobj = new Array;
var seqUseI2 = new Array;
var seqI2tag = new Array;
var seqI2obj = new Array;
var seqStag = new Array;
var seqSobj = new Array;
var seqDelay = new Array;
var seqLoopSkip = new Array;
var seqMax = 0;
var seqCnt = 0;

var seqMode = new Array;

var loopSeqSkip = false;

/*
var seqMode1_st = "";
var seqMode1_i = "";
var seqMode1_useSt2 = false;
var seqMode1_st2 = "";
var seqMode1_i2 = "";
var seqMode1_y0 = -1;
var seqMode1_y1 = -1;
var seqMode1_dy = 4;
var seqMode1_moveYdelay = 30;
var seqMode1_dsx = 20;
var seqMode1_dsy = 16;
var seqMode1_dsm = 1;
*/

var seqModeIndex = -1;

var seqMode1_st = new Array;
var seqMode1_i = new Array;
var seqMode1_useSt2 = new Array;
var seqMode1_st2 = new Array;
var seqMode1_i2 = new Array;
var seqMode1_y = new Array;
var seqMode1_y0 = new Array;
var seqMode1_y1 = new Array;
var seqMode1_dy = new Array;
var seqMode1_moveYdelay = new Array;
var seqMode1_dsx = new Array;
var seqMode1_dsy = new Array;
var seqMode1_dsx0 = new Array;
var seqMode1_dsy0 = new Array;
var seqMode1_dsm = new Array;

function addSeq(itag,ifile,useI2,i2tag,i2file,stag,sfile,d,s) {
    seqItag[seqMax] = itag;
    seqIobj[seqMax] = ifile;
    seqUseI2[seqMax] = useI2;
    if(useI2) {
	seqI2tag[seqMax] = i2tag;
	seqI2obj[seqMax] = i2file;
    }
    seqStag[seqMax] = stag;
    seqSobj[seqMax] = sfile;
    seqDelay[seqMax] = d;
    seqMode[seqMax] = s;
    if(s == 1) {
	seqMode1_st[seqMax] = "";
	seqMode1_i[seqMax] = "";
	seqMode1_useSt2[seqMax] = false;
	seqMode1_st2[seqMax] = "";
	seqMode1_i2[seqMax] = "";
	seqMode1_y[seqMax] = -1;
	seqMode1_y0[seqMax] = -1;
	seqMode1_y1[seqMax] = -1;
	seqMode1_dy[seqMax] = 4;
	seqMode1_moveYdelay[seqMax] = 30;
	seqMode1_dsx[seqMax] = 20;
	seqMode1_dsy[seqMax] = 16;
	seqMode1_dsx0[seqMax] = 20;
	seqMode1_dsy0[seqMax] = 16;
	seqMode1_dsm[seqMax] = 1;
    }
    seqLoopSkip[seqMax] = loopSeqSkip;
    seqMax++;
}

var seqMode0_st = "";
var seqMode0_useSt2 = false;
var seqMode0_st2 = "";
var seqMode0_x0 = -1;
var seqMode0_x1 = -1;
var seqMode0_dx = 4;
var seqMode0_moveXdelay = 30;

function setMode(st,useSt2,st2,x0,x1,dx,d) {
    seqMode0_st = st;
    seqMode0_useSt2 = useSt2;
    seqMode0_st2 = st2;
    seqMode0_x0 = x0;
    seqMode0_x1 = x1;
    seqMode0_dx = dx;
    seqMode0_moveXdelay = d;
}

function moveX() {
    if(seqMode0_x0 < seqMode0_x1) {
	seqMode0_x0 += seqMode0_dx;
	document.getElementById(seqMode0_st).style.left = seqMode0_x0;
	if(seqMode0_useSt2) {
	    document.getElementById(seqMode0_st2).style.left = seqMode0_x0;
	}
	setTimeout("moveX()",seqMode0_moveXdelay);
    }
}

function setMode1(ii,st,useSt2,ii2,st2,y0,y1,dy,d,dsx,dsy,dsm) {
    seqMode1_i[seqMax-1] = ii;
    seqMode1_st[seqMax-1] = st;
    seqMode1_useSt2[seqMax-1] = useSt2;
    seqMode1_i2[seqMax-1] = ii2;
    seqMode1_st2[seqMax-1] = st2;
    seqMode1_y0[seqMax-1] = y0;
    seqMode1_y1[seqMax-1] = y1;
    seqMode1_dy[seqMax-1] = dy;
    seqMode1_moveYdelay[seqMax-1] = d;
    seqMode1_dsx0[seqMax-1] = dsx;
    seqMode1_dsy0[seqMax-1] = dsy;
    seqMode1_dsm[seqMax-1] = dsm;
}

function moveY() {
    document.getElementById(seqMode1_st[seqModeIndex]).style.top = seqMode1_y[seqModeIndex];
    document.getElementsByName(seqMode1_i[seqModeIndex])[0].width = seqMode1_dsx[seqModeIndex];
    document.getElementsByName(seqMode1_i[seqModeIndex])[0].height = seqMode1_dsy[seqModeIndex];
    seqMode1_y[seqModeIndex] += seqMode1_dy[seqModeIndex];
    seqMode1_dsx[seqModeIndex] *= seqMode1_dsm[seqModeIndex];
    seqMode1_dsy[seqModeIndex] *= seqMode1_dsm[seqModeIndex];
    if(seqMode1_useSt2[seqModeIndex]) {
	document.getElementById(seqMode1_st2[seqModeIndex]).style.top = seqMode1_y[seqModeIndex];
	document.getElementsByName(seqMode1_i2[seqModeIndex])[0].width = seqMode1_dsx[seqModeIndex];
	document.getElementsByName(seqMode1_i2[seqModeIndex])[0].height = seqMode1_dsy[seqModeIndex];
    }
}

function moveYdown() {
    if(seqMode1_y[seqModeIndex] < seqMode1_y1[seqModeIndex]) {
	moveY();
	setTimeout("moveYdown()",seqMode1_moveYdelay[seqModeIndex]);
    }
}

function moveYup() {
    if(seqMode1_y[seqModeIndex] > seqMode1_y1[seqModeIndex]) {
	moveY();
	setTimeout("moveYup()",seqMode1_moveYdelay[seqModeIndex]);
    }
}

var loopSeq = false;
var loopSeqCnt = 0;

function startSeq() {
    if(seqCnt < seqMax) {
	if(loopSeqCnt == 0 || (loopSeqCnt > 0 && seqLoopSkip[seqCnt] == false)) {
	    if(seqCnt > 0) {
		/*
		  if(seqItag[seqCnt] != "") {
		  Iout(seqItag[seqCnt-1]);
		  }
		  if(seqUseI2[seqCnt-1] && seqI2tag[seqCnt] != "") {
		  Iout(seqI2tag[seqCnt-1]);
		  }
		*/
	    }
	    if(seqStag[seqCnt] != "") {
		Sin(seqStag[seqCnt],seqSobj[seqCnt]);
	    }
	    if(seqItag[seqCnt] != "") {
		Iin(seqItag[seqCnt],seqIobj[seqCnt]);
	    }
	    if(seqUseI2[seqCnt]) {
		Iin(seqI2tag[seqCnt],seqI2obj[seqCnt]);
	    }
	    if(seqMode[seqCnt] == 0) {
		seqModeIndex = seqCnt;
		moveX();
	    }
	    else if(seqMode[seqCnt] == 1) {
		seqModeIndex = seqCnt;
		if(seqMode1_dsx0[seqCnt] < 0) {
		    seqMode1_dsx[seqCnt] = document.getElementsByName(seqMode1_i[seqCnt])[0].width;
		}
		else {
		    seqMode1_dsx[seqCnt] = seqMode1_dsx0[seqCnt];
		}
		if(seqMode1_dsy0[seqCnt] < 0) {
		    seqMode1_dsy[seqCnt] = document.getElementsByName(seqMode1_i[seqCnt])[0].height;
		}
		else {
		    seqMode1_dsy[seqCnt] = seqMode1_dsy0[seqCnt];
		}
		if(seqMode1_y0[seqCnt] < 0) {
		    seqMode1_y[seqCnt] = document.getElementById(seqMode1_st[seqCnt]).style.top;
		}
		else {
		    seqMode1_y[seqCnt] = seqMode1_y0[seqCnt];
		}
		if(seqMode1_y[seqCnt] < seqMode1_y1[seqCnt]) {
		    moveYdown();
		}
		else {
		    moveYup();
		}
	    }
	    setTimeout("startSeq()",seqDelay[seqCnt++]);
	}
	else {
	    seqCnt++;
	    setTimeout("startSeq()",0);
	}
    }
    else {
	seqComplete = true;
	if(loopSeq) {
	    seqCnt = 0;
	    loopSeqCnt++;
	    setTimeout("startSeq()",0);
	}
    }
}