//  DevalVR + QuickTime + PTviewer + Flash  Javascript workaround
//        Author: fiero http://www.devalvr.com
//  Version: 1.0.6
//
//        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","dswmedia/testfileForSPIV.jpg","100%","94%");</SCRIPT>
//
//
//        NOTE: To use Spi-v viewer, place "SPi-V.dcr" file in same folder that HTML file, you can find it here: http://www.fieldofview.com
//

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 minShockwaveVersion = "10.1";        // minimal required version checked for Shockwave

var pluginPriority_QuickTime=2;                // Set the order of Priority to use in each plugin
var pluginPriority_DevalVR=1;                // when Autodetect option is selected. Change
var pluginPriority_Flash=4;                        // the number or priority for each plugin
var pluginPriority_Java=5;
var pluginPriority_Spiv=3;

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

var enableSizeRatio=0;                                // 0: disable size ratio    1: enable size ratio
var sizeRatio=6/3;                                        // maximum aspect ratio, horizontal/vertical proportions

var enableLineUnderPanorama=0;                //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 <A href='http://www.devalvr.com/install/'>click here to install</A>, and <A href='javascript:reloadPage()'>click here after installing</A></FONT>";
var writeLineUnderFlash="<FONT face='Verdana' size='1' color='#cdcdcd'> Install the DevalVR plugin for an optimal viewing experience <A href='http://www.devalvr.com/install/'>click here to install</A>, and <A href='javascript:reloadPage()'>click here after installing</A></FONT>";
var writeLineUnderSpiV="";

var usePurePlayer=0;                                                //0: PTViewer is used as Java player  1: PurePlayer is used (write correct names below)
var archivePurePlayer='PurePlayer.jar';                //Copy this file in the same folder
var codePurePlayer='PurePlayer.class';

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

//Internal variables
var isOpera=(navigator.userAgent.indexOf('Opera')!=-1);
var isIE=((navigator.appVersion.indexOf("MSIE") != -1) && !isOpera);
var isDOM=document.getElementById?1:0;
var isNS4=navigator.appName=='Netscape'&&!isDOM?1:0;
var isIE4=isIE&&!isDOM?1:0;
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, SPIV, or DETECT
var detectableWithVB = false;
var adviselineunderpano="";
var orgsizepluginx,orgsizepluginy;
var sizepluginx;
var sizepluginy;
var pluginDevalVRInstalled = 0;
var pluginQTInstalled = 0;
var javaInstalled=0;
var pluginFlashInstalled = 0;
var pluginSpiVInstalled = 0;
var writePluginVR=0;
var writeInstallPluginVR=0;
var auxparameters=new Array();
auxparameters['devalvr']=new Array();
auxparameters['qt']=new Array();
auxparameters['java']=new Array();
auxparameters['flash']=new Array();
auxparameters['spiv']=new Array();

