function halach(date) {

  this.date = date;
  
  this.latdeg = 14;
  this.latmin = 35;
  this.lathem = "N";

  this.lngdeg = 120;
  this.lngmin = 57;
  this.lnghem = "E";

  this.dst = 0;
  this.ampm = 1;

  this.hanetz = '';
  this.shika = '';
  this.alot = '';
  this.misheyakir = '';
  this.tzeit = '';
  this.shema = '';
  this.tefillah = '';
  this.chatzot = '';
  this.minchag = '';
  this.minchak = '';
  this.plag = '';
  this.motzieShabbat = '';
  this.knissatShabbat = '';

  this.candleLighting = '';

  this.getHalachTimes = getHalachTimes;
  this.showTimes = showTimes;

}


function getHalachTimes(){

	var tz = - (12 - 21);

	var d, m, y;
	var nsi, ewi;
	var i;
        var hemi;


        var latd = this.latdeg;
        var latm = this.latmin;
        var lngd = this.lngdeg;
        var lngm = this.lngmin;
        
        hemi = this.lathem;
	i = hemi.indexOf("N");
	nsi = (i != -1) ? 0 : 1;
 
        hemi = this.lnghem;
	i = hemi.indexOf("W");
	ewi = (i != -1) ? 0 : 1;

        d = this.date.getDate();
        m = this.date.getMonth() + 1;
        y = this.date.getYear();

	var adj = - (12 - 20);
	adj += this.dst;

	var time;
	var sunrise, sunset;
	var shaa_zmanit;

	time = suntime(d, m, y, 90, 50, lngd, lngm, ewi, latd, latm, nsi, adj);
	if(time[1] == 0) {
		sunrise = time[2];
		sunset  = time[3];
		this.hanetz = timeadj(sunrise, this.ampm);
		this.shkia = timeadj(sunset, this.ampm);
		shaa_zmanit = (sunset - sunrise) / 12;
	}
	else {
		this.hanetz = "";
		this.shkia = "";
	}

	time = suntime(d, m, y, 106, 6, lngd, lngm, ewi, latd, latm, nsi, adj);
	if(time[1] == 0)
		this.alot = timeadj(time[2], this.ampm);
	else
		this.alot = "";

	time = suntime(d, m, y, 101, 0, lngd, lngm, ewi, latd, latm, nsi, adj);
	if(time[1] == 0)
		this.misheyakir = timeadj(time[2], this.ampm);
	else
		this.misheyakir = "";

	time = suntime(d, m, y, 96, 0, lngd, lngm, ewi, latd, latm, nsi, adj);
	if(time[1] == 0)
		this.tzeit = timeadj(time[3], this.ampm);
	else	
		this.tzeit = "";

	this.shema    = timeadj(sunrise + shaa_zmanit * 3, this.ampm);
	this.tefillah = timeadj(sunrise + shaa_zmanit * 4, this.ampm);
	this.chatzot  = timeadj(sunrise + shaa_zmanit * 6, this.ampm);
	this.minchag  = timeadj(sunrise + shaa_zmanit * 6.5, this.ampm);
	this.minchak  = timeadj(sunrise + shaa_zmanit * 9.5, this.ampm);
	this.plag     = timeadj(sunrise + shaa_zmanit * 10.75, this.ampm);

	if(this.date.getDay() == 6) {

		// motzei shabbat (3 small stars)
		time = suntime(d, m, y, 98, 30, lngd, lngm, ewi, latd, latm, nsi, adj);
		if(time[1] == 0)
			this.motzeiShabbat = timeadj(time[3], this.ampm);
		else
			this.motzeiShabbat = "";
		// knissat shabbat (sunset from day before)
		var day_before = new Date(this.date.getTime() - 86400000);
                this.candleLighting = day_before;
		db = day_before.getDate();
		mb = day_before.getMonth() + 1;
		yb = day_before.getYear();
		if(yb < 1900) yb += 1900;
		time = suntime(db, mb, yb, 90, 50, lngd, lngm, ewi, latd, latm, nsi, adj);
		this.knissatShabbat = timeadj(time[3] - 18.0/60.0, this.ampm);
	}
	else {
		this.motzeiShabbat = '';
		this.knissatShabbat = '';

	}

}


