/* (c) Holger Oertel MM ... MMVII */
var e = "?";
var browser_test = "Micr";
var browser = navigator.appName.slice(0,4);
var empire_offset = new Array(0,3,10);
var roman_f = new Array ("","I","II","III","IV","V","VI","VII","VIII","IX","X","XI","XII","XIII","XIV","XV");
var roman_1 = new Array ("","I","II","III","IIII","V","VI","VII","VIII","IX");
var roman_10 = new Array ("","X","XX","XXX","XL","L","LX","LXX","LXXX","XC");
var roman_100 = new Array ("","C","CC","CCC","CD","D","DC","DCC","DCCC","CM");
var roman_months = new Array
("DEC.","IAN.","FEB.","MAR.","APR.","MAI.","IVN.","IVL.","AVG.","SEP.","OCT.","NOV.","DEC.");
var mayan_day = new Array ("Imix","Ik","Akbal","Kan","Chicchan","Cimi","Manik","Lamat","Muluc","Oc","Chuen","Eb","Ben","Ix","Men","Cib","Caban","Eznab","Cauac","Ahau");
var mayan_month = new Array
("Pop","Uo","Zip","Zotz","Tzec","Xul","Yaxkin","Mol","Chen","Yax",
 "Zac","Ceh","Mac","Kankin","Muan","Pax","Kayab","Cumku","Uayeb");
var jmd0 = new Array (0,30,59,88,117,147,0,176,206,235,265,294,324);
var jmd1 = new Array (0,30,59,89,118,148,0,177,207,236,266,295,325);
var jmd2 = new Array (0,30,60,90,119,149,0,178,208,237,267,296,326);
var jmd3 = new Array (0,30,59,88,117,147,177,206,236,265,295,324,354);
var jmd4 = new Array (0,30,59,89,118,148,178,207,237,266,296,325,355);
var jmd5 = new Array (0,30,60,90,119,149,179,208,238,267,297,326,356);
var jewish_month_days = new Array (jmd0,jmd1,jmd2,jmd3,jmd4,jmd5);
var fl = "Faul ";
var mk = "!";
var mille = "M";
var sp = " ";

var greg_x = 0;
var jul_x = 1;
var rom_x = 2;
var jew_x = 3;
var isl_x = 4;
var copt_x = 5;
var jd_x = 6;
var fr_x = 7;
var my_x = 8;
var egypt_x = 9;
var of_x = 10;
var dow_x = 11;
var new_jul_x = 12;
var maed_x = 13;
var last = 13;

function dhp_add(dhp1,dhp2)
{
var d = dhp1[0] + dhp2[0];
var h = dhp1[1] + dhp2[1];
var p = dhp1[2] + dhp2[2];
dhp1[2] = p % 1080;
h = h + division(p,1080);
dhp1[1] = h % 24;
dhp1[0] = d + division(h,24);
return dhp1;
}

function dhp_mult(n,dhp)
{
var d = n * dhp[0];
var h = n * dhp[1];
var p = n * dhp[2];
dhp[2] = p % 1080;
h = h + division(p,1080);
dhp[1] = h % 24;
dhp[0] = d + division(h,24);
return dhp;
}

function elapsed_time19(year)
{
var t = new Array(29,12,793);
var n19 = year % 19;
var moladot = division((n19 * 12.36 + 0.77),1);
var result = dhp_mult(moladot,t);
return result;
}

function year_after_leap_year(year)
{
var rem = year % 19;
var result = ((rem == 1) || (rem == 4) || (rem == 7) || (rem == 9) || (rem == 12) || (rem == 15) || (rem == 18));
return result;
}

function common_year(year)
{
var rem = year % 19;
var result = ((rem != 0) && (rem != 3) && (rem != 6) && (rem != 8) && (rem != 11) && (rem != 14) && (rem != 17));
return result;
}

function elapsed_time235(year)
{
var t = new Array(6939,16,595);
var moladot = division(year,19);
var result = dhp_mult(moladot,t);
return result;
}

