<?
// Initializes a new map.
function newMap($id, $def)
{
	global $map, $num;
	global $arrows, $mapid, $mapdefault;
	
	// Set the arrow count for the previous map.
	if ($map != -1)
		$arrows[$map] = $num;
	
	// Go to the next map and reset the arrow number.
	$map += 1;
	$num = 0;
	
	// Set the page name and default display name to the given values.
	$mapid[$map] = $id;
	$mapdefault[$map] = $def;
}
// Cleans up by setting the final counts.
function lastMap()
{
	global $map, $num, $arrows, $mapcount;
	$arrows[$map] = $num;
	$mapcount = $map + 1;
}

// Add a goto arrow to the map.
function addGoto($sh, $coords, $desc, $dest)
{
	global $shape, $pos, $text, $goto, $map, $num;
	$shape[$map][$num] = $sh;
	$pos[$map][$num] = $coords;
	$text[$map][$num] = $desc;
	$goto[$map][$num] = $dest;
	$num += 1;
}
// Add a check arrow, which is considered a goto arrow with a blank destination.
function addCheck($sh, $coords, $desc)
{
	addGoto($sh, $coords, $desc, "");
}
// Adds a flash movie.
function addFlash($fl)
{
	global $map, $num, $flash;
	$flash[$map] = $fl;
}
// Adds a page redirect.
function addRedirect($id, $time)
{
	global $map, $redirect, $redirectsec;
	$redirect[$map] = $id;
	$redirectsec[$map] = $time;
}

// Find the map number with the given page name.
function numFromName($name, $mapid, $mapcount)
{
	for ($i = 0; $i < $mapcount; $i++)
	{
		if ($mapid[$i] === $name)
			return $i;
	}
	return 0;
}

// Escape 's.
function escapeApos($str)
{
	return str_replace("'", "\'", $str);
}
// Extend a number with 0's.
function threeDigits($num)
{
	$num = "" . $num;
	while (strlen($num) < 3)
		$num = "0" . $num;
	return $num;
}

// GET the round. By default, go to Round 1, and set to -1 if outside the bounds of valid rounds.
$roundmax = 3;
$currentround = $_GET["r"];
if ($currentround == "")
	$currentround = 1;
if ($currentround <= 0 || $currentround > $roundmax)
	$currentround = -1;

$down = "&#x25BC;";
$right = "&#x25B7;";
$note = "&#x266A;";
$diamond = "&#x25C6;";

$map = -1;
$sourceurl = "http://funamusea.com/story/ice_scream/";

