function calcThroughput(ms){
var diffTimeSeconds = ms/1000;
var kbits = 43/128;
return (kbits*0.93)/diffTimeSeconds;
}
function DetectActiveX(CtrlName){
	try{
		var ctrl = new ActiveXObject(CtrlName); 
		return (ctrl != null);
	}
	catch(oError){}
	return false;
}
function WMPAvailable(){
	if(Browser()=="IE" )return DetectActiveX("WMPlayer.OCX");
	else 
	{ 
		for(i=0;i<navigator.plugins.length;i++){if(navigator.plugins[i].name.indexOf("Windows Media Player")>=0)return true;}
		return false;
	}
}
function RPAvailable(){
	if(Browser()=="IE")	{
		return (DetectActiveX("rmocx.RealPlayer G2 Control") || DetectActiveX("RealPlayer.RealPlayer(tm) ActiveX Control (32-bit)") || DetectActiveX("RealVideo.RealVideo(tm) ActiveX Control (32-bit)"));
	}
	else{
		for(i=0;i<navigator.plugins.length;i++){if(navigator.plugins[i].name.indexOf("RealPlayer")>=0)return true;}
	}
}
function RealContentAvail(){
for(i=2;i>=0;i--)if(RS[i]!="")return true;
return false;
}
function WMPContentAvail(){
for(i=2;i>=0;i--)if(WS[i]!="")return true;
return false;
}
function DisplayChoices(){
	if(player=='w')	{
		var pl=RPAvailable(), content=RealContentAvail();
		if(!content) return "<br>Sorry, no video currently available for viewing";
		else{
			if(!pl) return "<br>Available video is in RealPlayer(tm) format.<br>Please click 'Help & Preferences' for links to install RealPlayer";
			return "<br>Available video is in RealPlayer(tm) format.<br>Please click 'Help & Preferences' to switch to RealPlayer";
		}
	}
	else{
		var pl=WMPAvailable(), content=WMPContentAvail();
		if(!content) return "<br>Sorry, no video currently available for viewing";
		else{
			if(!pl) return "<br>Available video is in Windows Media Player(tm) format.<br>Please click 'Help & Preferences' for links to install Windows Media Player";
			return "<br>Available video is in Windows Media Player(tm) format.<br>Please click 'Help & Preferences' to switch to Windows Media Player";
		}
	}
}