d = document;

if((d.all)&&(screen.width >= 900))
    {
d.body.style.overflow='hidden';
    }
d.title='.:: nature resort kabalebo : home ::.';

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

function GetFrameNR()
    {
SettingsURL     = parent.document.URL.indexOf('?');
TheSettings     = new Array();
if (SettingsURL != -1)
    {
AllSettings = parent.document.URL.substring(SettingsURL+1, parent.document.URL.length).split('&');
for (i=0; i<AllSettings.length; i++)
    {
OneSetting = AllSettings[i].split('=');
TheSettings[OneSetting[0]] = OneSetting[1];
    }
    }
return TheSettings;
    }

TheLanguage = 'nl';
GetFrameNR();
if (SettingsURL != -1)
    {
TheScene = TheSettings['jump'];
TheLanguage = TheScene;
//TheLanguage = TheSettings['language'];
    }
else{TheScene = 'load';}

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

var flashinstalled = 0;
var flashversion = 0;
MSDetect = "false";
if (navigator.plugins && navigator.plugins.length)
{
	x = navigator.plugins["Shockwave Flash"];
	if (x)
	{
		flashinstalled = 2;
		if (x.description)
		{
			y = x.description;
			flashversion = y.charAt(y.indexOf('.')-1);
		}
	}
	else
		flashinstalled = 1;
	if (navigator.plugins["Shockwave Flash 2.0"])
	{
		flashinstalled = 2;
		flashversion = 2;
	}
}
else if (navigator.mimeTypes && navigator.mimeTypes.length)
{
	x = navigator.mimeTypes['application/x-shockwave-flash'];
	if (x && x.enabledPlugin)
		flashinstalled = 2;
	else
		flashinstalled = 1;
}
else
	MSDetect = "true";

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

d.writeln('<SCRIPT LANGUAGE="VBScript" TYPE="text/vbscript">');
d.writeln('on error resume next');
d.writeln('If MSDetect = "true" Then');
d.writeln('For i = 2 to 6');
d.writeln('If Not(IsObject(CreateObject("ShockwaveFlash.ShockwaveFlash." & i))) Then');
d.writeln('Else');
d.writeln('flashinstalled = 2');
d.writeln('flashversion = i');
d.writeln('End If');
d.writeln('Next');
d.writeln('End If');
d.writeln('If flashinstalled = 0 Then');
d.writeln('flashinstalled = 1');
d.writeln('End If');
d.writeln('</SCRIPT>');

//////////////////////
function ShowMovie()
    {
d.write('<DIV STYLE="position:absolute;z-index:9;margin:10 0 0 -138;"><A HREF="htm/page.php?chapter=11&page=0&language='+TheLanguage+'&xtra=0"><IMG SRC="img/buttz/krap_home.gif" ALT="Kabalebo Rainforest Adoption Plan" TITLE="Kabalebo Rainforest Adoption Plan" WIDTH="100" HEIGHT="100" BORDER="0"></A></DIV>');

if(flashinstalled == 2)
    {
d.write('<OBJECT CLASSID="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"  CODEBASE="http://active.macromedia.com/flash/cabs/swflash.cab#version=3,0,0,11" WIDTH="650" HEIGHT="430"><PARAM NAME="movie" VALUE="home/home.swf?thescene='+TheScene+'"><PARAM NAME="quality" VALUE="high"><PARAM NAME="wmode" VALUE="transparent"><EMBED SRC="home/home.swf?thescene='+TheScene+'" QUALITY="high" WIDTH="650" HEIGHT="430" WMODE="transparent" TYPE="application/x-shockwave-flash"></EMBED></OBJECT>');
    }
else
    {
d.write('<A HREF="htm/page.php?chapter=1&page=0&language='+TheLanguage+'&xtra=0"><IMG SRC="home/home.gif" WIDTH="650" HEIGHT="430" BORDER="0" ALT="nature resort kabalebo : click to enter" TITLE="nature resort kabalebo : click to enter"></A>');
    }
    }
    
/////////////////////////////////////////////////////////
//    SHOW PREVIEW WINDOW
/////////////////////////////////////////////////////////

function Prices(TheLanguage)
    {
ThePage = 'prices/index.php?l='+TheLanguage;

WinWidth  = 440;
WinHeight = 600;

    if (navigator.appVersion.indexOf('3.') == -1)
        {
    WinLeft = (screen.width - WinWidth) / 2;
    WinTop  = (screen.height - WinHeight) / 2;
        }
    else
        {
    WinLeft = 50;
    WinTop  = 50;
        }

RemoteWindow = window.open(ThePage,'xtra','height=' + WinHeight + ',width=' + WinWidth + ',alwaysLowered=1,alwaysRaised=0,channelmode=0,dependent=1,directories=0,fullscreen=0,hotkeys=1,location=0,menubar=0,resizable=1,scrollbars=1,status=1,titlebar=1,toolbar=0,z-lock=0,screenX=1,screenY=1,left=' + WinLeft + ',top=' + WinTop);
    }