Главная | Форум | Статьи | Фaйлы| Картинки WoW | Профиль | Регистрация | Вход

[ Новые сообщения · Правила форума · Поиск · RSS ]

WoW-Info — информационный World of Warcraft портал

[Java script]Фазы Луны - Форум

  • Сторінка 1 з 1
  • 1
[Java script]Фазы Луны
pro[100]DeadlyДата: Четвер, 30.12.2010, 00:37 | Сообщение # 1



pro[100]Deadly
Группа: Видалені

Замечания:






Следующее полнолуние через 20 дней

Содержимое этой таблицы поместите между <BODY> и </BODY>

Code
<SCRIPT LANGUAGE="JavaScript">
<!-- Original: James Thiele (mailto:jet@eskimo.com) -->

<!-- This script and many more are available free online at -->
<!-- The JavaScript Source!! http://javascript.internet.com -->

<!-- Begin

// Save the two necessary images from our example page at:
// http://messages.javascriptsource.com/moon-phases.html

var black = "black.gif";
var white = "white.gif";

var height=1;
var size = 50;
var i;
var currentDate = new Date();
var x = currentDate;
currentDate.setTime(currentDate.getTime() + (currentDate.getTimezoneOffset()*60000));
var blueMoonDate = new Date(96, 1, 3, 16, 15, 0);
var lunarPeriod = 29*(24*3600*1000) + 12*(3600*1000) + 44.05*(60*1000);
var moonPhaseTime = (currentDate.getTime() - blueMoonDate.getTime()) % lunarPeriod;
var percentRaw = (moonPhaseTime / lunarPeriod);
var percent = Math.round(100*percentRaw) / 100;
var percentBy2 = Math.round(200*percentRaw);
var left = (percentRaw >= 0.5) ? black : white;
var right = (percentRaw >= 0.5) ? white : black;
var time = Math.round((lunarPeriod-moonPhaseTime)/(24*3600*1000));

document.write("<center>");

if (percentBy2 > 100) {
percentBy2 = percentBy2 - 100;
}
for (i = -(size-1); i < size; ++i) {
var wid=2*parseFloat(Math.sqrt((size*size)-(i*i)));
if (percentBy2 != 100)
document.write ("<img src="+left +" height=1 width="+(wid*((100-percentBy2)/100))+">");
if (percentBy2 != 0)
document.write("<img src="+right+" height=1 width="+(wid*((percentBy2)/100))+">");
document.write("<br>");
}
document.write("<BR><FONT SIZE=4>Следующее полнолуние через ",time," ");
if (time == 1) document.write("день");
if (time == 2) document.write("дня");
if (time == 3) document.write("дня");
if (time == 4) document.write("дня");
if (time == 5) document.write("дней");
if (time == 6) document.write("дней");
if (time == 7) document.write("дней");
if (time == 8) document.write("дней");
if (time == 9) document.write("дней");
if (time == 10) document.write("дней");
if (time == 11) document.write("дней");
if (time == 12) document.write("дней");
if (time == 13) document.write("дней");
if (time == 14) document.write("дней");
if (time == 15) document.write("дней");
if (time == 16) document.write("дней");
if (time == 17) document.write("дней");
if (time == 18) document.write("дней");
if (time == 19) document.write("дней");
if (time == 20) document.write("дней");
if (time == 21) document.write("день");
if (time == 22) document.write("дня");
if (time == 23) document.write("дня");
if (time == 24) document.write("дня");
if (time == 25) document.write("дней");
if (time == 26) document.write("дней");
if (time == 27) document.write("дней");
if (time == 28) document.write("дней");
if (time == 29) document.write("дней");
if (time == 30) document.write("дней");
if (time == 31) document.write("день");
document.write("</font>");
// End -->
</script>  

Прикрепления: 0470844.png (0.5 Kb)
 
BelkmondeshДата: Вівторок, 05.04.2011, 16:52 | Сообщение # 2



Belkmondesh
Маршал
Группа: Пользователи
Сообщений: 968

Замечания:

Оффлайн
круть
 
TiTaN-WoWДата: Понеділок, 11.04.2011, 22:53 | Сообщение # 3



TiTaN-WoW
Чемпион
Группа: Пользователи
Сообщений: 442

Замечания:

Оффлайн
Бомбово=) А оно правду показывает?
 
  • Сторінка 1 з 1
  • 1
Пошук:

Новые сообщения в темах
Сдам в аренду сервер и хостинг · (Хост Предложения)
Автор: redlaine
Последнее сообщение в 23:53
хаха :D · (Приколы)
Автор: [N1ke]Medved
Последнее сообщение в 18:40
Autobattle - новый боевой бот ... · (Боты для WoW)
Автор: terrikon
Последнее сообщение в 18:39
PvE руководство для Чернокнижн... · (Чернокнижник)
Автор: Darkensand
Последнее сообщение в 18:38
Пустой свиток (Часть 11) · (Истории WoW)
Автор: R_a_Z_o_R
Последнее сообщение в 18:37
Друиды в Катаклизме: Официальн... · (Друид)
Автор: Darkensand
Последнее сообщение в 18:37
[Баг 3.3.5] Фарм ледяных бадже... · (Читы для WoW)
Автор: Darkensand
Последнее сообщение в 18:35
FarmBot (Бот для фарма руды и ... · (Боты для WoW)
Автор: homma
Последнее сообщение в 18:34
Почему мы сражаемся: ролевая и... · (Воин)
Автор: Darkensand
Последнее сообщение в 18:34
Книги по Wold of Warcraft · (Истории WoW)
Автор: R_a_Z_o_R
Последнее сообщение в 18:33
Маг огня в Cataclysm · (Маг)
Автор: Darkensand
Последнее сообщение в 18:33
Как начать играть в World of W... · (Полезно знать)
Автор: Belkmondesh
Последнее сообщение в 18:32
Характеризация профессий · (Профессии)
Автор: Darkensand
Последнее сообщение в 18:31
Что значит для арканов бета те... · (Маг)
Автор: Darkensand
Последнее сообщение в 18:31

Контакты Контакты Copyright WoW-Info — World of Warcraft портал © 2025 | Условия и правила использования ресурса | Реклама / Услуги
WoW-Info портал.World of Warcraft портал — готовые сервера, сайты, картинки, аддоны, патчи, читы, баги, mangos, ArcEmu, TrinityCore, Warcraft 3, новости, Cataclysm...
Яндекс.Метрика Хостинг від uCoz