/* 360sc1.js Scroll script Copyright(c)M.Murakami 2002 mmurakami@mx4.kiti.ne.jp */

w = 1 ; // dot
t = 20 ; // ms
ds = 20 ; // dot
sp = 0 ;
dw = 0 ;
pn_flg = true ;
play_flg = true ;
down_flg = false ;
pic_flg = false ;
c = "on" ;
h = ">" ;
p2 = "" ;

document.write(
"<TABLE width=\"100%\" cellpadding=\"0\" cellspacing=\"0\">",
" <TBODY>",
"  <TR>",
"   <TD>",
"    <TABLE id=\"cont1\" cellpadding=\"0\" cellspacing=\"4\" style=\"visibility :hidden;\">",
"     <TBODY>",
"      <TR>",
"       <TD nowrap align=\"center\" width=\"70\" bgcolor=\"#cccccc\" onmousedown='b_click(\"pic\")' style=\"cursor:hand\"><FONT color=\"#000000\" size=\"-1\"><SPAN id=\"pic\">Scroll Off</SPAN></FONT></TD>",
"       <TD nowrap width=\"16\"></TD>",
"       <TD nowrap width=\"50\" align=\"center\" bgcolor=\"#bbbb99\" onmousedown='b_click(\"play\")' style=\"cursor:hand\"><FONT color=\"#000000\" size=\"-1\"><SPAN id=\"stop\">Stop</SPAN></FONT></TD>",
"       <TD nowrap width=\"40\" align=\"center\" bgcolor=\"#bbbb99\" onmousedown='b_click(\"rev\")' style=\"cursor:hand\"><FONT color=\"#000000\" size=\"-1\">Rev.</FONT></TD>",
"       <TD nowrap width=\"24\" align=\"center\" bgcolor=\"#bbbb99\" onmousedown='b_click(\"f\")' style=\"cursor:hand\"><FONT color=\"#000000\" size=\"-2\"><SPAN id=\"f\">&gt;</SPAN></FONT></TD>",
"       <TD nowrap width=\"24\" align=\"center\" bgcolor=\"#bbbb99\" onmousedown='b_click(\"ff\")' style=\"cursor:hand\"><FONT color=\"#000000\" size=\"-2\"><SPAN id=\"ff\">&gt;&gt;</SPAN></FONT></TD>",
"       <TD nowrap width=\"24\" align=\"center\" bgcolor=\"#bbbb99\" onmousedown='b_click(\"fff\")' style=\"cursor:hand\"><FONT color=\"#000000\" size=\"-2\"><SPAN id=\"fff\">&gt;&gt;&gt;</SPAN></FONT></TD>",
"       <TD nowrap width=\"16\"></TD>",
"       <TD nowrap width=\"30\" align=\"center\" bgcolor=\"#bbbb99\" onmousedown='b_updown(\"f_down\")' onmouseup='b_updown(\"f_up\")' onmouseout='b_updown(\"out\")' style=\"cursor:hand\"><FONT color=\"#000000\" size=\"-2\">&lt;--</FONT></TD>",
"       <TD nowrap width=\"30\" align=\"center\" bgcolor=\"#bbbb99\" onmousedown='b_updown(\"r_down\")' onmouseup='b_updown(\"r_up\")' onmouseout='b_updown(\"out\")' style=\"cursor:hand\"><FONT color=\"#000000\" size=\"-2\">--&gt;</FONT></TD>",
"       <TD nowrap width=\"16\"></TD>",
"      </TR>",
"     </TBODY>",
"    </TABLE>",
"   </TD>",
"   <TD id=\"cont2\" align=\"right\" nowrap width=\"100%\"><A href=\"http://ww4.tiki.ne.jp/~mmurakami/setoy/\" target=\"_blank\"><FONT size=\"-1\" color=\"#aaaa88\">JavaScript by M.Murakami</FONT></A></TD>",
"  </TR>",
" </TBODY>",
"</TABLE>"
);

/* size */
function pwset(){
	if ( p2 != "" ){ pic2.src = p2 };
	if ( pic2.src == ""){ pic2.src = pic1.src };
	pic1.style.position = "relative" ;
	pic2.style.position = "relative" ;
	dw = w ;
	spmax = w * 10 ;

	switch (h){
		case '>' : dw = w ; break ;
		case '>>' : dw = w * 2 ; break ;
		case '>>>' : dw = w * 4 ; break ;
	}

	if (document.referrer.search(/setoy/i) > 0 ) {cont2.style.visibility  = "hidden" };

	b_set();
	p_mov();
}

