//  DevalVR + QuickTime + PTviewer + Flash  Javascript workaround
//	Author: fiero http://www.devalvr.com
//		
//	To embed a panorama just include these lines in your HTML file (change filenames):
//
//	<SCRIPT type="text/javascript" src="detectvr.js"></SCRIPT>
//	<SCRIPT type="text/javascript">writevrcode("testfileForQT.mov","testfileForJava.jpg","testfileForFlash.swf","100%","94%");</SCRIPT>


var minQTVersion = "5.0.0";			// minimal required version checked for QuickTime
var minDevalVRVersion = "0,3,3,0";  // minimal required version checked for DevalVR
var minFlashVersion = "8.0.0";		// minimal required version checked for Flash

var makeDevalVRdefault =1;			// Sets DevalVR as default when QT and DevalVR are installed and "Detect" mode is selected

var enableSizeLimits=1;				// 0: disable  1: enable		(size limits for QT and DevalVR)
var enableSizeLimitsJava=1;			// 0: disable  1: enable		(size limits for Java)
var enableSizeLimitsFlash=1;			// 0: disable  1: enable     (size limits for Flash)
var maxViewerWidth="1440";
var maxViewerHeight="1024";
var maxViewerWidthJava="900";
var maxViewerHeightJava="700";
var maxViewerWidthFlash="1440";
var maxViewerHeightFlash="1024";

var enableSizeRatio=0;				// 0: disable size ratio    1: enable size ratio
var sizeRatio=8/5;				// aspect ratio, horizontal/vertical proportions

var enableLineUnderPanorama=1;			//Enable an adviser line under panorama
var writeLineUnderQuickTime="";
var writeLineUnderDevalVR="";
var writeLineUnderJava="<FONT face='Verdana' size='1' color='#cdcdcd'> Install the DevalVR plugin for an optimal viewing experience </FONT><A href='http://www.devalvr.com/install/'><FONT face='Verdana' size='1' color='#cdcdcd'>click here to install</A>, and <A href='javascript:reloadPage()'><FONT face='Verdana' size='1' color='#cdcdcd'>click here after installing</A>";
var writeLineUnderFlash="";

/////////////////////////////////////////////////////////////////////////////////////////////////

var isOpera=(navigator.userAgent.indexOf('Opera')!=-1);
var isIE=((navigator.appVersion.indexOf("MSIE") != -1) && !isOpera);
var isWindows=(navigator.platform.indexOf('Win')!=-1);
var isMac=(navigator.platform.indexOf('Mac')!=-1 || navigator.platform.indexOf('PowerPC')!=-1);
var favoriteViewer=getCookie("panorama_viewer");
if(!favoriteViewer) favoriteViewer="DETECT";  //DEVALVR , QT, FLASH, JAVA, or DETECT
var adviselineunderpano="";
var orgsizepluginx,orgsizepluginy;
var sizepluginx;
var sizepluginy;
var pluginDevalVRInstalled = 0;
var pluginQTInstalled = 0;
var javaInstalled=0;
var pluginFlashInstalled = 0; 
var writeDevalVR=0;
var writeQT=0;
var writeJAVA=0;
var	writeFlash=0;
var writeInstallDevalVR=0;
var writeInstallQT=0;
var writeInstallFlash=0;
var writeInstallJava=0;

