// this is where we write out the VBScript for MSIE Windows
var WM_startTagFix = '</';
var msie_windows = 0;
if ((navigator.userAgent.indexOf('MSIE') != -1) && (navigator.userAgent.indexOf('Win') != -1)){
  msie_windows = 1;
  document.writeln('<script language="VBscript">');
  document.writeln('\'This will scan for plugins for all versions of Internet Explorer that have a VBscript engine version 2 or greater.');
  document.writeln('\'This includes all versions of IE4 and beyond and some versions of IE 3.');
  document.writeln('Dim WM_detect_through_vb');
  document.writeln('WM_detect_through_vb = 0');
  document.writeln('If ScriptEngineMajorVersion >= 2 then');
  document.writeln('  WM_detect_through_vb = 1');
  document.writeln('End If');
  document.writeln('Function WM_activeXDetect(activeXname)');
  document.writeln('  on error resume next');
  document.writeln('  If ScriptEngineMajorVersion >= 2 then');
  document.writeln('     WM_activeXDetect = False');
  document.writeln('     WM_activeXDetect = IsObject(CreateObject(activeXname))');
  document.writeln('     If (err) then');
  document.writeln('        WM_activeXDetect = False');
  document.writeln('     End If');
  document.writeln('   Else');
  document.writeln('     WM_activeXDetect = False');
  document.writeln('   End If');
  document.writeln('End Function');
  document.writeln(WM_startTagFix+'script>');
}

function WM_pluginDetect(plugindescription, pluginxtension, pluginmime, activeXname){

  //This script block will test all user agents that have a real plug-in array
  //(i.e. Netscape) and set the variables, otherwise it directs the routine
  // to WM_activeXDetect to detect the activeX control.

  // First define some variables
  var i,plugin_undetectable=0,detected=0, daPlugin=new Object();

  // Then we check to see if it's an MSIE browser that you can actually
  // check for the plugin in question. 

  if (msie_windows && WM_detect_through_vb){
      plugin_undetectable = 0;
  } else {
      plugin_undetectable = 1;
  }



  // If it has a real plugins or mimetypes array, we look there for the plugin first
  if(navigator.plugins) {
      navigator.plugins.refresh()
      numPlugins = navigator.plugins.length;
      if (numPlugins > 1) {
	  if (navigator.mimeTypes && navigator.mimeTypes[pluginmime] && navigator.mimeTypes[pluginmime].enabledPlugin && (navigator.mimeTypes[pluginmime].suffixes.indexOf(pluginxtension) != -1)) { // seems like we have it, let's just make sure and check the version (if specified)
	      if ((navigator.appName == 'Netscape') && (navigator.appVersion.indexOf('4.0') != -1)) { // stupid, stupid Netscape can't handle the references to navigator.plugins by number, sooo...
		  for(i in navigator.plugins) {
		      if ((navigator.plugins[i].description.indexOf(plugindescription) != -1) || (i.indexOf(plugindescription) != -1)) { // some versions of quicktime have no description. feh!
			  detected=1;
			  break;
		      }
		  }
	      } else {
		  for (i = 0; i < numPlugins; i++) {
		      daPlugin = navigator.plugins[i];
		      if ((daPlugin.description.indexOf(plugindescription) != -1) || (daPlugin.name.indexOf(plugindescription) != -1)) {
			  detected=1;
			  break;
		      }
		  }
	      }

	      // Mac weirdness
      if (navigator.mimeTypes[pluginmime] == null) {
		  detected = 0;
	      }
	  }
	  return detected;
      } else if((msie_windows == 1) && !plugin_undetectable){
	  return WM_activeXDetect(activeXname);
      } else { 		
	  return 0;
      }
  } else {
      return 0;
  }
}


// this next function just makes it easy to detect the common plugins

