var theText = "";
var theLetter = "";
var letterNum = 0;

var danceText = "";
var danceLetter = "";
var danceLetterNum = 0;

var letterTime;
var flashNum = 0;
var curTag;
var curOp = '';
var lastLetter;

var elephantsLoading = 0;
var rocksLoading = 0;
var robotsLoading = 0;
var treesLoading = 0;
var birdsDone;

var aurieaLoaded = 0;
var michaelLoaded = 0;
var usHere = 0;

var danceDone;
var allLoaded;

var camCenterY = 0;

nWords = new Array("","first","second","third","fourth","fifth","sixth","seventh","eighth","nineth","tenth","eleventh","twelfth","thirteenth","fourteenth","fifteenth","sixteenth","seventeenth","eightteenth","nineteenth","twentieth");
j = 20;
for ( i = 1 ; i < 10 ; i++ )
	{
	nWords[j + i] = "twenty" + nWords[i];
	};
j = 30;
nWords[j] = "thirtiest";
for ( i = 1 ; i < 10 ; i++ )
	{
	nWords[j + i] = "thirty" + nWords[i];
	};

aLetters = new Array("a","z","e","r","t","q","s","d","f","g","w","x","c");
zLetters = new Array("y","u","i","o","v","h","j","k","l","m","p","b","n");

aMoves = new Array();
aMoves[0] = 'walk';
aMoves[1] = 'jump';
aMoves[2] = 'death3'
aMoves[3] = 'run';
aMoves[4] = 'crouch';
aMoves[5] = 'attack';
aMoves[6] = 'melee';
aMoves[7] = 'taunt';
aMoves[8] = 'death2';
aMoves[9] = 'turn';
aMoves[10] = 'idle';
aMoves[11] = 'jumpback';
aMoves[12] = 'backpedal';
//aMoves[13] = 'death3';
//aMoves[14] = 'stand';
//aMoves[15] = 'crouched';
//aMoves[16] = 'swim';
//aMoves[17] = 'change';
//aMoves[18] = 'raise';

zMoves = new Array();
zMoves[0] = 'walk';
zMoves[1] = 'jump';
zMoves[2] = 'death1'
zMoves[3] = 'run';
zMoves[4] = 'crouch';
zMoves[5] = 'attack';
zMoves[6] = 'melee';
zMoves[7] = 'taunt';
zMoves[8] = 'death2';
zMoves[9] = 'turn';
zMoves[10] = 'idle';
zMoves[11] = 'jumpback';
zMoves[12] = 'backpedal';
//zMoves[13] = 'death3';
//zMoves[14] = 'stand';
//zMoves[15] = 'idlecr';
//zMoves[16] = 'swim';
//zMoves[17] = 'drop';
//zMoves[18] = 'raise';

allLinks = new Array();
allTags = new Array("<SCRIPT","<HEAD","<META","<STYLE","<TITLE","</TITLE","<BODY","<FRAMESET","<NOFRAMES","<FRAME ","<FONT","<EMBED ","<OBJECT ","<FORM","<!DOCTYPE","<DIV","<LAYER","<HR","<TD","<TR","<TH","<BR>","<A HREF","<P","<IMG","<BLINK","<BLOCKQUOTE","<CENTER","<APPLET","<A NAME","<LI","<!--","<TT","<PRE");
var lastTag = allTags.length-1;
allNums = new Array();
for ( i = 0 ; i < allTags.length ; i ++ ) { allNums[i] = 0; };
allLinks = new Array();
allLoads = new Array(0,1,2,3,4,5,6);
allLoads[7] = "loadWorld();";
allLoads[8] = "loadOasis()";
allLoads[9] = "loadBellyDancer()";
allLoads[10] = "loadRabbits();";
allLoads[11] = "loadElephants();";
allLoads[12] = "loadElephants();";
allLoads[13] = "loadSkyscraper();";
allLoads[14] = "loadMountain()";
allLoads[15] = "loadRobot(1)";
allLoads[16] = "loadRobot(2)";
allLoads[17] = "loadLaserLine()";
allLoads[18] = "loadTree(1)";
allLoads[19] = "loadTree(2)";
allLoads[20] = "loadTree(3)";
allLoads[21] = "loadBush()";
allLoads[22] = "loadBuffalo()";
allLoads[23] = "loadFlower()";
allLoads[24] = "loadButterfly()";
allLoads[25] = "loadVulcano()";
allLoads[26] = "loadTiger()";
allLoads[27] = "loadFountain()";
allLoads[28] = "loadMonkey()";
allLoads[29] = "loadPeacock()";
allLoads[30] = "loadFlamingo()";
allLoads[31] = "loadZebra()";
allLoads[32] = "loadRock()";
allLoads[33] = "loadRock()";

subP = new Array('LEFT','RIGHT','CENTER');
subPNums = new Array(0,0,0);
subIMG = new Array('LEFT','RIGHT','ALT');
subIMGNums = new Array(0,0,0);
subFONT = new Array(0,1,2,3,4,5,6,7)
subFONTNums = new Array(0,0,0,0,0,0,0,0);
subFORM = new Array('get')
subFORMNums = new Array(0);
subFORMNums[0] = 0;

subBODY = new Array('background')
subBODYNums = new Array("0");
subSCRIPT = new Array('var ','function ','if','window.open');
subSCRIPTNums = new Array(0,0,0,0);

// Determine path variable for Netscape and Explorer.
var zPath = window.location.href.substring(0,window.location.href.lastIndexOf("/")+1);
var zPathIE = window.location.href.substring(0,window.location.href.lastIndexOf("\\")+1);
if (zPathIE.length > zPath.length) { zPath = zPathIE; 1};


//oooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooo
//---------------------------parse 1
//oooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooo


function toZero()
{
theLetter = "";
danceLetter = "";
danceLetterNum = 0;
flashNum = 0;
curOp = '';
allLinks = new Array(0);
clearTimeout(letterTime);
letterNum = 0;
elephantsLoading = 0;
rocksLoading = 0;
curTag = -1;
allNums = new Array();
for ( i = 0 ; i < allTags.length ; i ++ ) { allNums[i] = 0; };
danceDone = false;;
allLoaded = false;
birdsDone = false;
};

function parseText()
{
if ( parent.GOElocationF.document.leForm.thisText.value != "" )
	{
	document.leForm.mode.value = "This is going to take some time...";
	document.leForm.searching.value = "Please be patient...";
	parent.GOEworldF.DoCmd('play obj=text pkg=camera.pwc behave=text3');
	setTimeout("parent.GOEworldF.DoCmd('set obj=black pkg=camera.pwc visible=yes');parent.GOEworldF.DoCmd('setpos obj=black pkg=camera.pwc y=' + camCenterY);",450);
	setTimeout("parent.GOEworldF.DoCmd('setpos obj=text pkg=camera.pwc y=' + camCenterY);",500);
	setTimeout("parent.GOEworldF.DoCmd('set obj=text pkg=camera.pwc visible=yes');",600);
	setTimeout("parseTextNow();",1000);
	}
else
	{
	alert("There doesn't seem to be anything at that location.\nPlease try another one.");
	parent.newLinkF();
	};
};

function parseTextNow()
{
toZero();
parent.GOEworldF.DoCmd('attach pkg=thetree.pwc');
theText = parent.GOElocationF.document.leForm.thisText.value;
danceText = theText;
if ( theText != "" )
	{
	getLetter();
	doHead();
	}
else
	{
	//alert('oops')
	};
};