function molad(year)
{
var t0 = new Array(118,7,695);
var t1 = elapsed_time235(year);
var t2 = elapsed_time19(year);
var t3 = dhp_add(t1,t2);
var result = dhp_add(t0,t3);
result[0] = result[0] - 500;
return result;
}

function new_year(year)
{
var molad_tishri_dhp = molad(year);
var result = molad_tishri_dhp[0];
if (molad_tishri_dhp[1] >= 18) {result++};
var dow = result % 7;
if ((dow == 1) || (dow == 4) || (dow == 6)) {result++};
var time_hp = molad_tishri_dhp[1] * 10000 + 1 * molad_tishri_dhp[2];
var dow2 = molad_tishri_dhp[0] % 7;
if ((common_year(year)) && (dow2 == 3) && (time_hp >= 90204) && (time_hp < 180000)) {result = 1 * molad_tishri_dhp[0] + 2};
if ((year_after_leap_year(year)) && (dow2 == 2) && (time_hp >= 150589) && (time_hp < 180000))
  {result = 1 * molad_tishri_dhp[0] + 1};
result = 1 * result + 347996;
return result;
}

function index_from_length(l)
{
var result = 3 * (division(l - 300,80)) + 1 * (l % 10) - 3;
return result;
}

function jewish_from_jd(jd)
{
var approx_year = division((jd - 347998),365.25);
approx_year+=2;
while (new_year(approx_year) > jd) {approx_year--};
var year_length = new_year(approx_year * 1 + 1) - new_year(approx_year);
var d = jd - new_year(approx_year);
d++;
var ix = index_from_length(year_length);
var m = 0;
while ((jewish_month_days[ix][m]) < d) {m++};
m--;
if ((jewish_month_days[ix][m] == 0) && (m > 0)) {m--};
var result = (d - jewish_month_days[ix][m]) + pt + sp + jewish_month[m] + sp + approx_year;
return result;
}

function division(zaehler,nenner)
{
var quotient = zaehler / nenner;
var rest = zaehler % nenner;
var result = Math.round(quotient - (rest / nenner));
return result;
}

function roman_number(n)
{
var thousands = division(n,1000);
var hundreds  = division((n % 1000),100);
var tens  = division((n % 100),10);
var ones  = n % 10;
var result  = ""
var i = 1;
if (thousands < 4)
{
while (i <= thousands){result = result + mille; i++;}
result = result + roman_100[hundreds] + roman_10[tens] + roman_1[ones];
if (n == 0) result = e;
}
else result = "(" + n + ")";
return result;
}

function roman_day_number(roman_day)
{
var result;
if (roman_day == 1) result = "";
else if (roman_day == 2) result = "PR. ";
else if (roman_day > 2) result = "ANTE DIEM " + roman_number(roman_day) + sp;
else result = e;
return result;
}

function roman_date_from_julian(julian_day,julian_month,julian_year)
{
var result = "";
var test = 100 * julian_month + 1 * julian_day;
var r4 = julian_year % 4;
var month = julian_month;
if ((month == 3) || (month == 5) || (month == 7) || (month == 10)){nones = 8; ides = 16; calends = 33;}
if ((month == 1) || (month == 8) || (month == 12)){nones = 6; ides = 14; calends = 33;}
if ((month == 4) || (month == 6) || (month == 9) || (month == 11)){nones = 6; ides = 14; calends = 32;}
if (month == 2)
{
nones = 6; ides = 14; calends = 30;
if ((r4 == 0) && (julian_day > 24)) calends = 31;
}
month = month - 1;
var n = nones - julian_day;
var i = ides - julian_day;
var c = calends - julian_day;
if (julian_day == 1) result = "KAL. " + roman_months[julian_month];
else if (n == 1) result = "NON. " + roman_months[julian_month];
else if (i == 1) result = "ID. " + roman_months[julian_month];
else if (n>1)
{result = roman_day_number(n) + "NON. " + roman_months[julian_month];}
else if (i>1)
{result = roman_day_number(i) + "ID. " + roman_months[julian_month];}
else if (c>1)
{result = roman_day_number(c) + "KAL. " + roman_months[(julian_month + 1) % 12];}
else result = e;
if ((r4 == 0) && (test == 225)) result = "ANTE DIEM BIS VI KAL. MAR.";
result = result + sp + roman_number(julian_year * 1 + 753) + " A. V. C.";
return result;
}

