// site.js
// Copyright (C)2007 WebTransformer.com - All Rights Reserved.

// Style //

// ugly workaround for missing support for selectorText in Netscape6/Mozilla
// call onLoad() or before you need to do anything you would have otherwise used
// selectorText for.
var ugly_selectorText_workaround_flag = false;
var allStyleRules;
// code developed using the following workaround (CVS v1.15) as an example.
// http://lxr.mozilla.org/seamonkey/source/extensions/xmlterm/ui/content/XMLTermCommands.js
function ugly_selectorText_workaround() {
	if((navigator.userAgent.indexOf("Gecko") == -1) ||
	   (ugly_selectorText_workaround_flag)) {
		return; // we've already been here or shouldn't be here
	}
	var styleElements = document.getElementsByTagName("style");

	for(var i = 0; i < styleElements.length; i++) {
		var styleText = styleElements[i].firstChild.data;
		// this should be using match(/\b[\w-.]+(?=\s*\{)/g but ?= causes an
		// error in IE5, so we include the open brace and then strip it
		allStyleRules = styleText.match(/\b[\w-.]+(\s*\{)/g);
	}
	for(var i = 0; i < allStyleRules.length; i++) {
		// probably insufficient for people who like random gobs of
		// whitespace in their styles
		allStyleRules[i] = allStyleRules[i].substr(0, (allStyleRules[i].length - 2));
	}
	ugly_selectorText_workaround_flag = true;
}

// setStyleById: given an element id, style property and
// value, apply the style.
// args:
//  i - element id
//  p - property
//  v - value
//
function setStyleById(i, p, v) {
	var n = document.getElementById(i);
	n.style[p] = v;
}

// getStyleById: given an element ID and style property
// return the current setting for that property, or null.
// args:
//  i - element id
//  p - property
function getStyleById(i, p) {
	var n = document.getElementById(i);
	var s = eval("n.style." + p);

	// try inline
	if((s != "") && (s != null)) {
		return s;
	}

	// try currentStyle
	if(n.currentStyle) {
		var s = eval("n.currentStyle." + p);
		if((s != "") && (s != null)) {
			return s;
		}
	}
	// try styleSheets
	var sheets = document.styleSheets;
	if(sheets.length > 0) {
		// loop over each sheet
		for(var x = 0; x < sheets.length; x++) {
			// grab stylesheet rules
			var rules = sheets[x].cssRules;
			if(rules.length > 0) {
				// check each rule
				for(var y = 0; y < rules.length; y++) {
					var z = rules[y].style;
					// selectorText broken in NS 6/Mozilla: see
					// http://bugzilla.mozilla.org/show_bug.cgi?id=51944
					ugly_selectorText_workaround();
					if(allStyleRules) {
						if(allStyleRules[y] == i) {
							return z[p];
						}
					} else {
						// use the native selectorText and style stuff
						if(((z[p] != "") && (z[p] != null)) ||
						   (rules[y].selectorText == i)) {
							return z[p];
						}
					}
				}
			}
		}
	}
	return null;
}

// setStyleByClass: given an element type and a class selector,
// style property and value, apply the style.
// args:
//  t - type of tag to check for (e.g., SPAN)
//  c - class name
//  p - CSS property
//  v - value
var ie = (document.all) ? true : false;
function setStyleByClass(t,c,p,v){
	var elements;
	if(t == '*') {
		// '*' not supported by IE/Win 5.5 and below
		elements = (ie) ? document.all : document.getElementsByTagName('*');
	} else {
		elements = document.getElementsByTagName(t);
	}
	for(var i = 0; i < elements.length; i++){
		var node = elements.item(i);
		for(var j = 0; j < node.attributes.length; j++) {
			if(node.attributes.item(j).nodeName == 'class') {
				if(node.attributes.item(j).nodeValue == c) {
					eval('node.style.' + p + " = '" +v + "'");
				}
			}
		}
	}
}

// getStyleByClass: given an element type, a class selector and a property,
// return the value of the property for that element type.
// args:
//  t - element type
//  c - class identifier
//  p - CSS property
function getStyleByClass(t, c, p) {
	// first loop over elements, because if they've been modified they
	// will contain style data more recent than that in the stylesheet
	var elements;
	if(t == '*') {
		// '*' not supported by IE/Win 5.5 and below
		elements = (ie) ? document.all : document.getElementsByTagName('*');
	} else {
		elements = document.getElementsByTagName(t);
	}
	for(var i = 0; i < elements.length; i++){
		var node = elements.item(i);
		for(var j = 0; j < node.attributes.length; j++) {
			if(node.attributes.item(j).nodeName == 'class') {
				if(node.attributes.item(j).nodeValue == c) {
					var theStyle = eval('node.style.' + p);
					if((theStyle != "") && (theStyle != null)) {
						return theStyle;
					}
				}
			}
		}
	}
	// if we got here it's because we didn't find anything
	// try styleSheets
	var sheets = document.styleSheets;
	if(sheets.length > 0) {
		// loop over each sheet
		for(var x = 0; x < sheets.length; x++) {
			// grab stylesheet rules
			var rules = sheets[x].cssRules;
			if(rules.length > 0) {
				// check each rule
				for(var y = 0; y < rules.length; y++) {
					var z = rules[y].style;
					// selectorText broken in NS 6/Mozilla: see
					// http://bugzilla.mozilla.org/show_bug.cgi?id=51944
					ugly_selectorText_workaround();
					if(allStyleRules) {
						if((allStyleRules[y] == c) ||
						   (allStyleRules[y] == (t + "." + c))) {
							return z[p];
						}
					} else {
						// use the native selectorText and style stuff
						if(((z[p] != "") && (z[p] != null)) &&
						   ((rules[y].selectorText == c) ||
						    (rules[y].selectorText == (t + "." + c)))) {
							return z[p];
						}
					}
				}
			}
		}
	}

	return null;
}

// setStyleByTag: given an element type, style property and
// value, and whether the property should override inline styles or
// just global stylesheet preferences, apply the style.
// args:
//  e - element type or id
//  p - property
//  v - value
//  g - boolean 0: modify global only; 1: modify all elements in document
function setStyleByTag(e, p, v, g) {
	if(g) {
		var elements = document.getElementsByTagName(e);
		for(var i = 0; i < elements.length; i++) {
			elements.item(i).style[p] = v;
		}
	} else {
		var sheets = document.styleSheets;
		if(sheets.length > 0) {
			for(var i = 0; i < sheets.length; i++) {
				var rules = sheets[i].cssRules;
				if(rules.length > 0) {
					for(var j = 0; j < rules.length; j++) {
						var s = rules[j].style;
						// selectorText broken in NS 6/Mozilla: see
						// http://bugzilla.mozilla.org/show_bug.cgi?id=51944
						ugly_selectorText_workaround();
						if(allStyleRules) {
							if(allStyleRules[j] == e) {
								s[p] = v;
							}
						} else {
							// use the native selectorText and style stuff
							if(((s[p] != "") && (s[p] != null)) &&
							   (rules[j].selectorText == e)) {
								s[p] = v;
							}
						}

					}
				}
			}
		}
	}
}

// getStyleByTag: given an element type and style property, return
// the property's value
// args:
//  e - element type
//  p - property
function getStyleByTag(e, p) {
	var sheets = document.styleSheets;
	if(sheets.length > 0) {
		for(var i = 0; i < sheets.length; i++) {
			var rules = sheets[i].cssRules;
			if(rules.length > 0) {
				for(var j = 0; j < rules.length; j++) {
					var s = rules[j].style;
					// selectorText broken in NS 6/Mozilla: see
					// http://bugzilla.mozilla.org/show_bug.cgi?id=51944
					ugly_selectorText_workaround();
					if(allStyleRules) {
						if(allStyleRules[j] == e) {
							return s[p];
						}
					} else {
						// use the native selectorText and style stuff
						if(((s[p] != "") && (s[p] != null)) &&
						   (rules[j].selectorText == e)) {
							return s[p];
						}
					}

				}
			}
		}
	}
	// if we don't find any style sheets, return the value for the first
	// element of this type we encounter without a CLASS or STYLE attribute
	var elements = document.getElementsByTagName(e);
	var sawClassOrStyleAttribute = false;
	for(var i = 0; i < elements.length; i++) {
		var node = elements.item(i);
		for(var j = 0; j < node.attributes.length; j++) {
			if((node.attributes.item(j).nodeName == 'class') ||
			   (node.attributes.item(j).nodeName == 'style')){
			   sawClassOrStyleAttribute = true;
			}
		}
		if(! sawClassOrStyleAttribute) {
			return elements.item(i).style[p];
		}
	}
}

// URI //

function getArgs(hrefobj) {
  href=hrefobj.href;
  var arg = new Object();
  if (href.indexOf("?")!=-1) {
    var params=href.split( "?")[1];
    var param=params.split("&");
    for (var i=0; i<param.length; ++i) {
      var name=param[i].split("=")[0];
      var value=param[i].split("=")[1];
      arg[name]=unescape(value);
    }
  }
  return arg;
}

//splits a URI into its parts
//returns null if str is not a valid URI
//does not support IPvFuture domains
//see RFC 3986 http://www.faqs.org/rfcs/rfc3986.html
function parseURI(str)
{
	if(!str) return null;
	
	var regexUri = /^([a-z0-9+.-]+):(?:\/\/(?:((?:[a-z0-9-._~!$&'()*+,;=:]|%[0-9A-F]{2})*)@)?((?:[a-z0-9-._~!$&'()*+,;=]|%[0-9A-F]{2})*|\[(?:[0-9A-F:.]{2,})\])(?::(\d*))?(\/(?:[a-z0-9-._~!$&'()*+,;=:@\/]|%[0-9A-F]{2})*)?|(\/?(?:[a-z0-9-._~!$&'()*+,;=:@]|%[0-9A-F]{2})+(?:[a-z0-9-._~!$&'()*+,;=:@\/]|%[0-9A-F]{2})*)?)(?:\?((?:[a-z0-9-._~!$&'()*+,;=:\/?@]|%[0-9A-F]{2})*))?(?:#((?:[a-z0-9-._~!$&'()*+,;=:\/?@]|%[0-9A-F]{2})*))?$/i;
	//'
	/*composed as follows:
		^
		([a-z0-9+.-]+):											#scheme
		(?:
			\/\/												#it has an authority:
			(?:((?:[a-z0-9-._~!$&'()*+,;=:]|%[0-9A-F]{2})*)@)?	#userinfo
			((?:[a-z0-9-._~!$&'()*+,;=]|%[0-9A-F]{2})*|\[(?:[0-9A-F:.]{2,})\])	#host (loose check to allow for IPv6 addresses)
			(?::(\d*))?											#port
			(\/(?:[a-z0-9-._~!$&'()*+,;=:@\/]|%[0-9A-F]{2})*)?	#path
			|
																#it doesn't have an authority:
			(\/?(?:[a-z0-9-._~!$&'()*+,;=:@]|%[0-9A-F]{2})+(?:[a-z0-9-._~!$&'()*+,;=:@\/]|%[0-9A-F]{2})*)?	#path
		)
		(?:
			\?((?:[a-z0-9-._~!$&'()*+,;=:/?@]|%[0-9A-F]{2})*)	#query string
		)?
		(?:
			#((?:[a-z0-9-._~!$&'()*+,;=:/?@]|%[0-9A-F]{2})*)	#fragment
		)?
		$
	*/
	if(!regexUri.test(str)) return null;	//invalid URI
	
	//these extra steps are required to check for validity of the host depending on if it's a URL or not,
	// since URLs allow IPv6 addresses (i.e., they allow '[', ':', and ']')
	var scheme = str.replace(regexUri, "$1").toLowerCase();
	var host = str.replace(regexUri, "$3");
	if(host && (scheme == "http" || scheme == "https"))	//if it's a URL
	{
		if(!normalizeURLDomain(host)) return null;	//invalid host
	}
	else if(host)	//host may not include '[', ':', or ']'
	{
		if((/[:\[\]]/).test(host)) return null;	//invalid host
	}
	
	var parts = {
		uri: scheme+str.slice(scheme.length),	//make sure scheme is lower case
		scheme: scheme,
		authority: "",	//userinfo@host:port
			userinfo: str.replace(regexUri, "$2"),
			host: host,
			port: str.replace(regexUri, "$4"),
		path: str.replace(regexUri, "$5$6"),
		query: str.replace(regexUri, "$7"),
		fragment: str.replace(regexUri, "$8")
	};
	parts.authority = (parts.userinfo ? parts.userinfo+"@" : "") + parts.host + (parts.port ? ":"+parts.port : "");
	
	return parts;
}

//splits a query string into its name/value pairs
//returns a 2-D array
function parseQueryNumeric(str)
{
	var results = [];	//array of objects {name, value}
	
	var pairs = str.split("&");
	var pair, j, result;
	for(var i=0; i<pairs.length; i++)
	{
		pair = pairs[i].split("=");
		if(!pair[0]) continue;	//if there is no name, skip it
		result = {
			name: pair[0],
			value: ""
		};
		if(pair.length > 0)	//if it has a value
		{
			result.value = pair[1];	//set the value
			for(j=2; j<pair.length; j++)	//if there is more than one "=", include its encoded form in the value
			{
				result.value += "%3D"+pair[j];
			}
		}
		results.push(result);
	}
	
	return results;
}
//splits a query string into its name/value pairs
//returns an associative array
//if there are multiple pairs with the same name, the last pair is used
function parseQueryAssociative(str)
{
	var results = {};	//associative array
	
	var pairs = str.split("&");
	var pair, j, result;
	for(var i=0; i<pairs.length; i++)
	{
		pair = pairs[i].split("=");
		if(!pair[0]) continue;	//if there is no name, skip it
		results[pair[0]] = "";
		if(pair.length > 0)	//if it has a value
		{
			results[pair[0]] = pair[1];	//set the value
			for(j=2; j<pair.length; j++)	//if there is more than one "=", include its encoded form in the value
			{
				results[pair[0]] += "%3D"+pair[j];
			}
		}
	}
	
	return results;
}


// URL //

//splits a URL (i.e., http(s) scheme URI) into its parts
//returns null if str is not a valid URL
//does not support IPvFuture domains
//see RFC 2616 http://tools.ietf.org/html/rfc2616
//note: according to the RFC, fragments aren't part of a URL (they're only used by the browser, never sent to the server)
// but this function allows them anyway, of course
function parseURL(str)
{
	var uri = parseURI(str);
	if(!uri) return null;	//invalid URI
	if((uri.scheme != "http" && uri.scheme != "https") || !uri.authority) return null;	//it's not a URL
	if(!uri.host) return null;	//no domain
	
	var parts = {
		url: "",
		protocol: uri.scheme,
		authority: "",	//domain:port
			domain: normalizeURLDomain(uri.host),
			port: uri.port,	//defaults: http 80, https 443
		path: (normalizeURLPath(uri.path) || "/"),
		query: uri.query,
		anchor: uri.fragment
	};
	if(!parts.domain) return null;	//invalid domain
	parts.authority = parts.domain + (parts.port ? ":"+parts.port : "");
	parts.url = parts.protocol + "://" + parts.authority + parts.path + (parts.query ? "?"+parts.query : "") +
	 (parts.anchor ? "#"+parts.anchor : "");
	
	return parts;
}

//converts an obscured URL domain to a more readable one
//returns "" if it's not a valid domain
//does not support IPvFuture domains
//see http://www.pc-help.org/obscure.htm
// and RFC 1123 http://tools.ietf.org/html/rfc1123#section-2   (Section 2.1)
// and RFC 952 http://tools.ietf.org/html/rfc952   (ASSUMPTIONS 1, GRAMMATICAL HOST TABLE SPECIFICATION)
// and RFC 2181 http://tools.ietf.org/html/rfc2181#section-11   (Section 11)
function normalizeURLDomain(domain)
{
	if(!domain) return "";
	if(domain.toLowerCase() == "localhost") return "localhost";
	
	domain = domain.replace(/%3(\d)/g, "$1");	//decimals
	//upper-case letters (converted to lower-case)
	domain = domain.replace(/%41/ig, "a").replace(/%42/ig, "b").replace(/%43/ig, "c").replace(/%44/ig, "d").replace(/%45/ig, "e");
	domain = domain.replace(/%46/ig, "f").replace(/%47/ig, "g").replace(/%48/ig, "h").replace(/%49/ig, "i").replace(/%4A/ig, "j");
	domain = domain.replace(/%4B/ig, "k").replace(/%4C/ig, "l").replace(/%4D/ig, "m").replace(/%4E/ig, "n").replace(/%4F/ig, "o");
	domain = domain.replace(/%50/ig, "p").replace(/%51/ig, "q").replace(/%52/ig, "r").replace(/%53/ig, "s").replace(/%54/ig, "t");
	domain = domain.replace(/%55/ig, "u").replace(/%56/ig, "v").replace(/%57/ig, "w").replace(/%58/ig, "x").replace(/%59/ig, "y");
	domain = domain.replace(/%5A/ig, "z");
	//lower-case letters
	domain = domain.replace(/%61/ig, "a").replace(/%62/ig, "b").replace(/%63/ig, "c").replace(/%64/ig, "d").replace(/%65/ig, "e");
	domain = domain.replace(/%66/ig, "f").replace(/%67/ig, "g").replace(/%68/ig, "h").replace(/%69/ig, "i").replace(/%6A/ig, "j");
	domain = domain.replace(/%6B/ig, "k").replace(/%6C/ig, "l").replace(/%6D/ig, "m").replace(/%6E/ig, "n").replace(/%6F/ig, "o");
	domain = domain.replace(/%70/ig, "p").replace(/%71/ig, "q").replace(/%72/ig, "r").replace(/%73/ig, "s").replace(/%74/ig, "t");
	domain = domain.replace(/%75/ig, "u").replace(/%76/ig, "v").replace(/%77/ig, "w").replace(/%78/ig, "x").replace(/%79/ig, "y");
	domain = domain.replace(/%7A/ig, "z");
	//allowed symbols
	domain = domain.replace(/%2D/ig, "-").replace(/%2E/ig, ".");
	domain = domain.replace(/%3A/ig, ":").replace(/%5B/ig, "[").replace(/%5D/ig, "]");	//for IPv6 addresses
	if((/[^a-z0-9:\[\].-]/i).test(domain)) return "";	//contains invalid characters
	
	var ip;
	if(ip = normalizeIPv4(domain)) return ip;	//it's a valid IPv4 address
	if(ip = normalizeIPv6(domain)) return ip;	//it's a valid IPv6 address
	
	//it's not an IP address
	if((/[:\[\]]/).test(domain)) return "";	//contains invalid characters
	if(domain.length > 255) return "";	//too long
	//note: the spec doesn't allow a name to start with a digit, but this is not enforced
	if((/^[a-z0-9]([a-z0-9-]{0,61}[a-z0-9])?(\.[a-z0-9]([a-z0-9-]{0,61}[a-z0-9])?)+$/i).test(domain))
		return domain;	//valid domain
	return "";	//invalid domain
}

function normalizeIPv4(ip)
{
	if(!(/^(\d+|0x[0-9A-F]+)(\.(\d+|0x[0-9A-F]+)){3}$/i).test(ip))	return '';	//invalid
	var parts = ip.split(".");
	var val, dwordToIp;
	var vals = [];
	for(var i=0; i<parts.length; i++)	//for each part
	{
		val = parseInt(parts[i]);	//convert hex or octal to dword/decimal
		
		//if this is the last part and it's a dword
		//e.g., in an IP of 1192362298 or 71.1179962 or 71.18.314
		if(i == parts.length-1 && i < 3)
		{
			//convert dword to decimal parts
			//e.g., 1179962 becomes 18.1.58
			dwordToIp = [];
			while(i < 4)
			{
				dwordToIp.unshift(val % 256);
				val = (val-dwordToIp[0]) / 256;
				i++;
			}
			vals = vals.concat(dwordToIp);
			break;
		}
		val = val % 256;
		vals.push(val);
	}
	return vals.join(".");	//valid IP address
}

//note: this includes the '[' and ']' characters on the ends of the IP (for use in a URL)
function normalizeIPv6(ip)
{
	if(ip.charAt(0) == '[' && ip.charAt(ip.length-1) == ']') ip = ip.slice(1,ip.length-1);
	ip = ip.split('::');	//split the IP at the '::' shortcut (if it's used)
	if(ip.length < 1 || ip.length > 2) return '';	//invalid IP
	var x = ip[0].split(':');
	if(x.length > 8 || (ip.length>1 && x.length+ip[1].split(':').length > 7)) return '';	//invalid IP
	var a = [], b = [];
	for(var i=0; i<x.length; i++)	//for each part left of '::' (or of the entire IP if '::' isn't used)
	{
		if(x[0] == '') break;	//there isn't anything on the left side
		if((/^[0-9A-F]{1,4}$/i).test(x[i])) a.push(normalizeIPv6.pad(x[i]));
		else if(ip.length==1 && i == x.length-1 && (x[i] = normalizeIPv6.v4to6(x[i])) != '')	//last part of entire IP is a ver. 4 IP
		{
			//converted x[i] to a ver. 6 IP
			a.push(x[i].substr(0,4));
			a.push(x[i].substr(4,4));
		}
		else return '';	//invalid IP
	}
	if(ip.length>1)	//if the shortcut was used
	{
		x = ip[1].split(':');
		for(i=0; i<x.length; i++)	//for each part right of '::'
		{
			if(x[0] == '') break;	//there isn't anything on the right side
			if((/^[0-9A-F]{1,4}$/i).test(x[i])) b.push(normalizeIPv6.pad(x[i]));
			else if(i == x.length-1 && (x[i] = normalizeIPv6.v4to6(x[i])) != '')	//last part of entire IP is a ver. 4 IP
			{
				//converted x[i] to a ver. 6 IP
				b.push(x[i].substr(0,4));
				b.push(x[i].substr(5,4));
			}
			else return '';	//invalid IP
		}
		while(a.length+b.length < 8)	//replace the shortcut with the zeroes it represents
		{
			a.push('0000');
		}
	}
	return '['+a.concat(b).join(':')+']';
}
normalizeIPv6.pad = function(x)
{
	x = ''+x;
	while(x.length < 4){ x = '0'+x; }
	return x.toLowerCase();
}
normalizeIPv6.v4to6 = function(ip)
{
	if(!normalizeIPv4(ip)) return '';	//invalid IP
	ip = ip.split('.');
	var h = ['0','1','2','3','4','5','6','7','8','9','a','b','c','d','e','f'];
	return '' + h[Math.floor(ip[0]/16)] + h[ip[0]%16] + h[Math.floor(ip[1]/16)] + h[ip[1]%16] + 
		':' + h[Math.floor(ip[2]/16)] + h[ip[2]%16] + h[Math.floor(ip[3]/16)] + h[ip[3]%16];
}

//converts an obscured URL path to a more readable one
function normalizeURLPath(path)
{
	if(!path) return "";
	
	path = path.replace(/%3(\d)/g, "$1");	//decimals
	path = path.replace(/%41/ig, "A").replace(/%42/ig, "B").replace(/%43/ig, "C").replace(/%44/ig, "D").replace(/%45/ig, "E");
	path = path.replace(/%46/ig, "F").replace(/%47/ig, "G").replace(/%48/ig, "H").replace(/%49/ig, "I").replace(/%4A/ig, "J");
	path = path.replace(/%4B/ig, "K").replace(/%4C/ig, "L").replace(/%4D/ig, "M").replace(/%4E/ig, "N").replace(/%4F/ig, "O");
	path = path.replace(/%50/ig, "P").replace(/%51/ig, "Q").replace(/%52/ig, "R").replace(/%53/ig, "S").replace(/%54/ig, "T");
	path = path.replace(/%55/ig, "U").replace(/%56/ig, "V").replace(/%57/ig, "W").replace(/%58/ig, "X").replace(/%59/ig, "Y");
	path = path.replace(/%5A/ig, "Z");
	path = path.replace(/%61/ig, "a").replace(/%62/ig, "b").replace(/%63/ig, "c").replace(/%64/ig, "d").replace(/%65/ig, "e");
	path = path.replace(/%66/ig, "f").replace(/%67/ig, "g").replace(/%68/ig, "h").replace(/%69/ig, "i").replace(/%6A/ig, "j");
	path = path.replace(/%6B/ig, "k").replace(/%6C/ig, "l").replace(/%6D/ig, "m").replace(/%6E/ig, "n").replace(/%6F/ig, "o");
	path = path.replace(/%70/ig, "p").replace(/%71/ig, "q").replace(/%72/ig, "r").replace(/%73/ig, "s").replace(/%74/ig, "t");
	path = path.replace(/%75/ig, "u").replace(/%76/ig, "v").replace(/%77/ig, "w").replace(/%78/ig, "x").replace(/%79/ig, "y");
	path = path.replace(/%7A/ig, "z");
	path = path.replace(/%2D/ig, "-").replace(/%2E/ig, ".").replace(/%5F/ig, "_").replace(/%7E/ig, "~").replace(/%21/ig, "!");
	path = path.replace(/%24/ig, "$").replace(/%27/ig, "'").replace(/%28/ig, "(").replace(/%29/ig, ")").replace(/%2A/ig, "*");
	path = path.replace(/%2B/ig, "+").replace(/%2C/ig, ",").replace(/%3B/ig, ";").replace(/%40/ig, "@");
	//path = path.replace(/%20/g, " ");	//more readable, but not valid
	
	return path;
}

// Mailto //

//splits a mailto scheme URI into its parts
//returns null if str is not a valid mailto URI or there is no destination
//only includes valid email addresses; the rest are removed
//does not support IPv6 or IPvFuture domains
//see RFC 2368 http://tools.ietf.org/html/rfc2368
function parseMailto(str)
{
	var uri = parseURI(str);
	if(!uri || uri.scheme != "mailto" || uri.authority) return null;
	//note: if there is a fragment, it will simply be left out
	
	uri.uri = uri.uri.replace(/%20/g, " ");
	uri.path = uri.path.replace(/%20/g, " ");
	uri.query = uri.query.replace(/%20/g, " ");
	
	var parts = {
		uri: "",
		scheme: "mailto",
		to: [],
		cc: [],
		bcc: [],
		subject: "",
		body: "",
		headers: []	//other headers besides the above
	};
	var to1 = [], to2 = [];
	
	if(uri.path)
	{
		to1 = to1.concat(splitEmailAddresses(uri.path));
	}
	var headers = parseQueryNumeric(uri.query);
	for(var i=0; i<headers.length; i++)
	{
		if(headers[i].value == "") continue;
		if(headers[i].name == "to")
		{
			to2 = to2.concat(splitEmailAddresses(headers[i].value));
		}
		else if(headers[i].name == "cc")
		{
			parts.cc = parts.cc.concat(splitEmailAddresses(headers[i].value));
		}
		else if(headers[i].name == "bcc")
		{
			parts.bcc = parts.bcc.concat(splitEmailAddresses(headers[i].value));
		}
		else if(headers[i].name == "subject")
		{
			parts.subject = headers[i].value;
		}
		else if(headers[i].name == "body")
		{
			parts.body = headers[i].value;
		}
		else
		{
			parts.headers.push(headers[i]);
		}
	}
	
	parts.to = to1.concat(to2);
	if(parts.to.length == 0 && parts.cc.length == 0 && parts.bcc.length == 0) return null;	//no destination
	
	parts.uri = "mailto:";
	if(to1.length > 0)
	{
		for(i=0; i<to1.length; i++)
		{
			parts.uri += to1[i];
			if(i < to1.length-1) parts.uri += ",";
		}
	}
	
	var qs = [];
	var q = -1;
	if(to2.length > 0)
	{
		qs[++q] = "to=";
		for(i=0; i<to2.length; i++)
		{
			qs[q] += to2[i];
			if(i < to2.length-1) qs[q] += ",";
		}
	}
	if(parts.cc.length > 0)
	{
		qs[++q] = "cc=";
		for(i=0; i<parts.cc.length; i++)
		{
			qs[q] += parts.cc[i];
			if(i < parts.cc.length-1) qs[q] += ",";
		}
	}
	if(parts.bcc.length > 0)
	{
		qs[++q] = "bcc=";
		for(i=0; i<parts.bcc.length; i++)
		{
			qs[q] += parts.bcc[i];
			if(i < parts.bcc.length-1) qs[q] += ",";
		}
	}
	if(parts.subject) qs[++q] = "subject="+parts.subject;
	if(parts.body) qs[++q] = "body="+parts.body;
	for(i=0; i<parts.headers.length; i++)
	{
		qs[++q] = parts.headers[i].name+"="+parts.headers[i].value;
	}
	if(qs.length > 0) parts.uri += "?"+qs.join("&");
	
	return parts;
}
//helper function for parseMailto
//splits the string at the commas, but ignores commas within quoted strings
//only returns valid email addresses
function splitEmailAddresses(str)
{
	var addresses = [];
	var a = 0, c, m;
	var parts = str.split("\"");	//split the string at the quotes
	str = "";
	var inQuote = false;
	for(var i=0; i<parts.length; i++)
	{
		if(inQuote)	//currently inside a pair of quotes
		{
			str += "\"";
			if((/(^|[^\\])(\\\\)*\\$/).test(parts[i]))	//part ends with the escape character (\)
			{
				str += parts[i];
			}
			else	//end quote
			{
				str += parts[i];
				if(i < parts.length-1)
				{
					str += "\"";
					inQuote = false;
				}
			}
		}
		else	//not inside a pair of quotes
		{
			//if((c=parts[i].search(/,|%2C/i)) > -1)	//comma is found
			if((c=parts[i].search(/,/i)) > -1)	//comma is found
			{
				addresses[a++] = str + parts[i].slice(0, c);	//add the address that ends at the comma
				//m = parts[i].match(/(,|%2C)(\s|%20)*/i)[0].length;
				//str = parts[i].slice(c+m);
				str = parts[i].slice(c+1);
			}
			else str += parts[i];
			if(i < parts.length-1) inQuote = true;	//if there are more parts
			else addresses[a] = str;
		}
	}
	if(inQuote) return [];	//no closing quote
	//verify the email addresses
	for(i=0; i<addresses.length; i++)
	{
		addresses[i] = normalizeEmailAddress(addresses[i]);
		if(!addresses[i]) addresses.splice(i--,1);	//if it's not valid, remove it
	}
	return addresses;
}

//converts an obscured email address to a more readable one; unfolds and removes comments
//returns "" if it's not a valid address
//does not support IPv6 or IPvFuture domains
//see RFC 2822 http://tools.ietf.org/html/rfc2822
// and http://www.ilovejackdaniels.com/php/email-address-validation/
//obsolete forms are not supported
function normalizeEmailAddress(str)
{
	if(!str) return "";
	
	//remove comments
	//regular expressions do not support nesting, so I have to do this manually
	var c = 0;	//nesting level of comments
	var s = "";	//new string
	var p, m, char;	//position, match, end character
	var inQS = false;	//inside a quoted string
	p = str.search(/(^|[^\\]+?)(\\\\)*[()"]/);
	while(p >= 0)
	{
		m = str.match(/(^|[^\\]+?)(\\\\)*[()"]/)[0];
		char = str.charAt(p+m.length-1);
		if(char == "\"")
		{
			if(c == 0)	//beginning or end of a quoted string (not inside of a comment)
			{
				s += str.slice(0, p+m.length);
				inQS = !inQS;
			}
			str = str.slice(p+m.length);
		}
		else if(char == "(")
		{
			if(inQS) s += str.slice(0, p+m.length);	//inside a quoted string
			else if(c++ == 0) s += str.slice(0, p+m.length-1);	//beginning of a top-level comment
			str = str.slice(p+m.length);
		}
		else if(char == ")")
		{
			if(inQS) s += str.slice(0, p+m.length);	//inside a quoted string
			else c--;	//end of a comment
			str = str.slice(p+m.length);
		}
		if(c < 0) return "";	//invalid comment nesting
		p = str.search(/(^|[^\\]+)(\\\\)*[()"]/);
	}
	str = s + str;
	
	str = str.replace(/\s+/g, " ");	//replace whitespace with a single space
	str = str.replace(/[\\x01-\\x1F\\x7F]+/g, "");	//remove remaining (non-whitespace) control characters
	
	var atext = "[!#$%&'*+`/0-9=?A-Z^_a-z{|}~-]";
	var qtext = "[!#$%&'()*+`./0-9:;<=>?@A-Z\\[\\]^_,a-z{|}~-]";
	var qptext = "("+qtext+"|[\"\\\\])";
	//var dtext = "[!\"#$%&'()*+`./0-9:;<=>?@A-Z^_,a-z{|}~-]";	//for IPv6 or IPvFuture formatted domains
	
	var dotAtom = "( ?"+atext+"+(\\."+atext+"+)* ?)";
	var quotedString = "( ?\"( ?("+qtext+"|\\\\"+qptext+"))* ?\" )";
	//var domainLiteral = "( ?\\[( ?("+dtext+"|\\\\"+qptext+"))* ?\\] ?)";	//for IPv6 or IPvFuture formatted domains
	
	var localPart = "("+dotAtom+"|"+quotedString+")";
	//var domain = "("+dotAtom+"|"+domainLiteral+")";	//we won't support IPv6 or IPvFuture formatted domains
	var domain = dotAtom;
	var addrSpec = "("+localPart+"@"+domain+")";
	
	var displayName = "(( ?"+atext+"+ ?|"+quotedString+")+)";
	var nameAddr = "("+displayName+"? ?<"+addrSpec+"> ?)";
	
	var mailbox = "^("+nameAddr+"|"+addrSpec+")$";
	
	rxp = new RegExp(mailbox);
	if(rxp.test(str))	//valid mailbox so far
	{
		//get the domain
		rxp = new RegExp("@("+domain+")(> ?)?$");
		var d = str.match(rxp)[0];
		var dn = d.replace(rxp, "$2");
		d = d.replace(rxp, "$1");
		d = d.replace(/^ +| +$/g, "");	//remove spaces from ends
		
		//normalize the domain
		var normalizedDomain = normalizeURLDomain(d);
		if(!normalizedDomain) return "";	//invalid domain
		
		//replace the domain with the normalized version
		str = str.replace(rxp, "@"+normalizedDomain+(dn?">":""));
		
		//get the local part
		rxp = new RegExp("("+localPart+")@"+normalizedDomain+">?");
		var lp = str.match(rxp)[0].replace(rxp, "$1");
		lp = lp.replace(/^ +| +$/g, "");	//remove spaces from ends
		
		//replace local part with cleaned-up version
		str = str.replace(rxp, lp+"@"+normalizedDomain+(dn?">":""));
		
		if(dn)
		{
			//get the display name, if there is one
			rxp = new RegExp("^"+displayName);
			var dn = str.match(rxp);
			if(dn)
			{
				dn = dn[0].replace(/^ +| +$/g, "");	//remove spaces from ends of display name
				str = str.replace(rxp, dn);	//replace display name with cleaned-up version
			}
		}
		
		return str;	//valid mailbox
	}
	return "";	//invalid mailbox
}

// Fixes //

//attempts to fix a URL if needed
//domain: domain to use if the url is relative
//returns null if it can't be fixed
function fixURL(str, domain)
{
	str = str.replace(/ /g, "%20");	//make sure all spaces are escaped
	var url = parseURL(str);
	if(url) return url;	//valid URL
	
	domain = normalizeURLDomain(domain);
	str = str.replace(/"/g, "%22");
	str = str.replace(/</g, "%3C");
	str = str.replace(/>/g, "%3E");
	url = parseURI(str);
	if(!url && str.charAt(0) == "/")	//relative path
	{
		if(!domain) return null;	//invalid URL; can't fix it since no valid domain was given
		str = "http://"+domain+str;
		url = parseURL(str);
		if(url) return url;	//it's now a valid URL
		url = parseURI(str);
	}
	if(!url && str.slice(0,7) != "http://" && str.slice(0,8) != "https://")
	{
		str = "http://"+str;
		url = parseURL(str);
		if(url) return url;	//it's now a valid URL
		url = parseURI(str);
	}
	if(!url) return null;	//invalid URI; can't be fixed
	
	//valid URI; try to make it a valid URL
	str = url.scheme+"://";
	str += url.domain || domain;
	str += url.port ? ":"+url.port : "";
	str += normalizeURLPath(url.path)+(url.query ? "?"+url.query : "")+(url.fragment ? "#"+url.fragment : "");
	
	url = parseURL(str);
	if(url) return url;	//it's now a valid URL
	return null;	//invalid URL; can't be fixed
}

//attempts to fix a hyperlink address (http(s) or mailto) if needed
//domain = domain to use if the url is relative
//returns "" if it can't be fixed
function fixHyperlink(str, domain, allowMailto)
{
	domain = domain || "";
	
	//get the scheme
	var matches = str.match(/^[a-z0-9+.-]+:/i);
	var scheme = (matches ? matches[0].slice(0, matches[0].length-1).toLowerCase() : "");
	if(scheme != "http" && scheme != "https" && (allowMailto ? scheme!="mailto" : true)) scheme = "";
	
	if(!scheme || scheme == "http" || scheme == "https")	//URL or unknown scheme (assume unknown is meant to be a URL)
	{
		var lnk = fixURL(str, domain);
		if(lnk) return lnk.url;
	}
	else if(allowMailto)	//mailto address
	{
		var lnk = parseMailto(str);
		if(lnk) return lnk.uri;
	}
	return "";	//can't be fixed
}

// Site-specific //

var UN='undefined';
var LO=window.location.protocol=="file:";
var errColor='#ffdddd';
var okColor='#ffffff';
var emailformok=false;
var DN='webtransformer.com';
var DB=false;
var WW=0;WH=0;gWX();

function dN(n){
	return eval('(typeof('+n+')!=UN);')
}

function vN(n){
	if(dN(n)){
		var v=String(eval('('+n+');'));
		if(v=="")v="[Null]";
		return v;
	}else{
		return "[Undefined]";
	}
}

// window

function nW(w,n,f){
	win=window.open(w,n,f,false);
}

function aDB(s){
	if(DB||LOCAL)alert(s);
}

function sP(id,pr,v){
	document.getElementById(id).setAttribute(pr,v);
}

// class
function sCL(id,v){
	sP(id,"class",v);
	sP(id,"className",v);
}

// column sizing and layout

function gWX() {
	if(typeof( window.innerWidth ) == 'number' ) {
		WW = window.innerWidth;
		WH = window.innerHeight;
	}
	else if( document.documentElement && ( document.documentElement.clientWidth || document.documentElement.clientHeight ) ){
		WW = document.documentElement.clientWidth;
		WH = document.documentElement.clientHeight;
	}
	else if( document.body && ( document.body.clientWidth || document.body.clientHeight ) ) {
		WW = document.body.clientWidth;
		WH = document.body.clientHeight;
	}
}

function cR(){
// create list of column objects
  var oc=0;
  for(i=1;i<9;i++){
    cn="Column"+i;
    c=document.getElementById(cn);
    if(c)oc++;
  }
  if(oc==0)return;
// determine how many columns to fill, column width, avg. column height
  w=gW("WhiteSpace")-1;
  w=Math.floor(w*0.98);
  nc=Math.floor(w/265);
  if (nc<1)nc=1;
  if(nc>oc)nc=oc;
  cw=Math.floor(w/nc);
  if(cw<150)cw=150;
  cp=1/nc;
// set each column's width, margin, border, padding
  mw=5;
  pw=5;
  cw-=2*mw+2*pw;
  cwpx=cw+"px";
  mwpx=mw+"px";
  pwpx=pw+"px";
  for(i=1;i<9;i++){
    cn="Column"+i;
    if(document.getElementById(cn)){
      setStyleById(cn,"width",cwpx);
      setStyleById(cn,"margin",mwpx);
      setStyleById(cn,"padding-left",pwpx);
      setStyleById(cn,"padding-right",pwpx);
    }
  }
// find each vertically scrollable object, get height, determine cummulative height
  divs=document.getElementsByTagName("div");sdivs=[];sdivsh=[];sdivsp=[];ns=0;sdt=0;
  for(i=0;i<divs.length;i++)
  {
    if(divs[i].id=="Scrollable"){
      sdivs[ns]=divs[i];
      sdt+=sdivsh[ns++]=divs[i].offsetHeight;
    }
  }
  if(ns>0){
// calculate each vertically scrollable object's height as a percent of cummulative height
    for(i=0;i<ns;i++)
      sdivsp[i]=(sdt>0)?(sdivsh[i]/sdt):(1/ns);
// for each column to fill, move scrollable objects into column
    tp=0; // percentage of cummulative height allocated so far
    si=0; // index number of scrollable object to use
    for(ci=1;ci<=nc;ci++){ // loop through columns
      cn="Column"+ci;c=document.getElementById(cn); // current column object to fill
      c.appendChild(sdivs[si]); // column must have at least one element
      tp+=sdivsp[si++];
      ms=ns-(nc-ci); // first scrollable object that must be reserved for next column
      while(((tp+0.5*sdivsp[si])<(ci*cp))&&(si<ms)){ // add scrollable objects to current column
        c.appendChild(sdivs[si]);
        tp+=sdivsp[si++];
      }
    }
// move any remaining scrollable objects to last column
    while(si<ns){
      c.appendChild(sdivs[si]);
      tp+=sdivsp[si++];
    }
  }
  return nc;
}

function gW(n){
  if(n.length>0)return document.getElementById(n).offsetWidth;
  if(typeof(window.innerWidth)=='number')return window.innerWidth;
  if(document.documentElement&&document.documentElement.clientWidth)return document.documentElement.clientWidth;
  if(document.body&&document.body.clientWidth)return document.body.clientWidth;
  return 0;
}

function gH(n){
  if(n.length>0)return document.getElementById(n).offsetHeight;
  if(typeof(window.innerWidth)=='number')return window.innerHeight;
  if(document.documentElement&&document.documentElement.clientHeight)return document.documentElement.clientHeight;
  if(document.body&&document.body.clientHeight)return document.body.clientHeight;
  return 0;
}

function oH(o){
  o.offsetHeight;
}

// cookie

function pC(nm,v,d){
	path='/';
	secure=0;
	expires=0;
	if (d){
		expires=new Date();
		fD(expires);
		expires.setTime(expires.getTime()+d*24*60*60*1000);
	}
	document.cookie=nm+"="+escape(v)+((expires)?"; expires="+expires.toGMTString():"")+((path)?"; path="+path:"")+((DN)?"; DN="+DN:"")+((secure)?"; secure":"");
}

function sC(nm,v){
	pC(nm,v,0);
}

function xC(nm){
	path='/';
	if(gC(nm))document.cookie=nm+"="+((path)?"; path="+path:"")+((DN)?";DN="+DN:"")+"; expires=Thu, 01-Jan-70 00:00:01 GMT";
}

function gC(nm){
	var dc=document.cookie;
	var prefix=nm+"=";
	var begin=dc.indexOf("; "+prefix);
	if(begin==-1){
		begin=dc.indexOf(prefix);
		if(begin!=0)return "";
	}else{
		begin+=2;
	}
	var end=document.cookie.indexOf(";",begin);
	if(end==-1)end=dc.length;
	return unescape(dc.substring(begin+prefix.length,end));
}

// date

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

function y2k(n){
	return (n<1000)?n+1900:n;
}

function gdD(n){
	var Days=new Array("Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday");
	return Days[n];
}

function gmD(n){
	var Months=new Array("January","February","March","April","May","June","July","August","September","October","November","December");
	return Months[n];
}

function dsD(d){
	var sf="th";
	switch (d.getDate()){
case 1:
case 21:
case 31:
		sf="st";
		break;
case 2:
case 22:
		sf="nd";
		break;
case 3:
case 23:
		sf="rd";
		break;
	}
	return gmD(d.getMonth())+" "+d.getDate()+sf+", "+y2k(d.getYear());
}

function wkD(){
	var d=new Date();
	var t=d.getTime();
	var wd=d.getDay();
	var df=(wd==0)?1:((wd<6)?(1-wd):2);
	var d1=new Date(t+df*24*3600000);
	var d2=new Date(t+df*24*3600000+4*24*60*60*1000);
	ds1=dsD(d1);
	ds2=dsD(d2);
	ys1=ds1.substring(ds1.indexOf(",")+2,ds1.length);
	ys2=ds2.substring(ds2.indexOf(",")+2,ds2.length);
	ds1a=ds1.substring(0,ds1.indexOf(","));
	if(ys1!=ys2)
	{
		rs=ds1+" - "+ds2;
	}
	else
	{
		ms1=ds1.substring(0,ds1.indexOf(" "));
		ms2=ds2.substring(0,ds2.indexOf(" "));
		if(ms1!=ms2)
			ds1b=ds2.substring(0,ds2.indexOf(","))
		else
			 ds1b=ds2.substring(ds2.indexOf(" ")+1,ds2.indexOf(","));
		rs=ds1a+" - "+ds1b+", "+ys1;
	}
	return rs;
}

// email

function vF(){
	emailformok=true;
	rF(document.getElementById("FromName"),"Please enter your name.","NameErr");
	vE(document.getElementById("FromEmail"),"Please enter your email ID.","EmailErr");
	rF(document.getElementById("FromMessage"),"Please enter a message.","MessageErr");
	if(emailformok){
		//SiteCatalyst Link Tracking Start
		var s_account="MichaelBhallaWT"
		var s=s_gi(s_account)
		s.linkTrackVars="events";
		s.linkTrackEvents="event1";
		s.events="event1";
		s.prop3="Contact Us Submit";
		s.tl(true,'o','Contact Us Submit'); //Log custom event - no delay, link type: Other, event: Contact Us Submit
		//SiteCatalyst Link Tracking End
		return true;
	}else{
		return false;
	}
}

function rF(v,err,msg){
	if(v.value==null||v.value==""){
		v.style.backgroundColor=errColor;
		document.getElementById(msg).firstChild.nodeValue=err;
		if(emailformok)v.focus();
		emailformok=false;
		return false;
	}else{
		v.style.backgroundColor=okColor;
		document.getElementById(msg).firstChild.nodeValue=" ";
		return true;
	}
}

function vE(v,err,msg){
	if(!peF(v.value)){
		v.style.backgroundColor=errColor;
		document.getElementById(msg).firstChild.nodeValue=err;
		if(emailformok)v.focus();
		emailformok=false;
		return false;
	}else{
		v.style.backgroundColor=okColor;
		document.getElementById(msg).firstChild.nodeValue=" ";
		return true;
	}
}

function peF(id){
	var v=1;
	var tld=1;
	var doms=/^(com|net|org|edu|int|mil|gov|arpa|biz|aero|name|coop|info|pro|museum)$/;
	var idp=/^(.+)@(.+)$/;
	var sp="\\(\\)><@,;:\\\\\\\"\\.\\[\\]";
	var spp="\[^\\s"+sp+"\]";
	var unm="(\"[^\"]*\")";
	var ipp=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/;
	var a=spp+'+';var wd="("+a+"|"+unm+")";
	var up=new RegExp("^"+wd+"(\\."+wd+")*$");
	var domp=new RegExp("^"+a+"(\\."+a +")*$");
	var mat=id.match(idp);
	if(mat==null)return false;
	var u=mat[1];
	var dom=mat[2];
	for(i=0;i<u.length;i++)
		if(u.charCodeAt(i)>127)return false;
	for(i=0;i<dom.length;i++)
		if(dom.charCodeAt(i)>127)return false;
	if(u.match(up)==null)return false;
	var ipary=dom.match(ipp);
	if(ipary!=null)
	{
		for(var i=1;i<=4;i++)
			if(ipary[i]>255)return false;
	}
	var ap=new RegExp("^"+a+"$");
	var dary=dom.split(".");
	var len=dary.length;
	for(i=0;i<len;i++)
		if(dary[i].search(ap)==-1)return false;
	if(tld && dary[dary.length-1].length!=2 && dary[dary.length-1].search(doms)==-1)return false;
	if(len<2)return false;
	return true;
}

function tO(){
	document.write("The WebTransformer");
}

// slide show

if(typeof(sst)==UN)sst=5000;
if(typeof(ssp)==UN)ssp=-1;
if(typeof(ssl)==UN)ssl=-1;
if(typeof(ssc)==UN)ssc=1;
if(typeof(ssn)==UN)ssn=0;
if(typeof(sss)==UN)
{
	ssn=0;
	sss=new Array(ssn);
	sss[ssn++]=new Array("images/goran-kolacko_fall-2_400.jpg",1.333,"Goran Kolacko, Fall 2");
	sss[ssn++]=new Array("images/goran-kolacko_fire-x_400.jpg",1.333,"Goran Kolacko, Fire X2");
	sss[ssn++]=new Array("images/goran-kolacko_green_400.jpg",1.333,"Goran Kolacko, Green");
	sss[ssn++]=new Array("images/goran-kolacko_landscapes_400.jpg",1.333,"Goran Kolacko, Landscapes");
	sss[ssn++]=new Array("images/goran-kolacko_water2-x_400.jpg",1.333,"Goran Kolacko, Water 2x");
	sss[ssn++]=new Array("images/jammie-harris_nature-9_400.jpg",1.333,"Jamie Harris, Nature 9");
	sss[ssn++]=new Array("images/jana-werner_after-rain_400.jpg",1.333,"Jana Werner, After The Rain");
	sss[ssn++]=new Array("images/jana-werner_another-sunset_400.jpg",1.333,"Jana Werner, Another Sunset");
	sss[ssn++]=new Array("images/jana-werner_buddha-tempel_400.jpg",1.333,"Jana Werner, Buddha Temple");
	sss[ssn++]=new Array("images/jana-werner_hawaiian-panorama1_400.jpg",1.333,"Jana Werner, Panaroma 2 (Fragment)");
	sss[ssn++]=new Array("images/jana-werner_hawaiian-panorama_400.jpg",1.333,"Jana Werner, Panaroma 1 (Fragment)");
	sss[ssn++]=new Array("images/jana-werner_macro-flower_400.jpg",1.333,"Jana Werner, Macro Flower");
	sss[ssn++]=new Array("images/jana-werner_oahu_400.jpg",1.333,"Jana Werner, Oahu");
	sss[ssn++]=new Array("images/jana-werner_sky-over-SF_400.jpg",1.333,"Jana Werner, Sky Over San Francisco");
	sss[ssn++]=new Array("images/jana-werner_sunset-reflection2_400.jpg",1.333,"Jana Werner, Reflection 2");
	sss[ssn++]=new Array("images/jana-werner_the-daily-sky_400.jpg",1.333,"Jana Werner, The Daily Sky");
	sss[ssn++]=new Array("images/lynn-cummings_autumn-sunset_400.jpg",1.333,"Lynn Cummings, Autumn Sunset");
	sss[ssn++]=new Array("images/lynn-cummings_glorious-morning_400.jpg",1.333,"Lynn Cummings, Glorious Morning");
	sss[ssn++]=new Array("images/lynn-cummings_in-detail_400.jpg",1.333,"Lynn Cummings, In Detail");
	sss[ssn++]=new Array("images/lynn-cummings_in-the-pink2_400.jpg",1.333,"Lynn Cummings, In The Pink");
	sss[ssn++]=new Array("images/lynn-cummings_liliacsl_400.jpg",1.333,"Lynn Cummings, Liliacs");
	sss[ssn++]=new Array("images/lynn-cummings_making-an-entrance_400.jpg",1.333,"Lynn Cummings, Making An Entrance");
	sss[ssn++]=new Array("images/lynn-cummings_misty-morning_400.jpg",1.333,"Lynn Cummings, Misty Morning");
	sss[ssn++]=new Array("images/lynn-cummings_morning-glory_400.jpg",1.333,"Lynn Cummings, Morning Glory");
	sss[ssn++]=new Array("images/lynn-cummings_peony_400.jpg",1.333,"Lynn Cummings, Peony");
	sss[ssn++]=new Array("images/matthew-bowden_african-eve_400.jpg",1.333,"Matthew Bowden, African Eve");
	sss[ssn++]=new Array("images/matthew-bowden_big-blue_400.jpg",1.333,"Matthew Bowden, Big Blue");
	sss[ssn++]=new Array("images/matthew-bowden_boat-of-the-bay_400.jpg",1.333,"Matthew Bowden, Boat of The Bay");
	sss[ssn++]=new Array("images/matthew-bowden_colour-wave_400.jpg",1.333,"Matthew Bowden, Colour Wave");
	sss[ssn++]=new Array("images/matthew-bowden_snow_beach_400.jpg",1.333,"Matthew Bowden, Snow Beach");
	sss[ssn++]=new Array("images/matthew-bowden_sun-stream_400.jpg",1.333,"Matthew Bowden, Sun Stream");
	sss[ssn++]=new Array("images/paul-tonner_glencoe-stream_400.jpg",1.333,"Paul Tonner, Glencoe Stream");
	sss[ssn++]=new Array("images/paul-tonner_london-at-night_400.jpg",1.333,"Paul Tonner, London at Night");
}

function ssNx(aS){
	i=ssRn(ssn);
	if(document.images&&(typeof(document.ss)!=UN))
	{
		if ( aS )
		{
			document.ss.src="images/spacer.gif";
			ri=sss[i][1];
			bW=Math.floor(gW("")-22);
			bH=Math.floor(gH("")-80);
			rb=bW/bH;
			if( rb > ri )
			{
				h=Math.round(bH);
				w=Math.round(bH*ri);
			}
			else
			{
				w=bW;
				h=Math.round(w/ri);
			}
			document.ss.width=w;
			document.ss.height=h;
		}
		document.ss.src=sss[i][0];
		if(document.getElementById("sssc")!=UN)
		{
			ns=document.createElement("span");
			nt=document.createTextNode(sss[i][2]);
			ns.appendChild(nt);
			c=document.getElementById("sssc");
			c.replaceChild(ns,c.firstChild);
		}
	}
	ssc=ssc-1;
	if(ssc!=0)
		setTimeout("ssNx("+aS+")",sst);
	return;
}

function ssRn(m){
	if(m<=1)return 0;
	i=0;
	while(i++<10){
		var now=new Date();
		v=Math.floor(now.getTime()/1001);
		v=v^Math.floor(Math.random()*4294967295);
		if(v<0)v=-v;
		v=v%m;
		if(ssl!=v){
			ssl=v;
			return v;
		}
	}
	return v;
}

// end