/****************************************************************************************/
	/*																																											*/
	/*	Accordent RPlib v1.00	*/
	/*	=======================	*/
	/*																																											*/
	/*	Last Edited: July 2, 2004 */
	/*	Please send all comments & bug reports to: John Malick <jmalick@accordent.com> */
	/*																																											*/
	/****************************************************************************************/
	

	var stretch2fit = "false";
	
	/* global variable... can be forced */
	var ie, ns, mz, debug, msver, os;
	var ie=self.document.all;
	var ns=eval("self.document.layers");
	var mz=self.document.getElementById;
	var os=1; //assume pc by default
	var debug=eval(rngetvar("debug","false"));
	var os,browser,version,data;

	function rngetvar(el, def) { //el=str, def= default value
		var urls = new String(eval("self.location"));
		var re = new RegExp( "\\?[\\w\\W]*"+ el +"=([^\\&\\?#]*)", "i");
		var arr = re.exec(urls);
		if(arr && arr.length>1) return arr[1];
		else return def;
	}
	
	function echo(str) {
		document.open();
		document.write(str);
		document.close();
	}
	
	function html_friendly(ss) { //parses string & conver to html friendly characters
	    ss = new String(ss);
	    ss = ss.replace(/\</g,'&lt;');
	    ss = ss.replace(/\>/g,'&gt;');
		return "<code><pre>"+ss+"</pre></code>";
	}

	// browser and os detection code
	function detectbrowser() {
		var ua = navigator.userAgent.toLowerCase();
		if (detectagent('konqueror',ua)) {browser = "konqueror"; os = "linux";}
		else if (detectagent('safari',ua)) browser = "safari";
		else if (detectagent('omniweb',ua)) browser = "omniweb";
		else if (detectagent('firefox',ua)) browser = "firefox";
		else if (detectagent('opera',ua)) browser = "opera";
		else if (detectagent('webtv',ua)) browser = "webtv";
		else if (detectagent('icab',ua)) browser = "icab";
		else if (detectagent('msie',ua)) browser = "ie";
		else if (!detectagent('compatible',ua)) {browser = "netscape"; version = ua.charAt(8);}
		else browser = "unknown";

		if (!version) version = ua.charAt(stringposition + data.length);

 	    if (detectagent('linux',ua)) os = "linux";
	    else if (detectagent('x11',ua)) os = "unix";
	    else if (detectagent('mac',ua)) os = "mac";
	    else if (detectagent('win',ua)) os = "win";
	    else os = "unknown";

	}
	function detectagent(type,useragent) {
	   stringposition = useragent.indexOf(type) + 1;
	   data = type;
	   return stringposition;
	}

	
	function detectrn() {
		ns=eval("self.document.layers");
		/* os code, 1=win32,2=mac,3=other */
		navigator.plugins.refresh();
		var platform = new String(navigator.platform);
		var winre = /^win32/i;
		var macre = /mac/i;
		if(winre.test(platform)) { //windows 95+
			os = 'win';
		} else if(macre.test(platform)) {
			os = 'macx';
		} else { //unix & stuff
			os = 'unix' ;
		}
		// detailed browser and os detection
		detectbrowser();
	}

	function videorn(url, uimode, width, height) { //real
		var ostr = new String();
		if(ns) {
			//AutoGoToUrl=\"false\" scriptcallbacks=\"All\">
			ostr += "<embed controls=\"ImageWindow\" type=\"audio/x-pn-realaudio-plugin\" src=\"" + url + "\" backgroundcolor=\"black\" width=\"" + width + "\" height=\"" + (height) + "\" name='MediaPlayer' CONSOLE=\"theclip\" autostart=\"true\"></embed>";
		}else if(browser=='firefox'){
			ostr += "<embed controls=\"ImageWindow\" type=\"audio/x-pn-realaudio-plugin\" src=\"" + url + "\" backgroundcolor=\"black\" width=\"" + width + "\" height=\"" + (height) + "\" name='MediaPlayer' CONSOLE=\"theclip\" autostart=\"true\"></embed>";
		}else if(os=='mac'){
			ostr += "<embed controls=\"ImageWindow\" type=\"audio/x-pn-realaudio-plugin\" src=\"" + url + "\" backgroundcolor=\"black\" width=\"" + width + "\" height=\"" + (height) + "\" name='MediaPlayer' CONSOLE=\"theclip\" autostart=\"true\"></embed>";
		}else{
			ostr += "<object id=\"MediaPlayer\" width=\""+ width +"\" height=\""+ (height) +"\" classid=\"CLSID:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA\">\r\n";
			ostr += "\t<param name=\"src\" value=\""+ url +"\" />\r\n";
			ostr += "\t<param name=\"AutoStart\" value=\"true\" />\r\n";
			ostr += "\t<param name=\"AutoGoToUrl\" value=\"false\" />\r\n";
			switch(uimode) {
				case 'none':
					ostr += "\t<param name=\"Controls\" value=\"ImageWindow\" />\r\n";
					break;
			}

			ostr += "</object>";
		}
	
		if(debug) echo(html_friendly(ostr));
		else echo(ostr);
	}



	function OnGotoURL(url, type) { //unified sync
		type = new String(type);
		url = new String(url);
		// process commands
		if ((url.length > 3) && (url.substring(0, 4).toLowerCase() == 'attp')){
			eval(url.substring(7,url.lastIndexOf('&&')));
		}else{
			var tre = /^(url|eval)$/i;
			//var re = /^([^`]+)(&&|&&[^&]*|)$/i;
			var re = /(&&[^&]*|)$/i;
			var tr = /^&&/i;
			var bl = /^[\s]*$/i;
			var absurl = /^(http|ftp|file|mms|rtsp)/i;
			if(tre.test(type) && re.test(url)) { //if type is of URL
				var r = re.exec(url);
				var turl = url.replace(re,"");
				//ngc switch
				//if(!absurl.test(turl)) turl = lpath + turl;
				if(r.length>=2) {
					var ttarget = underscore(r[1]);
					if(tr.test(ttarget)) ttarget = ttarget.replace(tr,"");
					if(!bl.test(ttarget))
					{
						var framename = strsafe(ttarget);
						var slideimg = strsafe(turl);
						//alert('Sync: ' + framename + ' Image: ' + slideimg); 
						eval("parent.frames[framename].document.getElementById('slideimage').src = slideimg;");
						//eval("window.open('"+ strsafe(turl) +"','"+ strsafe(ttarget) +"');");
					}
					else
						eval("window.open('"+ strsafe(turl) +"','_blank');");
				} else {
					eval("window.open('"+ strsafe(turl) +"','_blank');");
				}
			}
		}
	}

	function strsafe(istr) {
		var str = new String(istr);
		var re_q = new RegExp("'","g");
		var re_s = new RegExp("\\\\","g");
		if(re_q.test(str)) str = str.replace(re_q,"\\'");
		if(re_s.test(str)) str = str.replace(re_s,"\\\\");
		return(str);
	}
		
	function underscore(istr) {
		var str = new String(istr);
		var re_ = new RegExp("[ \\s\\t\\r\\n]+","g");
		if(re_.test(str)) str = str.replace(re_, "_");
		return(str);
	}

	/********************************************* rn control codes *********************************************/
	
	function StopClick() {
	  if(document.MediaPlayer.CanStop()) document.MediaPlayer.DoStop();
	}


	function PlayClick() {
	  if(document.MediaPlayer.CanPlay()) document.MediaPlayer.DoPlay();
	}

	function PauseClick() {
	  if(document.MediaPlayer.CanPause()) document.MediaPlayer.DoPause();
	  else if(document.MediaPlayer.CanPlay()) document.MediaPlayer.DoPlay();
	}
	 
	function VolumeDown(){ 
	  if(document.MediaPlayer.GetVolume() >= 10){ 
	document.MediaPlayer.SetVolume(document.MediaPlayer.GetVolume() - 10);
	  }
	}

	function VolumeUp(){ 
	  if(document.MediaPlayer.GetVolume() <= 90){ 
	document.MediaPlayer.SetVolume(document.MediaPlayer.GetVolume() + 10);
	  }
	}

	function MuteAudioClick() {
	  if(!document.MediaPlayer.GetMute()) document.MediaPlayer.SetMute(true);
	  else document.MediaPlayer.SetMute(false);
	}

	function full_screen(Param){
		if (Param == false){
			document.MediaPlayer.SetOriginalSize();
		}else{
			document.MediaPlayer.SetFullScreen();
		}
	}