function writevrcode(movfile,javafile,flashfile,spivfile,horizontalsize,verticalsize)
{

        var existdevalvrfile=(movfile!=null && movfile!="");
        var existmovfile=(existdevalvrfile && movfile.toLowerCase().indexOf(".mov")!=-1);
        var existjavafile=(javafile!=null && javafile!="");
        var existflashfile=(flashfile!=null && flashfile!="");
        var existspivfile=(spivfile!=null && spivfile!="");
        var sizex=0,sizey=0;

        //old versions of writevrcode only was movfile and javafile parameters
        paramsize=2;
        for(var n=2;n<4;n++)
        {
                if(arguments[n]!=null)
                {
                        var str=arguments[n].toString();
                        str.toLowerCase();
                        if(n==2)
                        {
                                if(str.indexOf(".swf")!=-1 || str=="") paramsize++;
                                else existflashfile=0;
                        }
                        else if(n==3)
                        {
                                if(str.indexOf(".spv")!=-1 || str.indexOf(".xml")!=-1 || str.indexOf(".jpg")!=-1 || str=="")
                                {
                                        if(paramsize==2) paramsize++;
                                        paramsize++;
                                }
                                else existspivfile=0;
                        }
                }
        }
        if(arguments[paramsize]!=null)
                sizex=arguments[paramsize];
        if(arguments[paramsize+1]!=null)
                sizey=arguments[paramsize+1];

        if(isWindows && isIE)
        {
                if(detectableWithVB)
                {
                        javaInstalled=(detectActiveXControl('JavaPlugin') && navigator.javaEnabled());

                        pluginDevalVRInstalled=detectActiveXControl('DevalVRXCtrl.DevalVRXCtrl.1');

                        pluginQTInstalled=detectQuickTimeActiveXControl();

                        var strswversion=minShockwaveVersion.split(".");
                        var strshockwave="";
                        do{
                                strshockwave="SWCtl.SWCtl."+strswversion[0]+"."+strswversion[1]+".1";
                                strswversion[1]++;
                                if(strswversion[1]>9)
                                {
                                        strswversion[1]=0;
                                        strswversion[0]++;
                                }
                                pluginSpiVInstalled=detectActiveXControl(strshockwave);
                        }while(pluginSpiVInstalled==0 && strswversion[0]<20);
                }
        }
        else
        {
                if (isOpera || (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(",");
                        pluginDevalVRInstalled=checkMinVersion(version,min,4);
                }
                if(navigator.mimeTypes && navigator.mimeTypes["video/quicktime"] && navigator.mimeTypes["video/quicktime"].enabledPlugin)
                {
                        for (var i = 0; i < navigator.plugins.length; i++)
                        {
                                if(navigator.plugins[i].name.indexOf("QuickTime Plug-in")!=-1)
                                {
                                        var words = navigator.plugins[i].name.split(" ");
                                        var version = words[2].split(".");
                                        var min = minQTVersion.split(".");
                                        pluginQTInstalled=checkMinVersion(version,min,3);
                                        break;
                                }
                        }
                }
                if(navigator.mimeTypes && navigator.mimeTypes["application/x-director"] && navigator.mimeTypes["application/x-director"].enabledPlugin)
                {
                        var description=navigator.plugins["Shockwave for Director"].description;
                        var pos=description.indexOf("version");
                        if (pos!=-1)
                        {
                                var words=description.substr(pos+8);
                                var version = words.split(".");
                                var min = minShockwaveVersion.split(".");
                                pluginSpiVInstalled=checkMinVersion(version,min,2);
                        }
                }
        }

        var flashVersion=minFlashVersion.split(".");
        pluginFlashInstalled = DetectFlashVer(parseInt(flashVersion[0]),parseInt(flashVersion[1]),parseInt(flashVersion[2]));

        writePluginVR=0;
        writeInstallPluginVR=0;

        if((favoriteViewer=="DEVALVR" && (!existdevalvrfile || !isWindows))
        || (favoriteViewer=="QT" && !existmovfile)
        || (favoriteViewer=="JAVA" && !existjavafile)
        || (favoriteViewer=="FLASH" && !existflashfile)
        || (favoriteViewer=="SPIV" && !existspivfile))
                favoriteViewer="DETECT";

        var priority=new Array();
        var installed=new Array();
        priority[1]=pluginPriority_DevalVR;
        priority[2]=pluginPriority_QuickTime;
        priority[3]=pluginPriority_Flash;
        priority[4]=pluginPriority_Java;
        priority[5]=pluginPriority_Spiv;
        installed[1]=(pluginDevalVRInstalled && existdevalvrfile);
        installed[2]=(pluginQTInstalled && existmovfile);
        installed[3]=(pluginFlashInstalled && existflashfile);
        installed[4]=(javaInstalled && existjavafile);
        installed[5]=(pluginSpiVInstalled && existspivfile);

        if(favoriteViewer=="DETECT")
        {
                for(order=1;order<=5 && writePluginVR==0;order++)
                {
                        for(n=1;n<=5;n++)
                        {
                                if(priority[n]==order && installed[n])
                                {
                                        writePluginVR=n;
                                        break;
                                }
                        }
                }
        }
        else if(favoriteViewer=="DEVALVR" && isWindows)
        {
                if(pluginDevalVRInstalled) writePluginVR=1;
                else writeInstallPluginVR=1;
        }
        else if(favoriteViewer=="QT" && (isWindows || isMac))
        {
                if(pluginQTInstalled) writePluginVR=2;
                else writeInstallPluginVR=2;
        }
        else if(favoriteViewer=="FLASH" && (isWindows || isMac))
        {
                if(pluginFlashInstalled) writePluginVR=3;
                else writeInstallPluginVR=3;
        }
        else if(favoriteViewer=="JAVA")
        {
                if(javaInstalled) writePluginVR=4;
                else writeInstallPluginVR=4;
        }
        else if(favoriteViewer=="SPIV" && (isWindows || isMac))
        {
                if(pluginSpiVInstalled) writePluginVR=5;
                else writeInstallPluginVR=5;
        }

        if(writeInstallPluginVR==0 && writePluginVR==0)
        {
                if(isWindows) writeInstallPluginVR=1;        //Install DevalVR if there is not any plugin (fastest installation)
                else if(isMac) writeInstallPluginVR=2;        //Install QT always in Mac
                else writeInstallPluginVR=4;                        //Install Java always in Linux
        }

        adviselineunderpano="";
        if(enableLineUnderPanorama)
        {
                if(writePluginVR==1 && writeLineUnderDevalVR!="") adviselineunderpano=writeLineUnderDevalVR;
                else if(writePluginVR==2 && writeLineUnderQuickTime!="") adviselineunderpano=writeLineUnderQuickTime;
                else if(writePluginVR==3 && writeLineUnderFlash!="") adviselineunderpano=writeLineUnderFlash;
                else if(writePluginVR==4 && writeLineUnderJava!="") adviselineunderpano=writeLineUnderJava;
                else if(writePluginVR==5 && writeLineUnderSpiV!="") adviselineunderpano=writeLineUnderSpiV;
        }

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

        orgsizepluginx=sizex;
        orgsizepluginy=sizey;

        CalcLimits(sizex,sizey);
        sizex=sizepluginx;
        sizey=sizepluginy;

        if(writePluginVR==1)
        {
                p2q_EmbedDevalVR(movfile,sizex,sizey,'filter','0');
        }
        else if(writePluginVR==2)
        {
                p2q_EmbedQuicktime(movfile,sizex,sizey,'scale','tofit','autostart','true','kioskmode','true','controller', 'true');
        }
        else if(writePluginVR==3)
        {
                p2q_EmbedFlash(flashfile,sizex,sizey,'bgcolor', '#f0f0f0', 'play', 'true', 'cache','true', 'autoplay','true');
        }
        else if(writePluginVR==4)
        {
                if(usePurePlayer==0) p2q_EmbedPtviewer(javafile,sizex,sizey,'fov','120','cursor','MOVE','showToolbar','true','imgLoadFeedback','false');
                else p2q_EmbedPurePlayer(javafile,sizex,sizey);
        }
        else if(writePluginVR==5)
        {
                p2q_EmbedSPiV(spivfile,sizex,sizey);
        }
        else if(writeInstallPluginVR==1)
        {
                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
        {
                var pluginname,pluginurl;

                if(writeInstallPluginVR==2)
                {
                        pluginname="QuickTime Player"
                        pluginurl="http://www.apple.com/quicktime/download/"
                }
                else if(writeInstallPluginVR==3)
                {
                        pluginname="Adobe Flash Player Version " + minFlashVersion + " or higher."
                        pluginurl="http://www.adobe.com/go/getflash/"
                }
                else if(writeInstallPluginVR==4)
                {
                        pluginname="Java Software"
                        pluginurl="http://java.com/en/download/"
                }
                else if(writeInstallPluginVR==5)
                {
                        pluginname="Shockwave Player"
                        pluginurl="http://www.macromedia.com/shockwave/download"
                }

                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 '+ pluginname +'.';
                str+='<BR><BR><A href="'+ pluginurl +'">click here to install '+ pluginname +'</A>';
                str+='</td></tr></table></DIV>';
                document.writeln(str);
        }

        if(writeInstallPluginVR==0) window.onresize=OnResizeWindow;
}

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\');">Automatic detection';
                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(options.indexOf("spiv")!=-1 || options.indexOf("spi-v")!=-1)
        {
                str+='<INPUT type=radio name=radioViewer '+(viewer=="SPIV"?'checked':'')+' OnClick="javascript:changeFavoriteViewer(\'SPIV\');">Spi-V ';
                if(vertical) str+='<BR>';
        }
        if(!vertical) str+='<BR>';

        document.write(str);
}


function viewerparameters(viewer)
{
        for(var i=1;i<arguments.length;i++)
        {
                auxparameters[viewer][i-1]=arguments[i];
        }
}

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;
        }
}