function WM_easyDetect(whichPlugin) {

    // this function just makes it easy to do basic plug-in detection without
    // knowing all the mimetypes and activeX names and such

    var isItThere = 0;
    if( (whichPlugin == 'flash') || (whichPlugin == 'Flash') ) {
	isItThere = WM_pluginDetect('Flash', 'swf', 'application/x-shockwave-flash', 'ShockwaveFlash.ShockwaveFlash');
    } else if( (whichPlugin == 'flash4') || (whichPlugin == 'Flash4') ) {
	isItThere = WM_pluginDetect('Flash 4', 'swf','application/x-shockwave-flash', 'ShockwaveFlash.ShockwaveFlash.4');
    } else if( (whichPlugin == 'flash5') || (whichPlugin == 'Flash5') ) {
	isItThere = WM_pluginDetect('Flash 5', 'swf','application/x-shockwave-flash', 'ShockwaveFlash.ShockwaveFlash.5');
    } else if( (whichPlugin == 'flash6') || (whichPlugin == 'Flash6') ) {
	isItThere = WM_pluginDetect('Flash 6', 'swf','application/x-shockwave-flash', 'ShockwaveFlash.ShockwaveFlash.6');
    } else if( (whichPlugin == 'director') || (whichPlugin == 'Director') ) {
	isItThere = WM_pluginDetect('Shockwave', 'dcr', 'application/x-director', 'SWCtl.SWCtl.1');
    } else if( (whichPlugin == 'authorware') || (whichPlugin == 'Authorware') ) {
	isItThere = WM_pluginDetect('Authorware', 'aam', 'application/x-authorware-map', 'Macromedia.AuthorwareShockwaveControl.1');
    } else if( (whichPlugin == 'quicktime') || (whichPlugin == 'Quicktime') || (whichPlugin == 'QuickTime') ) {
	isItThere = WM_pluginDetect('QuickTime', 'mov', 'video/quicktime', '');
    } else if( (whichPlugin == 'realaudio') || (whichPlugin == 'Realaudio') || (whichPlugin == 'RealAudio') ) {
	isItThere = (WM_pluginDetect('RealPlayer', 'rpm', 'audio/x-pn-realaudio-plugin', 'RealPlayer.RealPlayer(tm) ActiveX Control (32-bit)')) || (WM_pluginDetect('RealPlayer', 'rpm', 'audio/x-pn-realaudio-plugin','rmocx.RealPlayer G2 Control')) || (WM_pluginDetect('RealPlayer', 'rpm', 'audio/x-pn-realaudio-plugin','RealPlayer.RealPlayer(tm) ActiveX Control (32-bit)')) || (WM_pluginDetect('RealPlayer', 'rpm', 'audio/x-pn-realaudio-plugin','RealVideo.RealVideo(tm) ActiveX Control (32-bit)'))
    } else if( (whichPlugin == 'acrobat') || (whichPlugin == 'Acrobat')) {
	isItThere = (WM_pluginDetect('Acrobat', 'pdf', '', ''));
    } else {
	alert('You need to tell me which plug-in to look for, like so:\n\n' + '          WM_easyDetect(\'flash\')\n\n' + '          WM_easyDetect(\'director\')\n\n' + '          WM_easyDetect(\'quicktime\')\n\n' +  '          WM_easyDetect(\'authorware\')\n\n'+ '          WM_easyDetect(\'realaudio\')');
    }
    return isItThere;
}

function opensample(theURL,full,w,h) {

// full: fullscreen
//   0 = No preference
//   1 = Never fullscreen
//   2 = Always fullscreen

    // if the screen object does not have width and height attributes
    // assume 800x600, the most common resolution
    if (screen.width && screen.height) {
      width = screen.width;
      height = screen.height;
    } else {
      width = 800;
      height = 600;
    }

    // max size slightly smaller than the screen resolution
    width -= 10;
    height -= 60;

    if (full == 0) { // no preference
      // Decide if it needs to be fullscreen
      if ((height < h) || (width < w)) full = 2;
      else full = 1;
    }
    if (full == 1) { // not fullscreen
      if (h && (height > h)) height = h;
      if (w && (width  > w)) width = w;

      // Set window position
      xPos = 0;
      yPos = Math.floor((screen.height - 80 - height)/2);
      if (yPos < 0) yPos = 0;

      // Open Window
      sample_win = window.open(theURL,'Sample','left='+xPos+',top='+yPos+',screenX='+xPos+',screenY='+yPos+',scrollbars=no,resizable=yes,width='+width+',height='+height);
    } else { // fullscreen
      sample_win = window.open(theURL,'Sample','fullscreen,left=0,top=0,screenX=0,screenY=0,scrollbars=no,resizable=no,width='+width+',height='+height);
    }
}