function adjusted_month_from_month(m)
{
var result = ((1 * m + 9) % 12) + 3;
return result;
}

function adjusted_year_from_year(y,m)
{
var result = y - 1 + division((1 * m + 7),10);
return result
}

function year_from_adjusted_year(j_strich,m_strich)
{
var result = j_strich + division(m_strich,13);
return result;
}

function month_from_adjusted_month(m_strich)
{
var result = ((m_strich + 11) % 12) + 1;
return result;
}

function jd_from_greg(d,m_strich,y_strich)
{
var y4800 = y_strich + 4800;
var a = division(y4800,100);
var b = y4800 % 100;
var result = 146097 * division(a,4) + 36524 * (a % 4) + 1461 * division(b,4) + 365 * (b % 4) + division((7 * (m_strich - 2)),12) + 30 * m_strich + 1 * d + 1721029 - 1753164
return result;
}

function jd_from_julian(d,m_strich,y_strich)
{
var y4800 = y_strich + 4800;
var a = division(y4800,100);
var b = y4800 % 100;
var result = 36525 * a + 1461 * division(b,4) + 365 * (b % 4) + division((7 * (m_strich - 2)),12) +
 30 * m_strich + 1 * d + 1721027 - 1753200;
return result;
}

function jd_from_jewish(d,m,y)
{
if ((common_year(y)) && (m == 6)) {m=5};
var ny0 = new_year(y);
y++;
var ny1 = new_year(y);
var ix = index_from_length(ny1 - ny0);
var jd = ny0 * 1 + jewish_month_days[ix][m] * 1 + d * 1 - 1;
return jd;
}

function jd_from_islamic(d,m,y)
{
result = 1948439 + 10631 * Math.floor((y - 1) / 30) + Math.floor((10631 / 30) * ((y - 1) % 30) + (483 / 1000)) + 59 * Math.floor(m / 2) + 30 * (m % 2) + 1 * d;
return result;
}

function jd_from_french(t,m,j)
{
var result = 1461 * division(j,4) + 365 * (j % 4) + 30 * m + t * 1 + 2375444;
return result;
}

function jd_from_coptic(t,m,j)
{
var result = 1461 * division(j,4) + 365 * (j % 4) + 30 * m + t * 1 + 1824664;
return result;
}

function jd_from_of(f,u,s)
{
var result = 234 * s + 26 * u + 1 * f + 2447145;
return result;
}

function of_from_jd(jd)
{
var f = (jd % 26) + 1;
var u = division((jd % 234),26) + 1;
var s = division(jd,234) - 10458;
var emp;
var i = 0;
while (empire_offset[i+1] < f){i++;}
if (s < 1) var result = f + pt + urlaubi[u] + sp + (s * (-1) + 1) + sp + bof + " (" + (f - empire_offset[i]) + pt + empires[i] + ")";
else var result = f + pt + urlaubi[u] + sp + s + " (" + (f - empire_offset[i]) + pt + empires[i] + ")";
return result;
}

function greg_from_jd(jd)
{
var a = 1 * jd + 32044;
var b = division(a,146097);
var c = a % 146097;
var d = Math.min(3,division(c,36524));
var e = c - 36524 * d;
var f = division(e,1461);
var g = e % 1461;
var h = Math.min(3,division(g,365));
var k = g - 365 * h;
var l = division((111 * k + 41),3395);
var t = k - 30 * l - division((7 * l + 7),12) + 1;
var m_strich = l + 3;
var j_strich = 400 * b + 100 * d + 4 * f + 1 * h - 4800;
var m = month_from_adjusted_month(m_strich);
var j = year_from_adjusted_year(j_strich,m_strich);
if (j < 1) var result = t + pt + months[m] + sp + (j * (-1) + 1) + vuz;
else var result = t + pt + months[m] + sp + j;
return result;
}


