語法展示:: 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 中修改寫字的速度
不要忘記付件也要一起帶回家喔~!!...... >>>>>>我是附件帶我回家<<<<<<<
下載後解壓縮，將圖檔置於網頁同一目錄下
留言列表