if ($currentround == 1)
{
	newMap("index", "[ Iceberg Isle ]");
	addGoto("circle", "424,26,17", "$down Iceberg Isle Summit", "tyoujou");
	addGoto("circle", "367,150,17", "$down Rocma & Mafuyu's House", "rocma_house");
	addGoto("circle", "83,256,17", "$down Wharf", "hunanoriba");
	addGoto("circle", "295,344,17", "$down Iceberg Village", "mura");
	addGoto("circle", "606,247,12", "$down Rock's House", "rock_house");
	addGoto("circle", "558,150,13", "$down Orca Danger Zone", "orca");
	addGoto("circle", "681,181,13", "$down ???", "ika");
	
	newMap("tyoujou", "[ Iceberg Isle Summit ]");
	addCheck("circle", "413,58,20", "The summit, which offers a good view of the whole island.");
	addGoto("rect", "15,489,56,533", "$down Back to Island", "index");
	
	newMap("rocma_house", "[ Outside Rocma & Mafuyu's House ]");
	addCheck("circle", "390,295,16", "An ermine deep in thought.");
	addGoto("circle", "577,262,19", "$down Rocma & Mafuyu's House", "rocma_house2");
	addGoto("rect", "753,490,794,535", "$down Back to Island", "index");
	
	newMap("rocma_house2", "[ Rocma & Mafuyu's House ]");
	addCheck("circle", "345,333,15", "Mafuyu's toys.");
	addCheck("circle", "474,101,15", "It leads to the bedroom.");
	addCheck("circle", "663,148,15", "Scratched by nails...");
	addCheck("circle", "747,82,15", "The ladder to the attic.");
	addGoto("circle", "619,268,20", "$down Rocma and Mafuyu are here.", "rocma_house2b");
	addGoto("circle", "226,492,21", "$down Back", "rocma_house");
	
	newMap("rocma_house2b", "[ Rocma & Mafuyu's House ]");
	addCheck("circle", "211,29,21", "Rocma is looking after Mafuyu.");
	addCheck("circle", "559,150,23", "Mafuyu is entranced by the yarn.");
	addCheck("circle", "702,461,21", "Fluffy fluffy floofy floofah.");
	addGoto("rect", "15,14,56,58", "$down Back", "rocma_house2");
	
	newMap("orca", "[ Orca Danger Zone ]");
	addGoto("circle", "127,196,18", "$down Idate is here.", "orca2");
	addGoto("rect", "755,491,796,536", "$down Back to Island", "index");
	
	newMap("orca2", "[ Orca Danger Zone ]");
	addCheck("circle", "248,37,15", "A real ass of an orca who's beyond all help.");
	addCheck("circle", "614,429,15", "Unendingly reeks of cigarettes.");
	addGoto("rect", "14,491,55,535", "$down Back", "orca");
	
	newMap("ika", "[ ??? ]");
	addCheck("circle", "114,209,17", "A tentacle.");
	addCheck("circle", "258,38,17", "A feeler.");
	addCheck("circle", "356,208,15", "A tentacle.");
	addCheck("circle", "498,77,17", "A feeler.");
	addCheck("circle", "502,251,16", "A tentacle.");
	addCheck("circle", "745,248,16", "A tentacle.");
	addGoto("rect", "14,491,55,535", "$down Back to Island", "index");
	
	newMap("hunanoriba", "[ Wharf ]");
	addCheck("circle", "700,205,21", "A cute, snoozing bun-bun. Makes you wanna put it in a stew.");
	addCheck("circle", "227,330,20", "A boat. Hardly anyone uses it due to the danger of orca attacks.");
	addGoto("rect", "14,491,55,536", "$down Back to Island", "index");
	
	newMap("rock_house", "[ Outside Rock's House ]");
	addCheck("circle", "444,221,14", "Some fishing equipment has been left out.");
	addGoto("circle", "348,163,19", "$down Rock's House", "rock_house2");
	addGoto("circle", "14,491,55,536", "$down Back to Island", "index");
	
	newMap("rock_house2", "[ Rock's House ]");
	addCheck("circle", "72,301,16", "Rock's beloved radio.");
	addCheck("circle", "315,44,17", "A futon. Not often used, since Rock usually sleeps on the sofa.");
	addCheck("circle", "546,176,16", "Fishing rods. They can be used to catch fish, or hit orcas. Superb.");
	addCheck("circle", "550,436,18", "An underground cellar. Rumor has it it's a secret passage...");
	addCheck("circle", "385,468,18", "A mysterious flower.");
	addGoto("circle", "311,267,21", "$down Rock is here.", "rock_house2b");
	addGoto("circle", "184,479,24", "$down Back", "rock_house");
	
	newMap("rock_house2b", "[ Rock's House ]");
	addCheck("circle", "224,157,20", "Always being in a foul mood, his brow has permanent angry wrinkles.");
	addCheck("circle", "410,79,21", "Cute decorative feathers. Call them eyebrows and he'll shoot you.");
	addCheck("circle", "504,294,21", "A slovenly belly. Rubbing it feels unusually pleasant.");
	addCheck("circle", "608,413,20", "Wee little feet. They make a sticky sound as he walks.");
	addGoto("rect", "13,13,54,58", "$down Back", "rock_house2");
	
	newMap("mura", "[ Iceberg Village ]");
	addCheck("circle", "405,115,14", "You can see the sea. Just a li'l.");
	addCheck("circle", "456,300,13", "Yukisada's house. The freeloader Shirogane lives here too.");
	addGoto("circle", "336,246,16", "$down Yukisada's House", "mura_yukisadahouse");
	addGoto("circle", "550,352,16", "$down Peraco's House", "mura_peracohouse");
	addGoto("circle", "756,173,16", "$down Suno is here.", "mura_suno");
	addGoto("rect", "759,9,800,54", "$down Back to Island", "index");
	
	newMap("mura_suno", "[ Iceberg Village ]");
	addCheck("circle", "304,274,18", "One of Suno's arms. They break very easily.");
	addCheck("circle", "492,57,19", "A fragile body that readily collapses with any punch or kick.");
	addGoto("rect", "19,486,60,532", "$down Back", "mura");
	
	newMap("mura_yukisadahouse", "[ Yukisada's House ]");
	addCheck("circle", "196,263,13", "A scale. Essential for the sweet-toothed Yukisada.");
	addCheck("circle", "476,212,14", "A bed. Very comfy.");
	addCheck("circle", "597,414,14", "A trash can. Seems to be empty.");
	addCheck("circle", "637,324,14", "Yukisada's desk. A bunch of stuff is on it.");
	addCheck("circle", "746,214,15", "A bookcase. It has all kinds of books.");
	addGoto("circle", "88,172,19", "$down To Living Room", "mura_yukisadahouse2");
	addGoto("circle", "542,498,21", "$down Back to Village", "mura");
	
	newMap("mura_yukisadahouse2", "[ Yukisada's House ]");
	addCheck("circle", "74,362,16", "An acceptable place for fire.");
	addCheck("circle", "231,445,17", "A trash can. Seems to be empty.");
	addCheck("circle", "438,122,17", "It leads to the storeroom.");
	addCheck("circle", "692,349,17", "Stairs to the second floor.");
	addGoto("circle", "382,282,19", "$down Yukisada and Shirogane are here.", "mura_yukisadahouse_sy");
	addGoto("circle", "502,518,19", "$down Back", "mura_yukisadahouse");
	
	newMap("mura_yukisadahouse_sy", "[ Yukisada's House ]");
	addCheck("circle", "144,72,18", "Yukisada is consoling his close yet idiotic wolf friend.");
	addCheck("circle", "633,164,20", "This moronic wolf is weeping in despair at his own patheticness.");
	addGoto("rect", "755,13,796,58", "$down Back", "mura_yukisadahouse2");
	
	newMap("mura_peracohouse", "[ Peraco's House ]");
	addCheck("circle", "168,250,15", "A super plush bed. Peraco's siblings are sleeping in it.");
	addCheck("circle", "278,408,16", "An underground cellar. Rumor has it it's a secret passage...");
	addCheck("circle", "673,201,16", "A TV. Everything shown on it is weird.");
	addCheck("circle", "751,270,16", "A mysterious flower.");
	addGoto("circle", "450,277,20", "$down Peraco is here.", "mura_peracohouse_p");
	addGoto("circle", "86,498,23", "$down Back to Village", "mura");
	
	newMap("mura_peracohouse_p", "[ Peraco's House ]");
	addCheck("circle", "503,83,19", "Peraco loves thinking about worthless junk.");
	addGoto("rect", "755,492,796,537", "$down Back", "mura_peracohouse");
	
	lastMap();
	
	$sourceurl = "http://funamusea.com/story/ice_scream/watch/";
}

