1 頁 (共 1 頁)

[求檔]連結變色的text.js

發表於 : 2003-12-07 19:32
sh85216s
iidx曾貼過
這個我覺得比較美觀,由一隻顏色變至令一顏色

下載
http://macauweb.net/phpbb/text.js

示範
http://macauweb.net
but 原始的連結已經斷線,是否有人願意在提供這個text.js檔?
期待著善心人士出現............

發表於 : 2003-12-07 21:10
messagebox

代碼: 選擇全部

<SCRIPT language=JavaScript><!-- Hide
var rate = 20;
var obj;
var act = 0;
var elmH = 0;
var elmS = 128;
var elmV = 255;
var clrOrg;
var TimerID;
if (navigator.appName.indexOf("Microsoft",0) != -1 && parseInt(navigator.appVersion) >= 4) {
Browser = true;
} else {
Browser = false;
}
if (Browser) {
document.onmouseover = doRainbowAnchor;
document.onmouseout = stopRainbowAnchor;
}
function doRainbow()
{
if (Browser && act != 1) {
act = 1;
obj = event.srcElement;
clrOrg = obj.style.color;
TimerID = setInterval("ChangeColor()",100);
}
}
function stopRainbow()
{
if (Browser && act != 0) {
obj.style.color = clrOrg;
clearInterval(TimerID);
act = 0;
}
}
function doRainbowAnchor()
{
if (Browser && act != 1) {
obj = event.srcElement;
while (obj.tagName != 'A' && obj.tagName != 'BODY') {
obj = obj.parentElement;
if (obj.tagName == 'A' || obj.tagName == 'BODY')
break;
}
if (obj.tagName == 'A' && obj.href != '') {
act = 1;
clrOrg = obj.style.color;
TimerID = setInterval("ChangeColor()",100);
}
}
}
function stopRainbowAnchor()
{
if (Browser && act != 0) {
if (obj.tagName == 'A') {
obj.style.color = clrOrg;
clearInterval(TimerID);
act = 0;
}
}
}
function ChangeColor()
{
obj.style.color = makeColor();
}
function makeColor()
{
if (elmS == 0) {
elmR = elmV; elmG = elmV; elmB = elmV;
}
else {
t1 = elmV;
t2 = (255 - elmS) * elmV / 255;
t3 = elmH % 60;
t3 = (t1 - t2) * t3 / 60;
if (elmH < 60) {
elmR = t1; elmB = t2; elmG = t2 + t3;
}
else if (elmH < 120) {
elmG = t1; elmB = t2; elmR = t1 - t3;
}
else if (elmH < 180) {
elmG = t1; elmR = t2; elmB = t2 + t3;
}
else if (elmH < 240) {
elmB = t1; elmR = t2; elmG = t1 - t3;
}
else if (elmH < 300) {
elmB = t1; elmG = t2; elmR = t2 + t3;
}
else if (elmH < 360) {
elmR = t1; elmG = t2; elmB = t1 - t3;
}
else {
elmR = 0; elmG = 0; elmB = 0;
}
}
elmR = Math.floor(elmR);
elmG = Math.floor(elmG);
elmB = Math.floor(elmB);
clrRGB = '#' + elmR.toString(16) + elmG.toString(16) + elmB.toString(16);
elmH = elmH + rate;
if (elmH >= 360)
elmH = 0;
return clrRGB;
}
// --></SCRIPT>

發表於 : 2003-12-07 21:22
sh85216s
這是七彩的,並不是我想要的那個!
因為七彩的太炫了,個人並不是很喜歡,還是覺得樸素點好,
不過還是謝謝你.

發表於 : 2003-12-10 23:28
依夢兒
試試官方釋出的 Fading Links ,這個比較不那麼花俏:
http://www.phpbb.com/phpBB/viewtopic.php?t=126192

Demo:http://www.nothingspecial.net/ilmt/phpBB2/index.php

發表於 : 2003-12-11 00:07
aiken
你看看這個可能是你要的
http://dob.tnc.edu.tw/themes/old/showPage.php?s=2387&t=

如果還是不滿意的話\r
http://dob.tnc.edu.tw/index.php
這個站裡面可以拿來用的網頁元件非常非常多
搜尋看看有沒有你要的效果然後在自己稍微修改就可以使用了

發表於 : 2003-12-11 15:53
sh85216s
謝謝二位!兩個都很棒!

發表於 : 2005-03-11 21:22
benny777ex
謝謝!!