一直闪烁变色的超级链接代码

时间：2008-02-27 13:08:00　

Dreamweaver中一直变色的超级链接，css+javascript实现超级链接变色，当鼠标移动到链接上时，链接的颜色不停闪烁变色。

　<HTML><HEAD><STYLE type=text/css>.STYLE5 { FONT-WEIGHT: bold; FONT-SIZE: 13px; COLOR: #ff0000}.STYLE7 { FONT-SIZE: 14px}a:link { color: #0066CC; text-decoration: none;}a:visited { text-decoration: none; color: #0066CC;}a:hover { text-decoration: none;}a:active { text-decoration: none;}</STYLE></HEAD><BODY text=#000000 leftMargin=0> <SCRIPT language=javascript>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> <DIV class="STYLE5 STYLE7" align=center><A href="https://www.aspxhome.com/">asp之家</A></DIV></HTML>

标签：链接,css,javascript

投稿

一直闪烁变色的超级链接代码

猜你喜欢

python实现循环语句1到100累和

实例详解Python中的numpy.abs和abs函数

JS阻止事件冒泡的方法详解

Python中常见的数制转换有哪些

使用python的chardet库获得文件编码并修改编码

JS实现课程表小程序(仿超级课程表)加入自定义背景功能

SQL文本字段的数字排序问题

Python即时网络爬虫项目启动说明详解

Python matplotlib读取excel数据并用for循环画多个子图subplot操作

Python中.py程序在CMD控制台以指定虚拟环境运行

asp之自动闭合HTML/ubb标签函数+简单注释

Mysql中日期和时间函数介绍

Python实现的读写json文件功能示例

从算法入手讲解SQL Server的典型示例

python版本的仿windows计划任务工具

asp文章中随机插入网站版权文字的实现代码

深入理解Python中range和xrange的区别

基于 Dubbo Admin 动态调整服务超时时间的操作步骤

Flask 使用类组织配置详情

Mysql实现定时清空一张表的旧数据并保留几条数据(推荐)