var popwindow
var tisurl
var tiswidth
var tisheight
var thismargin=10
var tistopposition=thismargin
var tisleftposition=thismargin
var pause=20
var step=20
var screenwidth
var screenheight
var endposition_x
var endposition_y
var timer

var debrisnumber=40
var debriscolor=new Array()
debriscolor[0]="FFAAAA"
debriscolor[1]="AA0000"
debriscolor[2]="770000"
debriscolor[3]="AA4444"
debriscolor[4]="EE4422"
var x_debrispos
var y_debrispos
var x,y
var x_random=new Array()
var y_random=new Array()
var max_explsteps=20
var i_explsteps=0
var i_color=0
var pause=10

var page



for (i=0;i<=debrisnumber;i++) {
    document.write("<div id='span"+i+"' class='spanstyle'>")
    document.write("<table cellpadding=0 cellspacing=0>")
    document.write("<tr><td bgcolor="+debriscolor[i_color]+">")
    document.write("<img src='emptypixel236.gif' width=3>")
    document.write("</td></tr></table>")
    document.write("</div>")
    i_color++
    if (i_color>=debriscolor.length) {i_color=0}
}





function openpopup(thisurl,thiswidth,thisheight) {
	tisurl=thisurl
	tiswidth=thiswidth
	tisheight=thisheight

	popwindow=window.open(tisurl, "newwindow", "toolbar=no,width="+tiswidth+",height="+tisheight+",top="+tistopposition+",left="+(tisleftposition)+"");

	screenwidth=window.screen.width
	screenheight=window.screen.height
	endposition_x=screenwidth-thiswidth-thismargin
	endposition_y=screenheight-thisheight-thismargin
	movedown()
}

function movedown() {
	if (tistopposition<=endposition_y-50) {
		popwindow.moveTo(tisleftposition,tistopposition)
		tistopposition+=step
		timer= setTimeout("movedown()",pause)
	}
	else {
		clearTimeout(timer)
		tistopposition=endposition_y-50
		popwindow.moveTo(tisleftposition,tistopposition)
		moveright()
	}
}

function moveright() {
	if (tisleftposition<=endposition_x) {
		popwindow.moveTo(tisleftposition,tistopposition)
		tisleftposition+=step
		timer= setTimeout("moveright()",pause)
	}
	else {
		clearTimeout(timer)
		tisleftposition=endposition_x
		popwindow.moveTo(tisleftposition,tistopposition)
		moveup()
	}
}

function moveup() {
	if (tistopposition>=thismargin) {
		popwindow.moveTo(tisleftposition,tistopposition)
		tistopposition-=step
		timer= setTimeout("moveup()",pause)
	}
	else {
		clearTimeout(timer)
		tistopposition=thismargin
		popwindow.moveTo(tisleftposition,tistopposition)
		moveleft()
	}
}

function moveleft() {
	if (tisleftposition>=thismargin) {
		popwindow.moveTo(tisleftposition,tistopposition)
		tisleftposition-=step
		timer= setTimeout("moveleft()",pause)
	}
	else {
		clearTimeout(timer)
		tisleftposition=thismargin
		popwindow.moveTo(tisleftposition,tistopposition)
	}
}

function ExplodeLinkTo(url) {
    i_explsteps=0
    x_debrispos=x
    y_debrispos=y

	page=url;

    for (i=0;i<=debrisnumber;i++) {
        x_random[i]=Math.ceil(40*Math.random())-20
        y_random[i]=Math.ceil(40*Math.random())-20
	}
	if (document.all) {
        for (i=0;i<=debrisnumber;i++) {
            var thisspan=eval("document.all.span"+i+".style")
            thisspan.visibility="VISIBLE"
			thisspan.posLeft=x_debrispos
			thisspan.posTop=y_debrispos
		}
        explode_IE()
    }
    if (document.layers) {
        for (i=0;i<=debrisnumber;i++) {
            var thisspan=eval("document.span"+i)
            thisspan.visibility="VISIBLE"
            thisspan.left=x_debrispos
            thisspan.top=y_debrispos
		}
        explode_NN()
    }
	var timer=setTimeout("redirect()",1500)
	return false
}

function redirect(){
	window.location=page;
}

function explode_IE() {
	if (i_explsteps<=max_explsteps) {
		for (i=0;i<=debrisnumber;i++) {
            var thisspan=eval("document.all.span"+i+".style")
            thisspan.posLeft+=x_random[i]
            thisspan.posTop+=y_random[i]
		}
		i_explsteps++
		var timer=setTimeout("explode_IE()",pause)
	}
	else {
		for (i=0;i<=debrisnumber;i++) {
	        var thisspan=eval("document.all.span"+i+".style")
	        thisspan.visibility="HIDDEN"
		}
		clearTimeout(timer)
	}
}

function explode_NN() {
	if (i_explsteps<=max_explsteps) {
		for (i=0;i<=debrisnumber;i++) {
            var thisspan=eval("document.span"+i)
            thisspan.left+=x_random[i]
            thisspan.top+=y_random[i]
		}
		i_explsteps++
		var timer=setTimeout("explode_NN()",pause)
	}
	else {
		for (i=0;i<=debrisnumber;i++) {
            var thisspan=eval("document.span"+i)
            thisspan.visibility="HIDDEN"
		}
		clearTimeout(timer)
	}
}

function handlerMM(e){
	x = (document.layers) ? e.pageX : document.body.scrollLeft+event.clientX
	y = (document.layers) ? e.pageY : document.body.scrollTop+event.clientY
}

if (document.layers){
	document.captureEvents(Event.MOUSEMOVE);
}
document.onmousemove = handlerMM;

function ch_img(img, newpic){
	document[img].src=newpic
}
