語法展示:: http://home.graffiti.net/nhkkli22/請用IE6.0或更新版本觀看語法特效展示
將以下程式碼複製，貼在<body>及</body>標籤之間。
<script language="JavaScript">
<!--
document.write("<center><font size=3 color=red>您的瀏覽器為 ── "+navigator.appName+"</font></center>");
-->
</script>
在 <font size=3 color=red> 中修改顯示文字的大小與色彩 asp520520 發表在 痞客邦 留言(0) 人氣(7)
語法展示:: http://home.graffiti.net/gfghgfhf/請用IE6.0或更新版本觀看語法特效展示
將以下程式碼複製，貼在<head>及</head>標籤之間。
<script language="JavaScript">
<!--
function getCookieVal (offset)
{
var endstr = document.cookie.indexOf (";", offset);
if (endstr == -1)
endstr = document.cookie.length;
return unescape(document.cookie.substring(offset, endstr));
}
function GetCookie (name)
{
var arg = name + "=";
var alen = arg.length;
var clen = document.cookie.length;
var i = 0;
while (i < clen)
{
var j = i + alen;
if (document.cookie.substring(i, j) == arg)
return getCookieVal (j);
i = document.cookie.indexOf(" ", i) + 1;
if (i == 0)
break;
}
return null;
}
function SetCookie (name, value)
{
var argv = SetCookie.arguments;
var argc = SetCookie.arguments.length;
var expires = (2 < argc) ? argv[2] : null;
var path = (3 < argc) ? argv[3] : null;
var domain = (4 < argc) ? argv[4] : null;
var secure = (5 < argc) ? argv[5] : false;
document.cookie = name + "=" + escape (value) +
((expires == null) ? "" : ("; expires=" + expires.toGMTString())) +
((path == null) ? "" : ("; path=" + path)) +
((domain == null) ? "" : ("; domain=" + domain)) +
((secure == true) ? "; secure" : "");
}
function DisplayInfo()
{
var expdate = new Date();
var visit;
expdate.setTime(expdate.getTime() + (24 * 60 * 60 * 1000 * 365));
if(!(visit = GetCookie("visit")))
visit = 0;
visit++;
SetCookie("visit", visit, expdate, "/", null, false);
var message;
if(visit == 1)
message="注意看次數和訊息會變化ㄚ";
if(visit == 2)
message="要常來喔";
if(visit == 3)
message="哈哈..嘿嘿..";
if(visit == 4)
message="嗯......不知要說啥了......";
if(visit == 5)
message="國泰民安 世界和平";
if(visit >= 6)
message="記得將本站加入最愛喔 ^_^";
alert("\n"+"參觀本頁次數：第"
+" "+visit+""
+" 次"+"\n"+"\n"
+message);
}
-->
</script>
| 在 message="注意看次數和訊息會變化ㄚ"; 中修改要顯示的文字 |
| 自行增減訊息的數量，只要最後一條訊息改成>=就好(意思就是當次數>或=這一次時，一律使用此訊息) |
將以下程式碼複製，貼在插入<body >標籤裡面。
onload="DisplayInfo()" asp520520 發表在 痞客邦 留言(0) 人氣(5)
語法展示:: http://home.graffiti.net/mmjkiop55t/請用IE6.0或更新版本觀看語法特效展示
將以下程式碼複製，貼在<body>及</body>標籤之間。
<center>
<script language="JavaScript">
<!--
function getCookieVal (offset) {
var endstr = document.cookie.indexOf (";", offset);
if (endstr == -1)
endstr = document.cookie.length;
return unescape(document.cookie.substring(offset, endstr));
}
function GetCookie (name) {
var arg = name + "=";
var alen = arg.length;
var clen = document.cookie.length;
var i = 0;
while (i < clen) {
var j = i + alen;
if (document.cookie.substring(i, j) == arg)
return getCookieVal (j);
i = document.cookie.indexOf(" ", i) + 1;
if (i == 0)
break;
}
return null;
}
function SetCookie (name, value) {
var argv = SetCookie.arguments;
var argc = SetCookie.arguments.length;
var expires = (argc > 2) ? argv[2] : null;
var path = (argc > 3) ? argv[3] : null;
var domain = (argc > 4) ? argv[4] : null;
var secure = (argc > 5) ? argv[5] : false;
document.cookie = name + "=" + escape (value) +
((expires == null) ? "" : ("; expires=" + expires.toGMTString())) +
((path == null) ? "" : ("; path=" + path)) +
((domain == null) ? "" : ("; domain=" + domain)) +
((secure == true) ? "; secure" : "");
}
function DeleteCookie(name) {
var exp = new Date();
FixCookieDate (exp); // Correct for Mac bug
exp.setTime (exp.getTime() - 1); // This cookie is history
var cval = GetCookie (name);
(cval != null)
document.cookie = name + "=" + cval + "; expires=" + exp.toGMTString();
}
var expdate = new Date();
var num_visits;
expdate.setTime(expdate.getTime() + (5*24*60*60*1000));
if (!(num_visits = GetCookie("num_visits")))
num_visits = 0;
num_visits++;
SetCookie("num_visits",num_visits,expdate);
document.write("<font size=5 color=blue>您是第 "+num_visits+" 次光臨本站</font>");
-->
</script>
</center>
在 document.write("<font size=3 color=red>您是第 "+num_visits+" 次光臨本站</font>"); 中修改要顯示的文字、大小與色彩 asp520520 發表在 痞客邦 留言(0) 人氣(6)
語法展示:: http://home.graffiti.net/ljhkghjg/請用IE6.0或更新版本觀看語法特效展示
將以下程式碼複製，貼在<body>及</body>標籤之間。
<script language=JavaScript>
<!--
function statusMessageObject(p,d) {
this.msg = MESSAGE
this.out = " "
this.pos = POSITION
this.delay = DELAY
this.i = 0
this.reset = clearMessage
}
function clearMessage() {
this.pos = POSITION
}
var POSITION = 100
var DELAY = 1
var MESSAGE = "我在這裡我在這裡！ 看到了沒......^_^"
var scroll = new statusMessageObject()
function scroller() {
for (scroll.i = 0; scroll.i < scroll.pos; scroll.i++) {
scroll.out += " "
}
if (scroll.pos >= 0)
scroll.out += scroll.msg
else scroll.out = scroll.msg.substring(-scroll.pos,scroll.msg.length)
window.status = scroll.out
scroll.out = " "
scroll.pos--
if (scroll.pos < -(scroll.msg.length)) {
scroll.reset()
}
setTimeout ('scroller()',scroll.delay)
}
function snapIn(jumpSpaces,position) {
var msg = scroll.msg
var out = ""
for (var i=0; i<position; i++)
{out += msg.charAt(i)}
for (i=1;i<jumpSpaces;i++)
{out += "|"}
out += msg.charAt(position)
window.status = out
if (jumpSpaces <= 1) {
position++
if (msg.charAt(position) == ' ')
{position++ }
jumpSpaces = 100-position
} else if (jumpSpaces > 3)
{jumpSpaces *= .75}
else
{jumpSpaces--}
if (position != msg.length) {
var cmd = "snapIn(" + jumpSpaces + "," + position + ")";
scrollID = window.setTimeout(cmd,scroll.delay);
} else {
window.status=""
jumpSpaces=0
position=0
cmd = "snapIn(" + jumpSpaces + "," + position + ")";
scrollID = window.setTimeout(cmd,scroll.delay);
return false
}
return true
}
snapIn(100,0);
-->
</script>
| 在 var DELAY = 1 中修改跑馬燈的速度 |
| 在 var MESSAGE = "我在這裡我在這裡！ 看到了沒......^_^" 中修改跑馬燈的文字 |
asp520520 發表在 痞客邦 留言(0) 人氣(37)
語法展示::
http://home.graffiti.net/mhgyj/請用IE6.0或更新版本觀看語法特效展示
將以下程式碼複製，貼在<body>及</body>標籤之間。
<script language="JavaScript">
<!--
var current = 0
var x = 0
var speed = 120
var back = 15
var speed2 = 1500
var back2 = 1500
var type = new Array(4)
type[0]="我在這裡我在這裡！"
type[1]="看到了沒......^_^"
type[2]="這個跑馬燈文字出現後還會自己抹掉喔"
type[3]="看出來了沒"
function typewrite() {
var m = type[current]
window.status = m.substring(0, x++)
if (x == m.length + 1) {
setTimeout("erase()", back2)
}
else {
setTimeout("typewrite()", speed)
}
}
function erase() {
var m = type[current]
window.status = m.substring(0, x)
x=x-1
if (x < 0) {
current++
x=0
setTimeout("typewrite()", speed2)
if (current > type.length - 1) {
current = 0
}
}
else {
setTimeout("erase()", back)
}
}
typewrite()
-->
</script>
| 在 var speed = 120 中修改跑馬燈的文字顯示速度 |
| 在 var back = 15 中修改跑馬燈的文字消除速度 |
| 在 var speed2 = 1500 中修改跑馬燈文字的停留間隔 |
| 在 var back2 = 1500 中修改兩個跑馬燈文字間的時間間隔 |
| 在 var type = new Array(3) 中修改跑馬燈訊息的總數量 |
| 自行修改跑馬燈的訊息文字 |
asp520520 發表在 痞客邦 留言(0) 人氣(42)
語法展示:: http://home.graffiti.net/nhyf222/請用IE6.0或更新版本觀看語法特效展示
將以下程式碼複製，貼在<head>及</head>標籤之間。
<script language="JavaScript">
<!--
var yourwords = ". 我在這裡我在這裡！看到了沒......^_^ .";
var buffer1=" ";
var buffer2=" ";
var message1=buffer1+yourwords+buffer2;
var dir = "left";
var speed = 75;
function pingpong()
{
if (dir == "left")
{
message2=message1.substring(2,message1.length)+" ";
window.status=message2;
setTimeout("pingpong();",speed);
message1=message2;
if (message1.substring(0,1) == ".") dir="right";
}
else
{
message2=" "+message1.substring(0,message1.length-2);
window.status=message2;
setTimeout("pingpong();",speed);
message1=message2;
if (message1.substring(message1.length-1,message1.length) == ".") dir="left";
}
}
-->
</script>
| 在 var yourwords = ". 我在這裡我在這裡！看到了沒......^_^ ."; 中修改要顯示的文字 |
| 在 var speed = 75; 中修改跑馬燈彈跳的速度 |
將以下程式碼複製，貼在插入<body >標籤裡面。
onLoad="pingpong();" asp520520 發表在 痞客邦 留言(0) 人氣(27)
語法展示:: http://home.graffiti.net/khjyfc/請用IE6.0或更新版本觀看語法特效展示
將以下程式碼複製，貼在<head>及</head>標籤之間。
<script language="JavaScript">
<!--
var speed = 10
var pause = 2000
var timerID = null
var bannerRunning = false
var ar = new Array()
ar[0] = "我在這裡我在這裡！"
ar[1] = "看到了沒......^_^"
ar[2] = "看清楚沒！"
ar[3] = "這是從旁邊 '擠' 出來的唷！"
var message = 0
var state = ""
clearState()
function stopBanner() {
if (bannerRunning)
clearTimeout(timerID)
bannerRunning = false}
function startBanner() {
stopBanner()
showBanner()}
function clearState() {
state = ""
for (var i = 0; i < ar[message].length; ++i) {
state += "0" }}
function showBanner() {
if (getString()) {
message++
if (ar.length <= message)
message = 0
clearState()
timerID = setTimeout("showBanner()", pause)
bannerRunning = true
} else {
var str = ""
for (var j = 0; j < state.length; ++j) {
str += (state.charAt(j) == "1") ? ar[message].charAt(j) : ""
}
window.status = str
timerID = setTimeout("showBanner()", speed)
bannerRunning = true }}
function getString() {
var full = true
for (var j = 0; j < state.length; ++j) {
if (state.charAt(j) == 0)
full = false }
if (full)
return true
while (1) {
var num = getRandom(ar[message].length)
if (state.charAt(num) == "0")
break }
state = state.substring(0, num) + "1" + state.substring(num + 1, state.length)
return false}
function getRandom(max) {
return Math.round((max - 1) * Math.random())}
-->
</script>
| 在 var speed = 10 中修改跑馬燈的速度 |
| 在 var pause = 2000 中修改訊息間停留的時間(每1秒=1000) |
| 在 ar[0] = "我在這裡我在這裡！" ar[1] = "看到了沒......^_^" ar[2] = "看清楚沒！" ar[3] = "這是從旁邊 '擠' 出來的唷！" 中修改要顯示的文字 |
將以下程式碼複製，貼在插入<body >標籤裡面。
onLoad="startBanner()" asp520520 發表在 痞客邦 留言(0) 人氣(10)
語法展示:: http://home.graffiti.net/rtrbrd3456jkl/請用IE6.0或更新版本觀看語法特效展示
將以下程式碼複製，貼在<head>及</head>標籤之間。
<script language="JavaScript">
<!--
var init_msg = "我在這裡我在這裡！看到了沒......^_^ 這個跑馬燈的字是從右邊飛過來的字喔！"
var str = ""
var msg = ""
var leftmsg = ""
function setMessage()
{
if (msg == "")
{
str = " "
msg = init_msg
leftmsg = ""
}
if (str.length == 1)
{
while (msg.substring(0, 1) == " ")
{
leftmsg = leftmsg + str
str = msg.substring(0, 1)
msg = msg.substring(1, msg.length)
}
leftmsg = leftmsg + str
str = msg.substring(0, 1)
msg = msg.substring(1, msg.length)
for (var ii = 0; ii < 120; ii++)
{str = " " + str}
}
else
{
str = str.substring(10, str.length)
}
window.status = leftmsg + str
JSCTimeOutID = window.setTimeout('setMessage()',40)
}
-->
</script>
在 var init_msg = "我在這裡我在這裡！看到了沒......^_^ 這個跑馬燈的字是從右邊飛過來的字喔！" 中修改要顯示的文字
將以下程式碼複製，貼在插入<body >標籤裡面。
onLoad="JSCTimeOutID = window.setTimeout('setMessage()',500);" asp520520 發表在 痞客邦 留言(0) 人氣(272)
語法展示:: http://home.graffiti.net/ghh6654hjf/請用IE6.0或更新版本觀看語法特效展示
將以下程式碼複製，貼在<head>及</head>標籤之間。
<script language="JavaScript">
<!--
var speed = 30
var pause = 5000
var bannerRunning = false
var ar = new Array()
ar[0] = "我在這裡我在這裡！"
ar[1] = "看到了沒......^_^"
ar[2] = "這個跑馬燈的每個字是慢慢拼湊出來的喔，"
ar[3] = "這種的可不常見吧！"
var message = 0
var state = ""
clearState()
function stopBanner() {
if (bannerRunning)
clearTimeout(timerID)
bannerRunning = false}
function startBanner() {
stopBanner()
showBanner()}
function clearState() {
state = ""
for (var i = 0; i < ar[message].length; ++i) {
state += "0" }}
function showBanner() {
if (getString()) {
message++
if (ar.length <= message)
message = 0
clearState()
timerID = setTimeout("showBanner()", pause)
bannerRunning = true } else {
var str = ""
for (var j = 0; j < state.length; ++j) {
str += (state.charAt(j) == "1") ? ar[message].charAt(j) : " "
}
window.status = str
timerID = setTimeout("showBanner()", speed)
bannerRunning = true }}
function getString() {
var full = true
for (var j = 0; j < state.length; ++j) {
if (state.charAt(j) == 0)
full = false }
if (full)
return true
while (1) {
var num = getRandom(ar[message].length)
if (state.charAt(num) == "0")
break }
state = state.substring(0, num) + "1" + state.substring(num + 1, state.length)
return false}
function getRandom(max) {
return Math.round((max - 1) * Math.random())}
-->
</script>
| 在 var speed = 30 中修改跑馬燈的速度 |
| 在 var pause = 5000 中修改訊息間停留的時間(每1秒=1000) |
| 在 ar[0] = "我在這裡我在這裡！" ar[1] = "看到了沒......^_^" ar[2] = "這個跑馬燈的每個字是慢慢拼湊出來的喔，" ar[3] = "這種的可不常見吧！" 中修改要顯示的文字 |
將以下程式碼複製，貼在插入<body >標籤裡面。
onLoad="startBanner()" asp520520 發表在 痞客邦 留言(0) 人氣(9)
語法展示:: http://home.graffiti.net/ngdf456/請用IE6.0或更新版本觀看語法特效展示
將以下程式碼複製，貼在<head>及</head>標籤之間。
<script language="JavaScript">
<!--
var showtxt="我在這裡我在這裡！看到了沒......^_^ 這個跑馬燈的字會兩個字兩個字顯示......最後還會閃爍喔！";
var txt_len=showtxt.length;
var width=256;
var count=0;
var left=0;
var bub=0;
function scroll() {
var txt="";
var scroller="";
if (bub>0) {
if ((bub%2)==1) {
window.status="";
} else {
window.status=showtxt;
}
bub++;
if (bub==8) bub=0;
} else {
if (count>0) {
scroller=showtxt.substring(0,count);
txt=showtxt.substring(count,count+2);
} else {
txt=showtxt.substring(0,2);
}
if ((width-left)>2) {
left+=(width-left)/2;
} else { left++; }
for (var i=0; i<(width-left); i++) {
scroller=scroller+" ";
}
if (left>=width) {
count+=2;
left=count*2;
}
if (count>=txt_len) {
count=0;
bub=1;
}
scroller=scroller+txt;
window.status=scroller;
}
setTimeout("scroll()",128);
}
-->
</script>
在 var showtxt="我在這裡我在這裡！看到了沒......^_^ 這個跑馬燈的字會兩個字兩個字顯示......最後還會閃爍喔！"; 中修改要顯示的文字
將以下程式碼複製，貼在插入<body >標籤裡面。
onLoad="scroll()" asp520520 發表在 痞客邦 留言(0) 人氣(15)