Евпаторийское отделение КСУ
Меню сайта
Категории каталога
Мои файлы [4]
Наш опрос
Чем Вы кормите свою собаку?
Всего ответов: 104
Главная » Файлы » Мои файлы

падающий снег
[ ] 29.11.2009, 02:54
<script language="javascript1.2">

  grphcs=new Array(2);

Image0=new Image();

Image0.src=grphcs[0]="http://www.mastersite.org.ua/uploaded_images/sneg1.gif";

Image1=new Image();

Image1.src=grphcs[1]="http://www.mastersite.org.ua/uploaded_images/sneg2.gif";

  Amount=15;

Ypos=new Array();

Xpos=new Array();

Speed=new Array();

Step=new Array();

Cstep=new Array();

ns=(document.layers)?1:0;

ns6=(document.getElementById&&!document.all)?1:0;

  if (ns){

for (i = 0; i < Amount; i++){

var P=Math.floor(Math.random()*grphcs.length);

rndPic=grphcs[P];

document.write("<LAYER NAME='sn"+i+"' LEFT=0 TOP=0><img src="+rndPic+"></LAYER>");

}

}

else{

document.write('<div style="position:absolute;top:0px;left:0px"><div style="position:relative">');

for (i = 0; i < Amount; i++){

var P=Math.floor(Math.random()*grphcs.length);

rndPic=grphcs[P];//osw

document.write('<img id="si'+i+'" src="'+rndPic+'" style="position:absolute;top:0px;left:0px">');

}

document.write('</div></div>');

}

WinHeight=600;

WinWidth=(ns||ns6)?window.innerWidth-70:window.document.body.clientWidth;

for (i=0; i < Amount; i++){

  Ypos[i] = Math.round(Math.random()*WinHeight);

  Xpos[i] = Math.round(Math.random()*WinWidth);

  Speed[i]= 1.2;

  Cstep[i]=0;

  Step[i]=Math.random()*0.1+0.2;

}

function fall(){

var WinHeight=600;

var WinWidth=(ns||ns6)?window.innerWidth-70:window.document.body.clientWidth;

var hscrll=(ns||ns6)?window.pageYOffset:document.body.scrollTop;

var wscrll=(ns||ns6)?window.pageXOffset:document.body.scrollLeft;

for (i=0; i < Amount; i++){

sy = Speed[i]*Math.sin(90*Math.PI/180);

sx = Speed[i]*Math.cos(Cstep[i]);

Ypos[i]+=sy;

Xpos[i]+=sx;

if (Ypos[i] > WinHeight){

Ypos[i]=-60;

Xpos[i]=Math.round(Math.random()*WinWidth);

Speed[i]=1;

}

if (ns){

document.layers['sn'+i].left=Xpos[i];

document.layers['sn'+i].top=Ypos[i]+hscrll;

}

else if (ns6){

document.getElementById("si"+i).style.left=Math.min(WinWidth,Xpos[i]);

document.getElementById("si"+i).style.top=Ypos[i]+hscrll;

}

else{

eval("document.all.si"+i).style.left=Xpos[i];

eval("document.all.si"+i).style.top=Ypos[i]+hscrll;

}

Cstep[i]+=Step[i];

}

setTimeout('fall()',40);

}

  window.onload=fall

//-->

</script>
Категория: Мои файлы | Добавил: администратор
Просмотров: 541 | Загрузок: 0 | Рейтинг: 0.0/0 |
Всего комментариев: 0
Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]
Форма входа
Поиск
Друзья сайта
КИНОЛОГИЧЕСКИЙ СОЮЗ УКРАИНЫ. Официальный сайт Общение членов Кинологического Союза Украины на любые темы Евпатория в Интернет - каталог сайтов Евпатории Питомник Gold Schaferhund Многопородный п/з
Статистика

Онлайн всего: 1
Гостей: 1
Пользователей: 0
Copyright MyCorp © 2024
Создать бесплатный сайт с uCoz