/*
linkinfo.js
released on 200211232355 
last modified on 200405131902
script written by Mugi (mugi@wa2.so-net.ne.jp)
*/
if(document.all&&!document.getElementById){document.getElementById=new Function("id","return document.all(id)")}
function linkinfo(){
if(document.all||document.getElementById||document.layers){
var msg='',pos=null,lay='linkinfolayer',doc=document,a=(navigator.userAgent.indexOf("MSIE 4")!=-1?10:self.opera||navigator.userAgent.indexOf("Safari")!=-1?'auto':0),ev=arguments[arguments.length-1]
var macie=(document.all&&navigator.userAgent.indexOf("Mac")!=-1)
if(arguments.length>0){
if(arguments.length%2==0&&typeof(ev)!="object"){
doc=parent.frames[arguments[0]].document
msg=arguments[1]
}else{
msg=arguments[0]
}
var v=true
var i=msg.indexOf('::')
if(i!=-1){
lay=msg.substring(0,i)
msg=msg.substring(i+2)
}
msg=msg.replace(/\n/g,'<br>')
if(msg==''){msg='&nbsp;';v=false}
if(window.linkinfo_css){
msg=('<%tag% style="'+(self.opera?'position:absolute;':'')+'width:'+a+';'+linkinfo_css+'"><nobr>'+msg+'</nobr></%tag%>').replace(/%tag%/g,macie||navigator.userAgent.indexOf("rv:1.")!=-1?"span":"div")
}else{
msg='<nobr>'+msg+'</nobr>'
}
}
if(arguments.length>=3){
pos=new Array(arguments[arguments.length-2-(typeof(ev)=="object"?1:0)],arguments[arguments.length-1-(typeof(ev)=="object"?1:0)])
if(typeof(ev)=="object"){
pos[0]+=document.all?ev.clientX+document.body.scrollLeft:ev.pageX
pos[1]+=document.all?ev.clientY+document.body.scrollTop:ev.pageY
}
}
var lay=doc.getElementById?doc.getElementById(lay):doc.layers?doc.layers[lay]:null
if(lay){
if(document.getElementById){
if(navigator.userAgent.indexOf("Gecko")!=-1){var e=lay;while(e){if(e.tagName=="TABLE"){a="100%";break};e=e.parentNode}}
lay.style.zIndex=200
if(macie){
window._doc=doc
setTimeout("with(_doc.all."+lay.id+"){style.height=scrollHeight;style.width=scrollWidth}",0)
while(lay.childNodes.length)lay.removeChild(lay.childNodes[0])
var e=doc.createElement("span")
e.innerHTML=msg
lay.appendChild(e)
}else{
lay.innerHTML=msg
}
lay.style.width=a
lay.style.textAlign="left"
if(pos){
lay.style.left=pos[0]
lay.style.top=pos[1]
}
lay.style.visibility=v?"inherit":"hidden"
}else
if(document.layers){
var bgc=new RegExp("background-color:([^;]+);","i")
var bgi=new RegExp("(background-image:url\\(([^;]+)\\);)","i")
if(window.linkinfo_css&&linkinfo_css.match(bgc)){d="$1";lay.bgColor=RegExp[d]}
if(window.linkinfo_css&&linkinfo_css.match(bgi)&&arguments.length%2!=0){d="$1";msg=msg.substring(0,msg.indexOf(RegExp[d]))+msg.substring(msg.indexOf(RegExp[d])+RegExp[d].length);d="$2";lay.background.src=RegExp[d]}
lay.document.layers[0].document.open()
lay.document.layers[0].document.write(msg)
lay.document.layers[0].document.close()
lay.clip.width=lay.document.layers[0].document.width
lay.clip.height=lay.document.layers[0].document.height
if(pos){
lay.moveTo(pos[0],pos[1])
}
lay.visibility=v?"inherit":"hide"
}
}
}
}