function maedler_from_jd(jd)
{
var nd = 1 * jd + 15972;
var n128 = division(nd,46751);
var r128 = nd % 46751;
var n4 = division(r128,1461);
var r4 = r128 % 1461;
var n1 = Math.min(3,division(r4,365));
var r1 = 1 * r4 - 365 * n1;
var nm = division((111 * r1 + 41),3395);
var t = 1 * r1 - 30 * nm - division((7 * nm + 7),12) + 1;
var m_strich = 1 * nm + 3;
var j_strich = 128 * n128 + 4 * n4 + 1 * n1 - 4756;
var m = month_from_adjusted_month(m_strich);
var j = year_from_adjusted_year(j_strich,m_strich);
if (j < 1) var result = t + pt + months[m] + sp + (j * (-1) + 1) + vuz;
else var result = t + pt + months[m] + sp + j;
return result;
}


function new_julian_from_jd(jd)
{
var nd = 1 * jd + 32042;
var n900 = division(nd,328718);
var r900 = nd % 328718;
var n500 = division(r900,182621);
var r500 = r900 % 182621;
var n100 = Math.min(4 - n500,division(r500,36524));
var r100 = r500 - 36524 * n100;
var n4 = division(r100,1461);
var r4 = r100 % 1461;
var n1 = Math.min(3,division(r4,365));
var r1 = 1 * r4 - 365 * n1;
var nm = division((111 * r1 + 41),3395);
var t = 1 * r1 - 30 * nm - division((7 * nm + 7),12) + 1;
var m_strich = 1 * nm + 3;
var j_strich = 900 * n900 + 500 * n500 + 100 * n100 + 4 * n4 + 1 * n1 - 4800;
var m = month_from_adjusted_month(m_strich);
var j = year_from_adjusted_year(j_strich,m_strich);
if (j < 1) var result = t + pt + months[m] + sp + (j * (-1) + 1) + vuz;
else var result = t + pt + months[m] + sp + j;
return result;
}


function julian_from_jd(jd)
{
var a = 1 * jd + 32082;
var b = division(a,1461);
var c = a % 1461;
var d = Math.min(3,division(c,365));
var e = c - 365 * d;
var f = division((111 * e + 41),3395);
var t = e - 30 * f - division((7 * f + 7),12) + 1;
var m_strich = f + 3;
var j_strich = 4 * b + 1 * d - 4800;
var m = month_from_adjusted_month(m_strich);
var j = year_from_adjusted_year(j_strich,m_strich);
if (j < 1) var result = t + pt + months[m] + sp + (j * (-1) + 1) + vuz;
else var result = t + pt + months[m] + sp + j;
return result;
}

function islamic_from_jd(jd)
{
var ix = jd - 1948440;
var n30 = Math.floor(ix / 10631);
var r30 = ix % 10631;
var n1 = Math.floor((15 / 10631) * (2 * r30 + 1));
var j = 30 * n30 + n1 * 1;
var r1 = r30 - Math.floor((10631 / 30) * (j % 30) + (483 / 1000));
var m = Math.floor((2 * r1) / 59);
var t = r1 - 59 * Math.floor(m / 2) - 30 * (m % 2);
t++
m++;
j++;
if ((t == 1) && (m == 13)) { t = 30; m = 12; }
result = t + pt + " " + islamic_month[m - 1] + " " + j;
return result;
}

function french_from_jd(jd)
{
var a = 1 * jd - 2375475;
var b = division(a,1461);
var c = a % 1461;
var d = Math.min(3,division(c,365));
var e = c - 365 * d;
var m = division(e,30);
var t = (e % 30) + 1 * 1;
var j = 4 * b + 1 * d;
var result = t + pt + french_months[m] + sp + roman_f[j];
return result;
}

function coptic_from_jd(jd)
{
var a = 1 * jd - 1824665;
var b = division(a,1461);
var c = a % 1461;
var d = Math.min(3,division(c,365));
var e = c - 365 * d;
var m = division(e,30);
var t = (e % 30) + 1 * 1;
var j = 4 * b + 1 * d;
var result = t + pt + coptic_month[m] + sp + j;
return result;
}

