// Скрипт создан Семищенко С.А. (http://www.isety.net), все права принадлежат ему.

var Happyes=""
var TitleDay
var TxtPreHapy=""
var Lens = new Array()
var Fulld = new Date()
var PreDayCount=0

var Y=Fulld.getFullYear()
var M=Fulld.getMonth()
var D=Fulld.getDate()
var H=Fulld.getHours()
var N=Fulld.getDay()

var a=Y%19
var b=Y%4
var c=Y%7
var d=(19*a+15)%30
var e=(2*b+4*c+6*d+6)%7
if ((d+e)>=10) {
   var mn=3
   if (Y<2100) {ost=d+e-9+13} else {ost=d+e-9+14}
} else {
   var mn=2
   if (Y<2100) {ost=22+d+e+13} else {ost=22+d+e+14}
}
var Pasha=new Date(Y,mn,ost)

var NHld=0

var Clr = new Array()
Clr[0]="#FF0000"
Clr[1]="#FF8040"
Clr[2]="#FFFF80"
Clr[3]="#FFFF00"
Clr[4]="#80FF80"
Clr[5]="#80FF00"
Clr[6]="#00FF00"
Clr[7]="#00FF80"
Clr[8]="#80FFFF"
Clr[9]="#00FFFF"
Clr[10]="#004080"
Clr[11]="#0000FF"
Clr[12]="#000080"
Clr[13]="#0000A0"
Clr[14]="#FF80C0"
Clr[15]="#FF0080"
Clr[16]="#800080"
Clr[17]="#FF00FF"
Clr[18]="#8000FF"
Clr[19]="#FFFFFF"
Clr[20]="#C0C0C0"
Clr[21]="#808080"
Clr[22]="#808040"
Clr[23]="#800000"
Clr[24]="#400040"
Clr[25]="#000000"

function CheckHapy() {
  for (PreDayCount=0; PreDayCount<7; PreDayCount++) {
     FindHapy()
     D++
     Fulld.setDate(D)
     Y=Fulld.getFullYear()
     M=Fulld.getMonth()
     D=Fulld.getDate()
     H=Fulld.getHours()
     N=Fulld.getDay()
  }
  if (Happyes) {
     document.write("<div class='d1s'><h3 class='d1-h'>"+TitleDay+"</h3>"+Happyes+"</div>");
     for (i=0; i<NHld; i++) {
        setInterval("Mig("+Lens[i]+","+i+")",300)
     }
  }
  if (TxtPreHapy) {
     document.write("<div class='d1s'><h3 class='d1-h'>Наступает</h3><p>"+TxtPreHapy+"</p></div>")
  }
}