else if ($currentround == 2)
{
	newMap("index", "[ Iceberg Isle ]");
	addGoto("circle", "424,27,18", "$down Iceberg Isle Summit", "tyoujou");
	addGoto("circle", "367,149,17", "$down Rocma & Mafuyu's House", "rocma_house");
	addGoto("circle", "82,259,16", "$down Wharf", "hunanoriba");
	addGoto("circle", "293,349,16", "$down Iceberg Village", "mura");
	addGoto("circle", "606,247,17", "$down Rock's House", "rock_house");
	addGoto("circle", "524,171,18", "$down Orca Danger Zone", "orca");
	addGoto("circle", "658,207,20", "$down ???", "ika");
	addGoto("circle", "475,233,16", "$down Somebody's here.", "who1");
	addGoto("circle", "714,322,17", "$down Somebody's here.", "who2");
	
	newMap("tyoujou", "[ Iceberg Isle Summit ]");
	addCheck("circle", "411,51,23", "The summit. Doesn't really make you feel like you're on top of the world.");
	addGoto("rect", "755,490,796,534", "$down Back to Island", "index");
	
	newMap("rocma_house", "[ Outside Rocma & Mafuyu's House ]");
	addGoto("circle", "460,289,18", "Quite a crowd.", "rocma_kids");
	addGoto("circle", "577,262,19", "$down Rocma & Mafuyu's House", "rocma_house2");
	addGoto("rect", "756,493,797,537", "$down Back to Island", "index");
	
	newMap("rocma_kids", "[ Rocma and Kids ]");
	addCheck("circle", "85,25,18", "Looks like they've having fun.");
	addCheck("circle", "70,441,21", "Peraco's siblings. Very shy.");
	addCheck("circle", "416,277,20", "She loves sledding, but loves skating most.");
	addCheck("circle", "503,66,22", "Rocma the rejector.");
	addCheck("circle", "752,365,19", "Bedhead.");
	addGoto("rect", "756,493,797,538", "$down Back", "rocma_house");
	
	newMap("rocma_house2", "[ Rocma & Mafuyu's House ]");
	addCheck("circle", "347,330,16", "Mafuyu's toys.");
	addCheck("circle", "475,100,17", "It leads to the bedroom.");
	addCheck("circle", "661,147,16", "Scratched by nails...");
	addCheck("circle", "747,82,16", "The ladder to the attic.");
	addCheck("circle", "555,352,17", "The remnants of Mafuyu's doodling.");
	addCheck("circle", "87,233,16", "Filled with stuff.");
	addGoto("circle", "226,492,21", "$down Back", "rocma_house");
	
	newMap("orca", "[ Orca Danger Zone ]");
	addGoto("circle", "258,223,21", "$down Idate and a deliveryman are here.", "orca_b");
	addGoto("rect", "755,490,796,534", "$down Back to Island", "index");
	
	newMap("orca_b", "[ Idate and Deliveryman ]");
	addCheck("circle", "121,175,19", "Mm, tail meat.");
	addCheck("circle", "198,144,21", "The deliveryman Nekoyama. Here to deliver underwater cigarettes to Idate.");
	addCheck("circle", "508,185,21", "Idate, engrossed in smoking. Extremely smelly.");
	addCheck("circle", "619,100,23", "An arrogant D-bag with a head full of nicotine.");
	addCheck("circle", "768,400,23", "A delicate area.");
	addGoto("rect", "12,492,53,537", "$down Back", "orca");
	
	newMap("ika", "[ ??? ]");
	addCheck("circle", "369,159,21", "A silent tentacle.");
	addGoto("rect", "755,12,796,57", "$down Back to Island", "index");
	
	newMap("hunanoriba", "[ Wharf ]");
	addCheck("circle", "116,224,14", "???");
	addGoto("rect", "9,495,50,540", "$down Back to Island", "index");
	
	newMap("rock_house", "[ Outside Rock's House ]");
	addGoto("circle", "347,154,21", "$down Rock's House", "rock_house2");
	addGoto("circle", "14,491,55,536", "$down Back to Island", "index");
	
	newMap("rock_house2", "[ Rock's House ]");
	addCheck("circle", "308,37,19", "A futon practically retired to decorative status.");
	addCheck("circle", "744,27,20", "Contains underwear and such.");
	addCheck("circle", "75,281,19", "Rock's beloved radio.");
	addCheck("circle", "167,254,19", "He seems to like aurochs.");
	addCheck("circle", "320,133,21", "These come out for fights, apparently...");
	addCheck("circle", "470,138,23", "No entry.");
	addCheck("circle", "547,175,18", "Fishing rods, AKA weapons.");
	addCheck("circle", "723,184,21", "???");
	addCheck("circle", "303,284,17", "Rock's favorite sofa.");
	addCheck("circle", "379,354,17", "Rock loves cigs and beer.");
	addCheck("circle", "389,458,17", "A mysterious flower. It's gotta bloom someday.");
	addGoto("circle", "195,472,25", "$down Back", "rock_house");
	
	newMap("who1", "[ Suno and Usako ]");
	addCheck("circle", "239,313,17", "All is prepared. Now, to wait for it to grill. ...Patience.");
	addCheck("circle", "297,255,16", "This cute bun-bun enjoys yakiniku. They're a carnivorous breed.");
	addCheck("circle", "378,301,16", "Tasty meat!");
	addCheck("circle", "400,333,14", "A shiitake. Don't grill with the gills down. Try it with some butter.");
	addCheck("circle", "492,215,19", "Suno's here. He'll melt soon. He SHOULD melt soon.");
	addGoto("rect", "755,12,796,57", "$down Back to Island", "index");
	
	newMap("who2", "[ Yukisada and Rock ]");
	addCheck("circle", "159,64,23", "Yukisada. He seems worried about Shirogane.");
	addCheck("circle", "163,241,20", "Scarf.");
	addCheck("circle", "443,484,23", "Butt.");
	addCheck("circle", "477,288,24", "Eyebrows of fury. He's in a bad mood.");
	addCheck("circle", "586,353,24", "Rock is irritated. He's in a bad mood.");
	addCheck("circle", "656,412,24", "The fishing isn't going well. He's in a bad mood.");
	addCheck("circle", "762,228,26", "Rock's fishing rod. ...Yeah, he's in a bad mood.");
	addGoto("rect", "15,14,56,58", "$down Back to Island", "index");
	
	newMap("mura", "[ Iceberg Village ]");
	addCheck("circle", "398,112,15", "You can see the sea. Eh, it's iffy.");
	addCheck("circle", "455,292,14", "Yukisada's house. The freeloader Shirogane lives here too.");
	addGoto("circle", "337,243,19", "$down Yukisada's House", "mura_yukisadahouse");
	addGoto("circle", "549,346,17", "$down Peraco's House", "mura_peracohouse");
	addGoto("circle", "148,226,17", "$down Ice Cavern", "doukutsu");
	addGoto("rect", "759,9,800,54", "$down Back to Island", "index");
	
	newMap("mura_yukisadahouse", "[ Yukisada's House ]");
	addCheck("circle", "195,266,18", "A scale. Essential for the sweet-toothed Yukisada.");
	addCheck("circle", "480,212,19", "A bed. Very comfy.");
	addCheck("circle", "596,416,16", "A trash can. Seems to be empty.");
	addCheck("circle", "642,323,19", "Yukisada's desk. A bunch of stuff is on it.");
	addCheck("circle", "745,212,17", "A bookcase. It has all kinds of books.");
	addGoto("circle", "91,170,19", "$down To Living Room", "mura_yukisadahouse2");
	addGoto("circle", "542,498,21", "$down Back to Village", "mura");
	
	newMap("mura_yukisadahouse2", "[ Yukisada's House ]");
	addCheck("circle", "82,359,15", "A fiery place. Clam chowder is Yukisada's specialty.");
	addCheck("circle", "229,437,18", "A trash can. Seems to be empty.");
	addCheck("circle", "442,119,20", "It leads to the storeroom.");
	addCheck("circle", "665,288,19", "Stairs to the second floor.");
	addCheck("circle", "515,187,19", "Duck.");
	addGoto("circle", "501,512,24", "$down Back", "mura_yukisadahouse");
	
	newMap("mura_peracohouse", "[ Peraco's House ]");
	addCheck("circle", "157,254,17", "A super plush bed.");
	addCheck("circle", "674,184,18", "The TV is off.");
	addCheck("circle", "752,274,15", "A mysterious flower. As rumor has it, it moves during the night...");
	addCheck("circle", "302,190,17", "A bunch of stuff.");
	addCheck("circle", "113,154,16", "A mysterious poster.");
	addGoto("circle", "112,509,23", "$down Back to Village", "mura");
	
	newMap("doukutsu", "[ Ice Cavern Entrance ]");
	addGoto("circle", "150,222,23", "$down Ice Cavern", "doukutsu2");
	addGoto("rect", "755,490,796,534", "$down Back to Village", "mura");
	
	newMap("doukutsu2", "[ Ice Cavern ]");
	addCheck("circle", "653,137,22", "This way leads underground.");
	addGoto("circle", "159,138,18", "$down Proceed Further", "doukutsu3");
	addGoto("circle", "404,512,27", "$down Back", "doukutsu");
	
	newMap("doukutsu3", "[ Ice Cavern ]");
	addCheck("circle", "406,346,21", "Shirogane's crying in his sleep... What could have happened?");
	addGoto("rect", "18,17,90,105", "$right Play", "doukutsu3-s1");
	addGoto("rect", "755,490,796,534", "$down Back", "doukutsu2");
	
	newMap("doukutsu3-s1", "[ Ice Cavern * Warning: Video has sound and flashing images. ]");
	addFlash("s1");
	
	lastMap();
	
	$sourceurl = "http://funamusea.com/story/ice_scream/watch2/";
}

