用javascript怎么实现文字的自动出现?急急急
http://www.cye.com.cn/2009/zhexue/就像这样的，把话写好之后，怎么onload怎么写？怎么实现逐行出现的效果，另外背景音乐怎么添加...
http://www.cye.com.cn/2009/zhexue/
就像这样的，把话写好之后，怎么onload怎么写？
怎么实现逐行出现的效果，另外背景音乐怎么添加 展开
就像这样的，把话写好之后，怎么onload怎么写？
怎么实现逐行出现的效果，另外背景音乐怎么添加 展开
2个回答
展开全部
<html>
<head>
<title> New Document </title>
<script language="JavaScript">
var max=0;
var sd=100;
var txt,lentxt,go;
function textlist(){
if (max>=lentxt){clearTimeout(go);}
document.getElementById('con').innerHTML+=txt.substr(max,1);
document.getElementById('con').innerHTML=document.getElementById('con').innerHTML.replace(/\$/ig,'<br>')
max++
}
function textticker(){
txt=document.getElementById('con').innerHTML;
txt=txt.replace(/\<br\>/ig,'$')
lentxt=txt.length;
document.getElementById('con').innerHTML='';
go = setInterval(textlist, sd);
}
</script>
</head>
<body bgcolor="#fef4d9" OnLoad="textticker()">
<div id="con">
给你一个故事，希望你能喜欢这个故事并希望它能为你带来好运.</br>
一天,一个盲人带着他的导盲犬过街时,一辆大卡车失去控制,直冲过来,盲人当场被撞死,他的导 盲犬为了守卫主人,也一起惨死在车轮底下。<br>
</div>
</body>
</html>
<head>
<title> New Document </title>
<script language="JavaScript">
var max=0;
var sd=100;
var txt,lentxt,go;
function textlist(){
if (max>=lentxt){clearTimeout(go);}
document.getElementById('con').innerHTML+=txt.substr(max,1);
document.getElementById('con').innerHTML=document.getElementById('con').innerHTML.replace(/\$/ig,'<br>')
max++
}
function textticker(){
txt=document.getElementById('con').innerHTML;
txt=txt.replace(/\<br\>/ig,'$')
lentxt=txt.length;
document.getElementById('con').innerHTML='';
go = setInterval(textlist, sd);
}
</script>
</head>
<body bgcolor="#fef4d9" OnLoad="textticker()">
<div id="con">
给你一个故事，希望你能喜欢这个故事并希望它能为你带来好运.</br>
一天,一个盲人带着他的导盲犬过街时,一辆大卡车失去控制,直冲过来,盲人当场被撞死,他的导 盲犬为了守卫主人,也一起惨死在车轮底下。<br>
</div>
</body>
</html>
追问
请问怎么控制播放的速度？
追答
var sd=100;
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
背景音乐用<bgsound src="音乐文件地址">就是下面的第二行
后面是vbscript过程实现的效果，你想用就把文字换成自己的就行了
<BODY>
<BGSOUND balance=0 loop=infinite
src="ch111.mid" volume=0>
<SCRIPT language=VBScript>
dim w,t,p,mm,c,mr,dy,tmp,vs:vs=5:dy=1:p=1:mr="<BR><BR><BR>":c="<font color=white><B>|"&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="#A8A8A8"
w.style.cursor="crosshair"
'-------------------
t=w0.innerHTML:tp
end sub
</SCRIPT>
<DIV id=w0 style="DISPLAY: none">
<TABLE align=center border=0 width="90%">
<TBODY>
<TR>
<TD>
<P><FONT face=宋体 size=3><SPAN lang=EN-US
style="FONT-SIZE: 12pt; mso-bidi-font-family: 宋体"> </SPAN></FONT></P>
<P><B>给你一个故事，希望你能喜欢这个故事并希望它能为你带来好运。 <FONT color=red face=DFKai-SB><SPAN
lang=EN-US
style="COLOR: red; FONT-FAMILY: DFKai-SB; mso-bidi-font-family: 宋体"> </SPAN></FONT></B></P>
<P>一天,一个盲人带着他的导盲犬过街时,一辆大卡车失去控制,直冲过来,盲人当场被撞死,他的导盲犬为了守卫主人,也一起惨死在车轮底下。</P>
<P>主人和狗一起到了天堂门前。</P>
<P> 一个天使拦住他俩,为难地说:“对不起,现在天堂只剩下一个名额,你们两个中必须有一个去地狱。”</P>
<P> 主人一听,连忙问:“我的狗又不知道什么是天堂,什么是地狱,能不能让我来决定谁去天堂呢？”</P>
<P> 天使鄙视地看了这个主人一样,皱起了眉头,她想了想,说:“很抱歉,先生,每一个灵魂都是平等的,你们要通过比赛决定由谁上天堂。”</P>
<P> 主人失望地问:“哦,什么比赛呢？”</P>
<P> 天使说:“这个比赛很简单,就是赛跑,从这里跑到天堂的大门,谁先到达目的地,谁就可以上天堂。不过,你也别担心,因为你已经死了,所以不再是瞎子,而且灵魂的速度跟肉体无关,越单纯善良的人速度越快。”</P>
<P> 主人想了想,同意了。</P>
<P> 天使让主人和狗准备好,就宣布赛跑开始。她满心以为主人为了进天堂,会拼命往前奔,谁知道主人一点也不忙,慢吞吞地往前走着。更令天使吃惊的是,那条导盲犬也没有奔跑,它配合着主人的步调在旁边慢慢跟着,一步都不肯离开主人。天使恍然大悟:原来,多年来这条导盲犬已经养成了习惯,永远跟着主人行动,在主人的前方守护着他。可恶的主人,正是利用了这一点,才胸有成竹,稳操胜券,他只要在天堂门口叫他的狗停下就可以了。</P>
<P> 天使看着这条忠心耿耿的狗,心里很难过,她大声对狗说:“你已经为主人献出了生命,现在,你这个主人不再是瞎子,你也不用领着他走路了,你快跑进天堂吧!”</P>
<P>可是,无论是主人还是他的狗,都像是没有听到天使的话一样,仍然慢吞吞地地往前走,好像在街上散步似的。</P>
<P>果然,离终点还有几步的时候,主人发出一声口令,狗听话地坐下了,天使用鄙视的眼神看着主人。</P>
<P>这时,主人笑了,他扭过头对天使说:“我终于把我的狗送到天堂了,我最担心的就是它根本不想上天堂,只想跟我在一起……所以我才想帮它决定,请你照顾好它。”</P>
<P> 天使愣住了。</P>
<P>主人留恋地看着自己的狗,又说:“能够用比赛的方式决定真是太好了,只要我再让它往前走几步,它就可以上天堂了。不过它陪伴了我那么多年,这是我第一次可以用自己的眼睛看着它,所以我忍不住想要慢慢地走,多看它一会儿。如果可以的话,我真希望永远看着它走下去。不过天堂到了,那才是它该去的地方,请你照顾好它。”</P>
<P>说完这些话,主人向狗发出了前进的命令,就在狗到达终点的一刹那,主人像一片羽毛似的落向了地狱的方向。他的狗见了,急忙掉转头,追着主人狂奔。满心懊悔的天使张开翅膀追过去,想要抓住导盲犬,不过那是世界上最纯洁善良的灵魂,速度远比天堂所有的天使都快。</P>
<P>所以导盲犬又跟主人在一起了,即使是在地狱,导盲犬也永远守护着它的主人。</P>
<P> 天使久久地站在那里,喃喃说道:“我一开始就错了,这两个灵魂是一体的,他们不能分开……”<BR>
<BR>
最后，我要说：这个世界上,真相只有一个,可是在不同人眼中,却会看出不同的是非曲直。这是为什么呢？其实,道理很简单,因为每个人看待事物,都不可能站在绝对客观公正的立场上,而是或多或少地戴上有色眼镜,用自己的经验、好恶和道德标准来进行评判,结果就是——我们看到了假象。
<BR>
<BR>
"友谊的幸福之一，是知道了可以向谁倾吐秘密。"如果你收到了这封信，是因为有人在默默的祝福你，因为你也爱你身边的一些人。如果你总说太忙，不能将这封信转寄出去，老是说："改天再寄。"你将永远都不会去做这件事的。所以，不要找借口，静心的看看这篇古老印度来的故事，然后决定为你的朋友们作一些事，从传寄这封信开始。当你说："你是我的好朋友"时，请认真的说出来。当你道歉时请看着对方的眼睛。</P>
</P>
<P> <FONT color=#ff0000>永远不要嘲笑别人的梦想。不要随便给一个人定性。说话时要慢，思想时要快。</FONT></P>
<P> <FONT color=#ff0000>打电话的时候请你微笑，对方一定感觉得到。</FONT> </P>
<P> <FONT
color=#ff0000>这封信应该在你收到的96小时候转发，你会发现4天后，生活起了变化。这不是迷信。</FONT></P>
<P> <FONT color=#ff0000>转给0-4人：你的生活会悄悄起变化</FONT></P>
<P> <FONT color=#ff0000>转给5-9人：生活如你所愿</FONT></P>
<P> <FONT color=#ff0000>转给9-14人：接下来的三个星期你会有惊喜的发现</FONT></P>
<P> <FONT color=#ff0000>转给15人以上：你的梦想终会成真.</FONT> </P>
<P> 这是一个朋友转发给我的信。常常收到类似的让我继续转发的邮件，号称如果这样做了就会发财之类，通常我会把自己作为终点，但是这封信打动了我，因为它说："收到了这封信，是因为有人在默默的祝福你，因为你也爱你身边的一些人"。带着爱的，一切将如愿以偿。</P>
<P> 这是一封给你送上好运的信，它始于新英格兰。此信的复制由南非教区主教索尔安东尼起草并由维尼乌拉发出，已经绕地球转了十次。现在好运已降临到你身上，只要你照办，将此信网址复制2O份分别寄给亲朋好友或QQ上的朋友，使它在界各地周转，你将在四天内交到好运，这不是在开玩笑，不需要寄钱，因为幸运是无代价的。</P>
<P> <B>你看到了吗？我在默默的祝福你。<SPAN lang=EN-US
style="FONT-FAMILY: PMingLiU; mso-bidi-font-family: 宋体"><FONT
face=PMingLiU>*^_^* </FONT></SPAN></B></P></TD></TR></TBODY></TABLE></DIV>
<DIV id=w1></DIV>
<p><span class="p9"><br>
<br>
<br>
</span></p>
</BODY>
后面是vbscript过程实现的效果，你想用就把文字换成自己的就行了
<BODY>
<BGSOUND balance=0 loop=infinite
src="ch111.mid" volume=0>
<SCRIPT language=VBScript>
dim w,t,p,mm,c,mr,dy,tmp,vs:vs=5:dy=1:p=1:mr="<BR><BR><BR>":c="<font color=white><B>|"&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="#A8A8A8"
w.style.cursor="crosshair"
'-------------------
t=w0.innerHTML:tp
end sub
</SCRIPT>
<DIV id=w0 style="DISPLAY: none">
<TABLE align=center border=0 width="90%">
<TBODY>
<TR>
<TD>
<P><FONT face=宋体 size=3><SPAN lang=EN-US
style="FONT-SIZE: 12pt; mso-bidi-font-family: 宋体"> </SPAN></FONT></P>
<P><B>给你一个故事，希望你能喜欢这个故事并希望它能为你带来好运。 <FONT color=red face=DFKai-SB><SPAN
lang=EN-US
style="COLOR: red; FONT-FAMILY: DFKai-SB; mso-bidi-font-family: 宋体"> </SPAN></FONT></B></P>
<P>一天,一个盲人带着他的导盲犬过街时,一辆大卡车失去控制,直冲过来,盲人当场被撞死,他的导盲犬为了守卫主人,也一起惨死在车轮底下。</P>
<P>主人和狗一起到了天堂门前。</P>
<P> 一个天使拦住他俩,为难地说:“对不起,现在天堂只剩下一个名额,你们两个中必须有一个去地狱。”</P>
<P> 主人一听,连忙问:“我的狗又不知道什么是天堂,什么是地狱,能不能让我来决定谁去天堂呢？”</P>
<P> 天使鄙视地看了这个主人一样,皱起了眉头,她想了想,说:“很抱歉,先生,每一个灵魂都是平等的,你们要通过比赛决定由谁上天堂。”</P>
<P> 主人失望地问:“哦,什么比赛呢？”</P>
<P> 天使说:“这个比赛很简单,就是赛跑,从这里跑到天堂的大门,谁先到达目的地,谁就可以上天堂。不过,你也别担心,因为你已经死了,所以不再是瞎子,而且灵魂的速度跟肉体无关,越单纯善良的人速度越快。”</P>
<P> 主人想了想,同意了。</P>
<P> 天使让主人和狗准备好,就宣布赛跑开始。她满心以为主人为了进天堂,会拼命往前奔,谁知道主人一点也不忙,慢吞吞地往前走着。更令天使吃惊的是,那条导盲犬也没有奔跑,它配合着主人的步调在旁边慢慢跟着,一步都不肯离开主人。天使恍然大悟:原来,多年来这条导盲犬已经养成了习惯,永远跟着主人行动,在主人的前方守护着他。可恶的主人,正是利用了这一点,才胸有成竹,稳操胜券,他只要在天堂门口叫他的狗停下就可以了。</P>
<P> 天使看着这条忠心耿耿的狗,心里很难过,她大声对狗说:“你已经为主人献出了生命,现在,你这个主人不再是瞎子,你也不用领着他走路了,你快跑进天堂吧!”</P>
<P>可是,无论是主人还是他的狗,都像是没有听到天使的话一样,仍然慢吞吞地地往前走,好像在街上散步似的。</P>
<P>果然,离终点还有几步的时候,主人发出一声口令,狗听话地坐下了,天使用鄙视的眼神看着主人。</P>
<P>这时,主人笑了,他扭过头对天使说:“我终于把我的狗送到天堂了,我最担心的就是它根本不想上天堂,只想跟我在一起……所以我才想帮它决定,请你照顾好它。”</P>
<P> 天使愣住了。</P>
<P>主人留恋地看着自己的狗,又说:“能够用比赛的方式决定真是太好了,只要我再让它往前走几步,它就可以上天堂了。不过它陪伴了我那么多年,这是我第一次可以用自己的眼睛看着它,所以我忍不住想要慢慢地走,多看它一会儿。如果可以的话,我真希望永远看着它走下去。不过天堂到了,那才是它该去的地方,请你照顾好它。”</P>
<P>说完这些话,主人向狗发出了前进的命令,就在狗到达终点的一刹那,主人像一片羽毛似的落向了地狱的方向。他的狗见了,急忙掉转头,追着主人狂奔。满心懊悔的天使张开翅膀追过去,想要抓住导盲犬,不过那是世界上最纯洁善良的灵魂,速度远比天堂所有的天使都快。</P>
<P>所以导盲犬又跟主人在一起了,即使是在地狱,导盲犬也永远守护着它的主人。</P>
<P> 天使久久地站在那里,喃喃说道:“我一开始就错了,这两个灵魂是一体的,他们不能分开……”<BR>
<BR>
最后，我要说：这个世界上,真相只有一个,可是在不同人眼中,却会看出不同的是非曲直。这是为什么呢？其实,道理很简单,因为每个人看待事物,都不可能站在绝对客观公正的立场上,而是或多或少地戴上有色眼镜,用自己的经验、好恶和道德标准来进行评判,结果就是——我们看到了假象。
<BR>
<BR>
"友谊的幸福之一，是知道了可以向谁倾吐秘密。"如果你收到了这封信，是因为有人在默默的祝福你，因为你也爱你身边的一些人。如果你总说太忙，不能将这封信转寄出去，老是说："改天再寄。"你将永远都不会去做这件事的。所以，不要找借口，静心的看看这篇古老印度来的故事，然后决定为你的朋友们作一些事，从传寄这封信开始。当你说："你是我的好朋友"时，请认真的说出来。当你道歉时请看着对方的眼睛。</P>
</P>
<P> <FONT color=#ff0000>永远不要嘲笑别人的梦想。不要随便给一个人定性。说话时要慢，思想时要快。</FONT></P>
<P> <FONT color=#ff0000>打电话的时候请你微笑，对方一定感觉得到。</FONT> </P>
<P> <FONT
color=#ff0000>这封信应该在你收到的96小时候转发，你会发现4天后，生活起了变化。这不是迷信。</FONT></P>
<P> <FONT color=#ff0000>转给0-4人：你的生活会悄悄起变化</FONT></P>
<P> <FONT color=#ff0000>转给5-9人：生活如你所愿</FONT></P>
<P> <FONT color=#ff0000>转给9-14人：接下来的三个星期你会有惊喜的发现</FONT></P>
<P> <FONT color=#ff0000>转给15人以上：你的梦想终会成真.</FONT> </P>
<P> 这是一个朋友转发给我的信。常常收到类似的让我继续转发的邮件，号称如果这样做了就会发财之类，通常我会把自己作为终点，但是这封信打动了我，因为它说："收到了这封信，是因为有人在默默的祝福你，因为你也爱你身边的一些人"。带着爱的，一切将如愿以偿。</P>
<P> 这是一封给你送上好运的信，它始于新英格兰。此信的复制由南非教区主教索尔安东尼起草并由维尼乌拉发出，已经绕地球转了十次。现在好运已降临到你身上，只要你照办，将此信网址复制2O份分别寄给亲朋好友或QQ上的朋友，使它在界各地周转，你将在四天内交到好运，这不是在开玩笑，不需要寄钱，因为幸运是无代价的。</P>
<P> <B>你看到了吗？我在默默的祝福你。<SPAN lang=EN-US
style="FONT-FAMILY: PMingLiU; mso-bidi-font-family: 宋体"><FONT
face=PMingLiU>*^_^* </FONT></SPAN></B></P></TD></TR></TBODY></TABLE></DIV>
<DIV id=w1></DIV>
<p><span class="p9"><br>
<br>
<br>
</span></p>
</BODY>
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