function FindHapy() {
//Переходящие Православные праздники
   var DP=Pasha.getDate()
   var MP=Pasha.getMonth()
   xD=new Date(Y,MP,DP-7)
   if (M==xD.getMonth() && D==xD.getDate()) {OutHapy('Вход Господень в Иерусалим (Вербное воскресенье)!',3,'')}
   xD=new Date(Y,MP,DP-55)
   yD=new Date(Y,MP,DP-49)
   pD=new Date(Y,M,D)
   if (pD>=xD && pD<yD) {OutHapy('Сырная (масленица)',3,'')}
   xD=new Date(Y,MP,DP-57)
   if (M==xD.getMonth() && D==xD.getDate()) {OutHapy('День поминовения всех усопших',3,'')}
   xD=new Date(Y,MP,DP-49)
   if (M==xD.getMonth() && D==xD.getDate()) {OutHapy('Прощенное воскресенье!',3,'')}
   xD=new Date(Y,MP,DP+9)
   if (M==xD.getMonth() && D==xD.getDate()) {OutHapy('Родительский день (Радоница)!',3,'')}
   xD=new Date(Y,MP,DP+39)
   if (M==xD.getMonth() && D==xD.getDate()) {OutHapy('Вознесение Господне!',3,'')}
   xD=new Date(Y,MP,DP+49)
   if (M==xD.getMonth() && D==xD.getDate()) {OutHapy('Троица (Пятидесятница)!',3,'')}
   xD=new Date(Y,MP,DP-1)
   if (M==xD.getMonth() && D==xD.getDate()) {OutHapy('Родительская суббота!',3,'')}
   xD=new Date(Y,MP,DP-2)
   if (M==xD.getMonth() && D==xD.getDate()) {OutHapy('Страстная пятница!',3,'')}
   xD=new Date(Y,MP,DP-3)
   if (M==xD.getMonth() && D==xD.getDate()) {OutHapy('Чистый четверг (пора красить яйца и печь куличи)!',3,'')}
   xD=new Date(Y,MP,DP-4)
   if (M==xD.getMonth() && D==xD.getDate()) {OutHapy('Страстная неделя!',3,'')}
   xD=new Date(Y,MP,DP-5)
   if (M==xD.getMonth() && D==xD.getDate()) {OutHapy('Страстная неделя!',3,'')}
   xD=new Date(Y,MP,DP-6)
   if (M==xD.getMonth() && D==xD.getDate()) {OutHapy('Страстная неделя!',3,'')}

   if (M==MP && D==DP) {OutHapy('Светлое Христово Воскресение (Пасха)!',3,'')}

//Январь
   if (M==0 && D>=1 && D<=2) {
      if (D==1 && H>=0 && H<=2) {
         OutHapy('С Новым годом!',2,'music/govoriat.mid')
      } else {
         OutHapy('С Новым, '+ Y +'-м Годом!',2,'music/govoriat.mid')
      }
   }
   if (M==0 && D>2 && D<7) {
      if (D==6 && H>=21) {
      } else {
         OutHapy('Поздравляем с Новым, '+ Y +'-м Годом!',1,'http://www.isety.net/music/snegopad.mid')
      }
   }
   if (M==0 && D==6 && H<21) {OutHapy('Рождественский сочельник!',1,'http://www.isety.net/music/jinglebells0.mid')}
   if (M==0 && D==6 && H>=21) {OutHapy('Счастливого Рождества!',1,'http://www.isety.net/music/jinglebells0.mid')}
   if (M==0 && D==7) {OutHapy('С Рождеством Христовым!!!',2,'http://www.isety.net/music/skazka.mid')}
   if (M==0 && D>7 && D<=9) {OutHapy('С Новым Годом и Рождеством!',1,'http://www.isety.net/music/christmasisatimetolove.mid')}
   if (M==0 && D>7 && D<=17) {OutHapy('Святки!',1,'')}
   if (M==0 && D==12) {OutHapy('День работника прокуратуры РФ.',1,'')}
   if (M==0 && D==13) {OutHapy('День российской печати.',1,'')}
   if (M==0 && D==14) {OutHapy('Обрезание Господне и память святителя Василия Великого!',3,'')}
   if (M==0 && D==13 && H>18 && Y<2101) {OutHapy('Наступает Старый Новый Год (по старому стилю)!',1,'')}
   if (M==0 && D==14 && Y<2101) {OutHapy('Старый Новый год!',1,'')}
   if (M==0 && D==14 && H>18 && Y>2100) {OutHapy('Наступает Старый Новый Год (по старому стилю)!',1,'')}
   if (M==0 && D==15 && Y>2100) {OutHapy('Старый Новый год!',1,'')}
   if (M==0 && D==18) {OutHapy('Крещенский сочельник (Навечерие Богоявления).',3,'')}
   if (M==0 && D==19) {OutHapy('Крещение Господне (Богоявление)!',3,'')}
   if (M==0 && D==21) {OutHapy('День инженерных войск.',1,'')}
   if (M==0 && D==25) {OutHapy('Татьянин день.',1,'http://www.isety.net/music/tatden.mid')}
   if (M==0 && D==27) {OutHapy('День снятия блокады с Ленинграда.',1,'')}
//Февраль
   if (M==1 && D==2) {OutHapy('Победа в Сталинградской битве!',1,'')}
   if (M==1 && D==2) {OutHapy('День сурка. Будте бдительны!',1,'')}
   if (M==1 && D==8) {OutHapy('День российской науки.',1,'')}
   if (M==1 && D==14) {OutHapy('День святого Валентина.',1,'')}
   if (M==1 && D==15) {OutHapy('Сретение Господне!',3,'')}
   if (M==1 && D==17) {OutHapy('День рождения Бахарева Дмитрия Борисовича',3,'')}
   if (M==1 && D==23) {OutHapy('С днем защитника Отечества!',2,'')}
//Март
   if (M==2 && D==7) {OutHapy('С наступающим праздником, милые Женщины!',1,'')}
   if (M==2 && D==8) {OutHapy('Поздравляем милые создания с лучшим днем весны!',2,'http://www.isety.net/music/lovemetendertrue.mid')}
   if (M==2 && D==21) {OutHapy('Весеннее Равноденствие.',1,'')}
   if (M==2 && D==27) {OutHapy('День внутренних войск МВД.',1,'')}
   if (M==2 && N==0) {
      xD=new Date(Y,M,D-7)
      yD=new Date(Y,M,D-14)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День работников геодезии и картографии.',1,'')}
   }
   if (M==2 && N==0) {
      xD=new Date(Y,M,D-14)
      yD=new Date(Y,M,D-21)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День работников торговли, бытового обслуживания населения и ЖКХ.',1,'')}
   }
//Апрель
   if (M==3 && D==1) {OutHapy('День смеха и дурака!',1,'')}
   if (M==3 && D==2) {OutHapy('День единения народов.',1,'')}
   if (M==3 && D==7) {OutHapy('Благовещение Пресвятой Богородицы!',3,'')}
   if (M==3 && D==12) {OutHapy('День космонавтики.',1,'')}
   if (M==3 && D==18) {OutHapy('Победа Александра Невского на Чудском озере.',1,'')}
   if (M==3 && D==26) {OutHapy('День памяти погибших в радиационных авариях и катастрофах.',0,'')}
   if (M==3 && D==30) {OutHapy('День пожарной охраны.',1,'')}
   if (M==3 && N==0) {
      xD=new Date(Y,M,D+7)
      yD=new Date(Y,M,D-7)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День геолога.',1,'http://www.isety.net/music/plane.mid')}
   }
   if (M==3 && N==0) {
      xD=new Date(Y,M,D-7)
      yD=new Date(Y,M,D-14)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День войск ПВО.',1,'')}
   }
   if (M==3 && N==0) {
      xD=new Date(Y,M,D-14)
      yD=new Date(Y,M,D-21)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День науки.',1,'')}
   }
//Май
   if (M==4 && D==1) {OutHapy('Праздник весны и труда!',2,'')}
   if (M==4 && D==2) {OutHapy('Мир! Труд! Май!',1,'')}
   if (M==4 && D==7) {OutHapy('День радио.',1,'')}
   if (M==4 && D==9) {OutHapy('Поздравляем с днем Победы!',2,'http://www.isety.net/music/denpobedi.mid')}
   if (M==4 && D==24) {OutHapy('День славянской письменности и культуры.',1,'')}
   if (M==4 && D==25) {OutHapy('Последний звонок!',1,'')}
   if (M==4 && D==27) {OutHapy('Общероссийский день библиотек.',1,'')}
   if (M==4 && D==28) {OutHapy('День пограничника.',1,'')}
   if (M==4 && N==0) {
      xD=new Date(Y,M,D-21)
      yD=new Date(Y,M,D+7)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День химика.',1,'')}
   }
//Июнь
   if (M==5 && D==1) {OutHapy('День защиты детей.',1,'')}
   if (M==5 && D==6) {OutHapy('Пушкинский день России.',1,'')}
   if (M==5 && D==7) {OutHapy('Иванов день (Ивана Купала). Начало купального сезона.',1,'')}
   if (M==5 && D==8) {OutHapy('День социального работника.',1,'')}
   if (M==5 && D==12) {OutHapy('День принятия Декларации о государственном суверенитете РФ.',2,'http://www.isety.net/music/gimnrossii.mid')}
   if (M==5 && D==22) {OutHapy('День памяти и скорби.',0,'')}
   if (M==5 && D==22) {OutHapy('День летнего Солнцестояния.',1,'')}
   if (M==5 && D==20) {OutHapy('Выпускные вечера!',1,'')}
   if (M==5 && D==27) {OutHapy('День молодежи.',1,'')}
   if (M==5 && N==0) {
      xD=new Date(Y,M,D-7)
      yD=new Date(Y,M,D-14)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День работников легкой промышленности.',1,'')}
   }
   if (M==5 && N==0) {
      xD=new Date(Y,M,D-14)
      yD=new Date(Y,M,D-21)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День медицинского работника.',1,'http://www.isety.net/music/ljudivbelihhalatah.mid')}
   }
   if (M==5 && N==6) {
      xD=new Date(Y,M,D-21)
      yD=new Date(Y,M,D+7)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День изобретателя и рационализатора.',1,'')}
   }
//Июль
   if (M==6 && D==4) {OutHapy('День независимости в США.',1,'http://www.isety.net/music/kalinkamalinka.mid')}
   if (M==6 && D==7) {OutHapy('Рождество Иоанна Предтечи!',3,'')}
   if (M==6 && D==10) {OutHapy('Победа в Полтавском сражении.',1,'')}
   if (M==6 && D==12) {OutHapy('День святых первоверховных апостолов Петра и Павла!',3,'')}
   if (M==6 && N==0) {
      xD=new Date(Y,M,D+7)
      yD=new Date(Y,M,D-7)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День работников морского и речного транспорта.',1,'')}
   }
   if (M==6 && N==0) {
      xD=new Date(Y,M,D-7)
      yD=new Date(Y,M,D-14)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День рыбака.',1,'')}
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День российской почты.',1,'')}
   }
   if (M==6 && N==0) {
      xD=new Date(Y,M,D-14)
      yD=new Date(Y,M,D-21)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День металлурга.',1,'')}
   }
   if (M==6 && N==0) {
      xD=new Date(Y,M,D-21)
      yD=new Date(Y,M,D+7)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День ВМФ.',1,'')}
   }
//Август
   if (M==7 && D==2) {OutHapy('Ильин день. Окончание купального сезона. День ВДВ.',1,'')}
   if (M==7 && D==6) {OutHapy('День железнодорожных войск России.',1,'')}
   if (M==7 && D==9) {OutHapy('День первой морской победы России.',1,'')}
   if (M==7 && D==12) {OutHapy('День ВВС.',1,'')}
   if (M==7 && D==19) {OutHapy('Преображение Господне! (Яблочный спас)',3,'')}
   if (M==7 && D==22) {OutHapy('День Государственного флага России.',1,'http://www.isety.net/music/gimnrossii.mid')}
   if (M==7 && D==23) {OutHapy('Победа в Курской битве (1943г.).',1,'')}
   if (M==7 && D==27) {OutHapy('День кино.',1,'')}
   if (M==7 && D==28) {OutHapy('Успение Пресвятой Богородицы!',3,'')}
   if (M==7 && N==0) {
      xD=new Date(Y,M,D+7)
      yD=new Date(Y,M,D-7)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День железнодорожника.',1,'')}
   }
   if (M==7 && N==0) {
      xD=new Date(Y,M,D-7)
      yD=new Date(Y,M,D-14)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День строителя.',1,'')}
   }
   if (M==7 && N==0) {
      xD=new Date(Y,M,D-14)
      yD=new Date(Y,M,D-21)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День Воздушного Флота России.',1,'')}
   }
   if (M==7 && N==0) {
      xD=new Date(Y,M,D-21)
      yD=new Date(Y,M,D+7)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День шахтера.',1,'')}
   }
//Сентябрь
   if (M==8 && D==6) {OutHapy('День памяти Бахарева Дмитрия Борисовича (17.02.1967-06.09.2004).',0,'');PreDayCount=10;return}
   if (M==8 && D==1) {OutHapy('День знаний.',1,'')}
   if (M==8 && D==8) {OutHapy('Бородинская битва (1812г.).',1,'')}
   if (M==8 && D==11) {OutHapy('Победа Ушакова над турецкой эскадрой.',1,'')}
   if (M==8 && D==11) {OutHapy('Усекновение главы Иоанна Предтечи',3,'')}
   if (M==8 && D==21) {OutHapy('Победа в Куликовской битве (1380г.).',1,'')}
   if (M==8 && D==21) {OutHapy('Рождество Пресвятой Богородицы!',3,'')}
   if (M==8 && D==23) {OutHapy('Осеннее Равноденствие.',1,'')}
   if (M==8 && D==27) {OutHapy('Воздвижение Креста Господня',3,'')}
   if (M==8 && N==0) {
      xD=new Date(Y,M,D+7)
      yD=new Date(Y,M,D-7)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День работников нефтяной и газовой промышленности.',1,'')}
   }
   if (M==8 && N==0) {
      xD=new Date(Y,M,D-7)
      yD=new Date(Y,M,D-14)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День танкистов.',1,'')}
   }
   if (M==8 && N==0) {
      xD=new Date(Y,M,D-14)
      yD=new Date(Y,M,D-21)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День работников леса.',1,'')}
   }
   if (M==8 && N==0) {
      xD=new Date(Y,M,D-21)
      yD=new Date(Y,M,D+7)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День машиностроителя.',1,'')}
   }
//Октябрь
   if (M==9 && D==1) {OutHapy('День пожилых людей.',1,'')}
   if (M==9 && D==4) {OutHapy('День Военно-космических сил.',1,'')}
   if (M==9 && D==5) {OutHapy('День учителя.',1,'')}
   if (M==9 && D==14) {OutHapy('Покров Пресвятой Богородицы!',3,'')}
   if (M==9 && D==25) {OutHapy('День таможенника РФ.',1,'')}
   if (M==9 && D==30) {OutHapy('День памяти жертв политических репрессий.',0,'')}
   if (M==9 && D==31) {OutHapy('Католический канун дня всех святых - Хэллоуин.',1,'')}
   if (M==9 && N==0) {
      xD=new Date(Y,M,D-7)
      yD=new Date(Y,M,D-14)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День работников сельского хозяйства и перерабатывающей промышленности.',1,'')}
   }
   if (M==9 && N==0) {
      xD=new Date(Y,M,D-14)
      yD=new Date(Y,M,D-21)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День работников дорожного хозяйства.',1,'')}
   }
   if (M==9 && N==0) {
      xD=new Date(Y,M,D-21)
      yD=new Date(Y,M,D+7)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День работников автомобильного транспорта.',1,'')}
   }
//Ноябрь
   if (M==10 && D==7) {OutHapy('День согласия и примирения.',1,'')}
   if (M==10 && D==4) {OutHapy('Освобождение Москвы Мининым и Пожарским (1612г.). День народного единения.',2,'')}
   if (M==10 && D==10) {OutHapy('День милиции.',1,'http://www.isety.net/music/NasaSlujba.mid')}
   if (M==10 && D==21) {OutHapy('День работников налоговых органов РФ.',1,'')}
   if (M==10 && N==0) {
      xD=new Date(Y,M,D-14)
      yD=new Date(Y,M,D-21)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День ракетных войск и артиллерии.',1,'')}
   }
   if (M==10 && N==0) {
      xD=new Date(Y,M,D-21)
      yD=new Date(Y,M,D+7)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День матери.',1,'')}
   }
//Декабрь
   if (M==11 && D==1) {OutHapy('День победы Нахимова над турецкой эскадрой.',1,'')}
   if (M==11 && D==4) {OutHapy('Введение во Храм Пресвятой Богородицы!',3,'')}
   if (M==11 && D==5) {OutHapy('День начала контрнаступления советских войск против немецко-фашистских войск в битве под Москвой (1941г.).',1,'')}
   if (M==11 && D==12) {OutHapy('День Конституции РФ!',1,'http://www.isety.net/music/gimnrossii.mid')}
   if (M==11 && D==17) {OutHapy('День РВСН.',1,'')}
   if (M==11 && D==20) {OutHapy('День Чекиста.',1,'')}
   if (M==11 && D==24) {OutHapy('День взятия турецкой крепости Измаил русскими войсками под командованием А.В.Суворова (1790г.).',1,'')}
   if (M==11 && D>20) {OutHapy('С наступающим Новым Годом!',1,'http://www.isety.net/music/vlesurodilaselohka.mid')}
   if (M==11 && D==22) {OutHapy('День зимнего Солнцестояния',1,'')}
   if (M==11 && D==25) {OutHapy('С католическим Рождеством!',1,'http://www.isety.net/music/christmasisatimetolove.mid')}
   if (M==11 && D==27) {OutHapy('День спасателя.',1,'')}
   if (M==11 && D==31) {OutHapy('Новогодний сочельник!',1,'http://www.isety.net/music/novogodnaa.mid')}
   if (M==11 && D==31 && H>17 && H<22) {OutHapy('Уходит старый год.',1,'')}
   if (M==11 && D==31 && H>=22) {OutHapy('Счастливого нового года!',1,'')}
   if (M==11 && N==0) {
      xD=new Date(Y,M,D-14)
      yD=new Date(Y,M,D-21)
      if (xD.getMonth()==M && yD.getMonth()!=M) {OutHapy('День энергетика.',1,'')}
   }

}

