var g,thistory,sDay,sMonth,sWeek,bora,month,day,year,ayear,cyear,aDay,aMonth,theYear,HDAY,HMONTH,sMonthInWord_H,sMonthInWord_C,iMonthInNumber_C,iDayInNumber_C,sFajr_H,sMaghrib_H,iYearInNumber_C,iMonthInNumber_H,iDayInNumber_H,iYearInNumber_H;var myDay=new Array(7);myDay[0]="Sunday";myDay[1]="Monday";myDay[2]="Tuesday";myDay[3]="Wednesday";myDay[4]="Thursday";myDay[5]="Friday";myDay[6]="Saturday";var myiDay=new Array(7);myiDay[0]="";myiDay[1]="";myiDay[2]="";myiDay[3]="";myiDay[4]="";myiDay[5]="Jummah";myiDay[6]="";var sDate=new Date();var sString;var sYear;g=0;thistory=1;bora="AD";sString=sDate.toString();sYear=parseInt(sString.substring(sString.length-4,sString.length));sDay=sDate.getDate();sMonth=sDate.getMonth()+1;sWeek=sDate.getDay();
function check(){day=sDay;month=sMonth;year=sYear;var dday=g+day*1;ayear=year;if(bora=="BC"){ayear=-year+1};convert ();iMonthInNumber_C = sMonth;iDayInNumber_C = sDay;iYearInNumber_C = sYear;iMonthInNumber_H = cmonth;iDayInNumber_H = mday;iYearInNumber_H = theYear;if(cmonth==1){sMonthInWord_H='Muharram'};if(cmonth==2){sMonthInWord_H='Safar'};if(cmonth==3){sMonthInWord_H='Rabi`Al-Awwal'};if(cmonth==4){sMonthInWord_H='Rabi`Al-Thani'};if(cmonth==5){sMonthInWord_H='JumadaAl-Awwal'};if(cmonth==6){sMonthInWord_H='JumadaAl-Thani'};if(cmonth==7){sMonthInWord_H='Rajab'};if(cmonth==8){sMonthInWord_H='Sha`ban'};if(cmonth==9){sMonthInWord_H='Ramadan'};if(cmonth==10){sMonthInWord_H='Shawwal'};if(cmonth==11){sMonthInWord_H='Dhul-Qa`dah'};if(cmonth==12){sMonthInWord_H='Dhul-Hijjah'};if(sMonth==1){sMonthInWord_C='January'};if(sMonth==2){sMonthInWord_C='February'};if(sMonth==3){sMonthInWord_C='March'};if(sMonth==4){sMonthInWord_C='April'};if(sMonth==5){sMonthInWord_C='May'};if(sMonth==6){sMonthInWord_C='June'};if(sMonth==7){sMonthInWord_C='July'};if(sMonth==8){sMonthInWord_C='August'};if(sMonth==9){sMonthInWord_C='September'};if(sMonth==10){sMonthInWord_C='October'};if(sMonth==11){sMonthInWord_C='November'};if(sMonth==12){sMonthInWord_C='December'};};
function convert(){var NOTE='',hijri=0,georgean=1;if(georgean>0){georgean=0;var cdays=day*1;cdays+=(month>11)?30:0;cdays+=(month>10)?31:0;cdays+=(month>9)?30:0;cdays+=(month>8)?31:0;cdays+=(month>7)?31:0;cdays+=(month>6)?30:0;cdays+=(month>5)?31:0;cdays+=(month>4)?30:0;cdays+=(month>3)?31:0;cdays+=(month>2)?28:0;cdays+=(month>1)?31:0;leap=0;cdays+=0;if(ayear/4==Math.floor(ayear/4)){leap=1};if(ayear/100==Math.floor(ayear/100)){if(ayear/400!=Math.floor(ayear/400)){leap=0}};if(leap==1){if(month>2){cdays+=1}};if(day>28+leap){if(month==2){kill()}};myear=ayear*1+cdays/(365+leap);process1()};result()};
function process1(){cyear=(myear-621.578082192)/0.97022298;cyear+=Math.floor(Math.abs(cyear)/3000)*30/10631;cday=cyear-Math.floor(cyear);cyear-=cday;if((cday*10631/30)-Math.floor(cday*10631/30)<.5){cday=Math.floor(cday*10631/30)+1}else{cday=Math.floor(cday*10631/30)+2};test2(cday);mday=HDAY;cmonth=HMONTH;if(cmonth==13){cmonth=1;cyear+=1};var Precise=Pcision(JulianDay(ayear*1,month*1,day*1,19,30,0));if(mday!=Precise){if(mday==1&&Precise>28){cmonth-=1;if(cmonth==0){cmonth=12;cyear-=1}}else{if(mday>28&&Precise<3){cmonth+=1;if(cmonth==13){cmonth=1;cyear+=1}}}};mday=Precise;if(cyear<1){cyear-=1}};
function test2(HdayN){var Monthf=29.53058796,Gyear=cyear*0.970224044+621.574981435,GyearDf=Gyear-Math.floor(Gyear);Gyear-=GyearDf;var l=0;if(Gyear/4==Math.floor(Gyear/4)){l=1;};if(Gyear/100==Math.floor(Gyear/100)){if(Gyear/400!=Math.floor(Gyear/400)){l=0;}};Gday=Math.floor((365+l)*GyearDf)+1;Gyear+=Gday/(365+l);var Hyear=(Gyear-621.574981435)/0.970224044,Hdayf=Hyear-Math.floor(Hyear),Hday=Hdayf*10631/30+1;Hmonth=1;HdayF=1;while(HdayF<HdayN){Hday+=1;HdayF+=1;if(Hday>=Monthf){Hday=Hday-Monthf;Hmonth+=1};};HDAY=Math.floor(Hday)+1;HMONTH=Hmonth;};
function Pcision(F){var Status='ok',Dn=0,jDn=F;if(Moon(jDn-1)<=0){jDn-=1;Dn+=1};while(Status=='ok'){var Fn=Moon(jDn),Fn2=Moon(jDn-1);if(((Fn/Math.abs(Fn))*(Fn2/Math.abs(Fn2)))==1){Dn+=1;jDn-=1;}else{if(Math.abs(Fn*Fn2)<.2){Status='End';}else{Dn+=1;jDn-=1;};};};return Dn;};
function Moon(jd){var T_=(jd-EPOCH*1)/36525.0,mE=297.8502042+445267.1115168*T_-0.0016300*(T_*T_)+(T_*T_*T_)/545868.0-(T_*T_*T_*T_)/113065000,mA=134.9634114+477198.8676313*T_+0.0089970*(T_*T_)+(T_*T_*T_)/69699.0-(T_*T_*T_*T_)/863310000.0,SmA=357.5291092+(35999.0502909*T_)-(0.0001536*T_*T_)+((T_*T_*T_)/24490000),D=r(mE)*1,S=r(SmA)*1,M=r(mA)*1,phaseAngle=180-D-6.289*sin(M)+2.1*sin(S)-1.274*sin(r(2*D)-M)-0.658*sin(2*D);phaseAngle+=-0.214*sin(2*M);phaseAngle+=-0.110*sin(1*D);var iF=(1+cos(phaseAngle))/2*(phaseAngle/Math.abs(phaseAngle));return iF};
function rad(angle){return r(angle)*Math.PI/180};
function sin(angle){return Math.sin(rad(angle))};
function cos(angle){return Math.cos(rad(angle))};
function r(Input){if(Input>=0){var Output=Input-Math.floor(Input/360)*360}else{var Output=Input-Math.ceil(Input/360)*360+360;};return Output};
function JulianDay(gYear,gMonth,gDay,gHour,gMinutes,gSeconds){var calendar='GREGORIAN';EPOCH=2451545.0;if(gMonth<=2){--gYear;gMonth+=12;}var A=Math.floor(gYear/100),B=0;if(calendar=='GREGORIAN'){B=Math.floor(2-A+(A/4))}else{B=0;}var dayFraction=(gHour+gMinutes/60.0+gSeconds/3600.0)/24.0,dayAndTime=gDay+dayFraction;jd_=Math.floor(365.25*(gYear+4712))+Math.floor(30.6001*(gMonth+1))+dayAndTime+B-63.5;return jd_*1;};
function result(){if(thistory==1){WeekDay();if(cyear<0){if(g==0){bora="BH"}else{bora="BC"}}else{if(g==0){bora="AH"}else{bora="AD"}};yfinale=day+"/"+month+"/"+year+" ";finale=mday+"/"+cmonth+"/"+Math.abs(cyear)+" ";theYear=Math.abs(cyear);thistory=0;}};
var msgWindow = null;
function viewFinal(file,window) {msgWindow=open(file,window,'scrollbars=yes,resizable=yes,toolbar=no,menubar=yes,width=730,height=400,left=30,top=50');msgWindow.focus();if (msgWindow.opener == null) msgWindow.opener= self;}
function gotoPage(popupCtrl) {url=popupCtrl.options[popupCtrl.selectedIndex].value;viewFinal(url,'big_view_win');popupCtrl.selectedIndex=0;}
function WeekDay(){if(g==1){var Dyear=cyear,Dmonth=cmonth,Dday=mday;}else{var Dyear=year*1,Dmonth=month*1,Dday=day*1;};if(bora=="BC"||Dyear<0){Dyear=-Math.abs(Dyear)+1};var DayCount=0,L=0;while(Dyear<10000){if(Dyear/4==Math.floor(Dyear/4)){L=1}else{L=0};if(Dyear/100==Math.floor(Dyear/100)){if(Dyear/400!=Math.floor(Dyear/400)){L=0}};if(Dmonth==14){DayCount+=365+L}else{while(Dmonth<13){if(Dmonth==1||Dmonth==3||Dmonth==5||Dmonth==7||Dmonth==8||Dmonth==10||Dmonth==12){varlimit=31}else{var limit=30};if(Dmonth==2){limit=28+L};if(Dday==40){DayCount+=limit}else{while(Dday<limit){Dday+=1;DayCount+=1;}};Dmonth+=1;Dday=40}};Dyear+=1;Dmonth=14};var Dweek=DayCount%7;if(Dweek==0){DAY="(Fri)"};if(Dweek==6){DAY="(Sat)"};if(Dweek==5){DAY="(Sun)"};if(Dweek==4){DAY="(Mon)"};if(Dweek==3){DAY="(Tue)"};if(Dweek==2){DAY="(Wed)"};if(Dweek==1){DAY="(Thu)"};}
