一个漂亮的JS

不是有源码吗
iframe中联入你需要显示的页面
<html>
<head>
<style type="text/css">
<!--.form { font-size: 9pt; color: #ff9900; 
background-color: #993300; font-family: "宋体"}
.opacity {FILTER: alpha(opacity=100)
.form { font-size: 9pt; color: #ff9900;
background-color: #993300; font-family: "宋体"}
.unnamed1 { font-family: "Arial",
"Helvetica", "sans-serif"; font-size: 10px}
-->
</style>
<script>
function movstar(a,time){
movx=setInterval("mov("+a+")",time)
}
function movover(){
clearInterval(movx)
}
function mov(a){
scrollx=new_date.document.body.scrollLeft
scrolly=new_date.document.body.scrollTop
scrolly=scrolly+a
new_date.window.scroll(scrollx,scrolly)
}
function o_down(theobject){
object=theobject
while(object.filters.alpha.opacity>60){
object.filters.alpha.opacity+=-10}
}
function o_up(theobject){
object=theobject
while(object.filters.alpha.opacity<100){
object.filters.alpha.opacity+=10}
}
function wback(){
if(new_date.history.length==0){window.history.back()}
else{new_date.history.back()}
}
</script> 
<script language="JavaScript">
<!--
<!--
function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
// -->function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
//-->
</script>
<title>CDMA</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head><body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0">
<table width="420" border="0" cellspacing="0" cellpadding="0" height="300">
  <tr>
    <td height="44"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0" width="420" height="147">
        <param name=movie value="top.swf">
        <param name=quality value=high>
        <embed src="top.swf" quality=high pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="420" height="147">
        </embed> 
      </object></td>
  </tr>
  <tr>
    <td height="313" background="b.gif" valign="top">
      <table width="390" border="0" cellspacing="0" cellpadding="0" height="300" align="center">
        <tr> 
          <td width="373"><IFRAME border=0 name=new_date marginWidth=0 
            frameSpacing=0 marginHeight=0 src="matter.html" 
            frameBorder=0 noResize width=370 scrolling=no height=300
            vspale="0"></IFRAME></td>
          <td width="17"> 
            <table width="13" border="0" cellspacing="0" cellpadding="0" height="280">
              <tr> 
                <td height="12"><img src="up.gif" width=13 height=13 class="opacity" onMouseDown=movover();movstar(-3,2) onMouseOut=movover();o_up(this) 
onMouseOver=movstar(-1,20);o_down(this) onMouseUp=movover();movstar(-1,20) alt="点住不放可以快速向上滚动"></td>
              </tr>
              <tr> 
                <td height="258"> 
                  <p>&nbsp;</p>
                  <p>&nbsp;</p>
                </td>
              </tr>
              <tr> 
                <td><img src="down.gif" width=13 height=13 class="opacity" onMouseDown=movover();movstar(3,2) onMouseOut=movover();o_up(this) 
onMouseOver=movstar(1,20);o_down(this) onMouseUp=movover();movstar(1,20) alt="点住不放可以快速向下滚动"></td>
              </tr>
            </table>
          </td>
        </tr>
      </table>
    </td>
  </tr>
</table>
</body>
</html>