else if ($currentround == 3)
{
	newMap("index", "[ Iceberg Isle ]");
	addGoto("circle", "424,27,18", "$down Iceberg Isle Summit", "tyoujou");
	addGoto("circle", "367,149,17", "$down Rocma & Mafuyu's House", "rocma_house");
	addGoto("circle", "82,259,16", "$down Wharf", "hunanoriba");
	addGoto("circle", "293,343,22", "$down Iceberg Village", "mura");
	addGoto("circle", "606,247,17", "$down Rock's House", "rock_house");
	addGoto("circle", "557,148,22", "$down Orca Danger Zone", "orca");
	addGoto("circle", "680,180,24", "$down ???", "ika");
	addGoto("circle", "511,401,22", "$down Somebody's here.", "kamakura");
	
	newMap("tyoujou", "[ Iceberg Isle Summit ]");
	addGoto("circle", "412,25,17", "Somebody's here.", "tyoujou_rocma");
	addGoto("rect", "15,489,56,533", "$down Back to Island", "index");
	
	newMap("tyoujou_rocma", "[ Iceberg Isle Summit ]");
	addCheck("circle", "329,39,24", "Rocma looks at the sea. Seems to be watching for something.");
	addCheck("circle", "570,351,24", "She gets super mad if you touch this.");
	addCheck("circle", "686,122,28", "Braid.");
	addGoto("rect", "15,489,56,533", "$down Back", "tyoujou");
	
	newMap("rocma_house", "[ Outside Rocma & Mafuyu's House ]");
	addCheck("circle", "390,295,16", "A resting ptarmigan.");
	addGoto("circle", "577,262,19", "$down Rocma & Mafuyu's House", "rocma_house2");
	addGoto("rect", "753,490,794,535", "$down Back to Island", "index");
	
	newMap("rocma_house2", "[ Rocma & Mafuyu's House ]");
	addCheck("circle", "347,330,16", "Mafuyu's toys.");
	addCheck("circle", "475,100,17", "It leads to the bedroom.");
	addCheck("circle", "661,147,16", "Scratched by nails...");
	addCheck("circle", "747,82,16", "The ladder to the attic.");
	addCheck("circle", "555,352,17", "The remnants of Mafuyu's doodling.");
	addCheck("circle", "87,233,16", "Filled with stuff.");
	addGoto("circle", "231,497,23", "$down Back", "rocma_house");
	
	newMap("orca", "[ Orca Danger Zone ]");
	addGoto("circle", "104,197,24", "$down The orca's here.", "orca2");
	addGoto("rect", "755,490,796,534", "$down Back to Island", "index");
	
	newMap("orca2", "[ Orca Danger Zone ]");
	addCheck("circle", "274,345,26", "Idate is plotting something...");
	addCheck("circle", "407,183,23", "Don't talk to strangers, kids.");
	addCheck("circle", "687,190,23", "He won't approach the island's center. Why? To be continued...");
	addGoto("rect", "13,494,52,536", "$down Back", "orca");
	
	newMap("ika", "[ ??? ]");
	addCheck("circle", "369,159,21", "Flailing tentacles.");
	addGoto("rect", "755,12,796,57", "$down Back to Island", "index");
	
	newMap("hunanoriba", "[ Wharf ]");
	addCheck("circle", "306,179,26", "Yukisada looks like he's having a hard time.");
	addCheck("circle", "517,224,28", "Fluffy head.");
	addCheck("circle", "613,465,24", "Scarf.");
	addCheck("circle", "682,30,23", "An ill-natured snowman.");
	addCheck("circle", "770,124,27", "An arm that would snap so easily.");
	addGoto("rect", "13,489,54,534", "$down Back to Island", "index");
	
	newMap("rock_house", "[ Outside Rock's House ]");
	addGoto("circle", "347,154,21", "$down Rock's House", "rock_house2");
	addGoto("circle", "424,196,24", "$down Rock and some others are here.", "rock_house-syukai");
	addGoto("circle", "14,491,55,536", "$down Back to Island", "index");
	
	newMap("rock_house-syukai", "[ Cute Little Animals Having Conversation $note ]");
	addCheck("circle", "179,117,22", "Penguin with them eyebrows.");
	addCheck("circle", "297,28,20", "Fine, fine eyebrows.");
	addCheck("circle", "378,306,24", "Supple body.");
	addCheck("circle", "503,284,27", "Bunny-buns.");
	addCheck("circle", "555,145,25", "The precious little animals are talking to each other. How adorable.");
	addGoto("rect", "756,12,797,56", "$down Back", "rock_house");
	
	newMap("rock_house2", "[ Rock's House ]");
	addCheck("circle", "308,37,19", "A futon. Not used.");
	addCheck("circle", "744,27,20", "Contains underwear and such.");
	addCheck("circle", "75,281,19", "Rock's beloved radio.");
	addCheck("circle", "167,254,19", "He seems to like aurochs.");
	addCheck("circle", "320,133,21", "These come out for fights, apparently...");
	addCheck("circle", "470,138,23", "No entry.");
	addCheck("circle", "547,175,18", "Fishing rods, AKA weapons.");
	addCheck("circle", "723,184,21", "???");
	addCheck("circle", "303,284,17", "Rock's favorite sofa.");
	addCheck("circle", "379,354,17", "Rock loves cigs and beer.");
	addCheck("circle", "389,458,17", "A mysterious flower. Everything about it is mystery.");
	addGoto("circle", "195,472,25", "$down Back", "rock_house");
	
	newMap("mura", "[ Iceberg Village ]");
	addCheck("circle", "398,112,15", "You can see the sea. Maybe.");
	addCheck("circle", "455,292,14", "Yukisada's house. The freeloader Shirogane lives here too.");
	addGoto("circle", "337,243,19", "$down Yukisada's House", "mura_yukisadahouse");
	addGoto("circle", "549,346,17", "$down Peraco's House", "mura_peracohouse");
	addGoto("circle", "148,226,17", "$down Ice Cavern", "doukutsu");
	addGoto("rect", "759,9,800,54", "$down Back to Island", "index");
	
	newMap("mura_yukisadahouse", "[ Yukisada's House ]");
	addCheck("circle", "195,266,18", "A scale. Essential for the sweet-toothed Yukisada.");
	addCheck("circle", "480,212,19", "A bed. Very comfy.");
	addCheck("circle", "596,416,16", "A trash can. Seems to be empty.");
	addCheck("circle", "642,323,19", "Yukisada's desk. A bunch of stuff is on it.");
	addCheck("circle", "745,212,17", "A bookcase. It has all kinds of books.");
	addGoto("circle", "91,170,19", "$down To Living Room", "mura_yukisadahouse2");
	addGoto("circle", "542,498,21", "$down Back to Village", "mura");
	
	newMap("mura_yukisadahouse2", "[ Yukisada's House ]");
	addCheck("circle", "82,359,15", "A fiery place. Clam chowder is Yukisada's specialty.");
	addCheck("circle", "229,437,18", "A trash can. Seems to be empty.");
	addCheck("circle", "442,119,20", "It leads to the storeroom.");
	addCheck("circle", "665,288,19", "Stairs to the second floor.");
	addCheck("circle", "515,187,19", "Duck.");
	addGoto("circle", "501,512,24", "$down Back", "mura_yukisadahouse");
	
	newMap("mura_peracohouse", "[ Peraco's House ]");
	addCheck("circle", "157,254,17", "A super plush bed.");
	addCheck("circle", "674,184,18", "The TV is off.");
	addCheck("circle", "752,274,15", "A mysterious flower. Just what could it be for...");
	addCheck("circle", "302,190,17", "A bunch of stuff.");
	addCheck("circle", "113,154,16", "A mysterious poster.");
	addGoto("circle", "112,509,23", "$down Back to Village", "mura");
	
	newMap("doukutsu", "[ Ice Cavern Entrance ]");
	addGoto("circle", "150,222,23", "$down Ice Cavern", "doukutsu2");
	addGoto("rect", "755,490,796,534", "$down Back to Village", "mura");
	
	newMap("doukutsu2", "[ Ice Cavern ]");
	addCheck("circle", "653,137,22", "This way leads underground.");
	addGoto("circle", "159,138,18", "$down Proceed Further", "doukutsu3");
	addGoto("circle", "404,512,27", "$down Back", "doukutsu");
	
	newMap("doukutsu3", "[ Ice Cavern ]");
	addCheck("circle", "401,379,24", "A bun is feigning sleep here. You should leave this place immediately.");
	addGoto("rect", "755,490,796,534", "$down Back", "doukutsu2");
	addRedirect("doukutsu3-1", 15);
	
	newMap("doukutsu3-1", "[ Ice Cavern ]");
	addRedirect("doukutsu3-2", 5);
	
	newMap("doukutsu3-2", "[ Ice Cavern ]");
	addRedirect("gameover", 5);
	
	newMap("gameover", "[ GAME OVER ]");
	addGoto("rect", "334,345,400,375", "$down YES", "index");
	addGoto("rect", "409,345,475,375", "$down NO", "-1");
	
	newMap("kamakura", "[ Igloo ]");
	addCheck("circle", "48,251,28", "Mafuyu isn't grasping the situation.");
	addCheck("circle", "259,424,23", "Peraco's siblings are showing their discontent.");
	addCheck("circle", "454,49,28", "Shirogane is illegally occupying Peraco's siblings' igloo.");
	addCheck("circle", "728,312,28", "PO'd Peraco.");
	addGoto("circle", "412,256,26", "$down Inside the Igloo", "kamakurar");
	addGoto("rect", "15,14,56,59", "$down Back to Island", "index");
	
	newMap("kamakurar", "[ Igloo ]");
	addCheck("circle", "182,133,19", "Butt.");
	addCheck("circle", "553,107,25", "Shirogane's taking up space. Happens all the time.");
	addCheck("circle", "706,202,24", "He tries to use the cape to hide and protect himself.");
	addCheck("circle", "147,411,24", "A tail that's fun to step on.");
	addGoto("rect", "10,10,93,107", "$right Play", "kamakurar_s");
	addGoto("rect", "13,494,52,536", "$down Leave the Igloo", "kamakura");
	
	newMap("kamakurar_s", "[ $right Igloo ]");
	addFlash("3-1");
	
	lastMap();
	
	$sourceurl = "http://funamusea.com/story/ice_scream/watch3/";
}