function showTimes() {

  var  halwin = window.open("", "winHalach","toolbar=no,location=no,directories=no,status=no,scrollbars=no,resizable=no,copyhistory=no,width=280,height=330");
  var haldoc = halwin.document;
  var hYear = this.date.getYear();
  if (hYear < 1900)
     hYear += 1900; 
  var hebDate = civ2heb(this.date.getDate(), this.date.getMonth()+1, hYear);
  var hmS = hebDate.substring(hebDate.indexOf(' ')+1, hebDate.length);
  var hDay = eval(hebDate.substring(0, hebDate.indexOf(' ')));
  var hMonth = eval(hmS.substring(0, hmS.indexOf(' ')));
  var hYear = hmS.substring(hmS.indexOf(' ')+1, hmS.length);
  hebDate = hDay + ' ' + hebMonth[hMonth+1] + ' ' + hYear;

  var bodyHTML  = "<HTML><HEAD><TITLE>Halachic Times";
      bodyHTML += "</TITLE><BODY bgcolor='' leftmargin='15' onBlur='this.close();'>";
      bodyHTML += "<BASEFONT face='Arial'>";
      bodyHTML += "<FONT face='Verdana, Arial' color='blue' size='4'>" + hebDate + "</FONT><BR><BR>";
      bodyHTML += "<DIV='center'><TABLE BORDER=0>";
      bodyHTML += "<TR><TD><FONT size='2'>Alot Hashachar (dawn)" + "</FONT></TD><TD>:</TD><TD align='right'><FONT size='2'>" +  this.alot + "</FONT></TD></TR>";
      bodyHTML += "<TR><TD><FONT size='2'>Misheyakir" + "</FONT></TD><TD>:</TD><TD align='right'><FONT size='2'>" +  this.misheyakir + "</FONT></TD></TR>";
      bodyHTML += "<TR><TD><FONT size='2'>Hanetz Hachama (sunrise)" + "</FONT></TD><TD>:</TD><TD align='right'><FONT size='2'>" + this.hanetz + "</FONT></TD></TR>";
      bodyHTML += "<TR><TD><FONT size='2'>Sof zman shema (gr\"a)" + "</FONT></TD><TD>:</TD><TD align='right'><FONT size='2'>" + this.shema + "</FONT></TD></TR>";
      bodyHTML += "<TR><TD><FONT size='2'>Sof zman tefillah (gr\"a)" + "</FONT></TD><TD>:</TD><TD align='right'><FONT size='2'>" + this.tefillah + "</FONT></TD></TR>";
      bodyHTML += "<TR><TD><FONT size='2'>Chatzot hayom (noon)" + "</FONT></TD><TD>:</TD><TD align='right'><FONT size='2'>" + this.chatzot + "</FONT></TD></TR>";
      bodyHTML += "<TR><TD><FONT size='2'>Mincha gedolah" + "</FONT></TD><TD>:</TD><TD align='right'><FONT size='2'>" + this.minchag + "</FONT></TD></TR>";
      bodyHTML += "<TR><TD><FONT size='2'>Mincha ketana" + "</FONT></TD><TD>:</TD><TD align='right'><FONT size='2'>" + this.minchak + "</FONT></TD></TR>";
      bodyHTML += "<TR><TD><FONT size='2'>Plag hamincha" + "</FONT></TD><TD>:</TD><TD align='right'><FONT size='2'>" + this.plag + "</FONT></TD></TR>";
      bodyHTML += "<TR><TD><FONT size='2'>Shkiat hachama (sunset)" + "</FONT></TD><TD>:</TD><TD align='right'><FONT size='2'>" + this.shkia + "</FONT></TD></TR>";
      bodyHTML += "<TR><TD><FONT size='2'>Tzeit hakochavim (nightfall)" + "</FONT></TD><TD>:</TD><TD align='right'><FONT size='2'>" + this.tzeit + "</FONT></TD></TR>";
      bodyHTML += "</DIV></TABLE></BODY></HTML>";

  haldoc.close();
  haldoc.open();
  haldoc.write(bodyHTML);
  haldoc.close();

}


function makeArray() {
	this[0] = makeArray.arguments.length;
	for (i = 0; i < makeArray.arguments.length; i = i + 1)
		this[i+1] = makeArray.arguments[i];
}