function time2ms(istr) { //take time as string, return second in +-integer
	istr = new String(istr);
	var neg = /^-/i;
	var re = /[+-]*[0]*([1-9])/g;
	var str = new String(istr);
	if(re.test(str)) str = str.replace(re,"$1"); //eliminate leading zeros & signs
	var foo = str.split(":");
	var tsec = new Number(foo[foo.length-1]);
	tsec += new Number(foo[foo.length-2])*60;
	tsec += new Number(foo[foo.length-3])*60*60;
	if(foo.length>=4) tsec += new Number(foo[foo.length-4])*60*60*24;
	tsec = tsec*1000;
	if(neg.test(istr)) return(0-tsec); //if negative
	else return(tsec);
}

function seek(tstr) {
  	var _vid = self.document.MediaPlayer;
    if(_vid && _vid.GetCanSeek()) _vid.SetPosition(time2ms(tstr));
}

function getvar_parent(el, case_sensitive) { //el=str, case_sensitive=bool
	 	var rs="";
  		if(!case_sensitive) rs="i";
  		var urls = new String(window.parent.location);
  		var re = new RegExp( "\\?[\\w\\W]*"+ el +"=([^\\&\\?#]*)", rs );
  		var arr = re.exec(urls);
  		if(arr && arr.length>1) return arr[1];
  		else return '';
}