打 字 特 效 與 跑 馬 燈 的 結 合(使 用 文 字 框)

製作:王國榮

 

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

   function Scroll1() {
      document.tmForm.tmText.value = msg.substring(0, seq+1);
      seq++;
      if ( seq >= msg.length ) { seq = 0;
         window.setTimeout("Scroll2();", interval );
      }
      else
         window.setTimeout("Scroll1();", interval );
   }   

   function Scroll2() {
      document.tmForm.tmText.value = msg.substring(seq, msg.length) + space10 + msg.substring(0, msg.length);
      seq++;
      if ( seq > msg.length ) { seq = 0 };
      window.setTimeout("Scroll2();", interval );
   }   
</SCRIPT>

<H2 ALIGN=CENTER>打 字 特 效 與 跑 馬 燈 的 結 合(使 用 文 字 框)
<HR WIDTH="100%"></H2>

<FORM Name=tmForm>
   <INPUT Type=Text Name=tmText Size=59>
</FORM>

<HR WIDTH="100%">
<ADDRESS>製作:王國榮</ADDRESS>
</BODY>
</HTML>