マウスについてくる画像(星)

マウスについてくる画像(星)

マウスに星が付いてきます　星でなくても他の画像何でもＯＫ
マウスの動かし方によって　微妙にくねって　綺麗に動きます
マウスの先から徐々に大きくなる大きさは　適宜調整できます

※多分全ブラウザ動作可能と思います

テキストエリア内部をクリックするだけで　テキストエリアの中の文章を一発でコピーします
クリックした後それをそのままメモ帳などに貼り付け　適当な名前でHTMLで保存して下さい

Mac & Windows NetScapeでは反転のみですので反転の後Ctrl+Cキーでコピーして下さい

このスクリプトのソース

<html lang="ja">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=Shift_JIS">
<meta http-equiv="Content-Style-Type" content="text/css">
<meta http-equiv="Content-Script-Type" content="text/javascript"> 
<title>マウスについてくる画像(星)</title>
</head>
<body bgcolor="#000000" text="#ffffff" link="#f0ffff" vlink="#fff0f1">

<script language="JavaScript">
<!--http://myako.net/　ako's cyberpage
N6=document.getElementById;IE=document.all;
N4=document.layers;gaiti=new Array

/*■以下に"画像名",マウスから一番遠い位置の画像の横幅,縦,"画像名",マウスから次に遠い画像の横幅,縦,と言う順で書いていきます　カンマ区切りや”(ダブルクォーテ－ション)を間違わないように*/
("star004.gif",58,58,"star004.gif",45,45,"star003.gif",42,42,"star003.gif",34,34,"star003.gif",26,26,"star003.gif",18,18,"star004.gif",20,29,"star004.gif",15,15)
/*■ここまで画像名と大きさ*/

var mouseyoko=14//■マウスからの横の間隔　近すぎるとマウスにくっつきます
var mousetate=14//■マウスからの縦の間隔

//■以下弄らない
Sn=parseInt(gaiti.length/3)
okure=50;IE5fix1=0;IE5fix2=0;
migiE=IE? document.body.clientWidth-gaiti[1] : window.innerWidth-gaiti[1]-20
bottomedge=IE? document.body.scrollTop+document.body.clientHeight-gaiti[2] : window.pageYOffset+window.innerHeight-gaiti[2]
for (kazu=0;kazu<Sn;kazu++){
Tukuru("CUR"+kazu,kazu*10,kazu*10,kazu*3+1,kazu*3+2,"","<img src='"+gaiti[kazu*3]+"' width="+gaiti[(kazu*3+1)]+" height="+gaiti[(kazu*3+2)]+" border=0>")}
function Tukuru(Hosi,yokoiti,tateiti,haba,takasa,At,takasaT,oiti,St){
with (document){
write((!N6 && !IE) ? "<layer id='"+Hosi+"' left="+yokoiti+" top="+tateiti+" width="+haba+" height="+takasa : "<div id='"+Hosi+"'"+" style='position:absolute;left:"+yokoiti+"; top:"+tateiti+"; width:"+haba+"; height:"+takasa+"; ");
if(St){if (N4)
write(" style='");write(St+";' ")}
else write((N6 || IE)?"'":"");write((At)? At+">" : ">");
write((takasaT) ? takasaT : "");if (!oiti)
tozi(Hosi)}}
function tozi(){
document.write((N6 || IE)?"</div>":"</layer>")}
function yokoeru(Hosi){if (N6)
return parseInt(document.getElementById(Hosi).style.left)
else if (IE)
return parseInt(IE[Hosi].style.left)
else
return N4[Hosi].left}
function tateL(Hosi){if (N6)
return parseInt(document.getElementById(Hosi).style.top)
else if (IE)
return parseInt(IE[Hosi].style.top)
else
return N4[Hosi].top}
function MC(Hosi,Dyoko,Dtate){
DGS=(N6)? document.getElementById(Hosi).style : (IE)? IE[Hosi].style : (N4)? N4[Hosi] : "";
if (!IE){
migiE=window.innerWidth-gaiti[1]-20
bottomedge=window.pageYOffset+window.innerHeight-gaiti[2]}
DGS.left=Math.min(migiE, Dyoko+mouseyoko);
DGS.top=Math.min(bottomedge, Dtate+mousetate);}
function Sc(){
if (document.all&&window.print){
IE5fix1=document.body.scrollLeft;IE5fix2=document.body.scrollTop;}
for (kazu=0;kazu<(Sn-1);kazu++){
MC("CUR"+kazu,yokoeru("CUR"+(kazu+1)),tateL("CUR"+(kazu+1)))}}
function Siniti(e){
MC("CUR"+(Sn-1),(IE)?event.clientX+IE5fix1:e.pageX+2,(IE)?event.clientY+IE5fix2:e.pageY+2)}
function Lie(){
migiE=document.body.clientWidth-gaiti[1]
bottomedge=document.body.scrollHeight-gaiti[2]}
if (IE){
window.onload=Lie;window.onresize=Lie}
if(document.layers)
document.captureEvents(Event.MOUSEMOVE)
document.onmousemove=Siniti;setInterval("Sc()",okure)
//-->
</script>

<br><br>
ソースを開いて■から書かれているコメントに従って御自分用に書きなおして下さい<br>
スクリプトご使用の際は以下リンクをお入れください<br>
<a href="http://myako.net/" target="_top">Script by ako's cyberpage</a>
</body>
</html>

星は入っていません　必要な方はこれをＤＬ下さい
くれぐれもこのままここから引っ張らないで下さい　サーバがパンクしてしまいます
Script by ako's cyberpage