鼠标触发链接产生跑马灯效果的提示代码

　　烈火网(LieHuo.Net)教程 走马灯效果的链接提示，将鼠标放在链接上，不必点击即可看到跑马灯效果的文字提示，当然将鼠标移开链接后，提示自动消失。大家的需求不一样，因此可能有朋友会喜欢这样的链接提示，用到的话，再好好美化一下，其实效果还是不错的。

<title>走马灯效果的链接提示</title> <center> <a href="#" _fcksavedurl="#" class="link" onmouseover="javascript:reset();Scroll('prem_hint');" onmouseout="javascript:StopScroll('prem_hint');">鼠标放过来~</a> </center> <div id="prem_hint" style="position:relative; visibility:hidden;color:FF9900" class="prem_hint">烈火网，关注站长，建设互联网！</div> <SCRIPT LANGUAGE="JavaScript"> window.onerror = null; var bName = navigator.appName; var bVer = parseInt(navigator.appVersion); var NS4 = (bName == "Netscape" && bVer >= 4); var IE4 = (bName == "Microsoft Internet Explorer" && bVer >= 4); var NS3 = (bName == "Netscape" && bVer < 4); var IE3 = (bName == "Microsoft Internet Explorer" && bVer < 4); var scroll_length = 150; var time_length =50; var begin_pos = 200; var i; var j; if (NS4 || IE4) { if (navigator.appName == "Netscape") { layerStyleRef="layer."; layerRef="document.layers"; styleSwitch=""; }else{ layerStyleRef="layer.style."; layerRef="document.all"; styleSwitch=".style"; } } function Scroll(layerName){ if (NS4 || IE4) { if (NS4 || IE4) { if(i<(begin_pos+scroll_length)){ eval(layerRef+'["'+layerName+'"]'+ styleSwitch+'.visibility="visible"'); eval(layerRef+'["'+layerName+'"]'+ styleSwitch+'.left="'+i+'"'); i++; j++; if(i==j){ setTimeout("Scroll('"+layerName+"')",time_length);} } } } } function StopScroll(layerName) { i=begin_pos+scroll_length; eval(layerRef+'["'+layerName+'"]'+ styleSwitch+'.left="'+i+'"'); hideLayer(layerName); } function reset() { i=begin_pos; j=i; } function hideLayer(layerName){ if (NS4 || IE4) { eval(layerRef+'["'+layerName+'"]'+ styleSwitch+'.visibility="hidden"'); } } </script><br /><center>如不能显示效果，请按Ctrl+F5刷新本页，更多网页代码：<a href='http://www.veryhuo.com/' _fcksavedurl='http://www.veryhuo.com/' target='_blank'>http://www.veryhuo.com/</a></center>
提示：可修改后代码再运行!