語法展示::   http://home.graffiti.net/khjfcjhgf/


請用IE6.0或更新版本觀看語法特效展示

將以下程式碼複製,貼在<body>及</body>標籤之間。

<IMG height=110 id=hand1 src="cdh1.gif" style="DISPLAY: none" width=94>
<IMG height=110 id=hand2 src="cdh2.gif" style="DISPLAY: none" width=94>   
<DIV id=MsgText style="DISPLAY:none">
Java Script是一個Java Applet程式語言的簡易版本,它是由Netscape與Sun這兩家公司在1995年底所制定的,早期是為了在Navigator 2.0上設計動態網頁而設計的,它部份取自Java Applet的精髓,但並不提供例如Java Applet的類別與繼承的特性。<br>Java Script程式是HTML檔案的一部份,放在標籤<script>與</script>當中,和Java Applet不同的是,Java Script是純粹的直譯語言,也因如此,它的功能較單純,必須要搭配HTML檔案才能被執行;相反的,Java Script程式可以製作成Java Applet來執行。
</DIV>
<DIV id=MsgArea></DIV>
<script language=VBScript>
<!--
  Delay = 50
  Txt = MsgText.InnerHtml
  CharPos = 0
  Msg = ""
  ImageTag1="<IMG id=Pen src=" & hand1.src & " style=position:absolute border=0>"
  ImageTag2="<IMG id=Pen src=" & hand2.src & " style=position:absolute border=0>"
Sub Window_OnLoad()
 Document.Body.Scroll="no"
 ShowChar
End Sub
Sub ShowChar()
 CharPos=CharPos + 1
 If CharPos <= Len(Txt) then
     CurrentChar = Mid(Txt,CharPos,1)
  If CurrentChar = "<" Then
'   Process HTML tags without a delay  
   Do Until CurrentChar = ">"
    Msg = Msg & CurrentChar
    CharPos = CharPos + 1
    CurrentChar = Mid(Txt, CharPos, 1)
   Loop
    Msg = Msg & CurrentChar
  Else
   Msg = Msg & CurrentChar
  End If
  if CharPos mod 2 = 0 then ImageTag = ImageTag1 else ImageTag = ImageTag2
  MsgArea.innerhtml = Msg & ImageTag
  document.body.scrollTop=600
  d = Delay  
If CurrentChar = "、" or CurrentChar = "?" or CurrentChar = "﹗" or CurrentChar = "。"Then d =500 
  If CurrentChar = ","  then d =200
  TimerId = Window.SetTimeout("ShowChar",d,"VBScript")
 Else
  Document.Body.Scroll = "yes"
 End If  
End Sub
-->
</script>


Delay = 50 中修改寫字的速度


不要忘記付件也要一起帶回家喔~!!......     >>>>>>我是附件帶我回家<<<<<<<

下載後解壓縮,將圖檔置於網頁同一目錄下


arrow
arrow
    全站熱搜

    紫蓮の翼 發表在 痞客邦 留言(0) 人氣()