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

w = 1 ; // dot
t = 20 ; // ms
st = 1000 ; // ms
ds = 100 ; // dot
pw2 = 40 ; // dot

pn_flg = true ;
play_flg = true ;
down_flg = false ;
pic_flg = false ;
c = "on" ;
lim = "on" ;
h = ">" ;

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 style=\"font-size:15px;color:#000000\" nowrap align=\"center\" width=\"70\" bgcolor=\"#aaaaaa\" onclick='b_click(\"pic\")' style=\"cursor:hand\"><SPAN id=\"pic\">Scroll Off</SPAN></TD>",
"       <TD nowrap width=\"16\"></TD>",
"       <TD style=\"font-size:15px;color:#000000\" nowrap width=\"50\" align=\"center\" bgcolor=\"#8D7D7D\" onclick='b_click(\"play\")' style=\"cursor:hand\"><SPAN id=\"stop\">Stop</SPAN></TD>",
"       <TD style=\"font-size:15px;color:#000000\" nowrap width=\"40\" align=\"center\" bgcolor=\"#8D7D7D\" onclick='b_click(\"rev\")' style=\"cursor:hand\">Rev.</TD>",
"       <TD  style=\"font-size:13px;color:#000000\" nowrap width=\"24\" align=\"center\" bgcolor=\"#8D7D7D\" onclick='b_click(\"f\")' style=\"cursor:hand\"><SPAN id=\"f\">&gt;</SPAN></TD>",
"       <TD style=\"font-size:13px;color:#000000\" nowrap width=\"24\" align=\"center\" bgcolor=\"#8D7D7D\" onclick='b_click(\"ff\")' style=\"cursor:hand\"><SPAN id=\"ff\">&gt;&gt;</SPAN></TD>",
"       <TD style=\"font-size:13px;color:#000000\" nowrap width=\"24\" align=\"center\" bgcolor=\"#8D7D7D\" onclick='b_click(\"fff\")' style=\"cursor:hand\"><SPAN id=\"fff\">&gt;&gt;&gt;</SPAN></TD>",
"       <TD nowrap width=\"16\"></TD>",
"       <TD style=\"font-size:13px;color:#000000\" nowrap width=\"30\" align=\"center\" bgcolor=\"#8D7D7D\" onmousedown='b_updown(\"f_down\")' onmouseup='b_updown(\"f_up\")' onmouseout='b_updown(\"out\")' style=\"cursor:hand\">&lt;--</TD>",
"       <TD style=\"font-size:13px;color:#000000\" nowrap width=\"30\" align=\"center\" bgcolor=\"#8D7D7D\" onmousedown='b_updown(\"r_down\")' onmouseup='b_updown(\"r_up\")' onmouseout='b_updown(\"out\")' style=\"cursor:hand\">--&gt;</TD>",
"       <TD nowrap width=\"16\"></TD>",
"      </TR>",
"     </TBODY>",
"    </TABLE>",
"   </TD>",
"   <TD style=\"font-size:14px;color:#8D7D7D\" id=\"cont2\" align=\"right\" nowrap width=\"100%\">JavaScript by M.Murakami</TD>",
"  </TR>",
" </TBODY>",
"</TABLE>"
);

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

	scw = 800 ;
	if (screen.width >= 800){ scw = screen.width };
	if ((screen.width > 1280) && (lim.toLowerCase() == "on")) { scw = 1024 };
	if (document.referrer.search(/setoy/i) > 0 ) {cont2.style.visibility  = "hidden" };

	pw1 = -( pic1.width - scw + ds ) ;
	if (( scw - ds ) < pic1.width ) {
		b_set();
		s_mov();
	}
}

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

/* move left */
function p_mov(){
	pic1.style.posLeft -= dw ;
	if ( pic1.style.posLeft > pw1 ) { timerID = setTimeout( "p_mov()", t ) }; 
	else { pn_flg = false ; t_mov()};
}

/* move right */
function n_mov(){
	pic1.style.posLeft += dw ;
	if ( pic1.style.posLeft < pw2 ) {  timerID = setTimeout( "n_mov()", t ) }; 
	else { pn_flg = true ; t_mov()};
}

/* 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 } ; 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 -= 16 ;
	if (( pic1.style.posLeft > pw1 ) && (down_flg)) { timerID = setTimeout( "pf_mov()", t ) } 
}
/* Arrow move left */
function nf_mov(){
	pic1.style.posLeft += 16 ;
	if (( pic1.style.posLeft < pw2) && (down_flg)) {  timerID = setTimeout( "nf_mov()", 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) {
		clearTimeout(timerID) ; play_flg = false ; pic_flg = false ; b_set();
		if (pn_flg) {pf_mov()}; else {nf_mov()};
	};
}