function writevrcode(movfile,javafile,flashfile,sizex,sizey)
{
	//old versions of writevrcode only was 4 parameters
	if(flashfile)
	{
		  flashcad=flashfile.toString();
		  flashcad.toLowerCase();
		  if(flashcad.indexOf(".swf")==-1)
		  {
				sizey=sizex;
				sizex=flashfile;
				flashfile=null;	
		  }
	}

	if(javafile && javafile.toString().indexOf(".")==-1)
	{
		javafile=null;
	}
	
	var flashVersion=minFlashVersion.split(".");
	pluginFlashInstalled = DetectFlashVer(parseInt(flashVersion[0]),parseInt(flashVersion[1]),parseInt(flashVersion[2])); 

	if(isWindows)
	{
		if (!isIE) 
		{
			if (navigator.mimeTypes && navigator.mimeTypes['application/x-java-applet'] && navigator.mimeTypes["application/x-java-applet"].enabledPlugin)
			{
				javaInstalled=navigator.javaEnabled();
			}
		
			if (navigator.mimeTypes && navigator.mimeTypes["application/x-devalvrx"] && navigator.mimeTypes["application/x-devalvrx"].enabledPlugin)
			{
				var words = navigator.plugins["DevalVR 3D Plugin"].description.split(" ");
				var version = words[3].split(",");
				var min = minDevalVRVersion.split(",");
				for (var i = 0; i < 4; i++)
				{
					if(parseInt(version[i])>parseInt(min[i])) 
					{
						pluginDevalVRInstalled=1;
						break;
					}
					else if(parseInt(version[i])<parseInt(min[i]))
					{
						break;
					}
					else if(parseInt(version[i])==parseInt(min[i]) && i==3)
						pluginDevalVRInstalled=1;
				}
			}	
		    if(navigator.mimeTypes && navigator.mimeTypes["video/quicktime"] && navigator.mimeTypes["video/quicktime"].enabledPlugin)
		    {
				var qtnumber=-1;
				for (var i = 0; i < navigator.plugins.length; i++)
				{
					if(navigator.plugins[i].name.indexOf("QuickTime Plug-in")!=-1)
					{
						qtnumber=i;
						break;
					}
				}
				if(qtnumber!=-1)
				{
					var words = navigator.plugins[qtnumber].name.split(" ");
					var version = words[2].split(".");
					var min = minQTVersion.split(".");
					for (var i = 0; i < 3; i++)
					{
						if(parseInt(version[i])>parseInt(min[i])) 
						{
							pluginQTInstalled=1;
							break;
						}
						else if(parseInt(version[i])<parseInt(min[i]))
						{
							break;
						}
						else if(parseInt(version[i])==parseInt(min[i]) && i==2)
							pluginQTInstalled=1;
					}
				}
			}
		}
		else 
		{
			var devalvrobj=null;
			var objQuickTime=null;
			var objJava=null;
			try{
				objJava=new ActiveXObject('JavaPlugin');
				if(objJava) 
				{
					javaInstalled=navigator.javaEnabled();
					delete objJava;
				}
			}catch(e){}
			try{
				devalvrobj=new ActiveXObject('DevalVRXCtrl.DevalVRXCtrl.1');
				if(devalvrobj) 
				{
					pluginDevalVRInstalled=1;
					delete devalvrobj;
				}
			}catch(e){}
			try
			{
				objQuickTime=new ActiveXObject('QuickTimeCheckObject.QuickTimeCheck.1');
				if (objQuickTime)
				{
					if(objQuickTime.IsQuickTimeAvailable(0))
					{
						pluginQTInstalled=1;
					}
					delete objQuickTime;
				}
			}catch(e){}
		}
		
	}
	writeDevalVR=0;
	writeQT=0;
	writeJAVA=0;
	writeFlash=0;
	writeInstallDevalVR=0;
	writeInstallQT=0;
	writeInstallFlash=0;
	writeInstallJava=0;
	
	if(isWindows)
	{
		if(favoriteViewer=="DETECT" || (favoriteViewer=="JAVA" && !javafile) || (favoriteViewer=="FLASH" && !flashfile))
		{
			if(pluginDevalVRInstalled && pluginQTInstalled)
			{
				if(makeDevalVRdefault) writeDevalVR=1; 
				else writeQT=1;
			}
			else if(pluginDevalVRInstalled) writeDevalVR=1; 
			else if(pluginQTInstalled) writeQT=1;
			else if(pluginFlashInstalled && flashfile) writeFlash=1;
			else if(javaInstalled && javafile) writeJAVA=1;
			else writeInstallDevalVR=1;
		}
		else if(favoriteViewer=="DEVALVR")
		{
			if(pluginDevalVRInstalled) writeDevalVR=1;
			else writeInstallDevalVR=1;
		}
		else if(favoriteViewer=="QT")
		{
			if(pluginQTInstalled) writeQT=1;
			else writeInstallQT=1;
		}
		else if(favoriteViewer=="FLASH")
		{
			if(pluginFlashInstalled) writeFlash=1;
			else writeInstallFlash=1;
		}
		else if(favoriteViewer=="JAVA") 
		{
			if(javaInstalled) writeJAVA=1;
			else writeInstallJava=1;
		}
	}
	else if(isMac) 
	{
		if(favoriteViewer=="JAVA" && javafile) 
		{
			if(javaInstalled) writeJAVA=1;
			else writeInstallJava=1;
		}
		else if(favoriteViewer=="FLASH" && flashfile) 
		{
			if(pluginFlashInstalled) writeFlash=1;
			else writeInstallFlash=1;
		}
		else writeQT=1;	//Use QT in Mac computers
	}
	else 
	{
		if(javaInstalled) writeJAVA=1;  //Use Java always in Linux
		else writeInstallJava=1;
	}
	
	adviselineunderpano="";
	if(enableLineUnderPanorama)
	{
		if(writeDevalVR && writeLineUnderDevalVR!="") adviselineunderpano=writeLineUnderDevalVR;
		else if(writeQT && writeLineUnderQuickTime!="") adviselineunderpano=writeLineUnderQuickTime;
		else if(writeFlash && writeLineUnderFlash!="") adviselineunderpano=writeLineUnderFlash;
		else if(writeJAVA && writeLineUnderJava!="") adviselineunderpano=writeLineUnderJava;
	}

	if(!sizex) sizex="100%";
	if(!sizey) sizey="94%";

	if(writeJAVA) enableSizeLimits=enableSizeLimitsJava;
	else if(writeFlash) enableSizeLimits=enableSizeLimitsFlash;
	
	orgsizepluginx=sizex;
	orgsizepluginy=sizey;
	
	CalcLimits(sizex,sizey);
	sizex=sizepluginx;
	sizey=sizepluginy;
	
	if(writeDevalVR)
	{
		p2q_EmbedDevalVR(movfile,sizex,sizey,'filter','0');
	}
	else if(writeQT)
	{
		p2q_EmbedQuicktime(movfile,sizex,sizey,'scale','tofit','autostart','true','kioskmode','true','controller','true');
	}
	else if(writeJAVA)
	{
		p2q_EmbedPtviewer(javafile,sizex,sizey,'fov','90','cursor','MOVE','showToolbar','true','imgLoadFeedback','false');
	}
	else if(writeFlash)
	{
		p2q_EmbedFlash(flashfile,sizex,sizey,'bgcolor', '#f0f0f0', 'play', 'true', 'cache','true', 'autoplay','true');
	}
	else if(writeInstallDevalVR)
	{
		var str='<DIV align=center><table border="0" cellpadding="0" cellspacing="0" style="WIDTH: ' + sizex + '; HEIGHT: ' + sizey + '" width="'+sizex+'"  height="'+sizey+'"><tr><td align="center" valign="middle">';
		str+='DevalVR plugin is required to see this content';
		str+='<BR><BR><A href="http://www.devalvr.com/install/">click here to install (250 KB, installation only takes a few seconds)</A>';
		str+='<BR><BR><A href="javascript:reloadPage()">click here after installing to reload page</A>';
		str+='</td></tr></table></DIV>';
		document.writeln(str);
	}
	else if(writeInstallFlash)
	{
		var str='<DIV align=center><table border="0" cellpadding="0" cellspacing="0" style="WIDTH: ' + sizex + '; HEIGHT: ' + sizey + '" width="'+sizex+'"  height="'+sizey+'"><tr><td align="center" valign="middle">';
		str+='This content requires the Adobe Flash Player Version 8 or higher.';
		str+='<BR><BR><A href="http://www.adobe.com/go/getflash/">click here to install Flash Player</A>';
		str+='</td></tr></table></DIV>';
		document.writeln(str);
	}
	else if(writeInstallQT)
	{
		var str='<DIV align=center><table border="0" cellpadding="0" cellspacing="0" style="WIDTH: ' + sizex + '; HEIGHT: ' + sizey + '" width="'+sizex+'"  height="'+sizey+'"><tr><td align="center" valign="middle">';
		str+='This content requires QuickTime Player.';
		str+='<BR><BR><A href="http://www.apple.com/quicktime/download/">click here to install QuickTime</A>';
		str+='</td></tr></table></DIV>';
		document.writeln(str);
	}
	else if(writeInstallJava)
	{
		var str='<DIV align=center><table border="0" cellpadding="0" cellspacing="0" style="WIDTH: ' + sizex + '; HEIGHT: ' + sizey + '" width="'+sizex+'"  height="'+sizey+'"><tr><td align="center" valign="middle">';
		str+='This content requires Java Software.';
		str+='<BR><BR><A href="http://java.com/en/download/">click here to install Java</A>';
		str+='</td></tr></table></DIV>';
		document.writeln(str);
	}
	if(!writeInstallDevalVR && !writeInstallFlash && !writeInstallQT && !writeInstallJava) window.onresize=OnResizeWindow;
}

