كود تحويل التاريخ من الهجري للميلادي والعكس

السلام عليكم ورحمة الله وبركاته

كود تحويل التاريخ من الهجري للميلادي والعكس

مثال مصور

كود تحويل التاريخ من الهجري للميلادي والعكس Ma-016a22736d

الكود:: <p align="center"><font size="5" color="#800000">بسم الله الرحمن الرحيم
السلام </font></p>
<p align="center"><font size="5" color="#800000">عليكم ورحمة الله وبركاته
أهلا بكم في صفحة حساب التحويل من الهجري إلى الميلادي والعكس
برعاية موقع .. مــــرهـــــف الاحـــســـاس .. للتصميم

<tr>
<td class="alt1" align="center">
<SCRIPT LANGUAGE="JavaScript">
function intPart(floatNum){
if (floatNum< -0.0000001){
return Math.ceil(floatNum-0.0000001)
}
return Math.floor(floatNum+0.0000001)
}
function weekDay(wdn){
if(wdn==0){
return "الأثنين"
}
if(wdn==1){
return "الثلاثاء"
}
if(wdn==2){
return "الإربعاء"
}
if(wdn==3){
return "الخميس"
}
if(wdn==4){
return "الجمعه"
}
if(wdn==5){
return "السبت"
}
if(wdn==6){
return "الأحد"
}
return ""
}
function chrToIsl(arg) {
d=parseInt(arg.CDay.value)
m=parseInt(arg.CMonth.value)
y=parseInt(arg.CYear.value)
if ((y>1582)||((y==1582)&&(m>10))||((y==1582)&&(m==10)&&(d>14)))
{
jd=intPart((1461*(y+4800+intPart((m-14)/12)))/4)+intPart((367*(m-2-12*(intPart((m-14)/12))))/12)-
intPart( (3* (intPart( (y+4900+ intPart( (m-14)/12) )/100) ) ) /4)+d-32075
}
else
{
jd = 367*y-intPart((7*(y+5001+intPart((m-9)/7)))/4)+intPart((275*m)/9)+d+1729777
}
arg.JD.value=jd
arg.wd.value=weekDay(jd%7)
l=jd-1948440+10632
n=intPart((l-1)/10631)
l=l-10631*n+354
j=(intPart((10985-l)/5316))*(intPart((50*l)/17719))+(intPart(l/5670))*(intPart((43*l)/15238))
l=l-(intPart((30-j)/15))*(intPart((17719*j)/50))-(intPart(j/16))*(intPart((15238*j)/43))+29
m=intPart((24*l)/709)
d=l-intPart((709*m)/24)
y=30*n+j-30
arg.HDay.value=d
arg.HMonth.value=m
arg.HYear.value=y
}
function islToChr(arg) {
d=parseInt(arg.HDay.value)
m=parseInt(arg.HMonth.value)
y=parseInt(arg.HYear.value)
jd=intPart((11*y+3)/30)+354*y+30*m-intPart((m-1)/2)+d+1948440-385
arg.JD.value=jd
arg.wd.value=weekDay(jd%7)
if (jd> 2299160 )
{
l=jd+68569
n=intPart((4*l)/146097)
l=l-intPart((146097*n+3)/4)
i=intPart((4000*(l+1))/1461001)
l=l-intPart((1461*i)/4)+31
j=intPart((80*l)/2447)
d=l-intPart((2447*j)/80)
l=intPart(j/11)
m=j+2-12*l
y=100*(n-49)+i+l
}
else
{
j=jd+1402
k=intPart((j-1)/1461)
l=j-1461*k
n=intPart((l-1)/365)-intPart(l/1461)
i=l-365*n+30
j=intPart((80*i)/2447)
d=i-intPart((2447*j)/80)
i=intPart(j/11)
m=j+2-12*i
y=4*k+n+i-4716
}
arg.CDay.value=d
arg.CMonth.value=m
arg.CYear.value=y
}
function cls(arg) {
d=""
m=""
y=""
arg.CDay.value=d
arg.CMonth.value=m
arg.CYear.value=y
arg.HDay.value=d
arg.HMonth.value=m
arg.HYear.value=y
arg.JD.value=""
arg.wd.value=""
}

</SCRIPT>
</font>
<BODY >
</p>
<p align="center"> </p>
<p align="center">
<BODY >
</p>
<CENTER>
<P>
<P>
<CENTER><TABLE BORDER width="315">
<TR><TH width="56">السنة</TH><TH width="57">الشهــر</TH><TH width="60">اليــوم</TH>
<TH width="114"> <span lang="ar-sa">التاريخ</span></TH></TR>
<TR>
<FORM NAME="Irgend?ppis">
<TH width="56"><INPUT TYPE="text" NAME="HYear" VALUE="1423"SIZE=4></TH>
<TH width="57"><INPUT TYPE="text" NAME="HMonth" VALUE="1"SIZE=4></TH>
<TH width="60"><INPUT TYPE="text" NAME="HDay" VALUE="1"SIZE=4></TH>
<TH width="114">هجري</TH></TR>
<TR>
<TH width="56"><INPUT TYPE="text" NAME="CYear" VALUE=""SIZE=4></TH>
<TH width="57"><INPUT TYPE="text" NAME="CMonth" VALUE=""SIZE=4></TH>
<TH width="60"><INPUT TYPE="text" NAME="CDay" VALUE="" SIZE=4></TH>
<TH width="114">ميلادي </TH></TR></TABLE>
<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="36%" id="AutoNumber1" height="65">
<tr>
<td width="50%" rowspan="2" height="65" valign="bottom">
<INPUT TYPE="button" NAME="clear" VALUE="مسح" onClick="cls(this.form)" style="width: 57; height: 57; float: left">
</td>
<td width="50%" height="39"><INPUT TYPE="button" NAME="HtoC" VALUE="للتحويل من التاريخ الهجري للميلادي" onClick="islToChr(this.form)"></td>
</tr>
<tr>
<td width="50%" height="25">
<INPUT TYPE="button" NAME="CtoH" VALUE="للتحويل من التاريخ الميلادي للهجري" onClick="chrToIsl(this.form)"></td>
</tr>
</table>
<P dir="rtl">
<b><font size="5"><span lang="ar-sa">اليوم :</span></font></b><INPUT TYPE="text" NAME="wd" VALUE="" SIZE=10><span lang="en-us"> </span> <b><span lang="en-us">
</span>التاريخ الجولياني<span lang="en-us"> </span></b> <INPUT TYPE="text" NAME="JD" VALUE="" SIZE=7><P dir="rtl">
<P dir="rtl">
<P>
</FORM>

</td></tr>

<span lang="ar-sa"><font size="5" color="#FF0000"><b>مع تحيات </b></font></span>
<font color="#FF0000" size="5"><b>منتدى .. مــــرهـــــف الاحـــســـاس .. الاحساس .. <a href="mrhf.yoo7.com">mrhf.yoo7.com</a></b></font><P>
<P>
<font color="#FF0000" size="5"><b>
bohmad1 تصميم </b></font>

يسلموو ع الطرح الروعه

ويعطيك العافيه

تقبلني

» هذا كود تحويل الهجري الى الميلادي والعكس
» كلمات وترجمتها .... من العربي للفرنسي والعكس....
» شرح تحويل الايبود تتش 4 الى ايفون
» طريقة تحويل رصيد من سوا الى سوا؟؟
» درس تحويل صوره حقيقية الى كرتونية

صفحة 1 من اصل 1