var TFMcurrentEvent=1;
var TFMcurrentFCType=2;
var TFMntotalEvents=0;
var TFMxmlDoc = null;
var TFMfcDate = null;
var TFMbirthDate = null;

TFMfcDate = new Date();

function init(){
	if (GetCookie("TFM_BM")){
		document.df1.BM.options.selectedIndex=GetCookie("TFM_BM");
		document.df1.BD.options.selectedIndex=GetCookie("TFM_BD");
		document.df1.BY.options.selectedIndex=GetCookie("TFM_BY")-1927;
		ajaxFetchTFMForecast(0);
	}
}

function TFMloadXMLString(txt) 
{
try //Internet Explorer
  {
  TFMxmlDoc=new ActiveXObject("Microsoft.XMLDOM");
  TFMxmlDoc.async="false";
  TFMxmlDoc.loadXML(txt);
  return(TFMxmlDoc);  
  }
catch(e)
  {
  try //Firefox, Mozilla, Opera, etc.
    {
    parser=new DOMParser();
    TFMxmlDoc=parser.parseFromString(txt,"text/xml");
    return(TFMxmlDoc);
    }
  catch(e) {alert(e.message)}
  }
return(null);
}


function TFMDisplayFC(){
	var ajaxTFMFCText = document.getElementById('TFMFCText');
	var ajaxTFMQuotation = document.getElementById('TFMQuotation');
	var ajaxTFMFCType = document.getElementById('TFMFCType');	
	var ajaxTFMfcdate = document.getElementById('TFMfcdate');
	var ajaxTFMbirthdate = document.getElementById('TFMbirthdate');
	var	ajaxTFMFCPrevNext = document.getElementById('TFMFCPrevNext');	
	
		if (TFMntotalEvents){

			var fm = TFMxmlDoc.getElementsByTagName("fcmonth")[0].childNodes[0].nodeValue -1;
			var	fd = TFMxmlDoc.getElementsByTagName("fcday")[0].childNodes[0].nodeValue;
			var fy = TFMxmlDoc.getElementsByTagName("fcyear")[0].childNodes[0].nodeValue;
			
			TFMfcDate  = new Date (fy,fm,fd);
			
	
			var bm = TFMxmlDoc.getElementsByTagName("birthmonth")[0].childNodes[0].nodeValue - 1;
			var	bd = TFMxmlDoc.getElementsByTagName("birthday")[0].childNodes[0].nodeValue;
			var by = TFMxmlDoc.getElementsByTagName("birthyear")[0].childNodes[0].nodeValue;

			TFMbirthDate = new Date (by,bm,bd);
			

			var natalevents = TFMxmlDoc.getElementsByTagName("natalevent")[TFMcurrentEvent-1];
			var forecasts = natalevents.getElementsByTagName("forecast");
			
			if(ajaxTFMFCText)
				ajaxTFMFCText.innerHTML = forecasts[TFMcurrentFCType].getElementsByTagName("text")[0].childNodes[0].nodeValue;

			if(ajaxTFMQuotation)
				ajaxTFMQuotation.innerHTML = forecasts[TFMcurrentFCType].getElementsByTagName("quotation")[0].childNodes[0].nodeValue;

			if(ajaxTFMFCType)
				ajaxTFMFCType.innerHTML = forecasts[TFMcurrentFCType].getAttribute("type");
	
			if(ajaxTFMfcdate)
				ajaxTFMfcdate.innerHTML = TFMfcDate.format("ddd, mmm d");;
			
			
			if(ajaxTFMbirthdate)
				ajaxTFMbirthdate.innerHTML = TFMbirthDate.format("mmm d yyyy");;

			if(ajaxTFMFCPrevNext)
				if(TFMntotalEvents > 1){
					
					ajaxTFMFCPrevNext.innerHTML = '<img  align="absmiddle"  src="images/alert.but.gif" width="14" height="20" align="texttop">&nbsp;&nbsp;You are reading ' + TFMcurrentEvent + ' of ' + TFMntotalEvents;
			        if (TFMcurrentEvent == 1)
						s = 'Prev ' + ' <a href="javascript: TFMcurrentEvent=2; TFMDisplayFC();">Next</a>';
					else if	(TFMcurrentEvent < TFMntotalEvents)
						s = '<a href="javascript: TFMcurrentEvent=TFMcurrentEvent-1; TFMDisplayFC();">Prev </a>' + ' <a href="javascript: TFMcurrentEvent=TFMcurrentEvent+1; TFMDisplayFC();">Next</a>';
					else if (TFMcurrentEvent == TFMntotalEvents)
						s = '<a href="javascript: TFMcurrentEvent=TFMcurrentEvent-1; TFMDisplayFC();">Prev </a>' + ' Next';			
					
					ajaxTFMFCPrevNext.innerHTML = ajaxTFMFCPrevNext.innerHTML + ' ' + s;
					
			}							
			
				
			if(document.getElementById('personallink')) document.getElementById('personallink').className='';
			if(document.getElementById('lovelink')) document.getElementById('lovelink').className='';
			if(document.getElementById('moneylink')) document.getElementById('moneylink').className='';
			
			if (TFMcurrentFCType==2) document.getElementById('personallink').className='personallink';
			if (TFMcurrentFCType==1) document.getElementById('lovelink').className = 'lovelink';
			if (TFMcurrentFCType==0) document.getElementById('moneylink').className = 'moneylink';

		}
		else if (TFMxmlDoc.getElementsByTagName("error")[0]){
			var error = TFMxmlDoc.getElementsByTagName("error")[0];
			var errMsg = error.getElementsByTagName("details")[0].childNodes[0].nodeValue;
			ajaxTFMFCText.innerHTML = errMsg;
		}else 
			ajaxFetchTFMForecast(0);

}