function OnResizeWindow()
{
	CalcLimits(orgsizepluginx,orgsizepluginy);

	if(isIE || isOpera)
	{
		document.PANORAMAID.style.width=sizepluginx;
		document.PANORAMAID.style.height=sizepluginy;
	}
	else
	{	
		document.PANORAMAID.width=sizepluginx;
		document.PANORAMAID.height=sizepluginy;
	}
	
	//if(writeJAVA) window.location.reload();		PTviewer does not resize its viewer window
}

function CalcLimits(sizex, sizey)
{
	var sizew,sizeh;
	
	if(enableSizeLimits || enableSizeRatio || adviselineunderpano!="")
	{
		sizex=sizex.toString();
		sizey=sizey.toString();
		pw=sizex.indexOf("px");
		if(pw!=-1) sizex=sizex.substring(0,pw);
		pw=sizey.indexOf("px");
		if(pw!=-1) sizey=sizey.substring(0,pw);
	
		sizew=getPageWidth();
		sizeh=getPageHeight();
	
		pw=sizex.indexOf("%");
		if(pw!=-1)
		{
			percent=sizex.substring(0,pw);
			sizex=(sizew*percent)/100;
		}
		pw=sizey.indexOf("%");
		if(pw!=-1)
		{
			percent=sizey.substring(0,pw);
			sizey=(sizeh*percent)/100;
		}
	
	}
	if(writeJAVA)
	{
		maxx=maxViewerWidthJava;
		maxy=maxViewerHeightJava;
	}
	else if(writeFlash)
	{
		maxx=maxViewerWidthFlash;
		maxy=maxViewerHeightFlash;
	}
	else
	{
		maxx=maxViewerWidth;
		maxy=maxViewerHeight;
	}
	if(enableSizeLimits)
	{
		if(sizex>maxx) sizex=maxx;
		if(sizey>maxy) sizey=maxy;
	}	
	if(enableSizeRatio)
	{
		x=sizey*sizeRatio;
		if(x<sizex)
		{
			sizex=x;
			if(enableSizeLimits && sizex>maxx) sizex=maxx;
		}
	}
	if(adviselineunderpano!="")
	{
		sizey-=16;
	}
	if(enableSizeLimits || enableSizeRatio || adviselineunderpano!="")
	{
		sizex=((sizex*100.0)/sizew);
		sizey=((sizey*100.0)/sizeh);
		if(sizex<1) sizex=1; 
		if(sizex>100) sizex=100; 
		if(sizey<1) sizey=1; 
		if(sizey>100) sizey=100;
		sizex=sizex+"%";
		sizey=sizey+"%";
	}
	sizepluginx=sizex;
	sizepluginy=sizey;
}

