·
网页特效库
·
网页工具库
背景按钮
导航特效
图片特效
文本特效
时间特效
状态特效
另类特效
网页制作
网站首页
< 后退
|
收藏网页特效库
推荐网页特效
购物网站的导航效果，推荐！
向上下左右滚动图片的特效
超级变态广告代码
设为首页
加入收藏夹
防止选择和复制
新浪博客的提示窗口，推荐！
推荐网页工具
在线html编辑器
在线CSS编辑器
滚动条颜色生成器
弹出窗口生成器
网页加密解密工具
汉字转换成拼音工具
文本繁简体转换工具
您的位置：
网页特效库
>>
网页文本特效
>> 网页文本打字效果
查看此特效演示
网页文本打字效果
把如下代码复制到<body>与</body>之间
<SCRIPT language=VBScript> dim w,t,p,mm,c,mr,dy,tmp,vs:vs=5:dy=1:p=1:mr="":c=""&mr:Set w = document.body sub tp m=mid(t,p,1):if m="" then c=mr if m="`" then m="":mm=mid(mm,1,len(mm)-1) if m="<" then av=instr(mid(t,p),">"):m=mid(t,p,av):p=p+av-1 if m="&" then av=instr(mid(t,p),";"):m=mid(t,p,av):p=p+av-1 tmp=100:if m="." then tmp=400 else if m="," then tmp=200 else if m=" " then tmp=200 if w.scrollHeight-w.scrollTop>w.offsetHeight then w.scrollTop=w.scrollTop+int(dy):dy=dy+dy/vs else dy=1 mm=mm&m:w1.innerHTML=mm&c:p=p+1:if p<=len(t)+1 then SetTimeOut "tp",16+tmp else w.scroll="yes" end sub sub window_onload() w.scroll="yes" w.bgcolor="#ffffff" w.style.cursor="crosshair" '------------------- t=w0.innerHTML:tp end sub </SCRIPT> <DIV id=w1></DIV> <DIV id=w0 style="DISPLAY: none"> <strong>陶渊明《饮酒》赏析</strong> <p>结庐在人境，而无车马喧。</p> <p>问君何能尔？心远地自偏。</p> <p>采菊东篱下，悠然见南山。</p> <p>山气日夕佳，飞鸟相与还。</p> <p>此中有真意，欲辨已忘言。</p> </DIV>
使用说明：代码中<DIV id=w0 style="DISPLAY: none">与</DIV>之间为文本内容，可自行修改。
返回列表
下一个特效：
数字选中放大
关于我们
|
联系本站
|
免责声明
|
版权声明
|
网站地图
|
友情链接
|
鄂ICP备05023174号
Copyright © 2008
www.butong.net
.All Rights Reserved.
您的位置：