function getTFMFCDateString(offset){
	var dt = new Date ();
	dt.setDate(TFMfcDate.getDate()+offset);
	var m = dt.getMonth() + 1;
	var d = dt.getDate();
	var y = dt.getFullYear();

	return "FM=" + m + "&FD=" + d + "&FY=" + y;
}

function ajaxFetchTFMForecast(d){
	var ajaxRequest;  // The variable that makes Ajax possible!
	
	try{
		// Opera 8.0+, Firefox, Safari
		ajaxRequest = new XMLHttpRequest();
	} catch (e){
		// Internet Explorer Browsers
		try{
			ajaxRequest = new ActiveXObject("Msxml2.XMLHTTP");
		} catch (e) {
			try{
				ajaxRequest = new ActiveXObject("Microsoft.XMLHTTP");
			} catch (e){
				// Something went wrong
				return false;
			}
		}
	}
	// Create a function that will receive data sent from the server
	ajaxRequest.onreadystatechange = function(){
		if(ajaxRequest.readyState == 4){
			TFMxmlDoc=TFMloadXMLString(ajaxRequest.responseText);

			TFMntotalEvents = TFMxmlDoc.getElementsByTagName("natalevent").length;
			TFMcurrentEvent=1;
			TFMDisplayFC();
			//alert(TFMntotalEvents);
		}else{
			document.getElementById('TFMFCPrevNext').innerHTML ='';
			document.getElementById('TFMFCText').innerHTML="Please wait...";

		}
	}
	
	var request = 'http://www.thefutureminders.com/affsites/df/dailyxml.cfm?bm=' + document.df1.BM.options[document.df1.BM.options.selectedIndex].value + '&bd=' + document.df1.BD.options[document.df1.BD.options.selectedIndex].value + '&BY=' + document.df1.BY.options[document.df1.BY.options.selectedIndex].value + '&'  + getTFMFCDateString(d) + '&AffID=' + document.df1.AffID.value + '&EmpID=' + document.df1.EmpID.value;

	ajaxRequest.open("GET", request , true);
	
 	ajaxRequest.send(null); 
    setCookie('TFM_BM',document.df1.BM.options[document.df1.BM.options.selectedIndex].value,8760); 
	setCookie('TFM_BD',document.df1.BD.options[document.df1.BD.options.selectedIndex].value,8760); 
	setCookie('TFM_BY',document.df1.BY.options[document.df1.BY.options.selectedIndex].value,8760); 
}