function reloadPage()
{
	if(!isIE) navigator.plugins.refresh(true);
	window.location.reload();
}

function getCookie(nombre)
{
	var dcookie=document.cookie;
	var cname=nombre+"=";
	var longitud=dcookie.length;
	var inicio=0;
	while(inicio<longitud)
	{
		var vbegin=inicio+cname.length;
		if(dcookie.substring(inicio,vbegin)==cname)
		{
			var vend=dcookie.indexOf(";",vbegin);
			if(vend==-1) vend=longitud;
			return unescape(dcookie.substring(vbegin,vend));
		}
		inicio=dcookie.indexOf(" ",inicio)+1;
		if(inicio==0) break;
	}
	return null;
}

function setCookie(name, value, expires)
{
	if(!expires)
	{ 
		expires=new Date();
		expires.setTime(expires.getTime()+(24*3600*1000*365));
	}
	document.cookie=name+"="+escape(value)+"; expires=" + expires.toGMTString()+ "; path=/";
}

function changeFavoriteViewer(favoriteviewer)
{
	setCookie("panorama_viewer",favoriteviewer);
}

function ShowViewerSelection(options)
{
	options.toLowerCase();
	var vertical=(options.indexOf("horizontal")==-1);
	var str='';
	
	viewer=getCookie("panorama_viewer");
	if(!viewer) viewer="DETECT";

	if(options.indexOf("detect")!=-1)
	{
		str+='<INPUT id=radioViewer type=radio name=radioViewer '+(viewer=="DETECT"?'checked':'')+' OnClick="javascript:changeFavoriteViewer(\'DETECT\');">Detect plugin ';
		if(vertical) str+='<BR>';
	}
	if(options.indexOf("devalvr")!=-1)
	{
		str+='<INPUT type=radio name=radioViewer '+(viewer=="DEVALVR"?'checked':'')+' OnClick="javascript:changeFavoriteViewer(\'DEVALVR\');">DevalVR ';
		if(vertical) str+='<BR>';
	}
	if(options.indexOf("qt")!=-1)
	{
		str+='<INPUT type=radio name=radioViewer '+(viewer=="QT"?'checked':'')+' OnClick="javascript:changeFavoriteViewer(\'QT\');">QuickTime ';
		if(vertical) str+='<BR>';
	}
	if(options.indexOf("flash")!=-1)
	{
		str+='<INPUT type=radio name=radioViewer '+(viewer=="FLASH"?'checked':'')+' OnClick="javascript:changeFavoriteViewer(\'FLASH\');">Flash ';
		if(vertical) str+='<BR>';
	}
	if(options.indexOf("java")!=-1)
	{
		str+='<INPUT type=radio name=radioViewer '+(viewer=="JAVA"?'checked':'')+' OnClick="javascript:changeFavoriteViewer(\'JAVA\');">Java ';
		if(vertical) str+='<BR>';
	}
	if(!vertical) str+='<BR>';
	
	document.write(str);
}

