为网页添加放大或缩小文字

2004-01-31 10:35:42  作者

最近小弟看到这样的一个好东东,就是可以为我们的主页设置出一些可以放大或缩小的文字来,好东东不想独占还是拿出来吧!

代码如下

%26lt;SCRIPT language=JavaScript%26gt;
%26lt;!-- Begin
var speed = 20;
var cycledelay = 1000;
var maxsize = 48;

var x = 0;
var y = 0;
var themessage, size;
var esize = "";

function initArray() {
this.length = initArray.arguments.length;
for (var i = 0; i %26lt; this.length; i++) {
this[i] = initArray.arguments[i];
}
}
var themessage2 = new initArray(
"免费软件 随意传播",
"中国电脑教育报和资源站点",
"网站xiaoguang99122.myetang.com",
"请多多留意最新版"
);
if(navigator.appName == "Netscape")
document.write('%26lt;layer id="wds"%26gt;%26lt;/layer%26gt;%26lt;br%26gt;');
if (navigator.appVersion.indexOf("MSIE") != -1)
document.write('%26lt;span id="wds"%26gt;%26lt;/span%26gt;%26lt;br%26gt;');
function upwords(){
themessage = themessage2[y];
if (x %26lt; maxsize) {
x++;
setTimeout("upwords()",speed);
}
else setTimeout("downwords()",cycledelay);

if(navigator.appName == "Netscape") {
size = "%26lt;font point-size='"+x+"pt'%26gt;";
document.wds.document.write(size+"%26lt;center%26gt;"+themessage+"%26lt;/center%26gt;"+esize);
document.wds.document.close();
}
if (navigator.appVersion.indexOf("MSIE") != -1){
wds.innerHTML = "%26lt;center%26gt;"+themessage+"%26lt;/center%26gt;";
wds.style.fontSize=x+'px'
}
}
function downwords(){
if (x %26gt; 1) {
x--;
setTimeout("downwords()",speed);
}
else {
setTimeout("upwords()",cycledelay);
y++;
if (y %26gt; themessage2.length - 1) y = 0;
}
if(navigator.appName == "Netscape") {
size = "%26lt;font point-size='"+x+"pt'%26gt;";
document.wds.document.write(size+"%26lt;center%26gt;"+themessage+"%26lt;/center%26gt;"+esize);
document.wds.document.close();
}
if (navigator.appVersion.indexOf("MSIE") != -1){
wds.innerHTML = "%26lt;center%26gt;"+themessage+"%26lt;/center%26gt;";
wds.style.fontSize=x+'px'
}
}
setTimeout("upwords()",speed);
// End --%26gt;
%26lt;/script%26gt;

怎么样?你的站点是不是又添加了不少光彩了。

相关文章