function roman_from_jd(jd)
{
var a = 1 * jd + 32082;
var b = division(a,1461);
var c = a % 1461;
var d = Math.min(3,division(c,365));
var e = c - 365 * d;
var f = division((111 * e + 41),3395);
var t = e - 30 * f - division((7 * f + 7),12) + 1;
var m_strich = f + 3;
var j_strich = 4 * b + 1 * d - 4800;
var m = month_from_adjusted_month(m_strich);
var j = year_from_adjusted_year(j_strich,m_strich);
var result = roman_date_from_julian(t,m,j)
return result
}

function dow_from_jd(jd)
{
result = dow_name[jd % 7];
return result
}

function long_count_from_jd(jd)
{
var m = jd - 584283;
var n = m;
var pictun = division(n,2880000);
n = m % 2880000;
var baktun = division(n,144000);
n = m % 144000;
var katun = division(n,7200);
n = m % 7200;
var tun = division(n,360);
n = m % 360;
var uinal = division(n,20);
var kin = m % 20;
var result = pictun + pi + baktun + ba + katun + ka + tun + tu + uinal + ui + kin + ki;
return result;
}

function tzolkin_from_jd(jd)
{
var n = jd + 136;
var m = jd + 65;
var zahl_tzolkin = ((n - 1) % 13) + 1 * 1;
var name_tzolkin = mayan_day[n % 20];
var p = m % 365;
var name_haab = mayan_month[division(p,20)];
var zahl_haab = p % 20;
//var result = " (" + zahl_tzolkin + " <b style='color:#FF0000'>" + name_tzolkin + "</b>; " + zahl_haab + " " + name_haab + ")";
var result = "<b><span style=color:#0000FF;>" + name_tzolkin + "</span></b>";
return result;
}


function egyptian_from_jd(jd)
{
var n = jd + 47;
var t = n % 365;
var m = division(t,30);
var s = division(m,4);
var ms = m % 4;
var d = (t % 30);
d++
if (s < 3)
 {
  res_season = (" (" + ord_numb[ms] + egyptian_season[s] + ")");
 }
else res_season = "";
var result = d + pt + egyptian_month[m] + res_season;
return result;
}


function write_results(jd, x)
{
//  if (browser == browser_test)
//  {
    write_results_micr(jd, x);
//  }
//  else
//  {
//    write_results_other(jd,x);
//  }
}