function getPageHeight()
{
	var ret;
	if(isIE) ret=document.body.clientHeight-document.body.topMargin-document.body.bottomMargin;
	else ret=window.innerHeight-16;
	
	return ret;
}

function getPageWidth()
{
	var ret;
	if(isIE) ret=document.body.clientWidth-document.body.leftMargin-document.body.rightMargin;
	else ret=window.innerWidth-16;
	
	return ret;
}

function IEGetSwfVer()
{
	flashVer=0;
			
	var objFlash=null;
	for(i=25;i>0 && flashVer==0;i--)
	{
		try{
			objFlash=new ActiveXObject('ShockwaveFlash.ShockwaveFlash.'+i);
			if(objFlash) 
			{
				flashVer=objFlash.GetVariable("$version");
				delete objFlash
			}
		}catch(e){}
	}
	return flashVer;
}

// JavaScript helper required to detect Flash Player PlugIn version information
function JSGetSwfVer()
{
	// NS/Opera version >= 3 check for Flash plugin in plugin array
	if (navigator.plugins != null && navigator.plugins.length > 0) {
		if (navigator.plugins["Shockwave Flash 2.0"] || navigator.plugins["Shockwave Flash"]) {
			var swVer2 = navigator.plugins["Shockwave Flash 2.0"] ? " 2.0" : "";
      		var flashDescription = navigator.plugins["Shockwave Flash" + swVer2].description;
			descArray = flashDescription.split(" ");
			tempArrayMajor = descArray[2].split(".");
			versionMajor = tempArrayMajor[0];
			versionMinor = tempArrayMajor[1];
			if ( descArray[3] != "" ) {
				tempArrayMinor = descArray[3].split("r");
			} else {
				tempArrayMinor = descArray[4].split("r");
			}
      		versionRevision = tempArrayMinor[1] > 0 ? tempArrayMinor[1] : 0;
            flashVer = versionMajor + "." + versionMinor + "." + versionRevision;
      	} else {
			flashVer = -1;
		}
	}
	// MSN/WebTV 2.6 supports Flash 4
	else if (navigator.userAgent.toLowerCase().indexOf("webtv/2.6") != -1) flashVer = 4;
	// WebTV 2.5 supports Flash 3
	else if (navigator.userAgent.toLowerCase().indexOf("webtv/2.5") != -1) flashVer = 3;
	// older WebTV supports Flash 2
	else if (navigator.userAgent.toLowerCase().indexOf("webtv") != -1) flashVer = 2;
	// Can't detect in all other cases
	else {
		
		flashVer = -1;
	}
	return flashVer;
}
 
