Code favorites-js + ASP screen rolling script

I recently wrote this in my company and put it here for your convenience.

Demo: http://www.9600100.com/

<SCRIPT type = "text/JavaScript" Language = "JavaScript">

<% = Divid %> marqueesheightone = 300;

<% = Divid %> stopscroll1 = false;

With (<% = divid %> ){

Style. width = 380;

Style. Height = <% = divid %> marqueesheightone;

Style. overflowx = "visible ";

Style. overflowy = "hidden ";

Nowrap = true;

Onmouseover = new function ("<% = divid %> stopscroll1 = true ");

Onmouseout = new function ("<% = divid %> stopscroll1 = false ");

}

<% = Divid %> pretop1 = 0; <% = divid %> currenttop1 = <% = divid %> marqueesheightone; <% = divid %> stoptime1 = 0;

<% = Divid %>. innerhtml + = <% = divid %>. innerhtml;

Function init _ <% = divid %> srolltext1 (){

<% = Divid %>. scrolltop = 0;

Setinterval ("<% = divid %> scrollup1 ()", 1 );

} Init _ <% = divid %> srolltext1 ();

Function <% = divid %> scrollup1 (){

If (<% = divid %> stopscroll1 = true) return;

<% = Divid %> currenttop1 + = 1;

If (<% = divid %> currenttop1 = <% = divid %> marqueesheightone + 1)

{

<% = Divid %> stoptime1 + = 1;

<% = Divid %> currenttop1-= 1;

If (<% = divid %> stoptime1 = 500)

{

<% = Divid %> currenttop1 = 0;

<% = Divid %> stoptime1 = 0;

}

}

Else {

<% = Divid %> pretop1 = <% = divid %>. scrolltop;

<% = Divid %>. scrolltop + = 1;

If (<% = divid %> pretop1 = <% = divid %>. scrolltop ){

<% = Divid %>. scrolltop = <% = divid %> marqueesheightone;

<% = Divid %>. scrolltop + = 1;

}

}

}

Init _ <% = divid %> srolltext1 ();

</SCRIPT>