// Generate content.

$tab = "	";
$lb = "
";

$stdtab = $tab . $tab . $tab . $tab . $tab . $tab;
$stdtab2 = $stdtab . $tab;
$stdtab3 = $stdtab2 . $tab;

$dlb = $lb . $stdtab . $lb;
$dlb2 = $lb . $stdtab2 . $lb;
$dlb3 = $lb . $stdtab3 . $lb;

$subtitle = "";
$topcontent = "";
$bottomcontent = "";
$redirectcontent = $lb;
$rufflecontent = $lb;

if ($currentround == -1)
{
	$topcontent = "<p>Round not found.</p>$lb"
		. $stdtab . "<p><a href=\"/other/icescream/\">$diamond BACK $diamond</a></p>$dlb";
}
else // Valid round
{
	$subtitle = ": Round $currentround";
	
	$currentmap = $_GET["map"];
	if ($currentmap == "")
		$currentmap = "index";
	$mapnum = numFromName($currentmap, $mapid, $mapcount);
	
	if ($redirect[$mapnum] != "")
		$redirectcontent = "<meta http-equiv=\"Refresh\" content=\"$redirectsec[$mapnum]; URL='?r=$currentround&amp;map=$redirect[$mapnum]'\">$lb";
	
	$topcontent = "<form name=\"a\">$lb"
		. $stdtab2 . "<input type=\"text\" name=\"b\" class=\"icfrm\" value=\"$mapdefault[$mapnum]\">$lb"
		. $stdtab . "</form>$dlb";
	
	$roundfolder = threeDigits($currentround);
	if ($flash[$mapnum] == "")
	{
		$topcontent .= $stdtab . "<img src=\"/other/icescream/watch/$roundfolder/$mapid[$mapnum].gif\" usemap=\"#b\" alt=\"ice\" class=\"movie\">$lb"
		. $stdtab . "<map name=\"b\">$lb";
		
		for ($i = 0; $i < $arrows[$mapnum]; $i++)
		{
			if ($goto[$mapnum][$i] != "-1")
				$gotostring = ($goto[$mapnum][$i] != "")? " href=\"?r=$currentround&amp;map=" . $goto[$mapnum][$i] . "\"" : "";
			else
				$gotostring = " href=\"/other/icescream/\"";
			$topcontent .= $stdtab2 . "<area$gotostring alt=\"\" shape=\"" . $shape[$mapnum][$i] . "\" coords=\"" . $pos[$mapnum][$i] . "\" onMouseOver=\"document.a.b.value = '" . escapeApos($text[$mapnum][$i]) . "';\" onMouseOut=\"document.a.b.value = '" . escapeApos($mapdefault[$mapnum]) . "';\">$lb";
		}
		
		$topcontent .= $stdtab . "</map>$dlb";
	}
	else
	{
		$topcontent .= $stdtab . "<iframe src=\"./$roundfolder/$flash[$mapnum].swf\" allowfullscreen scrolling=\"no\" name=\"orca\" class=\"movie\"></iframe>$dlb";
		//$topcontent .= $stdtab . "<iframe allowfullscreen scrolling=\"no\" name=\"orca\" class=\"movie\"></iframe>$dlb";
		/*$rufflecontent = $lb . $stdtab . "window.RufflePlayer = window.RufflePlayer || {};$lb"
			. $stdtab . "window.addEventListener(\"DOMContentLoaded\", (event) =>$lb"
			. $stdtab . "{" . $lb
			. $stdtab2 . "const ruffle = window.RufflePlayer.newest();$lb"
			. $stdtab2 . "const player = ruffle.create_player();$lb"
			. $stdtab2 . "const container = document.getElementsByName(\"orca\")[0];$lb"
			. $stdtab2 . "container.appendChild(player);$lb"
			. $stdtab2 . "player.stream_swf_url(\"./$roundfolder/$flash[$mapnum].swf\");$lb"
			. $stdtab . "});$lb";*/
	}
	
	$bottomcontent = "<div class=\"mokuji\"><span class=\"m\">$diamond Information $diamond</span></div>$dlb"
		
		. $stdtab . "<div class=\"setsumei\">$lb"
		. $stdtab2 . "- Click on red arrows to head in that direction.<br>$lb"
		. $stdtab2 . "- When you mouse over blue arrows, descriptive text will appear in the upper textbox.<br>$lb"
		. $stdtab2 . "- When you find inhabitants, you can listen in to what they're saying.<br>$lb"
		. $stdtab2 . "- Confirmed compatible browsers: Chrome, Firefox, IE.<br>$lb"
		. $stdtab2 . "- Flash support is required for certain areas.$lb"
		. $stdtab . "</div>$dlb"
		
		. $stdtab . "<div class=\"centmenu\">$lb"
		. $stdtab2 . "<a href=\"?r=$currentround\">Full Zoom-Out</a> <img src=\"/other/icescream/watch/yuki2.png\" alt=\"Snowflake\" class=\"yuki\"> <a href=\"/other/icescream/\">Back to Index</a>$lb"
		. $stdtab . "</div>$lb";
}
?>
<!doctype html>
<html lang="en">
	<head>
		<title>Ice Watching</title>
		<meta name="description" content="An interactive exploration of Iceberg Isle, part of Deep-Sea Prisoner's Ice Scream series.">
		<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
		<meta name="viewport" content="width=device-width, user-scalable=yes">
		<link rel="stylesheet" type="text/css" href="/other/icescream/watch/w.css">
		<script src="../../../analytics.js"></script>
		<script>
			function scrollDown()
			{
				document.getElementsByClassName("naka1")[0].scrollIntoView();
			}
					</script>
		<!--<script src="./ruffle/ruffle.js"></script>-->
			</head>
	<body id="TOP" onLoad="scrollDown()">
		<div class="wak">
			<div class="wakue2"><p class="top"><a href="/other/icescream/"><img src="w-banner.png" title="Ice Watching" alt="Ice Watching" class="linkimg"></a></p></div>
				<div class="naka1">
					<div class="naka3">
						
																		
					</div>
				</div>
			<div class="waksita"><p class="kaitei"><a href="" class="kaitei">&copy; 2006 Deep-Sea Prisoner</a></p></div>
		</div>
	</body>
</html>