function doHead()
{
if ( curTag < 5 )
	{
	curOp = 'head';
	curTag++;
	lastLetter = theText.indexOf('</HEAD>');
	if ( lastLetter == -1 ) { lastLetter = theText.indexOf('</head>'); };
	analyze();
	doHead();
	}
else
	{
	doBody();
	};
};

function doBody()
{
if ( curTag < 7 )
	{
	curOp = 'body';
	curTag++;
	lastLetter = theText.length;
	analyze();
	doBody();
	}
else
	{
	eval(allLoads[curTag]);
	if ( allNums[7] > 0 )
		{
		lastTag = 9;
		}
	else
		{
		curTag = 9; lastTag = allTags.length-1;
		};
	curOp = 'birds';
	setTimeout("parent.GOEworldF.DoCmd('play obj=text pkg=camera.pwc behave=text4');",4000);
	longer = 0;
	setTimeout("parent.GOEworldF.DoCmd('set obj=black pkg=camera.pwc visible=yes');parent.GOEworldF.DoCmd('setpos obj=black pkg=camera.pwc y=' + camCenterY);",longer+4450);
	setTimeout("parent.GOEworldF.DoCmd('setpos obj=text pkg=camera.pwc y=' + camCenterY);",longer+4500);
	setTimeout("parent.GOEworldF.DoCmd('set obj=text pkg=camera.pwc visible=yes');",longer+4600);
	setTimeout("doBirds();",longer+5000);
	};
showResult();
};

function doBirds()
{
clearBoxes();
document.leForm.mode.value = "Let birds fly above the earth!";
document.leForm.searching.value = "Wait a Moment, please...";
document.leForm.looking.value = "Counting birds...";
window.status = "Hovering through the sky... Wait a Moment, please..."

birdNum = 0;
valCounter = 0;
maxBirds = 40;

birdLetters = new Array();
for ( i = 0 ; i < subSCRIPT.length ; i++ )
	{
	birdLetters[i] = subSCRIPT[i].charAt(0);
	};
numOfBirdTags = subSCRIPT.length;
textLength = theText.length;
while ( birdNum < textLength )
	{
	birdLetter = theText.charAt(birdNum);
	if ( birdLetter == "v" || birdLetter == "i" || birdLetter == "w" || birdLetter == "f" )
		{
		document.leForm.testing.value = birdNum + ' of ' + textLength;
		for ( i = 0 ; i < numOfBirdTags ; i++ )
			{
			thisLetter = birdLetters[i];
			if ( birdLetter == thisLetter )
				{
				birdTag = subSCRIPT[i];
				birdLength = birdTag.length;
				birdWord = theText.substring(birdNum,birdNum + birdLength);
				if ( birdWord == birdTag )
					{
					subSCRIPTNums[i]++;
					allBirds = subSCRIPTNums[0] + subSCRIPTNums[1] + subSCRIPTNums[2] + subSCRIPTNums[3];
					document.leForm.foundBox.value = allBirds + ' birds found in the sky.';
					};
				};
			};
		};
	birdNum++;
	};

thisLoad = ''
+ 'Loading ' + subSCRIPTNums[0] + ' parrots, '
+ subSCRIPTNums[1] + ' doves, '
+ subSCRIPTNums[2] + ' eagles and '
+ subSCRIPTNums[3] + ' dragons...'
window.status = thisLoad;

document.leForm.looking.value = thisLoad;
document.leForm.foundBox.value = subSCRIPTNums[0] + subSCRIPTNums[1] + subSCRIPTNums[2] + subSCRIPTNums[3];
showResult();

parent.GOEworldF.DoCmd('load pkg=birds.pwc attach=yes')

curOp = 'page';
doPage();
birdsDone = true;
longer = 4000;
setTimeout("parent.GOEworldF.DoCmd('set obj=text pkg=camera.pwc visible=no');parent.GOEworldF.DoCmd('setpos obj=text pkg=camera.pwc y=-100');",longer+3000);
setTimeout("parent.GOEworldF.DoCmd('set obj=black pkg=camera.pwc visible=no');parent.GOEworldF.DoCmd('setpos obj=text pkg=camera.pwc y=-100');",longer+3050);

dumpSCRIPT();
};


//oooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooo
//---------------------------parse 2
//oooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooo


function doPage()
{
document.leForm.mode.value = "Making living creatures...";
setTimeout("doNext()",3000);
};

function doNext()
{
if ( curTag < lastTag )
	{
	curTag++;
	analyze();
	document.leForm.looking.value = allTags[curTag] + "  ( " + curTag + " of " + lastTag + " )";
	document.leForm.searching.value = allLoads[curTag] + " ?";
	document.leForm.foundBox.value = allNums[curTag];
	window.defaultStatus = "And there was evening and there was morning -- the " + nWords[curTag] + " day.";
	eval(allLoads[curTag]);
	doPage();
	}
else
	{
	document.leForm.mode.value = "Be fruitful and increase in number;";
	document.leForm.searching.value = "fill the earth and subdue it. Rule";
	document.leForm.looking.value =   "over the fish of the sea and the";
	document.leForm.testing.value =   "birds in the air and over every living";
	document.leForm.foundBox.value =  "creature that moves on the ground.";
	setTimeout("parent.GOEworldF.DoCmd('play obj=text pkg=camera.pwc behave=text5');",1000);
	setTimeout("parent.GOEworldF.DoCmd('set obj=black pkg=camera.pwc visible=yes');parent.GOEworldF.DoCmd('setpos obj=black pkg=camera.pwc y=' + camCenterY);",1450);
	setTimeout("parent.GOEworldF.DoCmd('setpos obj=text pkg=camera.pwc y=' + camCenterY);",1500);
	setTimeout("parent.GOEworldF.DoCmd('set obj=text pkg=camera.pwc visible=yes');",1600);
	longer = 0;
	setTimeout("parent.GOEworldF.DoCmd('set obj=text pkg=camera.pwc visible=no');parent.GOEworldF.DoCmd('setpos obj=text pkg=camera.pwc y=-100');",longer+6000);
	setTimeout("parent.GOEworldF.DoCmd('set obj=black pkg=camera.pwc visible=no');",longer+6050);
	window.defaultStatus = "God saw all that he had made, and it was very good."
	setTimeout("parent.GOEworldF.DoCmd('play obj=text2 pkg=camera.pwc heading=no behave=zoom2');",longer+10000);
	allLoaded = true;
	doEnd();
	};
showResult();
};

function analyze()
{
while ( letterNum < theText.length )
	{
	theLetter = theText.substring(letterNum,letterNum+1);
	//document.leForm.searching.value = letterNum + "/" + theText.length + " = " + theLetter;
	if ( theLetter == "<" ) { checkTag(); }
	letterNum++;
	};
letterNum = 0;
};

