/* Автор скрипта Норм Иридиум 2008 (с) */

var date=new Date();
 var month=date.getMonth()+1;
 var day=date.getDate();
 var today=new String(day+'.'+month);
 var lastday='';
 var dd = '';

//наполнение списка
var drusers = new Array ();
var k=0;
for (i = 0; i < l.length; i++) {
f2=l[i].split('¦¦');
if (f2.length!=1)
{
drusers[k]=l[i];
k=k+1;
}
}

//сортировка массива:
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 (a > b) {
c = drusers[i];
drusers[i] = drusers[j];
drusers[j] = c;

}
}
}

 //поиск именильников:
 for (var i=0;i<drusers.length;i++){

 udr=drusers[i].split('¦¦');
 mdr=udr[1].split('.');

 if (mdr[1]==month) {

 //кейс-транслит
str2 = udr[0];
str2 = str2.toLowerCase();
str2 = str2.replace(/ /g,'');
str2 = str2.replace(/а/g,'a');
str2 = str2.replace(/б/g,'d');
str2 = str2.replace(/в/g,'b');
str2 = str2.replace(/г/g,'r');
str2 = str2.replace(/д/g,'g');
str2 = str2.replace(/е/g,'e');
str2 = str2.replace(/ё/g,'e');
str2 = str2.replace(/ж/g,'s');
str2 = str2.replace(/з/g,'3');
str2 = str2.replace(/и/g,'i');
str2 = str2.replace(/й/g,'q');
str2 = str2.replace(/к/g,'k');
str2 = str2.replace(/л/g,'l');
str2 = str2.replace(/м/g,'m');
str2 = str2.replace(/н/g,'h');
str2 = str2.replace(/о/g,'o');
str2 = str2.replace(/п/g,'n');
str2 = str2.replace(/р/g,'p');
str2 = str2.replace(/с/g,'c');
str2 = str2.replace(/т/g,'t');
str2 = str2.replace(/у/g,'y');
str2 = str2.replace(/ф/g,'9');
str2 = str2.replace(/х/g,'x');
str2 = str2.replace(/ч/g,'z');
str2 = str2.replace(/ц/g,'u');
str2 = str2.replace(/ш/g,'w');
str2 = str2.replace(/щ/g,'v');
str2 = str2.replace(/ъ/g,'4');
str2 = str2.replace(/ы/g,'f');
str2 = str2.replace(/ь/g,'4');
str2 = str2.replace(/э/g,'8');
str2 = str2.replace(/ю/g,'0');
str2 = str2.replace(/я/g,'j');
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 (lastday!=mdr[0])
{

 if (mdr[0]==day)
 {dd=dd+'<b>'+mdr[0]+' '+mtxt+' - <a href="/?32-'+str2+'"><u>'+udr[0]+'</u></a></b>, '; }
 else
 {dd=dd+mdr[0]+' '+mtxt+' - <a href="/?32-'+str2+'"><u>'+udr[0]+'</u></a>, '; }

lastday=mdr[0];
}
else
{

 if (mdr[0]==day)
 {dd=dd+'<b><a href="/?32-'+str2+'"><u>'+udr[0]+'</u></a></b>, '; }
 else
 {dd=dd+'<a href="/?32-'+str2+'"><u>'+udr[0]+'</u></a>, '; }

}

 }

 }

 if (dd==''){
 dd='<b>В этом месяце именильников нет</b>';
 }
 else dd = '<b>В этом месяце празднуют свой ДР: </b>'+dd.substring(0,dd.length-2);

 dd += ';&nbsp;&nbsp;&nbsp;<a href="/?1-16-20-00000012-000-0-0"><u>Поздравить</u></a> | <a href="/?1-16-0-00000010-000-0-0"><u>Добавить себя</u></a>';

  document.getElementById('dr').innerHTML=dd;