ألوان تتبع الماوس

طريقة التركيب

1- انسخ هذا الكود و ضعه في منطقة HEAD

2- انسخ هذه الأكواد و ضعها بعد BODY

<!--  Begin
// Original:  freeware.de
// Web Site:  http://freeware.de 
// MSIE Fix by:  Kurt Grigg (kurt.grigg@virgin.net)
/* Visit our site at http://www.myarabvideos.com/ for more code
* This notice must stay intact for use */

function MoveHandler(){
Xpos = document.body.scrollLeft + event.x;
Ypos = document.body.scrollTop + event.y;
}

function xMoveHandler(evnt) {
Xpos = evnt.pageX;
Ypos = evnt.pageY;
}

if (document.layers) {
window.captureEvents(Event.MOUSEMOVE);
}
var yBase = 200;
var xBase = 200;
var yAmpl = 10;
var yMax = 40;
var step = .2;
var ystep = .5;
var currStep = 0;
var tAmpl=1;
var Xpos = 1;
var Ypos = 1;
var i = 0;
var j = 0;
if (document.all) {
document.onmousemove = MoveHandler;
}
else if (document.layers) {
window.onMouseMove = xMoveHandler;
}
function animateLogo() {
if (document.all) {
yBase = window.document.body.offsetHeight / 4;
xBase = window.document.body.offsetWidth / 4;
}
else if (document.layers) {
yBase = window.innerHeight / 4;
xBase = window.innerWidth / 4;
}
if (document.all) {
for (i = 0 ; i < starsDiv.all.length; i++) {
starsDiv.all[i].style.top = Ypos + Math.cos((20*Math.sin(currStep/20))+i*70)*yBase*(Math.sin(10+currStep/10)+0.2)*Math.cos((currStep + i*25)/10);
starsDiv.all[i].style.left = Xpos + Math.sin((20*Math.sin(currStep/20))+i*70)*xBase*(Math.sin(10+currStep/10)+0.2)*Math.cos((currStep + i*25)/10);
   }
}
else if (document.layers) {
for (j = 0; j < 7; j++) { //7 is number of NS layers!
var templayer="a" + j;
document.layers[templayer].top = Ypos + Math.cos((20*Math.sin(currStep/20))+j*70)*yBase*(Math.sin(10+currStep/10)+0.2)*Math.cos((currStep + j*25)/10);
document.layers[templayer].left =Xpos + Math.sin((20*Math.sin(currStep/20))+j*70)*xBase*(Math.sin(10+currStep/10)+0.2)*Math.cos((currStep + j*25)/10);
   }
}
currStep += step;
setTimeout("animateLogo()", 10);
}
animateLogo();
// End -->
</script>

أغلق هذه الصفحة

الفيديو العربي مكتبة الجافا بلوتوث ناعم العود شبكة الوتر دليل المواقع عالم البلوتوث افضل عشر مواقع قمة المواقع