/*
 * ShockwaveObject 
*/
SWObject = new Object();
SWObject.installedVersion = 0;
function getShockwaveVersion() {
	function getNum(A){var m = /[\d][\d\.]*/.exec(A);return m ? m[0] : null};
	var shockwaveversion = 0;
	if (navigator.plugins && navigator.plugins.length) {
		var x = navigator.plugins["Shockwave for Director"];
		if(x){
			if (x.description) {
				var y = x.description;
	   		shockwaveversion = parseFloat(y.substring(y.indexOf("version ")+8));//y.charAt(y.indexOf('.')-1);
			}
		}
	} else {
		execScript('on error resume next: set swObj = CreateObject("SWCtl.SWCtl")\nif IsObject(swObj) then\nSWObject.installedVersion = swObj.ShockwaveVersion("")\nend if', 'VBScript');
		if(SWObject.installedVersion == 0){
			execScript('on error resume next: set swObj = CreateObject("SWCtl.SWCtl.8")\nif IsObject(swObj) then\nSWObject.installedVersion = 8\nend if', 'VBScript');
			execScript('on error resume next: set swObj = CreateObject("SWCtl.SWCtl.7")\nif IsObject(swObj) then\nSWObject.installedVersion = 7\nend if', 'VBScript');
			execScript('on error resume next: set swObj = CreateObject("SWCtl.SWCtl.1")\nif IsObject(swObj) then\nSWObject.installedVersion = 6\nend if', 'VBScript');
		}else{
			shockwaveversion = parseFloat(getNum(SWObject.installedVersion));
		}
	}
	return shockwaveversion;
}

function detectShockwave(ver) {	
	if (getShockwaveVersion() >= ver) {
		return true;
	} else {
		return false;
	}
}