/* start move */
function s_mov(){
	if ( pn_flg ) { p_mov() } else { n_mov() };
}

/* move left */
function p_mov(){
	pic1.style.posLeft -= dw ;  pic2.style.posLeft -= dw ;
	if ( pic1.style.posLeft < -(pic1.width + ds)) { pic1.style.posLeft = pic2.style.posLeft + pic1.width + pic2.width } ;
	if ( pic2.style.posLeft < -(pic1.width + pic2.width + ds)) { pic2.style.posLeft = pic1.style.posLeft} ;
	timerID = setTimeout( "p_mov()", t ) ;
}

/* move right */
function n_mov(){
	pic1.style.posLeft += dw ; pic2.style.posLeft += dw ;
	if ( pic1.style.posLeft > pic2.width - ds) { pic1.style.posLeft = pic2.style.posLeft} ;
	if ( pic2.style.posLeft > -ds) { pic2.style.posLeft = pic1.style.posLeft - (pic1.width + pic2.width)} ;
	timerID = setTimeout( "n_mov()", t ) ;
}

/* turn */
function t_mov(){
	timerID = setTimeout( "s_mov()", st );
	b_set();
}

/* show buttons */
function b_set(){
	if (c.toLowerCase() == "on") {cont1.style.visibility  = "visible"};
	if (play_flg){stop.innerText="Stop"} else { stop.innerText="Play" };
	if (pn_flg){f.innerText=">";ff.innerText=">>";fff.innerText=">>>"}
		else {f.innerText="<";ff.innerText="<<";fff.innerText="<<<"};
	if (pic_flg) {pic.innerText="Scroll ON"}
		else {pic.innerText="Scroll Off"};
}

/* button click */
function b_click(b){
	clearTimeout(timerID);
	switch (b){
		case 'play' : play_flg = !play_flg ; break;
		case 'f' : dw = w ; play_flg = true ; break;
		case 'ff' : dw = w * 2 ; play_flg = true ; break;
		case 'fff' : dw = w * 4 ; play_flg = true ; break;
		case 'rev' : pn_flg = !pn_flg ; break;
		case 'pic' : if (pic_flg) { pic_flg = false ; pn_flg = true ; play_flg = true }
				else { pic_flg = true ; pn_flg = true ; play_flg = false ; pic1.style.posLeft = 0 ; pic2.style.posLeft = 0 } ; break;
	}
	if (play_flg) { pic_flg = false };
	b_set();
	if (play_flg) { pic_flg = false ;  s_mov() };
}

/* Arrow move right */
function pf_mov(){
	pic1.style.posLeft -= sp ;  pic2.style.posLeft -= sp ;
	if ( pic1.style.posLeft < -(pic1.width + ds)) { pic1.style.posLeft = pic2.style.posLeft + pic1.width + pic2.width } ;
	if ( pic2.style.posLeft < -(pic1.width + pic2.width + ds)) { pic2.style.posLeft = pic1.style.posLeft} ;
	if ( sp < spmax ) { sp += 1 } ;
	if (down_flg) { timerID = setTimeout( "pf_mov()", t ) } 
}
/* Arrow move left */
function nf_mov(){
	pic1.style.posLeft += sp ; pic2.style.posLeft += sp ;
	if ( pic1.style.posLeft > pic2.width - ds) { pic1.style.posLeft = pic2.style.posLeft} ;
	if ( pic2.style.posLeft > -ds) { pic2.style.posLeft = pic1.style.posLeft - (pic1.width + pic2.width)} ;
	if ( sp < spmax ) { sp += 1 } ;
	if (down_flg) {  timerID = setTimeout( "nf_mov(sp)", t ) } 
}

/* Arrow click */
function b_updown(b){
	switch (b){
		case 'r_down' : pn_flg = true  ; down_flg = true ; break ;
		case 'f_down' : pn_flg = false ; down_flg = true ; break ;
		default : down_flg = false ;
	}
	if (down_flg) {
		if (!play_flg) {sp = 0}  else {sp = dw}; 
		clearTimeout(timerID) ; play_flg = false ; pic_flg = false ; b_set();
		if (pn_flg) {pf_mov()} else {nf_mov()};
	};
}