function checkTag()
{
i = curTag;
thisTag = allTags[i];
//alert(thisTag)
thisLength = thisTag.length;
thisWord = theText.substring(letterNum,letterNum + thisLength);

	document.leForm.mode.value = "Hovering over the earth... ";
	document.leForm.looking.value = thisTag;
	document.leForm.testing.value = thisWord;
	document.leForm.foundBox.value = allNums[i];

if ( thisWord == thisTag ||thisWord == thisTag.toLowerCase() )
	{
	allNums[i]++;
	if ( curOp == 'head' ) { letterNum = theText.length; }
	else if ( curOp == 'body' )
		{
		if ( curTag == 6 )
			{
			bodyTag = theText.substring(letterNum,theText.indexOf('>',letterNum));
			bgNum = bodyTag.indexOf('background');
			if ( bgNum == -1 ) { bgNum = bodyTag.indexOf('BACKGROUND'); };
			if ( bgNum != -1 ) { subBODYNums[0] = 1; };
			};
		//letterNum = theText.length;
		//curTag = 7;
		}
	else
		{
		if ( curTag == 10 )
			{
			fontTag = theText.substring(letterNum,theText.indexOf('>',letterNum));
			sizeNum = fontTag.indexOf('size');
			if ( sizeNum == -1 ) { sizeNum = fontTag.indexOf('SIZE'); };
			if ( sizeNum != -1 )
				{
				for ( f = 0 ; f < subFONT.length; f++ )
					{
					if ( fontTag.substring(sizeNum+5,sizeNum+6) == subFONT[f] || fontTag.substring(sizeNum+6,sizeNum+7) == subFONT[f] )
						{
						subFONTNums[f]++;
						};
					};
				};
			}
		else if ( curTag == 24 )
			{
			imgTag = theText.substring(letterNum,theText.indexOf('>',letterNum));
			for ( f = 0 ; f < subIMG.length; f++ )
				{
				if ( imgTag.indexOf(subIMG[f]) != -1 || imgTag.indexOf(subIMG[f].toLowerCase()) != -1 )
					{
					subIMGNums[f]++;
					};
				};
			//alert(allNums[curTag].toString() + " : " + subIMGNums.toString());
			}
		else if ( curTag == 23 )
			{
			pTag = theText.substring(letterNum,theText.indexOf('>',letterNum));
			for ( f = 0 ; f < subP.length; f++ )
				{
				if ( pTag.toLowerCase() != "<pre" )
					{
					if ( pTag.indexOf(subP[f]) != -1 || pTag.indexOf(subP[f].toLowerCase()) != -1 )
						{
						//alert(pTag + " / " + f + " / " + subNums[f]);
						subPNums[f]++;
						};
					};
				};

			//alert(allNums[curTag].toString() + " : " + subPNums.toString());
			}
		else if ( curTag == 13 )
			{
			formTag = theText.substring(letterNum,theText.indexOf('>',letterNum));
			if ( formTag.indexOf(subFORM[0]) != -1 || formTag.indexOf(subFORM[0].toLowerCase()) != -1 )
				{
				subFORMNums[0]++;
				};
			}
		else if ( curTag == 9 || curTag == 22 )
			{
			storeLink(thisLength+2);
			};
		};
	};
if ( curOp == 'head' && letterNum > lastLetter) { letterNum = theText.length; }
else if ( curTag == 0 )
	{
	scriptEnd = theText.indexOf("</SCRIPT>",letterNum) + 8;
	if ( scriptEnd == -1 ) { theText.indexOf("</script>",letterNum) + 8; };
	if ( scriptEnd > letterNum ) { letterNum = scriptEnd; };
	}
else
	{
	letterNum = theText.indexOf(">",letterNum);
	};
};


//oooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooo
//---------------------------dance
//oooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooo


function getLetter()
{
danceLetter = danceText.substring(danceLetterNum,danceLetterNum+1);

if ( danceLetter == "." && danceText.substring(danceLetterNum,danceLetterNum+4) == ".swf" ) { doFlash(); };

doLetter();

if ( danceLetterNum < danceText.length )
	{
	danceLetterNum++;
	letterTime = setTimeout("getLetter()",200);
	}
else
	{
	document.leForm.html.value = "Document: Done";
	document.leForm.counting.value = danceLetterNum + ' of ' + danceText.length
	document.leForm.lettr.value = "";
	document.leForm.auriea.value = "A: rest";
	document.leForm.michael.value = "Z: rest";
	danceDone = true;
	doEnd();
	};
};

function doLetter()
{
document.leForm.html.value = danceText.substring(danceLetterNum-7,danceLetterNum+7);
document.leForm.counting.value = danceLetterNum + ' of ' + danceText.length
document.leForm.lettr.value = danceLetter;
for ( i = 0 ; i < 13 ; i++ )
	{
	if ( danceLetter == aLetters[i] || danceLetter == aLetters[i].toUpperCase() ) { doA(i);break; }
	else if ( danceLetter == zLetters[i] || danceLetter == zLetters[i].toUpperCase() ) { doZ(i);break; }
	};
};

function doA(thisNum)
{
thisMove = aMoves[thisNum];
document.leForm.auriea.value = "A: " + thisMove;
soundNum = 10+thisNum*3;
document.embeds['aurieaM'].GotoFrame(soundNum); document.embeds['aurieaM'].Play();
parent.GOEworldF.DoCmd('play obj=AurieaBox transition=0.5 heading=yes behave=' + thisMove);return false;
};

function doZ(thisNum)
{
thisMove = zMoves[thisNum];
document.leForm.michael.value = "Z: " + thisMove;
soundNum = 10+thisNum*3;
document.embeds['michaelM'].GotoFrame(soundNum); document.embeds['michaelM'].Play();
parent.GOEworldF.DoCmd('play obj=MichaelBox transition=0.5 heading=yes behave=' + thisMove);return false;
};

function checkKey(e)
{
if ( NN ) { var keyChar = String.fromCharCode(e.which); }
else { var keyChar = String.fromCharCode(event.keyCode); };

window.status = keyChar;

danceLetter = keyChar;

for ( i = 0 ; i < 13 ; i++ )
	{
	if ( danceLetter == aLetters[i] || danceLetter == aLetters[i].toUpperCase() ) { doTheA(i);break; }
	else if ( danceLetter == zLetters[i] || danceLetter == zLetters[i].toUpperCase() ) { doTheZ(i);break; }
	};
};

function doTheA(thisNum)
{
thisMove = aMoves[thisNum];
//document.leForm.auriea.value = "A: " + thisMove;
soundNum = 10+thisNum*3;
document.embeds['aurieaM'].GotoFrame(soundNum); document.embeds['aurieaM'].Play();
parent.GOEworldF.DoCmd('play obj=AurieaBox transition=0.0 heading=yes behave=' + thisMove);return false;
};

function doTheZ(thisNum)
{
thisMove = zMoves[thisNum];
//document.leForm.michael.value = "Z: " + thisMove;
soundNum = 10+thisNum*3;
document.embeds['michaelM'].GotoFrame(soundNum); document.embeds['michaelM'].Play();
parent.GOEworldF.DoCmd('play obj=MichaelBox transition=0.0 heading=yes behave=' + thisMove);return false;
};

function doFlash()
{
//alert('flash');
document.leForm.searching.value = "FLASH!...";
thisX = ( 20000 + rand(5000) ) * ( 3-rand(2)*2 );
thisZ = ( 20000 + rand(5000) ) * ( 3-rand(2)*2 );
parent.GOEworldF.DoCmd('setpos obj=flash pkg=world.pwc x=' + thisX + ' z=' + thisZ);
document.embeds['soundsM'].GotoFrame(10);
document.embeds['soundsM'].Play();
setTimeout("parent.GOEworldF.DoCmd('set obj=flash pkg=world.pwc visible=yes');",50);
setTimeout("parent.GOEworldF.DoCmd('set obj=flash pkg=world.pwc visible=no');",150);
setTimeout("parent.GOEworldF.DoCmd('set obj=flash pkg=world.pwc visible=yes');",250);
setTimeout("parent.GOEworldF.DoCmd('set obj=flash pkg=world.pwc visible=no');",350);

setTimeout("doFlash();",rand(30) * 1000);
};


//oooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooo
//---------------------------loading stuff
//oooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooo


function michaelHere()
{
parent.GOEworldF.DoCmd('play obj=MichaelBox pkg=michael.pwc behave=standing');
michaelLoaded = 1;
document.leForm.lettr.value = "Man created.";
usLoading();
};

function aurieaHere()
{
parent.GOEworldF.DoCmd('play obj=AurieaBox pkg=auriea.pwc behave=standing');
aurieaLoaded = 1;
document.leForm.lettr.value = "Woman created.";
usLoading();
};

function usLoading()
{
//alert(usHere);
usHere++;
//alert(usHere + " a:" + aurieaLoaded + " z:" + michaelLoaded);
document.leForm.html.value = usHere;
if ( usHere >= 2 )
	{
	wereHere();
	};
//clearTimeout(backupStarter);backupStarter = setTimeout("alert('Plan B.');wereHere();",20000);
};

function wereHere()
{
//clearTimeout(backupStarter);
document.leForm.html.value = "Ready.";
document.leForm.lettr.value = "";
wereHereNow();
};

function wereHereNow()
{
setTimeout("parent.GOEworldF.DoCmd('play obj=text2 pkg=camera.pwc behave=zoom');",2500)
//setTimeout("parent.GOEworldF.DoCmd('play obj=camHead pkg=camera.pwc behave=forward');",2750)
setTimeout("parent.GOEworldF.DoCmd('set obj=text pkg=camera.pwc visible=no');parent.GOEworldF.DoCmd('setpos obj=text pkg=camera.pwc y=-100');",3000)
setTimeout("parent.GOEworldF.DoCmd('set obj=black pkg=camera.pwc visible=no');",3050)
setTimeout("parent.GOElocationF.location.href = 'location.html';",3200);
setTimeout('document.leForm.mode.value = "Type a URL in the box above.";document.leForm.searching.value = "And click the button.";',3250);
parent.GOEworldF.DoCmd('load pkg=thetree.pwc attach=no')
parent.GOEworldF.DoCmd('load pkg=snake.pwc attach=no')
};

//xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxworld

function loadWorld()
{
//if ( birdsDone != true ) { setTimeout("loadWorld();",500) }
//else { loadWorldNow(); };
loadWorldNow();
};

function loadWorldNow()
{
document.leForm.mode.value = "Creating firmament";
document.leForm.searching.value = "in the midst of the waters...";


//alert(allNums[3] + "," + allNums[2] + "," + allNums[1]);
if ( allNums[3] > 0 ) { parent.GOEworldF.DoCmd('play obj=sky pkg=world.pwc behave=rainy'); }
else if ( allNums[2] > 0 ) { parent.GOEworldF.DoCmd('play obj=sky pkg=world.pwc behave=bloody'); }
else if ( allNums[1] > 0 ) { parent.GOEworldF.DoCmd('play obj=sky pkg=world.pwc behave=sunny'); };

thisGround = 'nothing';
if ( allNums[7] > 0 ) { thisGround= 'desert'; } else if ( allNums[6] > 0 ) { thisGround = 'lush'; };
if ( thisGround != 'nothing' ) { parent.GOEworldF.DoCmd('play obj=ground pkg=world.pwc behave=' + thisGround); }

if ( allNums[4] > 0 ) { parent.GOEworldF.DoCmd('set obj=sun pkg=world.pwc visible=yes'); };
if ( allNums[5] > 0 ) { parent.GOEworldF.DoCmd('set obj=moon pkg=world.pwc visible=yes'); };

setTimeout("parent.GOEworldF.DoCmd('set obj=text pkg=camera.pwc visible=no');parent.GOEworldF.DoCmd('setpos obj=text pkg=camera.pwc y=-100');",3000);
setTimeout("parent.GOEworldF.DoCmd('set obj=black pkg=camera.pwc visible=no');parent.GOEworldF.DoCmd('setpos obj=black pkg=camera.pwc y=-100');",3050);
showRainbow();
};

//xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxrainbow

function showRainbow()
{
if ( subBODYNums[0] >= 1 )
	{
	document.leForm.searching.value = "Loading rainbow...";
	thisX = ( 20000 + rand(5000) ) * ( 3-rand(2)*2 );
	thisZ = ( 20000 + rand(5000) ) * ( 3-rand(2)*2 );
	parent.GOEworldF.DoCmd('setpos obj=rainbow pkg=world.pwc x=' + thisX + ' z=' + thisZ);
	parent.GOEworldF.DoCmd('setrot obj=rainbow pkg=world.pwc dy=' + rand(360));
	parent.GOEworldF.DoCmd('set obj=rainbow pkg=world.pwc visible=yes');
	};
};

//xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxbirds

function showBirds()
{
//parent.GOEworldF.DoCmd('set obj=parrot1shadow pkg=birds.pwc visible=no');
//parent.GOEworldF.DoCmd('set obj=parrot1bird pkg=birds.pwc visible=no');
if ( subSCRIPTNums[0] > 0 )
	{
	//parent.GOEworldF.DoCmd('set obj=parrotM1 pkg=birds.pwc visible=yes');
	//parent.GOEworldF.DoCmd('set obj=parrot1shadow pkg=birds.pwc visible=yes');
	//parent.GOEworldF.DoCmd('set obj=parrot1bird pkg=birds.pwc visible=yes');

	document.embeds['soundsM'].LoadMovie(100,"parrot.swf");
	for ( i = 2 ; i <= subSCRIPTNums[0]+1 && i <= 10 ; i++ )
		{
		document.embeds['soundsM'].LoadMovie(100 + i,"parrot.swf");
		parent.GOEworldF.DoCmd('set obj=parrotM' + i + ' pkg=birds.pwc visible=yes');
		//alert(subSCRIPTNums[0]);
		};
	};

for ( i = 1 ; i <= subSCRIPTNums[1] ; i++ )
	{
	//alert(subSCRIPTNums[1])
	document.embeds['soundsM'].LoadMovie(110 + i,"dove.swf");
	parent.GOEworldF.DoCmd('set obj=bird' + i + ' pkg=birds.pwc visible=yes');
	};

if ( subSCRIPTNums[2] > 0 )
	{
	//alert(subSCRIPTNums[2])
	parent.GOEworldF.DoCmd('set obj=eagle1shadow pkg=birds.pwc visible=yes');
	parent.GOEworldF.DoCmd('set obj=eagle1bird pkg=birds.pwc visible=yes');
	document.embeds['soundsM'].LoadMovie(120,"eagle.swf");
	for ( i = 2 ; i <= subSCRIPTNums[2] && i <= 10 ; i++ )
		{
		document.embeds['soundsM'].LoadMovie(120 + i,"eagle.swf");
		parent.GOEworldF.DoCmd('set obj=eagleFly' + i + ' pkg=birds.pwc visible=yes');
		};
	};

if ( subSCRIPTNums[3] > 0 )
	{
	parent.GOEworldF.DoCmd('load pkg=dragon.pwc attach=yes')
	};
};

//xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxrabbits

function loadRabbits()
{
theseNums = 0;
for ( i = 0 ; i < subFONT.length ; i++)
	{
	theseNums += subFONTNums[i]
	}
if ( theseNums > 0 )
	{
	document.leForm.searching.value = "Loading rabbits...";
	parent.GOEworldF.DoCmd('load pkg=rabbit.pwc attach=yes');
	}
else if ( allNums[10] > 0 )
	{
	document.leForm.searching.value = "Loading rabbits...";
	parent.GOEworldF.DoCmd('load pkg=rabbit.pwc attach=yes');
	subFONTNums[2] = allNums[10];
	};
};