var dateFormat = function () {
	var	token = /d{1,4}|m{1,4}|yy(?:yy)?|([HhMsTt])\1?|[LloSZ]|"[^"]*"|'[^']*'/g,
		timezone = /\b(?:[PMCEA][SDP]T|(?:Pacific|Mountain|Central|Eastern|Atlantic) (?:Standard|Daylight|Prevailing) Time|(?:GMT|UTC)(?:[-+]\d{4})?)\b/g,
		timezoneClip = /[^-+\dA-Z]/g,
		pad = function (val, len) {
			val = String(val);
			len = len || 2;
			while (val.length < len) val = "0" + val;
			return val;
		};

	// Regexes and supporting functions are cached through closure
	return function (date, mask, utc) {
		var dF = dateFormat;

		// You can't provide utc if you skip other args (use the "UTC:" mask prefix)
		if (arguments.length == 1 && (typeof date == "string" || date instanceof String) && !/\d/.test(date)) {
			mask = date;
			date = undefined;
		}

		// Passing date through Date applies Date.parse, if necessary
		date = date ? new Date(date) : new Date();
		if (isNaN(date)) throw new SyntaxError("invalid date");

		mask = String(dF.masks[mask] || mask || dF.masks["default"]);

		// Allow setting the utc argument via the mask
		if (mask.slice(0, 4) == "UTC:") {
			mask = mask.slice(4);
			utc = true;
		}

		var	_ = utc ? "getUTC" : "get",
			d = date[_ + "Date"](),
			D = date[_ + "Day"](),
			m = date[_ + "Month"](),
			y = date[_ + "FullYear"](),
			H = date[_ + "Hours"](),
			M = date[_ + "Minutes"](),
			s = date[_ + "Seconds"](),
			L = date[_ + "Milliseconds"](),
			o = utc ? 0 : date.getTimezoneOffset(),
			flags = {
				d:    d,
				dd:   pad(d),
				ddd:  dF.i18n.dayNames[D],
				dddd: dF.i18n.dayNames[D + 7],
				m:    m + 1,
				mm:   pad(m + 1),
				mmm:  dF.i18n.monthNames[m],
				mmmm: dF.i18n.monthNames[m + 12],
				yy:   String(y).slice(2),
				yyyy: y,
				h:    H % 12 || 12,
				hh:   pad(H % 12 || 12),
				H:    H,
				HH:   pad(H),
				M:    M,
				MM:   pad(M),
				s:    s,
				ss:   pad(s),
				l:    pad(L, 3),
				L:    pad(L > 99 ? Math.round(L / 10) : L),
				t:    H < 12 ? "a"  : "p",
				tt:   H < 12 ? "am" : "pm",
				T:    H < 12 ? "A"  : "P",
				TT:   H < 12 ? "AM" : "PM",
				Z:    utc ? "UTC" : (String(date).match(timezone) || [""]).pop().replace(timezoneClip, ""),
				o:    (o > 0 ? "-" : "+") + pad(Math.floor(Math.abs(o) / 60) * 100 + Math.abs(o) % 60, 4),
				S:    ["th", "st", "nd", "rd"][d % 10 > 3 ? 0 : (d % 100 - d % 10 != 10) * d % 10]
			};

		return mask.replace(token, function ($0) {
			return $0 in flags ? flags[$0] : $0.slice(1, $0.length - 1);
		});
	};
}();

// Some common format strings
dateFormat.masks = {
	"default":      "ddd mmm dd yyyy HH:MM:ss",
	shortDate:      "m/d/yy",
	mediumDate:     "mmm d, yyyy",
	longDate:       "mmmm d, yyyy",
	fullDate:       "dddd, mmmm d, yyyy",
	shortTime:      "h:MM TT",
	mediumTime:     "h:MM:ss TT",
	longTime:       "h:MM:ss TT Z",
	isoDate:        "yyyy-mm-dd",
	isoTime:        "HH:MM:ss",
	isoDateTime:    "yyyy-mm-dd'T'HH:MM:ss",
	isoUtcDateTime: "UTC:yyyy-mm-dd'T'HH:MM:ss'Z'"
};

// Internationalization strings
dateFormat.i18n = {
	dayNames: [
		"Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat",
		"Sunday", "Monday", "Tuesday", "Wednesday", "Thursday", "Friday", "Saturday"
	],
	monthNames: [
		"Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov", "Dec",
		"January", "February", "March", "April", "May", "June", "July", "August", "September", "October", "November", "December"
	]
};

// For convenience...
Date.prototype.format = function (mask, utc) {
	return dateFormat(this, mask, utc);
};

function setCookie(NameOfCookie, value, expirehours) { 
var ExpireDate = new Date (); 
ExpireDate.setTime(ExpireDate.getTime() + (expirehours * 3600 * 1000)); 
document.cookie = NameOfCookie + "=" + escape(value) + 
((expirehours == null) ? "" : "; expires=" + ExpireDate.toGMTString()) + 
"; path=/;" ; 
}

function getCookieVal (offset){
	var endstr = document.cookie.indexOf(";",offset);
	if (endstr==-1)
		endstr=document.cookie.length;
	return unescape(document.cookie.substring(offset,endstr));
}

function FixCookieDate (date){
	var base = new Date(0);
	var skew=base.getTime();
	if (skew > 0)
		date.setTime(date.getTime()-skew);
}

function GetCookie (name){
	var arg = name + "=";
	var alen = arg.length;
	var clen = document.cookie.length;
	var i = 0;
	while (i < clen){
		var j = i + alen;
		if (document.cookie.substring(i,j) == arg)
			return getCookieVal(j);
			i = document.cookie.indexOf(" ",i) + 1;
		if (i == 0) break;
	}			
	return null;
}

function SetCookie (name,value,expires,path,domain,secure){
	document.cookie = name + "=" + escape(value) +
		((expires) ? "; expires=" + expires.toGMTString() : "") +
		((path) ? "; path=" + path : "") + 
		((domain) ? "; domain=" + domain : "") + 
		((secure) ? "; secure=" : "");
}

function DeleteCookie(name,path,domain){
	if (GetCookie(name)){
		document.cookie = name + "=" +
		((path) ? "; path=" + path : "") + 
		((domain) ? "; domain=" + domain : "") + 
		"; expires=Thu, 01-Jan-70 00:00:01 GMT";
	}
}	

function GetDateObj(expirehours){
var expdate = new Date();
FixCookieDate(expdate);
expdate.setTime(expdate.getTime() + (expirehours*60*60*1000));
return expdate;
}