var bWrittenFunctions;

	function IEFlashTest()
	{
		var objFlash;
		var bHasFlash;

		if (navigator.appVersion.indexOf('MSIE 5')!=-1)
			bHasFlash=eval('try { var objFlash; objFlash=new ActiveXObject(\'ShockwaveFlash.ShockwaveFlash\'); delete objFlash; bHasFlash=true; } catch(e) { bHasFlash=false; }');
		else
		{
			// JavaScript version doesn't support try catch, so we'll output some VBScript to use
			if (!bWrittenFunctions)
			{
				bWrittenFunctions=true;
				document.writeln('<SCR'+'IPT LANGUAGE="vbscript">');
				document.writeln('Function VBIETest');
				document.writeln('Dim objFlash');
				document.writeln('VBIETest=false');
				document.writeln('On Error Resume Next');
				document.writeln('Set objFlash=CreateObject("ShockwaveFlash.ShockwaveFlash")');
				document.writeln('If Err.Number=0 Then VBIETest=True');
				document.writeln('Set blnFlash=Nothing');
				document.writeln('End Function');
				document.writeln('</SCR'+'IPT>');
			}
			bHasFlash=VBIETest();
		}

		return(bHasFlash);
	}

	function HasFlash()
	{
		var bHasFlash=false;

		if ( (navigator.userAgent.indexOf("MSIE") == -1) || ( navigator.userAgent.indexOf("Mac")!=-1 ) )
		{
			// Netscape
			if (navigator.mimeTypes && navigator.mimeTypes["application/x-shockwave-flash"])
			{
				bHasFlash=true;
			}
			else
			{
				bHasFlash=false;
			}
		}
		else
		{
			bHasFlash=IEFlashTest();
		}

		return(bHasFlash);
	}

	function InsertFlash( sFilename, iWidth, iHeight, sBackground )
	{
		var sOut;

		sOut='';
		sOut+='<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"';
		sOut+='  width='+iWidth+' height='+iHeight+'>';
		sOut+='              <param name=movie value="'+sFilename+'">';
		sOut+='              <param name=quality value=high>';
		sOut+='              <param name=scale value=exactfit>';
		sOut+='              <param name=bgcolor value='+sBackground+'>';
		sOut+='<embed src="' + sFilename +'" quality=high bgcolor=' + sBackground;
		sOut+=' swLiveConnect=FALSE WIDTH=' + iWidth +' HEIGHT=' + iHeight + ' scale=exactfit';
		sOut+=' TYPE="application/x-shockwave-flash">';
		sOut+='</object>';
		
		document.write(sOut);
	}

	function InsertTag( sTag )
	{
		document.write(sTag);
	}