
阅读式公告栏代码(博客特效)
来源:http://blog.sina.com.cn/u/49be829b0100061t
使用方法:
2.把最后得到的原始代码放在代码特效工具-代码检验器(博客特效)或者主页制作器(博客特效) 或者在线HTML编辑器(博客特效) 里查看效果。可以复制效果到日志里面发布。
3.或把最后得到的原始代码直接放到自定义HTML模块里面即可,自定义HTML模块的添加见《个人门户增加自定义html模块(重要!) 》
效果图:
原始代码:
<SCRIPT language=javascript>
<!-- Activate Cloaking Device
var i = 0;
var TextNumber = -1;
var TextInput = new Object();
var HelpText="";
var Text = "";
var Speed=50;
var message=0;
var addPadding="\r\n";
//
TextInput[0] = "首先感谢大家的光临";
TextInput[1] = "这是一个阅读公告栏的使用方法介绍";
TextInput[2] = "有朋友留言要这个代码";
TextInput[3] = "奔跑真是费了九牛二虎之力";
TextInput[4] = "因为我不是学这个的";
TextInput[5] = "弄起来很麻烦";
TextInput[6] = "好与不好大家将就着看吧";
TextInput[7] = "再不知道说点啥了,呵呵!";
TotalTextInput = 7; // (0, 1, 2, 3, 4, 5, 6, 7)
// Positioning and speed vary between versions.
var Version = navigator.appVersion;
if (Version.substring(0, 1)==3)
{
Speed=200;
addPadding="";
}
for (var addPause = 0; addPause <= TotalTextInput; addPause++)
{TextInput[addPause]=addPadding+TextInput[addPause];}
var TimerId
var TimerSet=false;
// Called by >>> button (display next message) .
function nextMessage()
{
if (!TimerSet)
{
TimerSet=true;
clearTimeout (TimerId);
if (TextNumber>=TotalTextInput)
{
alert("奔跑提示:已经没有了,嘿嘿");
TimerSet=false;
}
else
{
TextNumber+=1;
message=TextNumber+1;
document.forms[0].elements[2].value= message;
Text = TextInput[TextNumber];
HelpText = Text;
}
teletype();
}
}
// Gets and displays character from rollMessage() .
// Variable Speed controls length of timeout and thus the speed of typing.
function teletype()
{
if (TimerSet)
{
Text=rollMessage();
TimerId = setTimeout("teletype()", Speed);
document.forms[0].elements[0].value=Text;
}
}
// Pulls one character at a time from string and returns (as Text) to function teletype() for displaying.
function rollMessage ()
{
i++;
var CheckSpace = HelpText.substring(i-1, i);
CheckSpace = "" + CheckSpace;
if (CheckSpace == " ")
{i++;}
if (i >= HelpText.length+1)
{
TimerSet=false;
Text = HelpText.substring(0, i);
i=0;
return (Text);
}
Text = HelpText.substring(0, i);
return (Text);
}
// Initially called by onLoad in BODY tag to load title.
function initTeleType()
{
Text="\r\n Manual Tele-Type Display";
document.forms[0].elements[0].value=Text;
}
// Called by <<< button (get previous message).
function lastMessage()
{
if (!TimerSet && TextNumber!=-1)
{
TimerSet=true;
clearTimeout (TimerId);
if (TextNumber<=0)
{
alert("这是第几页呢?");
TimerSet=false;
}
else
{
TextNumber-=1;
message=TextNumber+1;
document.forms[0].elements[2].value= message;
Text = TextInput[TextNumber];
HelpText = Text;
}
teletype();
}
}
<!-- 此特效由奔跑编辑制作-->
<!-- http://blog.sina.com.cn/u/1169540317-->
// Deactivate Cloaking --></SCRIPT>
<FORM>
<TABLE cellSpacing=0 cellPadding=0 width="17%">
<TBODY>
<TR>
<TD vAlign=top width="100%" colSpan=3>
<DIV align=center>
<P><TEXTAREA style="WIDTH: 178px; HEIGHT: 52px" name=teletype rows=3 wrap=yes cols=1></TEXTAREA> </P></DIV></TD></TR>
<TR align=middle>
<TD vAlign=top width="30%" bgColor=#facd1d><INPUT style="WIDTH: 59px; HEIGHT: 24px" onclick=lastMessage() type=button size=1 value=公告栏></TD>
<TD vAlign=top width="30%" bgColor=#facd1d> <INPUT style="WIDTH: 42px; HEIGHT: 22px" size=1 value=共8条 name=1></TD>
<TD vAlign=top width="30%" bgColor=#facd1d> <INPUT style="WIDTH: 46px; HEIGHT: 24px" onclick=nextMessage() type=button size=1 value="阅 读"></TD></TR></TBODY></TABLE></FORM>
友情推荐→ :《 博客/网站/论坛添加google广告的详细步骤,让您免费赚美元!注:最牛的人,3个月赚100万美元》