// If called with no parameters this function returns a floating point value 
// which should be the version of the Flash Player or 0.0 
// ex: Flash Player 7r14 returns 7.14
// If called with reqMajorVer, reqMinorVer, reqRevision returns true if that version or greater is available
function DetectFlashVer(reqMajorVer, reqMinorVer, reqRevision) 
{
 	reqVer = parseFloat(reqMajorVer + "." + reqRevision);
  	if (isIE && isWindows && !isOpera) {
		versionStr = IEGetSwfVer();
	} else {
		versionStr = JSGetSwfVer();		
	}
	if (versionStr == -1 ) { 
		return false;
	} else if (versionStr != 0) {
		if(isIE && isWindows && !isOpera) {
			tempArray         = versionStr.split(" ");
			tempString        = tempArray[1];
			versionArray      = tempString .split(",");				
		} else {
			versionArray      = versionStr.split(".");
		}
		versionMajor      = versionArray[0];
		versionMinor      = versionArray[1];
		versionRevision   = versionArray[2];
			
		versionString     = versionMajor + "." + versionRevision;   // 7.0r24 == 7.24
		versionNum        = parseFloat(versionString);
    	// is the major.revision >= requested major.revision AND the minor version >= requested minor
		if ( (versionMajor > reqMajorVer) && (versionNum >= reqVer) ) {
			return true;
		} else {
			return ((versionNum >= reqVer && versionMinor >= reqMinorVer) ? true : false );	
		}
	}
	return (reqVer ? false : 0.0);
}

/*  
    IE + ActiveX + EOLAS - Javascript workaround

	Author: 
		Thomas Rauscher <rauscher@pano2qtvr.com> http://www.pano2qtvr.com
		Modified by Armando Saenz
		
	To embed a panorama just call one of these functions with 
	additional pairs for additional paramameters f.e:
	
	p2q_EmbedQuicktime('pano.mov','640','480','scale','tofit','background','#eeeeee');
	
	Use this file at your own risk
*/

window.p2q_Version	= 1.0;

function p2q_EmbedQuicktime(sFile,sWidth,sHeight) 
{
	document.writeln('<DIV align=center><object id="PANORAMAID" classid="clsid:02BF25D5-8C17-4B23-BC80-D3488ABDDC6B"');
	document.writeln(' codebase="http://www.apple.com/qtactivex/qtplugin.cab"');
	document.writeln('  style="WIDTH: ' + sWidth + '; HEIGHT: ' + sHeight + '" width="' + sWidth + '" height="' + sHeight + '" >');
	document.writeln('  <param name="src" value="' + sFile + '">');
	for(i=3;i<arguments.length;i+=2) {
		document.writeln('  <param name="' + arguments[i] + '" value="' + arguments[i+1] + '">');
	}
	document.writeln('<embed name="PANORAMAID" width="' + sWidth + '" height="' + sHeight + '"');
	document.writeln('	pluginspage="http://www.apple.com/quicktime/download/"');
	document.writeln('	type="video/quicktime"');
	document.writeln('	src="' + sFile + '"');
	for(i=3;i<arguments.length;i+=2) {
		document.writeln('  ' + arguments[i] + '="' + arguments[i+1] + '"');
	}
	document.writeln('	/>');
	document.writeln('</object>');
	
	if(adviselineunderpano!="")
	{
		if(sWidth!="100%") document.writeln('<BR>');
		document.writeln(adviselineunderpano);
	}
	document.writeln('</DIV>');
}

