# Age,Weekday calculator.

By Nageswara Rao Devarakonda
on June 27, 2002

Version: 10.0

Type: Full Script

Category: Calendars/Dates

Description: The file takes a date of birth like dd-mm-yyyy or dd/mm/yyyy and calculates the number of years and days passed by and gives the weekday.
The best part is it works for any year from after death of christ to till date. even the leap years are also considered

```<?
function dow(\$dd,\$mm,\$yy)
{
\$res=(\$yy+(int)(\$yy-1)/4-(int)(\$yy-1)/100+(int)(\$yy-1)/400+julianday(\$dd,\$mm,\$yy))%7;
if(\$res==1)
\$res="Sunday";
elseif(\$res==2)
\$res="Monday";
elseif(\$res==3)
\$res="Tuesday";
elseif(\$res==4)
\$res="Wednesday";
elseif(\$res==5)
\$res="Thursday";
elseif(\$res==6)
\$res="Friday";
else
\$res="Saturday";
return(\$res);
}
function julianday(\$dd,\$mm,\$yy)
{
\$days=array(31,0,31,30,31,30,31,31,30,31,30,31);
\$days[1]=\$yy%4==0&&\$yy%100!=0||\$yy%400==0?29:28;
for (\$i=1;\$i<\$mm;\$i++)
\$jd=\$jd+\$days[\$i-1];
return(\$jd+\$dd);
}
function age(\$dd,\$mm,\$yy)
{
\$now=split("-",date("d-m-Y"));
\$dd1=\$now[0];
\$mm1=\$now[1];
\$yy1=\$now[2];
if(\$yy1==\$yy)
{
\$age["years"]=0;
\$age["days"]=julianday(\$dd1,\$mm1,\$yy1)-julianday(\$dd,\$mm,\$yy);
return(\$age);
}
else
{
\$ans1=\$yy%4==0&&\$yy%100!=0||\$yy%400==0?366-julianday(\$dd,\$mm,\$yy):365-julianday(\$dd,\$mm,\$yy);
\$ans2=julianday(\$dd1,\$mm1,\$yy1);
\$sy=\$yy+1;
\$ly=\$yy1-1;
while(\$sy++<=\$ly)
\$sum=\$sy%4==0&&\$sy%100!=0||\$sy%400==0?\$sum+366:\$sum+365;
}
\$years=(float)(\$sum+\$ans1+\$ans2)/365;
\$days=(\$years-(int)(\$years))*365;
\$age[years]=(int)\$years;
\$age[days]=(int)\$days;
return (\$age);
}
?>
</html>

<?
if(\$dob)
{
\$dob=str_replace(" ","",\$dob);
if(!ereg("^[0-9]{1,2}(-|/)[0-9]{1,2}(-|/)[0-9]{4}\$",\$dob))
\$msg="Invalid date";
elseif(ereg("^[0-9]{1,2}/[0-9]{1,2}/[0-9]{4}",\$dob))
\$dob=split("/",\$dob);
else
\$dob=split("-",\$dob);
if(\$msg) die(\$msg);
\$dd=\$dob[0];
\$mm=\$dob[1];
\$yy=\$dob[2];
\$age=age(\$dd,\$mm,\$yy);
echo "The date you entered is <b>\$dd-\$mm-\$yy</b><br>";
echo "The weekday is <B>" . dow(\$dd,\$mm,\$yy) . "</b><br>";
echo "Date difference or age is  <B>\$age[years] years and \$age[days] days </b><br>";
}
?>```
﻿