function doy(d, m, y) {
        var monCount = new makeArray(1, 32, 60, 91, 121, 152, 182, 213, 244, 274, 305, 335, 366);
	return monCount[m] + d + (m > 2 && leap(y));
}


function suntime(
	dy, mn, yr,
	sundeg, sunmin,
	londeg, lonmin, ew,
	latdeg, latmin, ns,
	timezone)
{
	var invalid = 0;	// start out as OK

	longitude = (londeg + lonmin/60.0) * ((ew == 0) ? -1 : 1);
	latitude  = (latdeg + latmin/60.0) * ((ns == 0) ? 1 : -1);

	var yday = doy(dy, mn, yr);

	var A = 1.5708; 
	var B = 3.14159; 
	var C = 4.71239; 
	var D = 6.28319;      
	var E = 0.0174533 * latitude; 
	var F = 0.0174533 * longitude; 
	var G = 0.261799 * timezone; 

	var R = Math.cos(0.01745 * (sundeg + sunmin/60.0));

	var J;

	// two times through the loop
	//    i=0 is for sunrise
	//    i=1 is for sunset
	for (i = 0; i < 2; i++) { 

		if(!i)
			J =  A;	// sunrise 
		else
			J = C;	// sunset

		var K = yday + ((J - F) / D); 
		var L = (K * .017202) - .0574039;              // Solar Mean Anomoly 
		var M = L + .0334405 * Math.sin(L);            // Solar True Longitude 
		M += 4.93289 + (3.49066E-04) * Math.sin(2 * L); 
		
		// Quadrant Determination 
		if (D == 0) {
			alert("Trying to normalize with zero offset...");
			exit;
		} 

		while(M < 0)
			M = (M + D);

		while(M >= D)
			M = (M - D);

		if ((M / A) - Math.floor(M / A) == 0)
			M += 4.84814E-06;

		var P = Math.sin(M) / Math.cos(M);                   // Solar Right Ascension 
		P = Math.atan2(.91746 * P, 1); 

		// Quadrant Adjustment 
		if (M > C)
			P += D;
		else {
			if (M > A)
				P += B;
		} 

		var Q = .39782 * Math.sin(M);      // Solar Declination 
		Q = Q / Math.sqrt(-Q * Q + 1);     // This is how the original author wrote it! 
		Q = Math.atan2(Q, 1); 

		var S = R - (Math.sin(Q) * Math.sin(E)); 
		S = S / (Math.cos(Q) * Math.cos(E)); 

		if(Math.abs(S) > 1)
			invalid = 1;	// uh oh! no sunrise/sunset

		S = S / Math.sqrt(-S * S + 1); 
		S = A - Math.atan2(S, 1); 

		if(!i)
			S = D - S;	// sunrise

		var T = S + P - 0.0172028 * K - 1.73364;  // Local apparent time 
		var U = T - F;                            // Universal timer 
		var V = U + G;                            // Wall clock time 
		
		// Quadrant Determination 
		if(D == 0) {
			alert("Trying to normalize with zero offset...");
			exit;
		} 
		
		while(V < 0)
			V = V + D;
		while(V >= D)
			V = V - D;
		V = V * 3.81972; 

		if(!i)
			sr = V;	// sunrise
		else
			ss = V;	// sunset
	} 

	var ret = new Object();
	ret[1] = invalid;
	ret[2] = sr;
	ret[3] = ss;
	return ret;
}


function timeadj(t, ampm) {
	var hour;
	var min;

	var time = t;

	var hour = Math.floor(time);
	var min  = Math.floor((time - hour) * 60.0 + 0.5);

	if(min >= 60) {
		hour += 1;
		min  -= 60;
	}

	if(hour < 0)
		hour += 24;

	if(ampm) {
		ampm_str = (hour > 11) ? ' PM' : ' AM';
		hour %= 12;
		hour = (hour < 1) ? 12 : hour;
	}
	else
		ampm_str = '';

	var str = hour + ':' + ((min < 10) ? '0' : '') + min + ampm_str;
//	var str = hour + ':' + min + ampm_str;
	return str;

}

function leap(y) {
	return ((y % 400 == 0) || (y % 100 != 0 && y % 4 == 0));
}

function civMonthLength(month, year) {
	if(month == 2)
		return 28 + leap(year);
	else if(month == 4 || month == 6 || month == 9 || month == 11)
	   return 30;
	else
		return 31;
}



