var seqImgName = "kalajoki"
var seqImgWidth = 220
var seqImgHeight = 140
var seqImgDelay = 3
var seqImgRnd = 0
var seqImgConsole = 1
var seqImgTitle = 0
var seqRunning = 0
var seqBGcolor = "transparent"
var seqImgArr = new Array(
"images/sequence/20110131142818.jpg",
"images/sequence/20110131142824.jpg",
"images/sequence/20110131142916.jpg",
"images/sequence/20110131142925.jpg",
"images/sequence/20110131142810.jpg",
"images/sequence/20110131142814.jpg",
"images/sequence/20110131142855.jpg"
)
var seqTxtArr = new Array(
"&nbsp;",
"&nbsp;",
"&nbsp;",
"&nbsp;",
"&nbsp;",
"&nbsp;",
"&nbsp;"
)

var seqImgT = 0
var strCon = ""
var strSeqTitle = ""
var arrImg = new Array()
var seqTimeout = ""
var boolRun = false


var jsRew = "http://project.dreamnet.fi/sys/sequence/img/media_step_back.gif"
var jsPla = "http://project.dreamnet.fi/sys/sequence/img/media_play_green.gif"
var jsFor = "http://project.dreamnet.fi/sys/sequence/img/media_step_forward.gif"
var jsSto = "http://project.dreamnet.fi/sys/sequence/img/media_stop_red.gif"


for(var i = 0; i < seqImgArr.length; i++)
	{
	arrImg[i] = new Image()
	arrImg[i].src = seqImgArr[i]
	}


var seqShadow = new Array(seqImgArr.length)
for(var i = 0; i < seqShadow.length; i++){seqShadow[i] = i}



if(seqImgRnd > 0){seqRnd()}



function changeImg()	{

	var boolNext = true
	seqImgT = seqImgT + 1
	if(seqImgT >= seqImgArr.length)
		{
		seqImgT = 0
		if(seqRunning == 0)
			{
			boolNext = false
			seqShow()
			seqEnd()
			}
		else
			{
			if(seqImgRnd > 0){seqRnd()}
			}
		}
	if(boolNext)
		{
		seqShow()
		boolRun = true
		seqTimeout = setTimeout("changeImg()", seqImgDelay * 1000)
		}
}


function seqRnd()	{

	var j = 0
	var k = 0
	for(var i = 0; i < seqShadow.length; i++)
		{
		j = Math.floor(Math.random() * seqShadow.length)
		k = seqShadow[i]
		seqShadow[i] = seqShadow[j]
		seqShadow[j] = k
		}
}


function seqEnd()	{

	if(boolRun)
		{
		if(seqImgConsole > 0){document.getElementById("btnStop").src = jsPla}
		clearTimeout(seqTimeout)
		boolRun = false
		}
	else
		{
		if(seqImgConsole > 0){document.getElementById("btnStop").src = jsSto}
		seqTimeout = setTimeout("changeImg()", seqImgDelay * 1000)
		boolRun = true
		}
}


function seqNext(abc)	{

	if(boolRun){seqEnd()}
	if(abc == 1)
		{
		seqImgT = seqImgT + 1
		if(seqImgT >= seqImgArr.length)
			seqImgT = 0
		}
	else
		{
		seqImgT = seqImgT - 1
		if(seqImgT < 0)
			seqImgT = seqImgArr.length - 1
		}
	seqShow()
}


function seqShow()	{

	document.getElementById("seqImgID").style.backgroundImage = "URL(" + seqImgArr[seqShadow[seqImgT]] + ")"
	//document.getElementById("btnSeq").innerHTML = (seqImgT + 1) + "/" + seqImgArr.length
	if(seqImgTitle > 0)
		{
		document.getElementById("seqTXT").innerHTML = seqTxtArr[seqShadow[seqImgT]]
		}
	if(seqImgConsole > 0)
		{
		document.getElementById("btnSeq").innerHTML = (seqImgT + 1) + "/" + seqImgArr.length
		}
}


if(seqImgConsole > 0)
	{
	strCon = "<tr><td align='left' valign='top' style='padding-top:6px;'><table cellpadding='0' cellspacing='0' border='0'><tr>"
	strCon = strCon + "<td align='left' valign='top' width='60'><img src='" + jsSto + "' widh='16' height='16' id='btnStop' onClick='seqEnd()' border='0' style='cursor:hand;'></td>"
	strCon = strCon + "<td align='left' valign='top' width='32'><img src='" + jsRew + "' widh='16' height='16' onClick='seqNext(0)' border='0' style='cursor:hand;'></td>"
	strCon = strCon + "<td align='center' valign='top' width='82'><div id='btnSeq'></div></td>"
	strCon = strCon + "<td align='left' valign='top' width='32'><img src='" + jsFor + "' widh='16' height='16' onClick='seqNext(1)' border='0' style='cursor:hand;'></td>"
	strCon = strCon + "</td></tr></table></td></tr>"
	}



if(seqImgTitle > 0)
	{
	strSeqTitle = "<tr><td align='left' style='padding-bottom:4px;'><strong>" + seqImgName + "</strong></td></tr>"
	}
document.write("<table cellpadding='0' cellspacing='0' border='0' width='" + seqImgWidth + "'>")
document.write(strSeqTitle)
document.write("<tr><td width='" + seqImgWidth + "' height='" + seqImgHeight + "' align='center' valign='middle' id='seqImgID' style='background-image:URL(" + seqImgArr[seqImgT] + ");background-repeat: no-repeat;background-position: top left;background-color:" + seqBGcolor + ";'><img src='images/tyhja.gif' width='" + seqImgWidth + "' height='" + seqImgHeight + "' border='0' alt=''></td></tr>")
document.write("<tr><td align='left' style='padding-top:2px;'>")
//if(seqImgConsole == 0 && seqRunning > 0)
if(seqImgConsole == 0 && seqImgTitle > 0)
	{
	document.write("Kuva <span id='btnSeq'></span>")
	}
if(seqImgTitle > 0)
	{
	document.write("<div id='seqTXT'></div></td></tr>")
	}
document.write(strCon)
document.write("</table>")
boolRun = true
seqShow()
//if(seqRunning > 0){seqTimeout = setTimeout("changeImg()", seqImgDelay * 1000)}
seqTimeout = setTimeout("changeImg()", seqImgDelay * 1000)