function write_results_other(jd, x)
{
var fu = form_url;
var xx = x;
var vorn = vorne;
var max = last;
var hd = headline;
var daten = new Array(last);
var t;
for (q2 = 0; q2 <= last; q2++)
{
daten[q2] = "";
}
if (jd == "") { jd = 0; }
if (jd > -1)
{
            daten[greg_x] = greg_from_jd(jd);
            daten[jul_x] = julian_from_jd(jd);
            daten[jew_x] = jewish_from_jd(jd);
            daten[rom_x] = roman_from_jd(jd);
            daten[fr_x] = french_from_jd(jd);
            daten[copt_x] = coptic_from_jd(jd);
            daten[jd_x] = jd;
            //daten[my_x] = long_count_from_jd(jd) + sp + tzolkin_from_jd(jd);
			daten[my_x] = tzolkin_from_jd(jd);
            daten[of_x] = of_from_jd(jd);
            daten[dow_x] = dow_from_jd(jd);
            daten[egypt_x] = egyptian_from_jd(jd);
            daten[isl_x] = islamic_from_jd(jd);
            daten[maed_x] = maedler_from_jd(jd);
            daten[new_jul_x] = new_julian_from_jd(jd);
}
else
{
var q1 = 0;
do
{
daten[q1] = not_supported;
q1++;
}
while (q1 <= max);
}


if (daten[maed_x] == daten[greg_x])
{
   daten[maed_x] = "N";
}
else
{
if (jd < 2415021)
{
daten[maed_x] = not_supported + "<em> (" + daten[maed_x] + ")</em>";
}
}


if (daten[new_jul_x] == daten[greg_x])
{
   daten[new_jul_x] = "N";
}
else
{
if (jd < 2423707)
{
daten[new_jul_x] = not_supported + "<em> (" + daten[new_jul_x] + ")</em>";
}
}

if (jd < 2086674)
{
daten[jew_x] = "<em>" + daten[jew_x] + "</em>";
}
if (jd < 347998)
{
daten[jew_x] = not_supported;
}
if (jd < 1948440)
{
 daten[isl_x] = not_supported;
}
if (jd < 1824665)
{
 daten[copt_x] = not_supported;
}
if ((jd < 584283) || (jd > 58184282))
{
daten[my_x] = not_supported;
}
if (jd < 2299161) daten[greg_x] = not_supported + "<em> (" + daten[greg_x] + ")</em>";
if (jd < 1723980)
{
 daten[rom_x] = not_supported;
 daten[jul_x] = "<em>" + daten[jul_x] + "</em>";
}
if ((jd > 2380687) || (jd < 2376268))
{
daten[fr_x] = not_supported + "<em> (" + daten[fr_x] + ")</em>";
}

if ((jd < 2375840) || (jd > 2380952)) {daten[fr_x] = not_supported};
document.open();
document.writeln("<html>");
document.writeln("<head>");
document.writeln("<title>" + hd + "</title>");
document.writeln("<meta http-equiv=\"content-type\" content=\"text/html; charset=iso-8859-1\">");
document.writeln("<link rel=\"stylesheet\" type=\"text/css\" href=\"./css/styles.css\">");
document.writeln("</head>");
document.writeln("<body>");
document.writeln("<p class=\"narrow\">&nbsp;</p>");
document.writeln("<h2>" + hd + "</h2>");
document.writeln("<p>&nbsp;</p>");
document.writeln("<table>");
var q = 0;
do
{
if (daten[q] != "N")
   {
      document.writeln("<tr>");
      if (q == xx)
         {
            t = "th";
         }
      else t = "td";
      document.write("<" + t + " class=\"l\">" + vorn[q] + "</" + t + "><" + t + " class=\"l\">" + daten[q] + "</" + t + ">");
      document.writeln("</tr>");
   }
q++;
}
while (q <= max);
document.writeln("</table>");
document.writeln("<p><a href=\"javascript:location.replace(window.location.href)\">" + fu + "</a></p>");
document.writeln("</body>");
document.writeln("</html>");
document.close();
}