function OutHapy(TxtHapy,LevelHapy,MusicHapy) {
/*LevelHapy=0 - День памяти
1 - Обычный день
2 - Красный день
3 - Церковный праздник
*/
if (PreDayCount==0) {
   if (MusicHapy!="") {window.document.all.sn.src=MusicHapy}
   if (LevelHapy==0) {
      document.write("<div class='d1'><h3>День памяти</h3><font size='6'><b>"+TxtHapy+"</b></font></div>");
      return;
   }
   var Spl=""

   if (TitleDay) {TitleDay="Праздники"}
   if (LevelHapy==1 && !TitleDay) {TitleDay="Отмечаем"}
   if (LevelHapy==2 && !TitleDay) {TitleDay="Праздник"}
   if (LevelHapy==3 && !TitleDay) {TitleDay="Православный праздник"}

   for (i=0; i<=TxtHapy.length; i++) {
      ClrNum=Math.round(Math.random()*25)
      Spl+="<font id='hpy" + NHld + "-" + i + "' color='" + Clr[ClrNum] + "'>" + TxtHapy.charAt(i) + "</font>"
   }

   Ln=TxtHapy.length
   if (LevelHapy==1) {Happyes+="<p align='center'><font size='6'><b>"+Spl+"</b></font></p>"}
   if (LevelHapy==2) {Happyes+="<div align='center'><center><table border='1' cellpadding='0' class='mn1' cellspacing='0' bgcolor='red' bordercolor='red' bordercolordark='red' bordercolorlight='red'><tr><td align='center' class='mn1'><font size='6'><b>"+Spl+"</b></font></td></tr></table></center></div>"}
   if (LevelHapy==3) {
      Spl=""
      ClrNum=Math.round(Math.random()*25)
      Spl+="<font id='hpy" + NHld + "-0' color='" + Clr[ClrNum] + "'>" + TxtHapy + "</font>"      
      Happyes+="<p align='center'><font size='6'><b>"+Spl+"</b></font></p>"
      Ln=0
   }

   Lens[NHld]=Ln
   NHld++
} else {
   if (LevelHapy==0) {
       TxtPreHapy+="<b>"+Fulld.toLocaleDateString()+"</b>"+" <font color='black'>"+TxtHapy+"</font><br>"
   }
   if (LevelHapy==1) {
       TxtPreHapy+="<b>"+Fulld.toLocaleDateString()+"</b>"+" <font color='green'>"+TxtHapy+"</font><br>"
   }
   if (LevelHapy==2) {
       TxtPreHapy+="<b>"+Fulld.toLocaleDateString()+"</b>"+" <font color='red'>"+TxtHapy+"</font><br>"
   }
   if (LevelHapy==3) {
       TxtPreHapy+="<b>"+Fulld.toLocaleDateString()+"</b>"+" <font color='blue'>"+TxtHapy+"</font><br>"
   }
}

}

function Mig(Len,Pre) {

   for (i=0; i<=Len; i++) {
      ClrNum=Math.round(Math.random()*25)
      IdObj="hpy"+Pre+"-"+i
      document.all[IdObj].style.color=Clr[ClrNum]
   }
}