function p2q_EmbedDevalVR(sFile,sWidth,sHeight) 
{
	document.writeln('<DIV align=center><object id="PANORAMAID" classid="clsid:5D2CF9D0-113A-476B-986F-288B54571614"');
	document.writeln(' codebase="http://www.devalvr.com/instalacion/plugin/devalocx.cab');
	document.writeln('#version='+minDevalVRVersion+'"');
	document.writeln('  style="WIDTH: ' + sWidth + '; HEIGHT: ' + sHeight + '" width="' + sWidth + '" height="' + sHeight + '" >');
	document.writeln('  <param name="src" value="' + sFile + '">');
	for(i=3;i<arguments.length;i+=2) {
		document.writeln('  <param name="' + arguments[i] + '" value="' + arguments[i+1] + '">');
	}
	document.writeln('<embed name="PANORAMAID" width="' + sWidth + '" height="' + sHeight + '"');
	document.writeln('	pluginspage="http://www.devalvr.com/instalacion/plugin/install.html"');
	document.writeln('	type="application/x-devalvrx"');
	document.writeln('	src="' + sFile + '"');
	for(i=3;i<arguments.length;i+=2) {
		document.writeln('  ' + arguments[i] + '="' + arguments[i+1] + '"');
	}
	document.writeln('	/>');
	document.writeln('</object>');
	
	if(adviselineunderpano!="")
	{
		if(sWidth!="100%") document.writeln('<BR>');
		document.writeln(adviselineunderpano);
	}
	document.writeln('</DIV>');
}

function p2q_EmbedFlash(sFile,sWidth,sHeight) 
{
	document.writeln('<DIV align=center ><object id="PANORAMAID" classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"');
	document.writeln(' codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab');
	document.writeln('  style="WIDTH: ' + sWidth + '; HEIGHT: ' + sHeight + '" width="' + sWidth + '" height="' + sHeight + '" >');
	document.writeln('  <param name="src" value="' + sFile + '">');
	for(i=3;i<arguments.length;i+=2) {
		document.writeln('  <param name="' + arguments[i] + '" value="' + arguments[i+1] + '">');
	}
	document.writeln('<embed name="PANORAMAID" width="' + sWidth + '" height="' + sHeight + '"');
	document.writeln('	pluginspage="http://www.macromedia.com/go/getflashplayer"');
	document.writeln('	type="application/x-shockwave-flash"');
	document.writeln('	src="' + sFile + '"');
	for(i=3;i<arguments.length;i+=2) {
		document.writeln('  ' + arguments[i] + '="' + arguments[i+1] + '"');
	}
	document.writeln('	/>');
	document.writeln('</object>');
	
	if(adviselineunderpano!="")
	{
		if(sWidth!="100%") document.writeln('<BR>');
		document.writeln(adviselineunderpano);
	}
	document.writeln('</DIV>');
}

function p2q_EmbedPtviewer(sFile,sWidth,sHeight) 
{
	document.writeln('<DIV align=center><applet name="PANORAMAID" code="ptviewer.class" archive="ptviewer.jar"'); 
	document.writeln('  width="' + sWidth + '" height="' + sHeight + '" >');
	document.writeln('	<param name="file" value="' + sFile + '">');
	for(i=3;i<arguments.length;i+=2) {
		document.writeln('  <param name="' + arguments[i] + '" value="' + arguments[i+1] + '">');
	}
	document.writeln('</applet>');
	
	if(adviselineunderpano!="")
	{
		if(sWidth!="100%") document.writeln('<BR>');
		document.writeln(adviselineunderpano);
	}
	document.writeln('</DIV>');
}