Code:
<!doctype html public "-//w3c//dtd html 4.0 transitional//en">
<html>
<head>
<script type = "text/javascript">
<!-- Hide JavaScript from non-compliant browsers.
function determineJulianDayY(df) {
var r=df.clientNames,d=df.dayY,m=df.monthY,y=df.yearY,z0=0;
for (;z0<r.length;z0++){
if (r[z0].checked){
break;
}
}
df.julianDayY.value = gregorianDate2JulianDateY(parseFloat(d[z0].value), parseFloat(m[z0].value), parseFloat(y[z0].value));
}
function gregorianDate2JulianDateY(d, m, y) {
// Uses Jean Meeus' method (p61, Astronomical Algorithms).
if (m == 1 || m == 2) {
y--;
m = m+12;
}
var a = trunc(y/100);
var b = 2-a+trunc(a/4);
return trunc(365.25*(y+4716)) + trunc(30.6001*(m+1))+d+b-1524.5;
}
function trunc(n) {
if (n >= 0) return Math.floor(n); else return Math.ceil(n);
}
/*Code for Text Box Reset was supplied by codeexploiter
* at Dynamic Drive www.dynamicdrive.com/forums/).*/
function resetField(name,value) {
document.forms['form'].elements[name].focus();
document.forms['form'].elements[name].value = value;
}
// End hiding here -->
</script>
</head>
<body text="#000000" bgcolor="#FFF2EC" link="#FF0000" vlink="#CC33CC" alink="#FF9900">
<table BORDER=0 CELLSPACING=0 CELLPADDING=5 COLS=2 WIDTH="400" >
<tbody>
<tr>
<th ALIGN=LEFT><form name="form"><small style="font-family: Tahoma;">Enter Birth Date (DD/MM/YYYY) and Hours from Midnight:-</small></th>
</tr>
<tr style="font-family: Tahoma;">
<td><input name="clientNames" checked="checked" type="radio">
<input name="initials" size="3" value="PKL" type="text">
<input name="dayY" size="2" value="21" type="text">
<input name="monthY" size="2" value="7" type="text">
<input name="yearY" size="2" value="1951" type="text">
<input name="hourY" size="3" value="0.014" type="text">
</td>
</tr>
<tr style="font-family: Tahoma;">
<td><input name="clientNames" type="radio">
<input name="initials" size="3" value="MIR" type="text">
<input name="dayY" size="2" value="8" type="text">
<input name="monthY" size="2" value="2" type="text">
<input name="yearY" size="2" value="1955" type="text">
<input name="hourY" size="3" value="0.1916" type="text"></td>
</tr>
<tr style="font-family: Tahoma;">
<td><input name="clientNames" type="radio"> <input name="initials" size="3" value="KRT" type="text"> <input name="dayY" size="2" value="12" type="text"> <input name="monthY" size="2" value="10" type="text"> <input name="yearY" size="2" value="1957" type="text"> <input name="hourY" size="3" value="0.251" type="text"></td>
</tr>
<tr style="font-family: Tahoma;">
<td><input name="clientNames" type="radio"> <input name="initials" size="3" value="LAC" type="text"> <input name="dayY" size="2" value="17" type="text"> <input name="monthY" size="2" value="9" type="text"> <input name="yearY" size="2" value="2003" type="text"> <input name="hourY" size="3" value="0.7396" type="text"></td>
</tr>
<tr style="font-family: Tahoma;">
<td><input name="clientNames" type="radio"> <input name="initials" size="3" value="VLM" type="text"> <input name="dayY" size="2" value="6" type="text"> <input name="monthY" size="2" value="8" type="text"> <input name="yearY" size="2" value="2007" type="text"> <input name="hourY" size="3" value="0.7395" type="text"></td>
</tr>
<tr>
<td> <input type="button" value="Calculate" onClick="determineJulianDayY(this.form)"><input name="julianDayY" size=10 type="text"> <input type="reset" value="Reset"></form>
</td>
</tr>
</tbody></table>
</body>
</html>
Bookmarks