function checkMinVersion(version,min,num)
{
        var installed=0;
        for (var i = 0; i < num; i++)
        {
                if(parseInt(version[i])>parseInt(min[i]))
                {
                        installed=1;
                        break;
                }
                else if(parseInt(version[i])<parseInt(min[i]))
                {
                        break;
                }
                else if(parseInt(version[i])==parseInt(min[i]) && i==num-1)
                        installed=1;
        }
        return installed;
}

function CalcLimits(sizex, sizey)
{
        var sizew,sizeh,limits;

        if(writePluginVR==4)
        {
                maxx=maxViewerWidthJava;
                maxy=maxViewerHeightJava;
                limits=enableSizeLimitsJava;
        }
        else if(writePluginVR==3)
        {
                maxx=maxViewerWidthFlash;
                maxy=maxViewerHeightFlash;
                limits=enableSizeLimitsFlash;
        }
        else
        {
                maxx=maxViewerWidth;
                maxy=maxViewerHeight;
                limits=enableSizeLimits;
        }

        if(limits || 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(limits)
        {
                if(sizex>maxx) sizex=maxx;
                if(sizey>maxy) sizey=maxy;
        }
        if(enableSizeRatio)
        {
                x=sizey*sizeRatio;
                if(x<sizex)
                {
                        sizex=x;
                        if(limits && sizex>maxx) sizex=maxx;
                }
        }
        if(adviselineunderpano!="")
        {
                sizey-=16;
        }
        if(limits || 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 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;
}

//////////////// Special functions to create dynamic pages
function getQueryVariable(variable)
{
        var query = window.location.search.substring(1);
        var vars = query.split("&");
        for (var i=0;i< vars.length;i++)
        {
                var pair = vars[i].split("=");
                if (pair[0] == variable)
                {
                        return pair[1];
                }
        }
        return -1;
}

function getRef(id)
{
        return (isDOM ? document.getElementById(id) : (isIE4 ? document.all[id] : document.layers[id]));
}
function getStyle(id)
{
        return (isNS4 ? getRef(id) : getRef(id).style);
}

var panoramadata=new Array();
var panoramanumdata=0;

function insertpanoramadata(name, movfile, title, description, date, jpgimage)
{
        var pano="pano"+panoramanumdata;
        panoramadata[pano]=name;
        panoramadata[name]=new Array();
        panoramadata[name]["movfile"]=movfile;
        panoramadata[name]["title"]=title;
        panoramadata[name]["description"]=description;
        panoramadata[name]["date"]=date;
        panoramadata[name]["jpgimage"]=jpgimage;

        panoramanumdata++;
}

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

function IEGetSwfVer()
{
        flashVer=0;

        for(i=25;i>0 && flashVer==0;i--)
        {
                flashVer=VBGetSwfVer(i);
        }
        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 fiero

        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=0;i<auxparameters['qt'].length;i+=2) {
                document.writeln('  <param name="' + auxparameters['qt'][i] + '" value="' + auxparameters['qt'][i+1] + '">');
        }
        for(i=3;i<arguments.length;i+=2)
        {
                var exists=0;
                for(j=0;j<auxparameters['qt'].length;j+=2) {
                        if(auxparameters['qt'][j]==arguments[i]) exists=1;
                }
                if(exists==0)
                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=0;i<auxparameters['qt'].length;i+=2) {
                document.writeln('  ' + auxparameters['qt'][i] + '="' + auxparameters['qt'][i+1] + '"');
        }
        for(i=3;i<arguments.length;i+=2)
        {
                var exists=0;
                for(j=0;j<auxparameters['qt'].length;j+=2) {
                        if(auxparameters['qt'][j]==arguments[i]) exists=1;
                }
                if(exists==0)
                        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=0;i<auxparameters['devalvr'].length;i+=2) {
                document.writeln('  <param name="' + auxparameters['devalvr'][i] + '" value="' + auxparameters['devalvr'][i+1] + '">');
        }
        for(i=3;i<arguments.length;i+=2)
        {
                var exists=0;
                for(j=0;j<auxparameters['devalvr'].length;j+=2) {
                        if(auxparameters['devalvr'][j]==arguments[i]) exists=1;
                }
                if(exists==0)
                        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=0;i<auxparameters['devalvr'].length;i+=2) {
                document.writeln('  ' + auxparameters['devalvr'][i] + '="' + auxparameters['devalvr'][i+1] + '"');
        }
        for(i=3;i<arguments.length;i+=2)
        {
                var exists=0;
                for(j=0;j<auxparameters['devalvr'].length;j+=2) {
                        if(auxparameters['devalvr'][j]==arguments[i]) exists=1;
                }
                if(exists==0)
                        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=0;i<auxparameters['flash'].length;i+=2) {
                document.writeln('  <param name="' + auxparameters['flash'][i] + '" value="' + auxparameters['flash'][i+1] + '">');
        }
        for(i=3;i<arguments.length;i+=2)
        {
                var exists=0;
                for(j=0;j<auxparameters['flash'].length;j+=2) {
                        if(auxparameters['flash'][j]==arguments[i]) exists=1;
                }
                if(exists==0)
                        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=0;i<auxparameters['flash'].length;i+=2) {
                document.writeln('  ' + auxparameters['flash'][i] + '="' + auxparameters['flash'][i+1] + '"');
        }
        for(i=3;i<arguments.length;i+=2)
        {
                var exists=0;
                for(j=0;j<auxparameters['flash'].length;j+=2) {
                        if(auxparameters['flash'][j]==arguments[i]) exists=1;
                }
                if(exists==0)
                        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=0;i<auxparameters['java'].length;i+=2) {
                document.writeln('  <param name="' + auxparameters['java'][i] + '" value="' + auxparameters['java'][i+1] + '">');
        }
        for(i=3;i<arguments.length;i+=2)
        {
                var exists=0;
                for(j=0;j<auxparameters['java'].length;j+=2) {
                        if(auxparameters['java'][j]==arguments[i]) exists=1;
                }
                if(exists==0)
                        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>');
}

function p2q_EmbedPurePlayer(sFile,sWidth,sHeight)
{
        document.writeln('<DIV align=center><applet name="PANORAMAID" code="' + codePurePlayer + '" archive="' + archivePurePlayer + '"');
        document.writeln('  width="' + sWidth + '" height="' + sHeight + '" >');
        document.writeln('        <param name="panorama" value="' + sFile + '" >');
        document.writeln('        <param name="optimizememory" value="true" >');
        for(i=0;i<auxparameters['java'].length;i+=2) {
                document.writeln('  <param name="' + auxparameters['java'][i] + '" value="' + auxparameters['java'][i+1] + '">');
        }
        for(i=3;i<arguments.length;i+=2)
        {
                var exists=0;
                for(j=0;j<auxparameters['java'].length;j+=2) {
                        if(auxparameters['java'][j]==arguments[i]) exists=1;
                }
                if(exists==0)
                        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>');
}

function p2q_EmbedSPiV(sFile,sWidth,sHeight) {
        document.writeln('<DIV align=center ><object id="PANORAMAID" classid="clsid:166B1BCA-3F9C-11CF-8075-444553540000"');
        document.writeln('codebase="http://download.macromedia.com/pub/shockwave/cabs/director/sw.cab#version=8,5,1,0"');
        document.writeln('  style="WIDTH: ' + sWidth + '; HEIGHT: ' + sHeight + '" width="' + sWidth + '" height="' + sHeight + '" >');
        document.writeln('        <param name="src" value="SPi-V.dcr">');
        document.writeln('        <param name="swStretchStyle" value="stage">');
        document.writeln('        <param name="swRemote"       value="swContextMenu=' + "'" + 'FALSE' + "'" + '">');
        document.writeln('        <param name="progress"       value="true">');
        document.writeln('        <param name="logo"           value="false">');

        document.writeln('  <param name="swURL" value="' + sFile + '">');
        for(i=0;i<auxparameters['spiv'].length;i+=2) {
                document.writeln('  <param name="' + auxparameters['spiv'][i] + '" value="' + auxparameters['spiv'][i+1] + '">');
        }
        for(i=3;i<arguments.length;i+=2)
        {
                var exists=0;
                for(j=0;j<auxparameters['spiv'].length;j+=2) {
                        if(auxparameters['spiv'][j]==arguments[i]) exists=1;
                }
                if(exists==0)
                        document.writeln('  <param name="' + arguments[i] + '" value="' + arguments[i+1] + '">');
        }
        document.writeln('<embed name="SPi-V_object" width="' + sWidth + '" height="' + sHeight + '"');
        document.writeln('        pluginspage="http://www.macromedia.com/shockwave/download/"');
        document.writeln('        type="application/x-director" ');
        document.writeln('        swURL="' + sFile + '" ');
        document.writeln('        src="SPi-V.dcr" ');
        document.writeln('        swStretchStyle="stage" ');
        document.writeln('        swRemote="swContextMenu=' + "'" + 'FALSE' + "'" + '" ');
        document.writeln('        progress="true" ');
        document.writeln('        logo="false" ');
        for(i=0;i<auxparameters['spiv'].length;i+=2) {
                document.writeln('  ' + auxparameters['spiv'][i] + '="' + auxparameters['spiv'][i+1] + '"');
        }
        for(i=3;i<arguments.length;i+=2)
        {
                var exists=0;
                for(j=0;j<auxparameters['spiv'].length;j+=2) {
                        if(auxparameters['spiv'][j]==arguments[i]) exists=1;
                }
                if(exists==0)
                        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>');
}

// Here we write out the VBScript block for MSIE Windows
if (isWindows && isIE)
{
    document.writeln('<script language="VBscript" type="text/vbscript">');

    document.writeln('\'do a one-time test for a version of VBScript that can handle this code \n');
    document.writeln('detectableWithVB = False \n');
    document.writeln('If ScriptEngineMajorVersion >= 2 then \n');
    document.writeln('  detectableWithVB = True \n');
    document.writeln('End If \n');

    document.writeln('\'this next function will detect most plugins \n');
    document.writeln('Function detectActiveXControl(activeXControlName) \n');
    document.writeln('  on error resume next \n');
    document.writeln('  detectActiveXControl = False \n');
    document.writeln('  If detectableWithVB Then \n');
    document.writeln('                set pControl = CreateObject(activeXControlName) \n');
    document.writeln('                If (IsObject(pControl)) then \n');
        document.writeln('                        detectActiveXControl = True \n');
    document.writeln('                End If \n');
    document.writeln('  End If \n');
    document.writeln('End Function \n');

    document.writeln('\'and the following function handles QuickTime \n');
    document.writeln('Function detectQuickTimeActiveXControl() \n');
    document.writeln('  on error resume next \n');
    document.writeln('  detectQuickTimeActiveXControl = False \n');
    document.writeln('  If detectableWithVB Then \n');
    document.writeln('    detectQuickTimeActiveXControl = False \n');
    document.writeln('    hasQuickTimeChecker = false \n');
    document.writeln('    Set hasQuickTimeChecker = CreateObject("QuickTimeCheckObject.QuickTimeCheck.1") \n');
    document.writeln('    If IsObject(hasQuickTimeChecker) Then \n');
    document.writeln('      If hasQuickTimeChecker.IsQuickTimeAvailable(0) Then  \n');
    document.writeln('        detectQuickTimeActiveXControl = True \n');
    document.writeln('      End If \n');
    document.writeln('    End If \n');
    document.writeln('  End If \n');
    document.writeln('End Function \n');

    document.writeln('\'Visual basic helper required to detect Flash Player ActiveX control version information \n');
    document.writeln('Function VBGetSwfVer(i) \n');
    document.writeln('  on error resume next \n');
    document.writeln('  Dim swControl, swVersion \n');
    document.writeln('  swVersion = 0 \n');
    document.writeln('  If detectableWithVB Then \n');
    document.writeln('                set swControl = CreateObject("ShockwaveFlash.ShockwaveFlash." + CStr(i)) \n');
    document.writeln('                If (IsObject(swControl)) then \n');
    document.writeln('                        swVersion = swControl.GetVariable("$version") \n');
    document.writeln('                End If \n');
    document.writeln('  End If \n');
    document.writeln('  VBGetSwfVer = swVersion \n');
    document.writeln('End Function \n');

    document.writeln('</scr' + 'ipt>');
}