function write_results_micr(jd, x)
{
         var daten = new Array(last);
         for (q2 = 0; q2 <= last; q2++)
         {
             daten[q2] = "";
         }
         if (jd > -1)
         {
            daten[greg_x] = greg_from_jd(jd);
            daten[jul_x] = julian_from_jd(jd);
            daten[jew_x] = jewish_from_jd(jd);
            daten[rom_x] = roman_from_jd(jd);
            daten[fr_x] = french_from_jd(jd);
            daten[copt_x] = coptic_from_jd(jd);
            daten[jd_x] = jd;
            //daten[my_x] = long_count_from_jd(jd) + sp + tzolkin_from_jd(jd);
			daten[my_x] = tzolkin_from_jd(jd);
            daten[of_x] = of_from_jd(jd);
            daten[dow_x] = dow_from_jd(jd);
            daten[egypt_x] = egyptian_from_jd(jd);
			   daten[isl_x] = islamic_from_jd(jd);
            daten[maed_x] = maedler_from_jd(jd);
            daten[new_jul_x] = new_julian_from_jd(jd);
         }
         else
         {
             var q1 = 0;
             do
             {
                 daten[q1] = not_supported;
                 q1++;
             }
             while (q1 <= last);
         }
         if (jd == "") {jd = 0;}
         if (jd < 2086674)
         {
             daten[jew_x] = "<em>" + daten[jew_x] + "</em>";
         }
         if (jd < 347998)
         {
             daten[jew_x] = not_supported;
         }
         if (jd < 1948440)
         {
             daten[isl_x] = not_supported;
         }
         if (jd < 1824665)
         {
             daten[copt_x] = not_supported;
         }
         if ((jd < 584283) || (jd > 58184282))
         {
            daten[my_x] = not_supported;
         }
         if (jd < 2299161)
         {
            daten[greg_x] = not_supported + "<em> (" + daten[greg_x] + ")</em>";
         }
         if (jd < 1723980)
         {
            daten[rom_x] = not_supported;
            daten[jul_x] = "<em>" + daten[jul_x] + "</em>";
         }
         if ((jd > 2380687) || (jd < 2376268))
         {
            daten[fr_x] = not_supported + "<em> (" + daten[fr_x] + ")</em>";
         }
         if ((jd < 2375840) || (jd > 2380952))
         {
            daten[fr_x] = not_supported;
         }
         if (jd < 2423707)
         {
            daten[new_jul_x] = not_supported + "<em> (" + daten[new_jul_x] + ")</em>";
         }

         if (jd < 2415021)
         {
            daten[maed_x] = not_supported + "<em> (" + daten[maed_x] + ")</em>";
         }

         var q1 = 0;
         do
         {
             if (q1 == x) {daten[q1] = "<strong>" + daten[q1] + "</strong>";}
             q1++;
         }
         while (q1 <= last);
		 /*
         document.all.greg.innerHTML = daten[greg_x];
         document.all.jul.innerHTML = daten[jul_x];
         document.all.rom.innerHTML = daten[rom_x];
         document.all.jued.innerHTML = daten[jew_x];
         document.all.copt.innerHTML = daten[copt_x];
         document.all.jd.innerHTML = daten[jd_x];
         document.all.rev.innerHTML = daten[fr_x];
		 
         document.all.maya.innerHTML = daten[my_x];
		 
         document.all.misr.innerHTML = daten[egypt_x];
         document.all.of.innerHTML = daten[of_x];
         document.all.wt.innerHTML = daten[dow_x];
         document.all.isl.innerHTML = daten[isl_x];
         document.all.new_jul.innerHTML = daten[new_jul_x];
         document.all.maed.innerHTML = daten[maed_x];
		 */
		 document.getElementById("greg").innerHTML = daten[greg_x];
		 document.getElementById("maya").innerHTML = daten[my_x];
}

function evaluate_greg(greg_day,greg_month,greg_year)
{
var jd = jd_from_greg(Math.abs(greg_day),adjusted_month_from_month(greg_month), adjusted_year_from_year(Math.abs(greg_year),greg_month));
return write_results(jd,greg_x);
}

function evaluate_jewish(jewish_day,jewish_month,jewish_year)
{
var jd = jd_from_jewish(Math.abs(jewish_day),jewish_month,Math.abs(jewish_year));
return write_results(jd,jew_x);
}

function evaluate_islamic(islamic_day,islamic_month,islamic_year)
{
var jd = jd_from_islamic(Math.abs(jewish_day),jewish_month,Math.abs(jewish_year));
return write_results(jd,isl_x);
}

function evaluate_islamic(islamic_day,islamic_month,islamic_year)
{
var jd = jd_from_islamic(Math.abs(islamic_day),islamic_month,Math.abs(islamic_year));
return write_results(jd,isl_x);
}

function evaluate_french(f_day,f_month,f_year)
{
var jd = jd_from_french(Math.abs(f_day),f_month,f_year);
return write_results(jd,fr_x);
}

function evaluate_coptic(c_day,c_month,c_year)
{
var jd = jd_from_coptic(Math.abs(c_day),c_month,c_year);
return write_results(jd,copt_x);
}

function evaluate_julian(julian_day,julian_month,julian_year,vuz)
{
var help = Math.abs(julian_year);
if (vuz == true) julian_year = parseInt(help) * (-1) + 1;
var jd = jd_from_julian(Math.abs(julian_day),adjusted_month_from_month(julian_month),
adjusted_year_from_year(julian_year,julian_month));
write_results(jd,jul_x);
}

function evaluate_jd(jd)
{
if (jd == "") jd = 0;
write_results(Math.floor(Math.abs(jd)),jd_x);
}

