winIEpass = ((navigator.appName.indexOf("Microsoft") != -1) && (navigator.appVersion.indexOf("Windows") != -1)) && (parseFloat(navigator.appVersion) >= 4) ? true : false
NNpass = ((navigator.appName == "Netscape") && (navigator.userAgent.indexOf("Mozilla") != -1) && (parseFloat(navigator.appVersion) >= 4) && (navigator.javaEnabled())) ? true : false

supportedBrowser = (winIEpass || NNpass)

// check for Flash Plug-in in Mac or Win Navigator. Get plug-in version.
minPlayer = 4
var mySwf

function Flash_checkForPlugIn() {
  var plugin = (navigator.mimeTypes && navigator.mimeTypes["application/x-shockwave-flash"]) ? navigator.mimeTypes["application/x-shockwave-flash"].enabledPlugin : 0
  if (plugin) {
    var pluginversion = parseInt(plugin.description.substring(plugin.description.indexOf(".") - 1))
    if(pluginversion >= minPlayer) return true
  }
  return false
}

// vbscript check for Flash ActiveX control in windows IE
if(supportedBrowser && winIEpass) {
  document.write(
	'<script language=VBScript>' + '\n' +
	'Function Flash_checkForActiveX()' + '\n' +
	'Dim hasPlayer, playerversion' + '\n' +
	'hasPlayer = false' + '\n' +
	'playerversion = 10' + '\n' +
	'Do While playerversion >= minPlayer' + '\n' +
	'On Error Resume Next' + '\n' +
	'hasPlayer = (IsObject(CreateObject(\"ShockwaveFlash.ShockwaveFlash.\" & playerversion & \"\")))' + '\n' +
	'If hasPlayer = true Then Exit Do' + '\n' +
	'playerversion = playerversion - 1' + '\n' +
	'Loop' + '\n' +
	'Flash_checkForActiveX = hasPlayer' + '\n' +
	'End Function' + '\n' +
	'<\/script>'
  )
}

function Flash_checkForMinPlayer() {
  if(!supportedBrowser) return false
  if(NNpass) return (Flash_checkForPlugIn())
  if(winIEpass) return (Flash_checkForActiveX())
}

function Flash_embedSWF(objName, srcURL, swfbgColor) {
	defaultColor = (document.bgColor != null) ? document.bgColor : "#ffffff"
	bgcolor = (swfbgColor != null) ? swfbgColor : defaultColor
	document.writeln(
		'<OBJECT classid="classid=""clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"' +
		'codebase="componentes/swflash.cab#version=6,0,47,0"' +
		'id="' + objName + '" width="100%" height="100%" onReadyStateChange="loaded()">' +
		'<PARAM name="movie" VALUE="' + srcURL + '">' + 
		'<PARAM name="quality" VALUE="high">' +
		'<PARAM name="wmode" VALUE="transparent">'+
		'<PARAM name="autostart" VALUE="false">'+
		'<PARAM name="scale" value="exactfit">' +
		'<PARAM name="bgcolor" VALUE=' + bgcolor + '>' +
		'<EMBED src="' + srcURL + '" quality="high" bgcolor="' + bgcolor + '" width="100%" height="100%"' +
		'type="application/x-shockwave-flash" name="' + objName + '"' +
		'pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash"></EMBED></OBJECT>')
}