打字特效與跑馬燈的結合

製作:王國榮
Source
<HTML>
<BODY OnLoad="Scroll();" TEXT="#000000" BGCOLOR="#D0ECD0" LINK="#0000FF" VLINK="#008000" ALINK="#008000">
<!-- 以下是結合「打字特效」與「跑馬燈」的 Java Script 程式 -->
<SCRIPT Language="JavaScript">
   var msg="Homepage 無殼蝸牛完全起家手冊…1997 最炫的選擇…";
   var interval = 100;
   var spacelen = 120;
   var space10="          ";
   var seq=0;

   function Scroll() {
      len = msg.length;
      window.status = msg.substring(0, seq+1);
      seq++;
      if ( seq >= len ) { 
         seq = spacelen; 
         window.setTimeout("Scroll2();", interval );
      }
      else
         window.setTimeout("Scroll();", interval );
   }   

   function Scroll2() {
      var out="";

      for (i=1; i<=spacelen/space10.length; i++) out += space10;
      out = out + msg;
      len=out.length;
      window.status=out.substring(seq, len);
      seq++;
      if ( seq >= len ) { seq = 0; };
      window.setTimeout("Scroll2();", interval );
   }   
</SCRIPT>

<H2 ALIGN=CENTER>打字特效與跑馬燈的結合
<HR WIDTH="100%"></H2>
<ADDRESS>製作:王國榮</ADDRESS>

</BODY>
</HTML>