﻿function ConvertToUnicode(s)
{ return s.replace(/0/g, '\u06F0').replace(/1/g, '\u06F1').replace(/2/g, '\u06F2').replace(/3/g, '\u06F3').replace(/4/g, '\u06F4').replace(/5/g, '\u06F5').replace(/6/g, '\u06F6').replace(/7/g, '\u06F7').replace(/8/g, '\u06F8').replace(/9/g, '\u06F9');}
function SetTitle(d)
{ var month = document.getElementById("month");var city = document.getElementById("cities");document.getElementById("tdTitle").innerHTML = "اوقات شرعی " + ConvertToUnicode(d + " " + month.options[month.selectedIndex].text + " " + document.getElementById("spanYear").innerHTML) + " (به افق " + city.options[city.selectedIndex].text + ")";}
function Calculate()
{ var i = document.getElementById("cities").selectedIndex; if(i==0)
{ alert('لطفا مرکز استان را انتخاب کنید'); return;}
var m=document.getElementById("month").selectedIndex+1; var d=eval(document.getElementById("day").value); var lg=eval(document.getElementById("longitude").value); var lat=eval(document.getElementById("latitude").value); main(m, d, lg, lat); SetTitle(d);}
function GetAzanMorning(m, d, lg, lat)
{ var ep=sun(m,d,4,lg); var zr=ep[0]; delta=ep[1]; ha=loc2hor(97.0,delta,lat); var t1=Round(zr-ha,24); ep=sun(m,d,t1,lg); zr=ep[0]; delta=ep[1]; ha=loc2hor(97.0,delta,lat); var t1=Round(zr-ha,24); return hms(t1);}
function GetSunrise(m, d, lg, lat)
{ var ep=sun(m,d,6,lg); var zr=ep[0]; delta=ep[1]; ha=loc2hor(78.900,delta,lat); var t2=Round(zr-ha,24); ep=sun(m,d,t2,lg); zr=ep[0]; delta=ep[1]; ha=loc2hor(78.900,delta,lat); t2=Round(zr-ha,24); return hms(t2);}
function GetAzanNoon(m, d, lg, lat)
{ var ep=sun(m,d,12,lg)
ep=sun(m,d,ep[0],lg)
var zr=ep[0]; return hms(zr+1);}
function GetSunset(m, d, lg, lat)
{ var ep=sun(m,d,18,lg)
var zr=ep[0]; delta=ep[1]; ha=loc2hor(102.08,delta,lat)
var t3=Round(zr+ha,24)
ep=sun(m,d,t3,lg)
zr=ep[0]; delta=ep[1]; ha=loc2hor(102.08,delta,lat)
t3=Round(zr+ha,24)
return hms(t3);}
function GetAzanNight(m, d, lg, lat)
{ var ep=sun(m,d,18.5,lg)
var zr=ep[0]; delta=ep[1]; ha=loc2hor(105.48,delta,lat)
var t4=Round(zr+ha,24)
ep=sun(m,d,t4,lg)
zr=ep[0]; delta=ep[1]; ha=loc2hor(105.48,delta,lat)
t4=Round(zr+ha,24)
return hms(t4);}
function ShowInfo(m, d, lg, lat, morning, sunrise, noon, sunset, night)
{ var t1 = GetAzanMorning(m, d, lg, lat); MM_findObj(morning).innerHTML=ConvertToUnicode(t1); temp = MM_findObj("spanMorning"); if (temp) temp.innerHTML = t1.substring(0,5); var t2 = GetSunrise(m, d, lg, lat); MM_findObj(sunrise).innerHTML=ConvertToUnicode(t2); var zr = GetAzanNoon(m, d, lg, lat); MM_findObj(noon).innerHTML=ConvertToUnicode(zr); temp = MM_findObj("spanNoon"); if (temp) temp.innerHTML = zr.substring(0,5); var t3 = GetSunset(m, d, lg, lat); MM_findObj(sunset).innerHTML=ConvertToUnicode(t3); var t4 = GetAzanNight(m, d, lg, lat); MM_findObj(night).innerHTML=ConvertToUnicode(t4); temp = MM_findObj("spanNight"); if (temp) temp.innerHTML = t4.substring(0,5);}
function main(m, d, lg, lat)
{ ShowInfo(m, d, lg, lat, "t1", "t2", "zr", "t3", "t4");}
function sun(m,d,h,lg)
{ if(m<7)
d= 31*(m-1)+d+h/24; else
d=6+30*(m-1)+d+h/24; var M=74.2023+0.98560026*d; var L=-2.75043+0.98564735*d; var lst=8.3162159+0.065709824*Math.floor(d)+1.00273791*24*(d%1)+lg/15; var e=0.0167065; var omega=4.85131-0.052954*d; var ep=23.4384717+0.00256*cosd(omega); var ed=180.0/Math.PI*e; var u=M; for(var i=1;i<5;i++)
u=u-(u-ed*sind(u)-M)/(1-e*cosd(u)); var v=2*atand(tand(u/2)*Math.sqrt((1+e)/(1-e))); var theta=L+v-M-0.00569-0.00479*sind(omega); var delta=asind(sind(ep)*sind(theta)); var alpha=180.0/Math.PI*Math.atan2(cosd(ep)*sind(theta),cosd(theta)); if(alpha>=360)
alpha-=360; var ha=lst-alpha/15; var zr=Round(h-ha,24); return ([zr,delta])
}
function ephemeris_init()
{ lgs= [0,49.70,48.30,45.07,51.64,48.68,46.42,57.33,56.29,50.84,59.21,46.28,51.41,48.34,49.59,60.86,48.50,53.06,53.39,47.00,50.86,52.52,50.00,50.88,57.06,47.09,54.44,59.58,48.52,51.59,54.35]; lats=[0,34.09,38.25,37.55,32.68,31.32,33.64,37.47,27.19,28.97,32.86,38.08,35.70,33.46,37.28,29.50,36.68,36.57,35.58,35.31,32.33,29.62,36.28,34.64,30.29,34.34,36.84,36.31,34.80,30.67,31.89];}
function coord()
{ var c=document.getElementById("cities"); var i = c.selectedIndex; if(i==0)
{ document.getElementById("longitude").value=""; document.getElementById("latitude").value="";}
else
{ document.getElementById("longitude").value=lgs[i].toString(); document.getElementById("latitude").value=lats[i].toString();}
}
function sind(x){return(Math.sin(Math.PI/180.0*x));}
function cosd(x){return(Math.cos(Math.PI/180.0*x));}
function tand(x){return(Math.tan(Math.PI/180.0*x));}
function atand(x){return(Math.atan(x)*180.0/Math.PI);}
function asind(x){return(Math.asin(x)*180.0/Math.PI);}
function acosd(x){return(Math.acos(x)*180.0/Math.PI);}
function sqrt(x){return(Math.sqrt(x));}
function frac(x){return(x%1);}
function floor(x){return(Math.floor(x));}
function ceil(x){return(Math.ceil(x));}
function loc2hor(z,d,p){ return(acosd((cosd(z)-sind(d)*sind(p))/cosd(d)/cosd(p))/15);}
function Round(x,a){ var tmp=x%a; if(tmp<0)
tmp+=a; return(tmp)
}
function hms(x)
{ x=Math.floor(3600*x); h=Math.floor(x/3600); mp=x-3600*h; m=Math.floor(mp/60); s=Math.floor(mp-60*m); return(((h<10)? "0" : "")+h.toString()+":"+((m<10)? "0" : "")+m.toString()+":"+((s<10)? "0" : "")+s.toString())
}