function evaluate_mayan(pictun,baktun,katun,tun,uinal,kin)
{
var jd = 2880000 * Math.abs(pictun) + 144000 * Math.abs(baktun) + 7200 * Math.abs(katun) + 360 * Math.abs(tun) + 20 * Math.abs(uinal) + 1 * Math.abs(kin) + 584283;
write_results(jd,my_x);
}

function evaluate_of(faul,urlaubum,imperium,stress,vor_OF)
{
faul = Math.abs(faul);
urlaubum = Math.abs(urlaubum);
stress = Math.abs(stress);
if (imperium == 2) faul = 1 * faul + 3;
if (imperium == 3) faul = 1 * faul + 10;
stress = Math.abs(stress);
var help = stress;
if (vor_OF == true) stress = parseInt(help) * (-1) + 1;
var jd = jd_from_of(faul,urlaubum,stress);
write_results(jd,of_x);
}

function rechne_heute()
{
datum = new Date();
var t_today = datum.getDate();
var m_today = datum.getMonth();
var y_today = datum.getYear();
if (y_today < 1900) {y_today+=1900};
document.frm_datum.greg_day.value = t_today;
document.frm_datum.greg_month.options[m_today].selected = true;
document.frm_datum.greg_year.value = y_today;
m_today++;
evaluate_greg(t_today,m_today,y_today);
}

function schreibe_heute()
/* wird beim aufruf des formulars ausgefhrt */
{
datum = new Date();
var t_today = datum.getDate();
var m_today = datum.getMonth();
var y_today = datum.getYear();
if (y_today < 1900) {y_today+=1900};

if (browser == browser_test)
{

/*document.all.hier.innerHTML="<p></p><table width=\"80%\"><tr><td class=\"smalll\">" + vorne[greg_x] + "</td><td class=\"smalll\" id=\"greg\">%</td></tr><tr><td class=\"smalll\">" + vorne[jul_x] + "</td><td class=\"smalll\" id=\"jul\">%</td></tr><tr><td class=\"smalll\">" + vorne[rom_x] + "</td><td class=\"smalll\" id=\"rom\">%</td></tr><tr><td class=\"smalll\">" + vorne[jew_x] + "</td><td class=\"smalll\" id=\"jued\">%</td></tr><tr><td class=\"smalll\">" + vorne[isl_x] + "</td><td class=\"smalll\" id=\"isl\">%</td></tr><tr><td class=\"smalll\">" + vorne[copt_x] + "</td><td class=\"smalll\" id=\"copt\">%</td></tr><tr><td class=\"smalll\">" + vorne[jd_x] + "</td><td class=\"smalll\" id=\"jd\">%</td></tr><tr><td class=\"smalll\">" + vorne[fr_x] + "</td><td class=\"smalll\" id=\"rev\">%</td></tr><tr><td class=\"smalll\">" + vorne[my_x] + "</td><td class=\"smalll\" id=\"maya\">%</td></tr><tr><td class=\"smalll\">" + vorne[egypt_x] + "</td><td class=\"smalll\" id=\"misr\">%</td></tr><tr><td class=\"smalll\">" + vorne[of_x] + "</td><td class=\"smalll\" id=\"of\">%</td></tr><tr><td class=\"smalll\">" + vorne[dow_x] + "</td><td class=\"smalll\" id=\"wt\">%</td></tr><tr><td class=\"smalll\">" + vorne[new_jul_x] + "</td>" + "<td class=\"smalll\" id=\"new_jul\">%</td></tr><tr><td class=\"smalll\">" + vorne[maed_x] + "</td><td class=\"smalll\" id=\"maed\">%</td>" +  "</tr></table>";
*/
document.all.hier.innerHTML="<p></p><table width=\"80%\"><tr><td>" + vorne[greg_x] + "</td><td id=\"greg\">%</td></tr><tr><td>" + vorne[my_x] + "</td><td id=\"maya\">%</td></tr></table>";


m_today++;
write_results(jd_from_greg(t_today,adjusted_month_from_month(m_today),adjusted_year_from_year(y_today,m_today)),0);
}
}