function showRabbits()
{
//alert('rabbit');
parent.GOEworldF.DoCmd('set obj=rabbit01 pkg=rabbit.pwc visible=yes');
parent.GOEworldF.DoCmd('set obj=shadow pkg=rabbit.pwc visible=yes');
//var s = 1;//size
//var n = 1;//number

//parent.GOEworldF.DoCmd('set obj=rabbit01' pkg=rabbit.pwc visible=no childvisible=no');

for ( s = 0 ; s < subFONT.length ; s++ )
	{
	for ( n = 1 ; n <= subFONTNums[s] ; n++ )
		{
		if ( n < 10 - s )
			{
			//alert(s);
			parent.GOEworldF.DoCmd('set obj=rabbit' + s + '' + n + ' pkg=rabbit.pwc visible=yes childvisible=yes');
			};
		};
	};
};

//xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxelephants

function loadElephants()
{
//alert(allNums[curTag] + "&&" + elephantsLoading);
if ( allNums[curTag] > 0 && elephantsLoading == 0 )
	{
	document.leForm.searching.value = "Loading elephants...";
	parent.GOEworldF.DoCmd('load pkg=elephant.pwc attach=yes');
	elephantsLoading++;
	}
else if ( allNums[curTag] > 0 )
	{
	document.leForm.searching.value = "Loading elephants...";
	parent.GOEworldF.DoCmd('load pkg=elephant.pwc attach=yes');
	//parent.GOEworldF.DoCmd('play obj=loaded pkg=elephant.pwc behave=now');
	elephantsLoading++;
	};
};

function showElephants()
{
//alert(allNums[11] + " " + allNums[12]);
if ( allNums[11] > 0 )
	{
	document.embeds['soundsM'].LoadMovie(11,"elephant.swf");
	parent.GOEworldF.DoCmd('set obj=elephant11 pkg=elephant.pwc visible=yes');
	parent.GOEworldF.DoCmd('set obj=body11 pkg=elephant.pwc visible=yes');
	};
if ( allNums[12] > 0 )
	{
	document.embeds['soundsM'].LoadMovie(12,"elephant.swf");
	parent.GOEworldF.DoCmd('set obj=elephant21 pkg=elephant.pwc visible=yes');
	parent.GOEworldF.DoCmd('set obj=body21 pkg=elephant.pwc visible=yes');
	};

};

//xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxskyscraper

function loadSkyscraper()
{
if ( allNums[13] > 0 )
	{
	document.leForm.searching.value = "Loading skyscraper...";
	parent.GOEworldF.DoCmd('load pkg=skyscraper.pwc attach=yes');
	hellHere = 1;
	if ( subFORMNums[0] > 0 ) { heavenHere = 1; } else { heavenHere = 0; };
	if ( heavenHere > 0 )
		{
		document.leForm.searching.value = "Loading heaven house...";
		parent.GOEworldF.DoCmd('load pkg=heavenhouse.pwc attach=yes');
		};
	if ( subFORMNums[0] < allNums[13] )
		{
		document.leForm.searching.value = "Loading hell house...";
		parent.GOEworldF.DoCmd('load pkg=hellhouse.pwc attach=yes');
		};
	};
};

//xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxdesertbuilding

function loadOasis()
{
//alert('oasis');
if ( allNums[8] > 0 )
	{
	document.leForm.searching.value = "Loading oasis...";
	parent.GOEworldF.DoCmd('load pkg=oasis.pwc attach=yes');
	};
};

//xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxbellydancer

function loadBellyDancer()
{
if ( allNums[9] > 0 )
	{
	document.leForm.searching.value = "Loading belly dancers...";
	parent.GOEworldF.DoCmd('load pkg=bellydancer.pwc attach=yes');
	};
};

function showBellydancer()
{
//alert(allNums[9]);
danci = 1;
var alli = allNums[9];
if ( alli > 10 ) { alli = 10 };
for ( danci = 1 ; danci <= alli ; danci++ )
	{
	thisX = ( rand(400)*100 ) * ( 3-rand(2)*2 );
	thisZ = ( rand(400)*100 ) * ( 3-rand(2)*2 );
	parent.GOEworldF.DoCmd('setpos obj=dancer' + danci + ' pkg=bellydancer.pwc x=' + thisX + ' z=' + thisZ);
	parent.GOEworldF.DoCmd('setrot obj=dancer' + danci + ' pkg=bellydancer.pwc  dz=' + rand(360));
	parent.GOEworldF.DoCmd('set obj=dancer' + danci + ' pkg=bellydancer.pwc visible=yes');
	};
};

//xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxmountain

function loadMountain()
{
if ( allNums[14] > 0 )
	{
	document.leForm.searching.value = "Loading mountain...";
	parent.GOEworldF.DoCmd('load pkg=mountain.pwc attach=yes');
	};
};

//xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxrobot

function loadRobot(thisNum)
{
if ( allNums[15] > 0 || allNums[16] > 0 )
	{
	if ( robotsLoading > 0 )
		{
		document.leForm.searching.value = "Loading robots...";
		parent.GOEworldF.DoCmd('load pkg=robot.pwc attach=yes');
		}
	};
robotsLoading++;
};

function showRobots()
{
if ( allNums[15] > 0 )
	{
	parent.GOEworldF.DoCmd('set obj=robotMesh pkg=robot.pwc visible=yes');
	parent.GOEworldF.DoCmd('set obj=robotShadow pkg=robot.pwc visible=yes');
	var alli = allNums[15];
	if ( alli > 10 ) { alli = 10 };
	for ( roboti = 0 ; roboti < alli ; roboti++ )
		{
		parent.GOEworldF.DoCmd('setpos obj=robot' + roboti + ' pkg=robot.pwc x=' + rand(5000)*10 + ' z=' + rand(5000)*10);
		parent.GOEworldF.DoCmd('setrot obj=robot' + roboti + ' pkg=robot.pwc z=' + rand(360));
		parent.GOEworldF.DoCmd('set obj=robot' + roboti + ' pkg=robot.pwc visible=yes');
		};
	parent.GOEworldF.DoCmd('set obj=robot0 pkg=robot.pwc visible=no');
	};
if ( allNums[16] > 0 )
	{
	parent.GOEworldF.DoCmd('set obj=robotBMesh pkg=robot.pwc visible=yes');
	parent.GOEworldF.DoCmd('set obj=robotBShadow pkg=robot.pwc visible=yes');
	var alli = allNums[16];
	if ( alli > 10 ) { alli = 10 };
	for ( roboti = 0 ; roboti < alli ; roboti++ )
		{
		parent.GOEworldF.DoCmd('setpos obj=robotB' + roboti + ' pkg=robot.pwc x=' + rand(5000)*10 + ' z=' + rand(5000)*10);
		parent.GOEworldF.DoCmd('setrot obj=robotB' + roboti + ' pkg=robot.pwc z=' + rand(360));
		parent.GOEworldF.DoCmd('set obj=robotB' + roboti + ' pkg=robot.pwc visible=yes');
		};
	parent.GOEworldF.DoCmd('set obj=robotB0 pkg=robot.pwc visible=no');
	};
};

//xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxlaserline

function loadLaserLine()
{
if ( allNums[17] > 0 )
	{
	document.leForm.searching.value = "Loading laser lines...";
	parent.GOEworldF.DoCmd('load pkg=laserline.pwc attach=yes');
	};
};

function showLaserlines()
{
var alli = allNums[17];
if ( alli > 5 ) { alli = 5 };
for ( linei = 0 ; linei < alli ; linei++ )
	{
	parent.GOEworldF.DoCmd('setrot obj=line' + linei + ' pkg=laserline.pwc order=axisxyz y=' + rand(360) );
	parent.GOEworldF.DoCmd('set obj=line' + linei + ' pkg=laserline.pwc visible=yes');
	};
};

//xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxtree

function loadTree(thisNum)
{
if ( allNums[18] > 0 || allNums[19] > 0 || allNums[20] > 0 )
	{
	if ( treesLoading > 1 )
		{
		document.leForm.searching.value = "Loading trees...";
		parent.GOEworldF.DoCmd('load pkg=trees.pwc attach=yes');
		}
	};
treesLoading++;
};

function showTrees()
{
if ( allNums[18] > 0 )
	{
	parent.GOEworldF.DoCmd('set obj=shadowA pkg=trees.pwc visible=yes');
	parent.GOEworldF.DoCmd('set obj=subtreeA pkg=trees.pwc visible=yes');
	var alli = allNums[18];
	if ( alli > 30 ) { alli = 30 };
	for ( treesi = 0 ; treesi < alli ; treesi++ )
		{
		thisX = ( rand(400)*100 ) * ( 3-rand(2)*2 );
		thisZ = ( rand(400)*100 ) * ( 3-rand(2)*2 );
		parent.GOEworldF.DoCmd('setpos obj=treeA' + treesi + ' pkg=trees.pwc x=' + thisX + ' z=' + thisZ);
		parent.GOEworldF.DoCmd('set obj=treeA' + treesi + ' pkg=trees.pwc visible=yes');
		};
	};
if ( allNums[19] > 0 )
	{
	parent.GOEworldF.DoCmd('set obj=shadowB pkg=trees.pwc visible=yes');
	var alli = allNums[19];
	if ( alli > 20 ) { alli = 20 };
	for ( treesi = 0 ; treesi < alli ; treesi++ )
		{
		thisX = ( rand(400)*100 ) * ( 3-rand(2)*2 );
		thisZ = ( rand(400)*100 ) * ( 3-rand(2)*2 );
		parent.GOEworldF.DoCmd('setpos obj=treeB' + treesi + ' pkg=trees.pwc x=' + thisX + ' z=' + thisZ);
		parent.GOEworldF.DoCmd('set obj=treeB' + treesi + ' pkg=trees.pwc visible=yes');
		};
	};
if ( allNums[20] > 0 )
	{
	parent.GOEworldF.DoCmd('set obj=shadowC pkg=trees.pwc visible=yes');
	parent.GOEworldF.DoCmd('set obj=subtreeC pkg=trees.pwc visible=yes');
	var alli = allNums[20];
	if ( alli > 10 ) { alli = 10 };
	for ( treesi = 0 ; treesi < alli ; treesi++ )
		{
		thisX = ( rand(400)*100 ) * ( 3-rand(2)*2 );
		thisZ = ( rand(400)*100 ) * ( 3-rand(2)*2 );
		parent.GOEworldF.DoCmd('setpos obj=treeC' + treesi + ' pkg=trees.pwc x=' + thisX + ' z=' + thisZ);
		parent.GOEworldF.DoCmd('set obj=treeC' + treesi + ' pkg=trees.pwc visible=yes');
		};
	};
};

//xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxbush

function loadBush()
{
if ( allNums[21] > 0 )
	{
	document.leForm.searching.value = "Loading bushes...";
	parent.GOEworldF.DoCmd('load pkg=bush.pwc attach=yes');
	};
};

function showBush()
{
var alli = allNums[21];
if ( alli > 40 ) { alli = 40 };
for ( bushi = 0 ; bushi < alli ; bushi++ )
	{
	thisS = rand(10)/10;
	thisX = ( rand(4000)*10 ) * ( 3-rand(2)*2 );
	thisZ = ( rand(4000)*10 ) * ( 3-rand(2)*2 );
	parent.GOEworldF.DoCmd('setpos obj=bush' + bushi + ' pkg=bush.pwc x=' + thisX + ' y=' + ((thisS/2) * 2000) + ' z=' + thisZ);

	parent.GOEworldF.DoCmd('setscale obj=bush' + bushi + ' pkg=bush.pwc x=' + thisS + ' y=' + thisS + ' z=' + thisS);
	parent.GOEworldF.DoCmd('set obj=bush' + bushi + ' pkg=bush.pwc visible=yes');
	};
};

//xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxbuffalo

function loadBuffalo()
{
if ( allNums[22] > 0 )
	{
	document.leForm.searching.value = "Loading buffalo...";
	parent.GOEworldF.DoCmd('load pkg=buffalo.pwc attach=yes');
	};
};

function showBuffalo()
{
document.embeds['soundsM'].LoadMovie(22,"buffalo.swf");
var alli = allNums[22];
if ( alli > 10 ) { alli = 10 };
for ( i = 1 ; i < alli ; i++ )
	{
	parent.GOEworldF.DoCmd('set obj=buffalo' + i + ' pkg=buffalo.pwc visible=yes');
	document.embeds['soundsM'].LoadMovie(220 + i,"buffalo.swf");
	};
};

function clickBuffalo()
{
followLink();
};

//xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxflower

function loadFlower()
{
if ( allNums[23] > 0 )
	{
	document.leForm.searching.value = "Loading flowers...";
	parent.GOEworldF.DoCmd('load pkg=flowers.pwc attach=yes');
	};
};

function showFlowers()
{
//alert(allNums[23]);
var alli = subPNums[0];
if ( alli > 10 ) { alli = 10 };
for ( i = 1 ; i <= alli ; i++ )
	{
	//alert('vio');
	thisS = rand(10)/10;
	thisX = ( rand(400)*10 ) * ( 3-rand(2)*2 );
	thisZ = ( rand(400)*10 ) * ( 3-rand(2)*2 );
	parent.GOEworldF.DoCmd('setpos obj=violet' + i + ' pkg=flowers.pwc x=' + thisX + ' y=100 z=' + thisZ);
	parent.GOEworldF.DoCmd('setrot obj=violet' + i + ' pkg=flowers.pwc dy=' + rand(360));
	//parent.GOEworldF.DoCmd('set obj=violet' + i + ' pkg=flowers.pwc visible=yes');
	};

var alli = subPNums[1];
if ( alli > 10 ) { alli = 10 };
for ( i = 1 ; i <= alli ; i++ )
	{
	//alert('sun');
	thisS = rand(10)/10;
	thisX = ( rand(4000)*10 ) * ( 3-rand(2)*2 );
	thisZ = ( rand(4000)*10 ) * ( 3-rand(2)*2 );
	//alert(thisX)
	parent.GOEworldF.DoCmd('setpos obj=sunflower' + i + ' pkg=flowers.pwc x=' + thisX + ' y=200 z=' + thisZ);
	parent.GOEworldF.DoCmd('setrot obj=sunflower' + i + ' pkg=flowers.pwc dy=' + rand(360));
	//parent.GOEworldF.DoCmd('set obj=sunflower' + i + ' pkg=flowers.pwc visible=yes');
	};
var numOfOtherFlowers = subPNums[0] + subPNums[1];
var alli = allNums[23] - numOfOtherFlowers;
if ( alli > 50 ) { alli = 50 };
for ( i = 1 ; i <= alli ; i++ )
	{
	//alert('zuper');
	parent.GOEworldF.DoCmd('set obj=zuperflower' + i + ' pkg=flowers.pwc visible=yes');
	};
};

//xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxbutterfly

function loadButterfly()
{
if ( allNums[24] > 0 )
	{
	document.leForm.searching.value = "Loading butterflies...";
	parent.GOEworldF.DoCmd('load pkg=butterfly.pwc attach=yes');
	};
};

function showButterfly()
{
bflyLetters = new Array("A","B","C","D");
bflyNumbers = new Array(allNums[24] - (subIMGNums[0]+subIMGNums[1]+subIMGNums[2]),subIMGNums[0],subIMGNums[1],subIMGNums[2]);
bflyMax = new Array(20,10,10,10);
for ( j = 0 ; j < 4 ; j++ )
	{
	thisbLetter = bflyLetters[j];
	thisbNumber = bflyNumbers[j];
	if ( thisbNumber > bflyMax[j] ) { thisbNumber = bflyMax[j] };
	//alert(thisbLetter + " is " + thisbNumber)
	for ( i = 1 ; i <= thisbNumber ; i++ )
		{
		thisX = -2000 + (rand(2000) * ( 3-rand(2)*2 ));
		thisY = 500 + rand(1000);
		thisZ = -2000 + (rand(2000) * ( 3-rand(2)*2 ));
		parent.GOEworldF.DoCmd('setpos obj=bfly' + thisbLetter + i + ' pkg=butterfly.pwc x=' + thisX + ' y=' + thisY + ' z=' + thisZ);
		thisRx = 30 - rand(60);
		thisRy = 30 - rand(60);
		thisRz = 30 - rand(60);
		parent.GOEworldF.DoCmd('setrot obj=bfly' + thisbLetter + i + ' pkg=butterfly.pwc dx=' + thisRx + ' dy=' + thisRy + ' dz=' + thisRz);
		parent.GOEworldF.DoCmd('set obj=leftwing' + thisbLetter + i + ' pkg=butterfly.pwc visible=yes');
		parent.GOEworldF.DoCmd('set obj=rightwing' + thisbLetter + i + ' pkg=butterfly.pwc visible=yes');
		};
	};
};

//xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxvulcano

function loadVulcano()
{
if ( allNums[25] > 0 )
	{
	document.leForm.searching.value = "Loading vulcano...";
	parent.GOEworldF.DoCmd('load pkg=vulcano.pwc attach=yes');
	};
};

function showVulcano()
{
document.embeds['soundsM'].LoadMovie(25,"vulcano.swf");
var alli = allNums[25];
if ( alli > 10 ) { alli = 10 };
for ( i = 1 ; i <= alli ; i++ )
	{
	parent.GOEworldF.DoCmd('set obj=Pyramid' + i + ' pkg=vulcano.pwc visible=yes');
	document.embeds['soundsM'].LoadMovie(250 + i,"vulcano.swf");
	};
};

//xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxtiger

function loadTiger()
{
if ( allNums[26] > 0 )
	{
	document.leForm.searching.value = "Loading tiger...";
	parent.GOEworldF.DoCmd('load pkg=tiger.pwc attach=yes');
	};
};

function showTiger()
{
document.embeds['soundsM'].LoadMovie(26,"tiger.swf");
thisX = ( rand(4000)*5 ) * ( 3-rand(2)*2 );
thisZ = ( rand(4000)*5 ) * ( 3-rand(2)*2 );
parent.GOEworldF.DoCmd('setpos obj=tiger pkg=tiger.pwc x=' + thisX + ' z=' + thisZ);
parent.GOEworldF.DoCmd('set obj=tigerbox pkg=tiger.pwc visible=yes');
};

//xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxfountain

function loadFountain()
{
if ( allNums[27] > 0 )
	{
	document.leForm.searching.value = "Loading fountain...";
	parent.GOEworldF.DoCmd('load pkg=fountain.pwc attach=yes');
	document.embeds['soundsM'].LoadMovie(270,'fountain.swf');
	};
};

function showFountain()
{
//allNums[27] = 6;
var alli = allNums[27];
if ( alli > 6 ) { alli = 6 };
for ( i = 1 ; i < alli ; i++ )
	{
	thisX = ( rand(400)*50 ) * ( 3-rand(2)*2 );
	thisZ = ( rand(400)*50 ) * ( 3-rand(2)*2 );
	parent.GOEworldF.DoCmd('setpos obj=fountain' + i + ' pkg=fountain.pwc x=' + thisX + ' y=1150 z=' + thisZ);
	parent.GOEworldF.DoCmd('set obj=fountain' + i + ' pkg=fountain.pwc visible=yes');
	setTimeout("document.embeds['soundsM'].LoadMovie(" + (270 + i) + ",'fountain.swf');",i*200);
	};
};

//xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxrock

function loadRock() {};

//xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxmonkey

function loadMonkey()
{
if ( allNums[28] > 0 )
	{
	document.leForm.searching.value = "Loading monkey...";
	parent.GOEworldF.DoCmd('load pkg=monkey.pwc attach=yes');
	setTimeout("document.embeds['soundsM'].LoadMovie(280,'monkey.swf');",500);
	};
};


//xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxpeacock

function loadPeacock()
{
if ( allNums[29] > 0 )
	{
	document.leForm.searching.value = "Loading peacock...";
	parent.GOEworldF.DoCmd('load pkg=peacock.pwc attach=yes');
	};
};

function showPeacock()
{
var alli = allNums[29];
if ( alli > 5 ) { alli = 5 };
for ( i = 0 ; i <= alli ; i++ )
	{
	thisX = rand(200) * ( 3-rand(2)*100 );
	thisZ = rand(200) * ( 3-rand(2)*100 );
	parent.GOEworldF.DoCmd('setpos obj=peacock' + i + ' pkg=peacock.pwc x=' + thisX + ' z=' + thisZ);
	parent.GOEworldF.DoCmd('setrot obj=peacock' + i + ' pkg=peacock.pwc dz=' + rand(360));
	parent.GOEworldF.DoCmd('set obj=shadow' + i + ' pkg=peacock.pwc visible=yes');
	parent.GOEworldF.DoCmd('set obj=body' + i + ' pkg=peacock.pwc visible=yes');
	parent.GOEworldF.DoCmd('set obj=tail' + i + ' pkg=peacock.pwc visible=yes');
	setTimeout("document.embeds['soundsM'].LoadMovie(" + (290 + i) + ",'peacock.swf');",i*200);
	};
};

//xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxflamingo

function loadFlamingo()
{
if ( allNums[30] > 0 )
	{
	document.leForm.searching.value = "Loading flamingo...";
	parent.GOEworldF.DoCmd('load pkg=flamingo.pwc attach=yes');
	};
};

function showFlamingo()
{
//allNums[30] = 6;
var alli = allNums[30];
if ( alli > 6 ) { alli = 6 };
for ( i = 1 ; i < alli ; i++ )
	{
	parent.GOEworldF.DoCmd('setpos obj=flamingoSkin' + i + ' pkg=flamingo.pwc y=720');
	parent.GOEworldF.DoCmd('set obj=flamingoSkin' + i + ' pkg=flamingo.pwc visible=yes');
	setTimeout("document.embeds['soundsM'].LoadMovie(" + (300 + i) + ",'flamingo.swf');",i*200);
	};
};

//xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxrock

function loadRock()
{
if ( rocksLoading > 0 )
	{
	if ( allNums[32] > 0 || allNums[33] > 0 )
		{
		document.leForm.searching.value = "Loading rocks...";
		parent.GOEworldF.DoCmd('load pkg=rock.pwc attach=yes');
		};	
	};
rocksLoading++;
};

function showRock()
{
if ( allNums[32] > 0 )
	{
	var alli = allNums[32];
	if ( alli > 20 ) { alli = 20 };
	for ( i = 1 ; i <= alli ; i++ )
		{
		thisS = 0.1 + rand(20)/100;
		thisX = 2000 + rand(20000) * ( 3-rand(2)*2 );
		thisZ = 2000 + rand(20000) * ( 3-rand(2)*2 );
		parent.GOEworldF.DoCmd('setscale obj=rockA' + i + ' pkg=rock.pwc x=' + thisS + ' y=' + thisS + ' z=' + thisS );
		parent.GOEworldF.DoCmd('setrot obj=rockA' + i + ' pkg=rock.pwc dx=' + rand(360) + ' dy=' + rand(360) + ' dz=' + rand(360));
		parent.GOEworldF.DoCmd('setpos obj=rockA' + i + ' pkg=rock.pwc x=' + thisX + ' y=60 z=' + thisZ);
		};
	};
if ( allNums[33] > 0 )
	{
	var alli = allNums[33];
	if ( alli > 20 ) { alli = 20 };
	for ( i = 1 ; i <= alli ; i++ )
		{
		thisS = 0.3 + rand(60)/100;
		thisX = 2000 + rand(20000) * ( 3-rand(2)*2 );
		thisZ = 2000 + rand(20000) * ( 3-rand(2)*2 );
		parent.GOEworldF.DoCmd('setscale obj=rockB' + i + ' pkg=rock.pwc x=' + thisS + ' y=' + thisS + ' z=' + thisS );
		parent.GOEworldF.DoCmd('setrot obj=rockB' + i + ' pkg=rock.pwc dx=' + rand(360) + ' dy=' + rand(360) + ' dz=' + rand(360));
		parent.GOEworldF.DoCmd('setpos obj=rockB' + i + ' pkg=rock.pwc x=' + thisX + ' y=100 z=' + thisZ);
		};
	};
};

//xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx

function loadZebra()
{
if ( allNums[31] > 0 )
	{
	document.leForm.searching.value = "Loading zebra...";
	parent.GOEworldF.DoCmd('load pkg=zebra.pwc attach=yes');
	};
};

function showZebra()
{
//alert('ze')
var alli = allNums[31];
if ( alli > 10 ) { alli = 10 };
for ( i = 1 ; i <= alli ; i++ )
	{
	thisX = rand(5000) * ( 3-rand(2)*2 );
	thisZ = rand(5000) * ( 3-rand(2)*2 );
	parent.GOEworldF.DoCmd('setpos obj=zebraMotor' + i + ' pkg=zebra.pwc x=' + thisX + ' z=' + thisZ);
	parent.GOEworldF.DoCmd('set obj=zebra' + i + ' pkg=zebra.pwc visible=yes');
	setTimeout("document.embeds['soundsM'].LoadMovie(" + (310 + i) + ",'zebra.swf');",i*200);
	};
};


//oooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooo
//---------------------------system
//oooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooo


function showSnake()
{
setTimeout("parent.GOEworldF.DoCmd('set obj=body pkg=snake.pwc visible=yes');",50);
setTimeout("parent.GOEworldF.DoCmd('set obj=tongue pkg=snake.pwc visible=yes');",100);
};

function hideSnake()
{
setTimeout("parent.GOEworldF.DoCmd('set obj=tongue pkg=snake.pwc visible=no');",50);
setTimeout("parent.GOEworldF.DoCmd('set obj=body pkg=snake.pwc visible=no');",100);
};

function doEnd()
{
if ( allLoaded && danceDone )
	{
	setTimeout('followLink();',3000);
	parent.GOEworldF.DoCmd('play obj=camSwitch transition=0.00 heading=yes behave=toGod')
	};
};

function clearBoxes()
{
document.leForm.mode.value = "";
document.leForm.searching.value = "";
document.leForm.looking.value = "";
document.leForm.testing.value = "";
document.leForm.foundBox.value = "";
};

function showResult()
{
thisResult = "";
for ( i = 0 ; i < allTags.length ; i ++ )
	{
	thisResult += allTags[i] + ": " + allNums[i] + "\n";
	};
for ( i = 0 ; i < allLinks.length ; i ++ )
	{
	thisResult += allLinks[i] + "\n";
	};
document.leForm.output.value = thisResult;
};

function storeLink(thisTagLength)
{
if ( curTag == 9 )
	{
	srcNum = theText.indexOf("SRC=",letterNum);
	firstNum = theText.indexOf("\"",srcNum);
	urlStart = firstNum + 1;
	}
else
	{
	urlStart = letterNum+thisTagLength;
	};
lastNum = theText.indexOf("\"",urlStart);
thisLink = theText.substring(urlStart,lastNum);
thisUrl = parent.GOElocationF.document.leForm.thisUrl.value;
var thisPath = thisUrl.substring(0,thisUrl.lastIndexOf("/")+1);
var thisPathIE = thisUrl.substring(0,thisUrl.lastIndexOf("\\")+1);
if (thisPathIE.length > thisPath.length) { thisPath = thisPathIE; 1};
if ( thisPath == "http://" ) { thisPath = thisUrl + '/' };
if ( thisLink.substring(0,5) != "http:" ) { thisLink = thisPath + thisLink; };
if ( thisLink.substring(0,11) != "javascript:" )
	{
	allLinks[allLinks.length] = thisLink;
	};
};

function followLink()
{
if ( allLinks.length >= 0 )
	{
	thisLink = allLinks[rand(allLinks.length)-1];
	if ( thisLink )
		{
		if ( confirm('Follow link to ' + thisLink + ' ?') )
			{
			followLinkNow(thisLink);
			};
		}
	else
		{
		if ( confirm('There are no links available.\nStart again?') )
			{
			//parent.GOEworldF.location.href = "world.html";
			clearTimeout(letterTime);
			parent.newLink = "";
			location.href = "parser.html";
			};
		}
	}
else
	{
	clearTimeout(letterTime);
	parent.newLink = "";
	parent.GOEparserF.location.href = "parser.html";
	};
};

function followLinkNow(thisLink)
{
clearTimeout(letterTime);
parent.newLink = thisLink;
location.reload();
};

function dumpSCRIPT()
{
while ( theText.indexOf("<SCRIPT") != -1 )
	{
	scriptStart = theText.indexOf("<SCRIPT");
	scriptEnd = theText.indexOf("</SCRIPT>") + 9;
	theText = theText.substring(0,scriptStart) + '' + theText.substring(scriptEnd,theText.length);
	};
//parent.GOEworldF.document.open("text/plain");
//parent.GOEworldF.document.write(theText);
//parent.GOEworldF.document.close();
};

// The Central Randomizer 1.3 (C) 1997 by Paul Houle (houle@msc.cornell.edu)
rnd.today=new Date();
rnd.seed=rnd.today.getTime();
function rnd() { rnd.seed = (rnd.seed*9301+49297) % 233280; return rnd.seed/(233280.0); };
function rand(number) { return Math.ceil(rnd()*number); };
// end central randomizer.