<%@LANGUAGE="VBScript"%> 
<%
' Declare & define variable for URL
Dim strURLroot
strURLroot = "http://ws258687.websoon.com/"

' Declare variables for storing virtual tour and still image info
' Note following assumptions for this version:
' * number of scenes (including "exterior") = 12
' * number of scenes with virtual tour (panoramic) images = 12
' * max. number of hotspots per scene = 4
' * max. number of stills per scene = 4
Dim intScenes, strSceneName(11), strPanoRootName
Dim strSceneInit(11), intSceneHotspots(11), strSceneHotspot(11,4)
Dim intSceneStills(11), strSceneStillSize(11,3), strSceneTnSize(11,3)

' Declare variables to assist in building web page
Dim intQueryStringCount
Dim bIsPano, bSceneMatch, bIsStill
Dim i, j
Dim strScene, strFormatScene, intSceneIndex
Dim strStill, intStill
Dim strImgWidth, strImgHeight
Dim QUOT
QUOT = CHR(34)

' Define scene names
' Note starting exterior scene must appear first
intScenes = 12
strSceneName(0) = "Inside_Dining_Hall"
strSceneName(1) = "Outside_Dining_Hall"
strSceneName(2) = "Winter_Steakhouse"
strSceneName(3) = "Frontier_Town1"
strSceneName(4) = "Frontier_Town2"
strSceneName(5) = "Teepee"
strSceneName(6) = "Chuckwagon"
strSceneName(7) = "Christmas_Rock_Overlook"
strSceneName(8) = "Village_Assembly_Hall"
strSceneName(9) = "Outdoor_Wedding_Area"
strSceneName(10) = "Chapel"
strSceneName(11) = "Chapel_Altar"

strPanoRootName = "fw_scene"

' Define initial scene views 
strSceneInit(0) = "0,320,60"
strSceneInit(1) = "0,40,60"
strSceneInit(2) = "0,240,60"
strSceneInit(3) = "0,60,60"
strSceneInit(4) = "0,150,60"
strSceneInit(5) = "0,310,60"
strSceneInit(6) = "0,220,60"
strSceneInit(7) = "0,40,60"
strSceneInit(8) = "0,330,60"
strSceneInit(9) = "0,150,60"
strSceneInit(10) = "0,270,60"
strSceneInit(11) = "0,220,60"

' Define number of hotspots per scene
intSceneHotspots(0) = 2
intSceneHotspots(1) = 3
intSceneHotspots(2) = 1
intSceneHotspots(3) = 4
intSceneHotspots(4) = 2
intSceneHotspots(5) = 3
intSceneHotspots(6) = 3
intSceneHotspots(7) = 1
intSceneHotspots(8) = 1
intSceneHotspots(9) = 1
intSceneHotspots(10) = 2
intSceneHotspots(11) = 1

' Define hotspot info
strSceneHotspot(0,0) = "0.333, 0.448, 0.336, 0.481, VirtualTour.asp?scene=" & strSceneName(1) & "#vtour_top, To_" & strSceneName(1) & ",,,"
strSceneHotspot(0,1) = "0.106, 0.451, 0.109, 0.487, VirtualTour.asp?scene=" & strSceneName(1) & "#vtour_top, To_" & strSceneName(1) & ",,,"
strSceneHotspot(0,2) = ""
strSceneHotspot(0,3) = ""
strSceneHotspot(1,0) = "0.526, 0.506, 0.529, 0.581, VirtualTour.asp?scene=" & strSceneName(0) & "#vtour_top, To_" & strSceneName(0) & ",,,"
strSceneHotspot(1,1) = "0.926, 0.550, 0.929, 0.610, VirtualTour.asp?scene=" & strSceneName(0) & "#vtour_top, To_" & strSceneName(0) & ",,,"
strSceneHotspot(1,2) = "0.231, 0.442, 0.233, 0.482, VirtualTour.asp?scene=" & strSceneName(2) & "#vtour_top, To_" & strSceneName(2) & ",,,"
strSceneHotspot(1,3) = ""
strSceneHotspot(2,0) = "0.475, 0.445, 0.485, 0.612, VirtualTour.asp?scene=" & strSceneName(3) & "#vtour_top, To_" & strSceneName(3) & ",,,"
strSceneHotspot(2,1) = ""
strSceneHotspot(2,2) = ""
strSceneHotspot(2,3) = ""
strSceneHotspot(3,0) = "0.658, 0.524, 0.662, 0.615, VirtualTour.asp?scene=" & strSceneName(2) & "#vtour_top, To_" & strSceneName(2) & ",,,"
strSceneHotspot(3,1) = "0.303, 0.369, 0.310, 0.507, VirtualTour.asp?scene=" & strSceneName(4) & "#vtour_top, To_" & strSceneName(4) & ",,,"
strSceneHotspot(3,2) = "0.618, 0.510, 0.621, 0.569, VirtualTour.asp?scene=" & strSceneName(1) & "#vtour_top, To_" & strSceneName(1) & ",,,"
strSceneHotspot(3,3) = "0.044, 0.365, 0.046, 0.405, VirtualTour.asp?scene=" & strSceneName(8) & "#vtour_top, To_" & strSceneName(8) & ",,,"
strSceneHotspot(4,0) = "0.441, 0.454, 0.449, 0.590, VirtualTour.asp?scene=" & strSceneName(3) & "#vtour_top, To_" & strSceneName(3) & ",,,"
strSceneHotspot(4,1) = "0.065, 0.501, 0.072, 0.604, VirtualTour.asp?scene=" & strSceneName(5) & "#vtour_top, To_" & strSceneName(5) & ",,,"
strSceneHotspot(4,2) = ""
strSceneHotspot(4,3) = ""
strSceneHotspot(5,0) = "0.941, 0.435, 0.950, 0.547, VirtualTour.asp?scene=" & strSceneName(6) & "#vtour_top, To_" & strSceneName(6) & ",,,"
strSceneHotspot(5,1) = "0.555, 0.432, 0.561, 0.495, VirtualTour.asp?scene=" & strSceneName(4) & "#vtour_top, To_" & strSceneName(4) & ",,,"
strSceneHotspot(5,2) = "0.175, 0.491, 0.179, 0.574, VirtualTour.asp?scene=" & strSceneName(0) & "#vtour_top, To_" & strSceneName(0) & ",,,"
strSceneHotspot(5,3) = ""
strSceneHotspot(6,0) = "0.853, 0.458, 0.862, 0.560, VirtualTour.asp?scene=" & strSceneName(0) & "#vtour_top, To_" & strSceneName(0) & ",,,"
strSceneHotspot(6,1) = "0.152, 0.372, 0.165, 0.502, VirtualTour.asp?scene=" & strSceneName(7) & "#vtour_top, To_" & strSceneName(7) & ",,,"
strSceneHotspot(6,2) = "0.952, 0.480, 0.966, 0.601, VirtualTour.asp?scene=" & strSceneName(5) & "#vtour_top, To_" & strSceneName(5) & ",,,"
strSceneHotspot(6,3) = ""
strSceneHotspot(7,0) = "0.066, 0.773, 0.074, 0.903, VirtualTour.asp?scene=" & strSceneName(6) & "#vtour_top, To_" & strSceneName(6) & ",,,"
strSceneHotspot(7,1) = ""
strSceneHotspot(7,2) = ""
strSceneHotspot(7,3) = ""
strSceneHotspot(8,0) = "0.833, 0.474, 0.835, 0.550, VirtualTour.asp?scene=" & strSceneName(3) & "#vtour_top, To_" & strSceneName(3) & ",,,"
strSceneHotspot(8,1) = ""
strSceneHotspot(8,2) = ""
strSceneHotspot(8,3) = ""
strSceneHotspot(9,0) = "0.096, 0.469, 0.101, 0.554, VirtualTour.asp?scene=" & strSceneName(10) & "&still=0#vtour_top, To_" & strSceneName(10) & ",,,"
strSceneHotspot(9,1) = ""
strSceneHotspot(9,2) = ""
strSceneHotspot(9,3) = ""
strSceneHotspot(10,0) = "0.863, 0.439, 0.879, 0.623, VirtualTour.asp?scene=" & strSceneName(11) & "#vtour_top, To_" & strSceneName(11) & ",,,"
strSceneHotspot(10,1) = "0.363, 0.456, 0.373, 0.614, VirtualTour.asp?scene=" & strSceneName(9) & "#vtour_top, To_" & strSceneName(9) & ",,,"
strSceneHotspot(10,2) = ""
strSceneHotspot(10,3) = ""
strSceneHotspot(11,0) = "0.231, 0.476, 0.240, 0.626, VirtualTour.asp?scene=" & strSceneName(10) & "#vtour_top, To_" & strSceneName(10) & ",,,"
strSceneHotspot(11,1) = ""
strSceneHotspot(11,2) = ""
strSceneHotspot(11,3) = ""

' Define number of stills per scene
intSceneStills(0) = 0
intSceneStills(1) = 1
intSceneStills(2) = 0
intSceneStills(3) = 1
intSceneStills(4) = 2
intSceneStills(5) = 2
intSceneStills(6) = 3
intSceneStills(7) = 1
intSceneStills(8) = 2
intSceneStills(9) = 3
intSceneStills(10) = 1
intSceneStills(11) = 3

' Define size of scene still images
strSceneStillSize(0,0)=""
strSceneStillSize(0,1)=""
strSceneStillSize(0,2)=""
strSceneStillSize(1,0)="427,285"
strSceneStillSize(1,1)=""
strSceneStillSize(1,2)=""
strSceneStillSize(2,0)=""
strSceneStillSize(2,1)=""
strSceneStillSize(2,2)=""
strSceneStillSize(3,0)="427,285"
strSceneStillSize(3,1)=""
strSceneStillSize(3,2)=""
strSceneStillSize(4,0)="427,285"
strSceneStillSize(4,1)="427,285"
strSceneStillSize(4,2)=""
strSceneStillSize(5,0)="427,285"
strSceneStillSize(5,1)="427,285"
strSceneStillSize(5,2)=""
strSceneStillSize(6,0)="427,285"
strSceneStillSize(6,1)="285,427"
strSceneStillSize(6,2)="285,427"
strSceneStillSize(7,0)="285,427"
strSceneStillSize(7,1)=""
strSceneStillSize(7,2)=""
strSceneStillSize(8,0)="427,320"
strSceneStillSize(8,1)="427,320"
strSceneStillSize(8,2)=""
strSceneStillSize(9,0)="427,320"
strSceneStillSize(9,1)="240,320"
strSceneStillSize(9,2)="427,320"
strSceneStillSize(10,0)="427,320"
strSceneStillSize(10,1)=""
strSceneStillSize(10,2)=""
strSceneStillSize(11,0)="427,320"
strSceneStillSize(11,1)="427,320"
strSceneStillSize(11,2)="427,320"

' Define size of scene thumbnail images
strSceneTnSize(0,0)=""
strSceneTnSize(0,1)=""
strSceneTnSize(0,2)=""
strSceneTnSize(1,0)="96,64"
strSceneTnSize(1,1)=""
strSceneTnSize(1,2)=""
strSceneTnSize(2,0)=""
strSceneTnSize(2,1)=""
strSceneTnSize(2,2)=""
strSceneTnSize(3,0)="96,64"
strSceneTnSize(3,1)=""
strSceneTnSize(3,2)=""
strSceneTnSize(4,0)="96,64"
strSceneTnSize(4,1)="96,64"
strSceneTnSize(4,2)=""
strSceneTnSize(5,0)="96,64"
strSceneTnSize(5,1)="96,64"
strSceneTnSize(5,2)=""
strSceneTnSize(6,0)="96,64"
strSceneTnSize(6,1)="64,96,"
strSceneTnSize(6,2)="64,96"
strSceneTnSize(7,0)="64,96,"
strSceneTnSize(7,1)=""
strSceneTnSize(7,2)=""
strSceneTnSize(8,0)="100,75"
strSceneTnSize(8,1)="100,75"
strSceneTnSize(8,2)=""
strSceneTnSize(9,0)="100,75"
strSceneTnSize(9,1)="56,75"
strSceneTnSize(9,2)="100,75"
strSceneTnSize(10,0)="100,75"
strSceneTnSize(10,1)=""
strSceneTnSize(10,2)=""
strSceneTnSize(11,0)="100,75"
strSceneTnSize(11,1)="100,75"
strSceneTnSize(11,2)="100,75"

' Define function for formatting scene name
Function formatSceneName(strScene)
  varStrName = strScene
  If (varStrName = "frontier_town1") Or (varStrName = "frontier_town2") Then
     varStrName = "frontier_town"
  End If

  formatSceneName = Replace(varStrName, "_", " ")
End Function

' Retrieve scene and still parameters passed via url
' Note following assumptions:
' * 0 parameters indicates first visit
' * 1 parameter indicates panoramic image
' * 2 or more parameters indicates still image; extra parameters ignored 
' Scene 6, still 1 (chuckwagon) is default image
intQueryStringCount = Request.QueryString.Count
Select Case intQueryStringCount
   Case 0
      strScene = strSceneName(6)
      intStill = 0
      bIsPano = False
      bIsStill = True
   Case 1
      If Len(Request.QueryString("scene")) > 0 Then
         strScene = Request.QueryString("scene")
         intStill = -1
         bIsPano = True
         bIsStill = False 
      Else 
         strScene = strSceneName(6)
         intStill = 0
         bIsPano = False
         bIsStill = True
      End If
   Case Else
      If Len(Request.QueryString("scene")) > 0 Then
         strScene = Request.QueryString("scene")
         intStill = CInt(Request.QueryString("still")) 
         bIsPano = False
         bIsStill = True
      Else 
         strScene = strSceneName(6)
         intStill = 0
         bIsPano = False
         bIsStill = True
      End If      
End Select 

' Check for scene match; default to still if no match
bSceneMatch = FALSE
i = 0
Do While ((NOT bSceneMatch) And (i < intScenes))
   If strScene = strSceneName(i) Then
      bSceneMatch = TRUE
      intSceneIndex = i
   Else 
      i = i + 1
   End If
Loop
If (NOT bSceneMatch) Then
   strScene = strSceneName(6)
   intSceneIndex = 6
   intStill = 0
End If

strFormatScene = formatSceneName(strScene)
%>

<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<HTML>
<HEAD>
<TITLE>Flying W Ranch, located in Colorado Springs, Colorado</TITLE>
<meta HTTP-EQUIV="refresh" CONTENT="0;URL=http://www.azeats.com/flyingwranch/vtour/VirtualTour.asp">
<META http-equiv="Content-Type" content="text/html; charset=utf-8">
<META content="JavaScript" name="vs_defaultClientScript">
<META content=
"Cowboy Ranch Colorado. Dude Ranch. The best in Western Food and Entertainment. Chuck wagon suppers and western stage shows! with the Flying W Wranglers in Colorado Springs, Colorado."
 name="Description">
<META content=
"Cowboy Ranch Colorado, Dude Ranch, Flying W Ranch located in Colorado Springs Colorado, chuck wagon suppers, western stage shows, country music, Company picnics, Flying W Wranglers"
 name="keywords">
<LINK href="cms.css" type="text/css" rel="stylesheet">
<LINK href="User.css" type="text/css" rel="stylesheet">
<!-- Needed to remove the default 3px margin that IE 5.x on MAC adds to floated images -->
<STYLE type="text/css" media="all">
IMG.imgmargin {
    MARGIN: 0px
}
</STYLE>

<SCRIPT language="javascript" src="js/script.js" type=
"text/javascript">
</SCRIPT>

<SCRIPT language="Javascript" type="text/javascript">
<!-- Mouse rollover script for interactive map navigation
if (document.images) {
   inside_dining_hall = new Image();
   inside_dining_hall.src = "images/fw_map1.gif";
   outside_dining_hall = new Image();
   outside_dining_hall.src = "images/fw_map2.gif";
   winter_steakhouse = new Image();
   winter_steakhouse.src = "images/fw_map3.gif";
   frontier_town1 = new Image();
   frontier_town1.src = "images/fw_map4.gif";
   frontier_town2 = new Image();
   frontier_town2.src = "images/fw_map5.gif";
   teepee = new Image();
   teepee.src = "images/fw_map6.gif";
   chuckwagon = new Image();
   chuckwagon.src = "images/fw_map7.gif";
   christmas_rock_overlook = new Image();
   christmas_rock_overlook.src = "images/fw_map8.gif";
   village_assembly_hall = new Image();
   village_assembly_hall.src = "images/fw_map9.gif";
   outdoor_wedding_area= new Image();
   outdoor_wedding_area.src = "images/fw_map10.gif";
   chapel = new Image();
   chapel.src = "images/fw_map11.gif";
   chapel_altar = new Image();
   chapel_altar.src = "images/fw_map11.gif";
}

function imageOver(areaName) {
   if (document.images) {
      if (areaName == "inside_dining_hall") {
         document.images["fw_map"].src=eval("inside_dining_hall.src");
      }
      if (areaName == "outside_dining_hall") {
         document.images["fw_map"].src=eval("outside_dining_hall.src");
      }
      if (areaName == "winter_steakhouse") {
         document.images["fw_map"].src=eval("winter_steakhouse.src");
      }
      if (areaName == "frontier_town1") {
         document.images["fw_map"].src=eval("frontier_town1.src");
      }
      if (areaName == "frontier_town2") {
         document.images["fw_map"].src=eval("frontier_town2.src");
      }
      if (areaName == "teepee") {
         document.images["fw_map"].src=eval("teepee.src");
      }
      if (areaName == "chuckwagon") {
         document.images["fw_map"].src=eval("chuckwagon.src");
      }
      if (areaName == "christmas_rock_overlook") {
         document.images["fw_map"].src=eval("christmas_rock_overlook.src");
      }
      if (areaName == "village_assembly_hall") {
         document.images["fw_map"].src=eval("village_assembly_hall.src");
      }
      if (areaName == "outdoor_wedding_area") {
         document.images["fw_map"].src=eval("outdoor_wedding_area.src");
      }
      if (areaName == "chapel") {
         document.images["fw_map"].src=eval("chapel.src");
      }
      if (areaName == "chapel_altar") {
         document.images["fw_map"].src=eval("chapel_altar.src");
      }
   }
}

function imageOut(areaName) {
   if (document.images) {
      if (areaName == "inside_dining_hall") {
         document.images["fw_map"].src=eval("inside_dining_hall.src");
      }
      if (areaName == "outside_dining_hall") {
         document.images["fw_map"].src=eval("outside_dining_hall.src");
      }
      if (areaName == "winter_steakhouse") {
         document.images["fw_map"].src=eval("winter_steakhouse.src");
      }
      if (areaName == "frontier_town1") {
         document.images["fw_map"].src=eval("frontier_town1.src");
      }
      if (areaName == "frontier_town2") {
         document.images["fw_map"].src=eval("frontier_town2.src");
      }
      if (areaName == "teepee") {
         document.images["fw_map"].src=eval("teepee.src");
      }
      if (areaName == "chuckwagon") {
         document.images["fw_map"].src=eval("chuckwagon.src");
      }
      if (areaName == "christmas_rock_overlook") {
         document.images["fw_map"].src=eval("christmas_rock_overlook.src");
      }
      if (areaName == "village_assembly_hall") {
         document.images["fw_map"].src=eval("village_assembly_hall.src");
      }
      if (areaName == "outdoor_wedding_area") {
         document.images["fw_map"].src=eval("outdoor_wedding_area.src");
      }
      if (areaName == "chapel") {
         document.images["fw_map"].src=eval("chapel.src");
      }
      if (areaName == "chapel_altar") {
         document.images["fw_map"].src=eval("chapel_altar.src");
      }
   }
}

//-->
</SCRIPT>

<META content="All" name="ROBOTS">
<!-- Cowboy Ranch Colorado. Dude Ranch. The best in Western Food and Entertainment. Chuck wagon suppers and  western stage shows! with the Flying W Wranglers in Colorado Springs, Colorado. -->
</HEAD>
<BODY bgcolor="#000000">

<TABLE cellspacing="0" cellpadding="0" align="left">
<TBODY>
<TR>
<TD>
<DIV id="thisPage"><SPAN id="RadDesigner1">
<TABLE height="100%" cellspacing="0" cellpadding="0" width="100%">
<TBODY>
<TR>
<TD valign="top">
<TABLE cellspacing="0" cellpadding="0">
<TBODY>
<TR>
<TD class="Transparent" valign="top" align="middle" width="1000"
bgcolor="#ffffff" colspan="2" height="211">
<TABLE height="100%" cellspacing="0" cellpadding="0" width="100%">
<TBODY>
<TR>
<TD valign="top">
<TABLE height="100%" cellspacing="0" cellpadding="0" width="100%">
<TBODY>
<TR>
<TD class="SubpageBanner" valign="top" align="left" width="1000"
bgcolor="#ffffff" height="111">
<TABLE height="100%" cellspacing="0" cellpadding="0" width="100%">
<TBODY>
<TR>
<TD valign="top" align="left">
<TABLE style="MARGIN-TOP: 5px; MARGIN-LEFT: 118px" height="100"
cellspacing="0" cellpadding="0" width="240" border="0">
<TBODY>
<TR>
<TD valign="top"><a href="http://www.flyingw.com/default.aspx"><IMG height="95" alt=
"Home" src="images/pixel.gif" width="240" border="0"></a> </TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>

<TR>
<TD class="TopMenu" valign="top" align="left" width="1000" bgcolor=
"#ffffff" height="100">
<TABLE height="100%" cellspacing="0" cellpadding="0" width="100%">
<TBODY>
<TR>
<TD valign="top" align="left">
<DIV class="MenuGroup" style="Z-INDEX: 999999; CURSOR: hand" align=
"left">
<SCRIPT src="js/RadMenu_Utils.js" type="text/javascript">
</SCRIPT>

<SCRIPT src="js/RadHelper.js" type="text/javascript">
</SCRIPT>

<SCRIPT src="js/RadBrowser.js" type="text/javascript">
</SCRIPT>

<SCRIPT src="js/RadFilters.js" type="text/javascript">
</SCRIPT>
 
<SCRIPT src="js/RadMenu_Globals.js" type="text/javascript">
</SCRIPT>

<SCRIPT src="js/RadMenu.js" type="text/javascript">
</SCRIPT>

<SCRIPT src="js/RadMenu_Keyboard.js" type="text/javascript">
</SCRIPT>

<SCRIPT src="js/RadImageCache.js" type="text/javascript">
</SCRIPT>

<SPAN id="RadDesigner1__ctl1_Menu1StyleSheetHolder" style=
"DISPLAY: none"></SPAN> 

<SCRIPT type="text/javascript">
RadMenuAppendStyleSheet('RadDesigner1__ctl1_Menu1', 'menu.css');
</SCRIPT>

<DIV id="group604" style=
"Z-INDEX: 1000000; LEFT: -500px; VISIBILITY: hidden; WIDTH: 0px; POSITION: absolute; TOP: -2000px; HEIGHT: 0px">
<TABLE class="SubMenu0" cellSpacing="0"
cellPadding="0">
<TBODY></TBODY></TABLE></DIV>

<DIV id="group622" style=
"Z-INDEX: 1000000; LEFT: -500px; VISIBILITY: hidden; WIDTH: 0px; POSITION: absolute; TOP: -2000px; HEIGHT: 0px">
<TABLE class="SubMenu0" cellSpacing="0"
cellPadding="0">
<TBODY></TBODY></TABLE></DIV>

<DIV id="group639" style=
"Z-INDEX: 1000000; LEFT: -500px; VISIBILITY: hidden; WIDTH: 0px; POSITION: absolute; TOP: -2000px; HEIGHT: 0px">
<TABLE class="SubMenu0" cellSpacing="0"
cellPadding="0">
<TBODY></TBODY></TABLE></DIV>

<DIV id="group633" style=
"Z-INDEX: 1000000; LEFT: -500px; VISIBILITY: hidden; WIDTH: 0px; POSITION: absolute; TOP: -2000px; HEIGHT: 0px">
<TABLE class="SubMenu0" cellSpacing="0"
cellPadding="0">
<TBODY></TBODY></TABLE></DIV>

<DIV id="group647" style=
"Z-INDEX: 1000000; LEFT: -500px; VISIBILITY: hidden; WIDTH: 0px; POSITION: absolute; TOP: -2000px; HEIGHT: 0px">
<TABLE class="SubMenu0" cellSpacing="0"
cellPadding="0">
<TBODY></TBODY></TABLE></DIV>

<DIV id="group643" style=
"Z-INDEX: 1000000; LEFT: -500px; VISIBILITY: hidden; WIDTH: 0px; POSITION: absolute; TOP: -2000px; HEIGHT: 0px">
<TABLE class="SubMenu0" cellSpacing="0"
cellPadding="0">
<TBODY></TBODY></TABLE></DIV>

<DIV id="group613" style=
"Z-INDEX: 1000000; LEFT: -500px; VISIBILITY: hidden; WIDTH: 0px; POSITION: absolute; TOP: -2000px; HEIGHT: 0px">
<TABLE class="SubMenu0" cellSpacing="0"
cellPadding="0">
<TBODY></TBODY></TABLE></DIV>

<DIV id="group619" style=
"Z-INDEX: 1000000; LEFT: -500px; VISIBILITY: hidden; WIDTH: 0px; POSITION: absolute; TOP: -2000px; HEIGHT: 0px">
<TABLE class="SubMenu0" cellSpacing="0"
cellPadding="0">
<TBODY></TBODY></TABLE></DIV>

<DIV id="RadDesigner1__ctl1_Menu1_g">
<TABLE class="MenuGroup" style="WIDTH: 0px; HEIGHT: 0px"
cellspacing="0" cellpadding="0">
<TBODY>
<TR>
<TD>
<TABLE class="MenuItem0" id="menu595" cellspacing="0" cellpadding=
"0">
<TBODY>
<TR>
<TD><a href="http://www.flyingw.com/ChuckwagonSuppers.aspx"><IMG style=
"BORDER-RIGHT: medium none; BORDER-TOP: medium none; BORDER-LEFT: medium none; BORDER-BOTTOM: medium none"
 alt="CHUCKWAGON SUPPERS" src="images/InnerChuckwagon.jpg"></a></TD>
</TR>
</TBODY>
</TABLE>
</TD>
<TD>
<TABLE class="MenuItem0" id="menu596" cellspacing="0" cellpadding=
"0">
<TBODY>
<TR>
<TD><a href="http://www.flyingw.com/WinterSteakhouse.aspx"><IMG style=
"BORDER-RIGHT: medium none; BORDER-TOP: medium none; BORDER-LEFT: medium none; BORDER-BOTTOM: medium none"
 alt="WINTER STEAKHOUSE" src="images/InnerWinter.jpg"></a></TD>
</TR>
</TBODY>
</TABLE>
</TD>
<TD>
<TABLE class="MenuItem0" id="menu597" cellspacing="0" cellpadding=
"0">
<TBODY>
<TR>
<TD><a href="http://www.flyingw.com/TheFlyingWWranglers.aspx"><IMG style=
"BORDER-RIGHT: medium none; BORDER-TOP: medium none; BORDER-LEFT: medium none; BORDER-BOTTOM: medium none"
 alt="THE FLYING W WRANGLERS" src="images/InnerTheFlying.jpg"></a></TD>
</TR>
</TBODY>
</TABLE>
</TD>
<TD>
<TABLE class="MenuItem0" id="menu598" cellspacing="0" cellpadding=
"0">
<TBODY>
<TR>
<TD><a href="http://www.flyingw.com/PrivateEvents.aspx"><IMG style=
"BORDER-RIGHT: medium none; BORDER-TOP: medium none; BORDER-LEFT: medium none; BORDER-BOTTOM: medium none"
 alt="PRIVATE EVENTS" src="images/InnerPrivate.jpg"></a></TD>
</TR>
</TBODY>
</TABLE>
</TD>
<TD>
<TABLE class="MenuItem0" id="menu599" cellspacing="0" cellpadding=
"0">
<TBODY>
<TR>
<TD><a href="http://www.flyingw.com/Weddings.aspx"><IMG style=
"BORDER-RIGHT: medium none; BORDER-TOP: medium none; BORDER-LEFT: medium none; BORDER-BOTTOM: medium none"
 alt="WEDDINGS" src="images/InnerWeddings.jpg"></a></TD>
</TR>
</TBODY>
</TABLE>
</TD>
<TD>
<TABLE class="MenuItem0" id="menu600" cellspacing="0" cellpadding=
"0">
<TBODY>
<TR>
<TD><a href="http://www.flyingw.com/Reunions.aspx"><IMG style=
"BORDER-RIGHT: medium none; BORDER-TOP: medium none; BORDER-LEFT: medium none; BORDER-BOTTOM: medium none"
 alt="REUNIONS" src="images/InnerReunions.jpg"></a></TD>
</TR>
</TBODY>
</TABLE>
</TD>
<TD>
<TABLE class="MenuItem0" id="menu601" cellspacing="0" cellpadding=
"0">
<TBODY>
<TR>
<TD><a href="http://www.flyingw.com/FlyingWOnlineStore.aspx"><IMG style=
"BORDER-RIGHT: medium none; BORDER-TOP: medium none; BORDER-LEFT: medium none; BORDER-BOTTOM: medium none"
 alt="FLYING W ONLINE STORE" src="images/InnerFlyingW.jpg"></a></TD>
</TR>
</TBODY>
</TABLE>
</TD>
<TD>
<TABLE class="MenuItem0" id="menu602" cellspacing="0" cellpadding=
"0">
<TBODY>
<TR>
<TD><a href="http://www.flyingw.com/AboutUs.aspx"><IMG style=
"BORDER-RIGHT: medium none; BORDER-TOP: medium none; BORDER-LEFT: medium none; BORDER-BOTTOM: medium none"
 alt="ABOUT US" src="images/InnerAboutUs.jpg"></a></TD>
</TR>
</TBODY>
</TABLE>
</TD>
<TD>
<TABLE class="MenuItem0" id="menu603" cellspacing="0" cellpadding=
"0">
<TBODY>
<TR>
<TD><a href="http://www.flyingw.com/MissionStatement.aspx"><IMG style=
"BORDER-RIGHT: medium none; BORDER-TOP: medium none; BORDER-LEFT: medium none; BORDER-BOTTOM: medium none"
 alt="MISSION STATEMENT" src="images/InnerMission.jpg"></a></TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
</TBODY>
</TABLE>
</DIV>

<SCRIPT type="text/javascript">
/* <![CDATA[
 */window.RadDesigner1__ctl1_Menu1ImagesData = [
["MenuImages/InnerTheFlying.jpg","MenuImages/InnerChuckwagon.jpg","MenuImages/InnerWeddings_Sel.jpg","MenuImages/InnerFlyingW.jpg","MenuImages/InnerTheFlying_Sel.jpg","MenuImages/InnerWinter.jpg","MenuImages/InnerChuckwagon_Sel.jpg","MenuImages/InnerReunions_Sel.jpg","MenuImages/InnerPrivate.jpg","MenuImages/InnerFlyingW_Sel.jpg","MenuImages/InnerPrivate_Sel.jpg","MenuImages/InnerWinter_Sel.jpg","MenuImages/InnerMission.jpg","MenuImages/InnerMission_Sel.jpg","MenuImages/InnerAboutUs.jpg","MenuImages/InnerReunions.jpg","MenuImages/InnerWeddings.jpg","MenuImages/InnerAboutUs_Sel.jpg"]
];
window.RadDesigner1__ctl1_Menu1MenuData = [
["RadDesigner1__ctl1_Menu1",0,999999,,"images/",1,0,0,0,0,,1,1,0,0,0,0,0,,,"MenuItemLevelCss","MenuItem","MenuItemOver","MenuItemClicked","MenuItemDisabled",0,5,0,"topscroll.gif","topscrolld.gif","bottomscroll.gif","bottomscrolld.gif","arrow.gif","leftscroll.gif","leftscrolld.gif","rightscroll.gif","rightscrolld.gif","MenuScroll","MenuScrollOver","MenuScrollClicked","MenuScrollDisabled",6,1,500,100,3,"Black",500,"MenuGroup",0,"RadDesigner1__ctl1_Menu1_g","/RadControls/Menu/Images/",,,,]];
window.RadDesigner1__ctl1_Menu1GroupData = [
["group604",,"menu595",5,5,1,0,"SubMenu0",,2,,,,0,0,,],
["group622",,"menu598",5,5,1,0,"SubMenu0",,2,,,,0,0,,],
["group639",,"menu600",5,5,1,0,"SubMenu0",,2,,,,0,0,,],
["group633",,"menu599",5,5,1,0,"SubMenu0",,2,,,,0,0,,],
["group647",,"menu602",5,5,1,0,"SubMenu0",,2,,,,0,0,,],
["group643",,"menu601",5,5,1,0,"SubMenu0",,2,,,,0,0,,],
["group613",,"menu596",5,5,1,0,"SubMenu0",,2,,,,0,0,,],
["group619",,"menu597",5,5,1,0,"SubMenu0",,2,,,,0,0,,],
["RadDesigner1__ctl1_Menu1_g",,,5,5,0,0,,,,,250,2,0,0,,]];
window.RadDesigner1__ctl1_Menu1ItemData = [
["menu595","RadDesigner1__ctl1_Menu1_g",0,0,0,"MenuImages/InnerChuckwagon.jpg",,,"MenuImages/InnerChuckwagon_Sel.jpg",,,,,,,,,"MenuItem0",,"MenuItemOver0","MenuItemOver0",,,"CHUCKWAGON SUPPERS",,,,,"<% =strURLroot %>ChuckwagonSuppers.aspx",,,,"CHUCKWAGON SUPPERS",,,,,,,,,,1,1,1,1,0,,,,"group604",,,,,0,],
["menu596","RadDesigner1__ctl1_Menu1_g",0,0,0,"MenuImages/InnerWinter.jpg",,,"MenuImages/InnerWinter_Sel.jpg",,,,,,,,,"MenuItem0",,"MenuItemOver0","MenuItemOver0",,,"WINTER STEAKHOUSE",,,,,"<% =strURLroot %>WinterSteakhouse.aspx",,,,"WINTER STEAKHOUSE",,,,,,,,,,1,1,1,1,0,,,,"group613",,,,,0,],
["menu597","RadDesigner1__ctl1_Menu1_g",0,0,0,"MenuImages/InnerTheFlying.jpg",,,"MenuImages/InnerTheFlying_Sel.jpg",,,,,,,,,"MenuItem0",,"MenuItemOver0","MenuItemOver0",,,"THE FLYING W WRANGLERS",,,,,"<% =strURLroot %>TheFlyingWWranglers.aspx",,,,"THE FLYING W WRANGLERS",,,,,,,,,,1,1,1,1,0,,,,"group619",,,,,0,],
["menu598","RadDesigner1__ctl1_Menu1_g",0,0,0,"MenuImages/InnerPrivate.jpg",,,"MenuImages/InnerPrivate_Sel.jpg",,,,,,,,,"MenuItem0",,"MenuItemOver0","MenuItemOver0",,,"PRIVATE EVENTS",,,,,"<% =strURLroot %>PrivateEvents.aspx",,,,"PRIVATE EVENTS",,,,,,,,,,1,1,1,1,0,,,,"group622",,,,,0,],
["menu599","RadDesigner1__ctl1_Menu1_g",0,0,0,"MenuImages/InnerWeddings.jpg",,,"MenuImages/InnerWeddings_Sel.jpg",,,,,,,,,"MenuItem0",,"MenuItemOver0","MenuItemOver0",,,"WEDDINGS",,,,,"<% =strURLroot %>Weddings.aspx",,,,"WEDDINGS",,,,,,,,,,1,1,1,1,0,,,,"group633",,,,,0,],
["menu600","RadDesigner1__ctl1_Menu1_g",0,0,0,"MenuImages/InnerReunions.jpg",,,"MenuImages/InnerReunions_Sel.jpg",,,,,,,,,"MenuItem0",,"MenuItemOver0","MenuItemOver0",,,"REUNIONS",,,,,"<% =strURLroot %>Reunions.aspx",,,,"REUNIONS",,,,,,,,,,1,1,1,1,0,,,,"group639",,,,,0,],
["menu601","RadDesigner1__ctl1_Menu1_g",0,0,0,"MenuImages/InnerFlyingW.jpg",,,"MenuImages/InnerFlyingW_Sel.jpg",,,,,,,,,"MenuItem0",,"MenuItemOver0","MenuItemOver0",,,"FLYING W ONLINE STORE",,,,,"<% =strURLroot %>FlyingWOnlineStore.aspx",,,,"FLYING W ONLINE STORE",,,,,,,,,,1,1,1,1,0,,,,"group643",,,,,0,],
["menu602","RadDesigner1__ctl1_Menu1_g",0,0,0,"MenuImages/InnerAboutUs.jpg",,,"MenuImages/InnerAboutUs_Sel.jpg",,,,,,,,,"MenuItem0",,"MenuItemOver0","MenuItemOver0",,,"ABOUT US",,,,,"<% =strURLroot %>AboutUs.aspx",,,,"ABOUT US",,,,,,,,,,1,1,1,1,0,,,,"group647",,,,,0,],
["menu603","RadDesigner1__ctl1_Menu1_g",0,0,0,"MenuImages/InnerMission.jpg",,,"MenuImages/InnerMission_Sel.jpg",,,,,,,,,"MenuItem0",,"MenuItemOver0","MenuItemOver0",,,"MISSION STATEMENT",,,,,"<% =strURLroot %>MissionStatement.aspx",,,,"MISSION STATEMENT",,,,,,,,,,1,1,1,1,0,,,,,,,,,0,]];
window.RadDesigner1__ctl1_Menu1ItemCustomData = [
];
window.RadDesigner1__ctl1_Menu1 =  new RadMenu(RadDesigner1__ctl1_Menu1MenuData,RadDesigner1__ctl1_Menu1GroupData,RadDesigner1__ctl1_Menu1ItemData,RadDesigner1__ctl1_Menu1ItemCustomData);


var icRadDesigner1__ctl1_Menu1 = new ImageCache(RadDesigner1__ctl1_Menu1ImagesData, function(){RadDesigner1__ctl1_Menu1.ImagePreload();});
/* ]]>
 */
</SCRIPT>

 
<NOSCRIPT>
<OL>
<LI><A href=
"<% = strURLroot%>/ChuckwagonSuppers.aspx">CHUCKWAGON
SUPPERS</A></LI>

<LI><A href=
"<% =strURLroot%>/WinterSteakhouse.aspx">WINTER
STEAKHOUSE</A></LI>

<LI><A href=
"<% =strURLroot%>/TheFlyingWWranglers.aspx">THE FLYING W
WRANGLERS</A></LI>

<LI><A href=
"<% =strURLroot%>/PrivateEvents.aspx">PRIVATE
EVENTS</A></LI>

<LI><A href=
"<% =strURLroot%>/Weddings.aspx">WEDDINGS</A></LI>

<LI><A href=
"<% =strURLroot%>/Reunions.aspx">REUNIONS</A></LI>

<LI><A href=
"<% =strURLroot%>/FlyingWOnlineStore.aspx">FLYING W
ONLINE STORE</A></LI>

<LI><A href="<% =strURLroot%>/AboutUs.aspx">ABOUT
US</A></LI>

<LI><A href=
"<% =strURLroot%>/MissionStatement.aspx">MISSION
STATEMENT</A></LI>
</OL>
</NOSCRIPT></DIV>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>

<TR>
<TD class="LeftPanelRepeating" valign="top" align="left" width=
"246" bgcolor="#ffffff" height="488">
<TABLE cellspacing="0" cellpadding="0">
<TBODY>
<TR>
<TD valign="top">
<TABLE cellspacing="0" cellpadding="0">
<TBODY>
<TR>
<TD class="Transparent" valign="top" align="left" width="246"
bgcolor="#ffffff" height="268">
<TABLE height="100%" cellspacing="0" cellpadding="0" width="100%">
<TBODY>
<TR>
<TD valign="top" align="left">
<TABLE cellspacing="0" cellpadding="0" width="246" border="0">
<TBODY>
<TR valign="top">
<TD><SPAN id="RadDesigner1__ctl2_lblMessage" style=
"FONT-WEIGHT: bold; COLOR: red"></SPAN></TD>
</TR>
<TR valign="top">
<TD><script type="text/javascript"><!--
google_ad_client = "pub-5169407817026918";
/* 120x240, flyingW 4/25/10 */
google_ad_slot = "6913432295";
google_ad_width = 120;
google_ad_height = 240;
//-->
</script>
<script type="text/javascript"
src="http://pagead2.googlesyndication.com/pagead/show_ads.js">
</script></TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>

<TR>
<TD class="Transparent" valign="top" align="left" width="246"
bgcolor="#ffffff" height="250">
<TABLE border="0" height="100%" cellspacing="0" cellpadding="0"
width="100%">
<TBODY>
<TR>
<TD valign="top" align="left">
<DIV id="RadDesigner1__ctl3_editor1_wrapper"><!-- 6.6.2 -->
<DIV id="RadDesigner1__ctl3_editor1"><BR>
 

<BR>
 

<TABLE cellspacing="0" cellpadding="0" border="0" height="150">
<TBODY>
<TR>
<TD>
<div style="position: absolute; width: 100px; height: 100px; left: 706px; top: 633px" id="layer1">
<script type="text/javascript"><!--
google_ad_client = "pub-5169407817026918";
/* 250x250, created 11/15/07 */
google_ad_slot = "0547648113";
google_ad_width = 250;
google_ad_height = 250;
//-->
</script>
<script type="text/javascript"
src="http://pagead2.googlesyndication.com/pagead/show_ads.js">
</script></div>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;


</TD>
</TR>
</TBODY>
</TABLE>
</DIV>
</DIV>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
<TD class="SubpageContentBackground" valign="top" align="left"
width="754" bgcolor="#ffffff" height="488">
<TABLE border="0" height="100%" cellspacing="0" cellpadding="0" width="100%">
<TBODY>
<TR>
<TD valign="top">
<TABLE border="0" height="100%" cellspacing="0" cellpadding="0" width="100%">
<TBODY>
<TR>
<TD class="SubpageContentBackground" valign="top" align="left"
width="405" bgcolor="#ffffff" height="463">
<TABLE height="100%" cellspacing="0" cellpadding="0" width="100%">
<TBODY>
<TR>
<TD valign="top">
<TABLE border="0" height="100%" cellspacing="0" cellpadding="0" width="100%">
<TBODY>
<TR>
<TD class="Transparent" valign="top" align="left" width="19"
bgcolor="#ffffff" height="463">
<TABLE height="100%" cellspacing="0" cellpadding="0" width="100%">
<TBODY>
<TR>
<TD valign="top" align="left"></TD>
</TR>
</TBODY>
</TABLE>
</TD>
<TD class="Transparent" valign="top" align="left" width="456"
bgcolor="#ffffff" height="463">
<TABLE height="100%" cellspacing="0" cellpadding="0" width="100%">
<TBODY>
<TR>
<TD valign="top" align="left">
<DIV id="RadDesigner1__ctl4_editor1_wrapper"><!-- 6.6.2 -->
<DIV id="RadDesigner1__ctl4_editor1"><A name="vtour_top"></A><FONT class="SubH1">Virtual
Tour</FONT><BR>
<IMG src="images/BarImage.jpg" border="0"> 
<!-- start of v tour content -->
<%
Function invokeVtourApplet()
'  Output generic v tour applet call
   Response.Write "<SCRIPT type=" & QUOT & "text/javascript" & QUOT & " language=" & QUOT & "JavaScript" & QUOT & ">" & vbCrLf
   Response.Write "<!--" & vbCrLf
   Response.Write "var browser = navigator.appName;" & vbCrLf
   Response.Write "var version = parseFloat(navigator.appVersion);" & vbCrLf
   Response.Write "if (browser == 'Netscape' && version < 4.0) {" & vbCrLf
   Response.Write "   document.write('<applet archive=" & QUOT & "lpjpanoNS3.zip" & QUOT & " code=" & QUOT & "panoapplet.class" & QUOT & " archive=" & QUOT & "panoapplet.jar" & QUOT & " width=427 height=240>');" & vbCrLf
   Response.Write "}" & vbCrLf
   Response.Write "else {" & vbCrLf
   Response.Write "  document.write('<applet name=" & QUOT & "panoapplet" & QUOT & " code=" & QUOT & "panoapplet.class" & QUOT & " archive=" & QUOT & "panoapplet.jar" & QUOT & " width=427 height=240>');" & vbCrLf
   Response.Write "}" & vbCrLf
   Response.Write "document.write('<param name=altSplash value=" & QUOT & "../vtour/images/coeats_splash.gif" & QUOT & ">');" & vbCrLf
   Response.Write "document.write('<param name=autospin value=" & QUOT & "-60" & QUOT & ">');" & vbCrLf
   Response.Write "document.write('<param name=showHotspots value=" & QUOT & "true" & QUOT & ">');" & vbCrLf
End Function

Function addVtourTips()
'  Output select tag with v tour navigation tips
   Response.Write "<SELECT>" & vbCrLf
   Response.Write "<OPTION selected><SPAN class=" & QUOT & "tipsText" & QUOT & ">Virtual Tour Navigation Tips...</SPAN></OPTION>" & vbCrLf
   Response.Write "<OPTION></OPTION>" & vbCrLf
   Response.Write "<OPTION><SPAN class=" & QUOT & "tipsText" & QUOT & ">To Pan....................Click left mouse button &amp; drag in desired direction.</SPAN></OPTION>" & vbCrLf
   Response.Write "<OPTION><SPAN class=" & QUOT & "tipsText" & QUOT & ">To Zoom In............Press " & QUOT & "shift" & QUOT & " or " & QUOT & "a" & QUOT & " key, click left mouse button &amp; drag.</SPAN></OPTION>" & vbCrLf
   Response.Write "<OPTION><SPAN class=" & QUOT & "tipsText" & QUOT & ">To Zoom Out.........Press " & QUOT & "ctrl" & QUOT & " or " & QUOT & "z" & QUOT & " key, click left mouse button &amp; drag.</SPAN></OPTION>" & vbCrLf
   Response.Write "<OPTION><SPAN class=" & QUOT & "tipsText" & QUOT & ">To Change Scenes...Click left mouse button on bullseye in image</SPAN></OPTION>" & vbCrLf
   Response.Write "</SELECT>" & vbCrLf
End Function

Response.Write "<BR><SPAN class=" & QUOT & "SubH2" & QUOT & ">" & strFormatScene & "</SPAN>" & vbCrLf
Response.Write "<DIV align=" & QUOT & "CENTER" & QUOT & ">" & vbCrLf

If bIsStill = True Then
'  Display still image page
'  Extract still dimensions
   intDelimitPos = InStr(strSceneStillSize(intSceneIndex,intStill),",")
   strImgWidth = Left(strSceneStillSize(intSceneIndex,intStill),(intDelimitPos-1))
   strImgHeight = Right(strSceneStillSize(intSceneIndex,intStill),(Len(strSceneStillSize(intSceneIndex,intStill))-intDelimitPos))

'  Output panoramic image link
   Response.write "<BR><A href=" & QUOT & "VirtualTour.asp?scene=" & strSceneName(intSceneIndex) & "#vtour_top" & QUOT & ">" & vbCrLf

'  Output still image
   Response.write "<IMG src=" & QUOT & "images/stills/" & LCase(strSceneName(intSceneIndex)) & "_still" & intStill & ".jpg" & QUOT & " width=" & QUOT & strImgWidth & QUOT & " height=" & QUOT & strImgHeight & QUOT & " border=" & QUOT & "0" & QUOT & " alt=" & QUOT & "Click on image or map to continue virtual tour" & QUOT & "></A><BR>" & vbCrLf
   Response.Write "<SPAN class=" & QUOT & "Subtext" & QUOT & ">Click on image or map to continue virtual tour</SPAN>" & vbCrLf
End If 

If bIsPano = True Then
'  Display panoramic image page
   Response.Write "<FORM>" & vbCrLf
   invokeVtourApplet() 
   Response.Write "document.write('<param name=file value=" & QUOT
   Response.Write LCase(strSceneName(intSceneIndex)) & ".ivr" & QUOT & ">');" & vbCrLf
   Response.Write "document.write('<param name=" & QUOT & "initialView" & QUOT & " VALUE=" & QUOT & strSceneInit(intSceneIndex) & QUOT & ">');" & vbCrLf
   For j = 0 To (intSceneHotspots(intSceneIndex)-1)
      Response.Write "document.write('<param name=hotspot" & j+1 & " value=" & QUOT & strSceneHotspot(intSceneIndex,j) & QUOT & ">');" & vbCrLf  
   Next 
   Response.Write "document.write('<\/applet>');" & vbCrLf
   Response.Write "// -->" & vbCrLf
   Response.Write "</SCRIPT>" & vbCrLf
   addVtourTips()
   Response.Write "</FORM>" & vbCrLf
   Response.Write "<SPAN class=" & QUOT & "Subtext" & QUOT & ">Click on map to continue virtual tour</SPAN>" & vbCrLf
End If 

' Output map navigation
Response.write "<IMG src=" & QUOT 
Select Case LCase(strSceneName(intSceneIndex))
   Case "inside_dining_hall"
      Response.write "images/fw_map1.gif" & QUOT & " name=" & QUOT & "fw_map" & QUOT & " usemap=" & QUOT & "#fw_maplinks" & QUOT 
   Case "outside_dining_hall"
      Response.write "images/fw_map2.gif" & QUOT & " name=" & QUOT & "fw_map" & QUOT & " usemap=" & QUOT & "#fw_maplinks" & QUOT 
   Case "winter_steakhouse"
      Response.write "images/fw_map3.gif" & QUOT & " name=" & QUOT & "fw_map" & QUOT & " usemap=" & QUOT & "#fw_maplinks" & QUOT 
   Case "frontier_town1"
      Response.write "images/fw_map4.gif" & QUOT & " name=" & QUOT & "fw_map" & QUOT & " usemap=" & QUOT & "#fw_maplinks" & QUOT 
   Case "frontier_town2"
      Response.write "images/fw_map5.gif" & QUOT & " name=" & QUOT & "fw_map" & QUOT & " usemap=" & QUOT & "#fw_maplinks" & QUOT 
   Case "teepee"
      Response.write "images/fw_map6.gif" & QUOT & " name=" & QUOT & "fw_map" & QUOT & " usemap=" & QUOT & "#fw_maplinks" & QUOT 
   Case "chuckwagon"
      Response.write "images/fw_map7.gif" & QUOT & " name=" & QUOT & "fw_map" & QUOT & " usemap=" & QUOT & "#fw_maplinks" & QUOT 
   Case "christmas_rock_overlook"
      Response.write "images/fw_map8.gif" & QUOT & " name=" & QUOT & "fw_map" & QUOT & " usemap=" & QUOT & "#fw_maplinks" & QUOT 
   Case "village_assembly_hall"
      Response.write "images/fw_map9.gif" & QUOT & " name=" & QUOT & "fw_map" & QUOT & " usemap=" & QUOT & "#fw_maplinks" & QUOT 
   Case "outdoor_wedding_area"
      Response.write "images/fw_map10.gif" & QUOT & " name=" & QUOT & "fw_map" & QUOT & " usemap=" & QUOT & "#fw_maplinks" & QUOT 
   Case "chapel", "chapel_altar"
      Response.write "images/fw_map11.gif" & QUOT & " name=" & QUOT & "fw_map" & QUOT & " usemap=" & QUOT & "#fw_maplinks" & QUOT 
End Select
Response.write " width=" & QUOT & "427" & QUOT & " height=" & QUOT & "269" & QUOT & " border=" & QUOT & "0" & QUOT & "><BR>" & vbCrLf

Response.Write "</DIV>" & vbCrLf
%>
<!-- end of v tour content -->
</DIV>
</DIV>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
<TD class="Transparent" valign="top" align="left" width="30"
bgcolor="#ffffff" height="463">
<TABLE border="0" height="100%" cellspacing="0" cellpadding="0" width="100%">
<TBODY>
<TR>
<TD valign="top" align="left"></TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
<TD class="SubpageContentBackground" valign="top" align="left"
width="318" bgcolor="#ffffff" height="463">
<TABLE border="0" height="100%" cellspacing="0" cellpadding="0" width="100%">
<TBODY>
<TR>
<TD valign="top" align="left">
<DIV id="RadDesigner1__ctl5_editor1_wrapper"><!-- 6.6.2 -->
<DIV id="RadDesigner1__ctl5_editor1">
<!-- start of v tour thumbnails -->
<%
Response.Write "<DIV align=" & QUOT & "CENTER" & QUOT & ">" & vbCrLf
' Output thumbnail images and links
If (intSceneStills(intSceneIndex) > 0) Then
   Response.Write "<BR><BR><TABLE border=" & QUOT & "0" & QUOT & " cellspacing=" & QUOT & "0" & QUOT & " cellpadding=" & QUOT & "0" & QUOT & " width=" & QUOT & "110" & QUOT & ">" & vbCrLf
   Response.Write "<TR>" & vbCrLf
   For i = 0 to (intSceneStills(intSceneIndex)-1)
      If (i <> intStill) Then
         Response.Write "<TD width=" & QUOT & "110" & QUOT & " valign=" & QUOT & "TOP" & QUOT & " align=" & QUOT & "MIDDLE" & QUOT & ">" & vbCrLf
         Response.Write "<TABLE border=" & QUOT & "0" & QUOT & " cellpadding=" & QUOT & "2" & QUOT & " cellspacing=" & QUOT & "0" & QUOT & " bgcolor=" & QUOT & "black" & QUOT & ">" & vbCrLf
         Response.Write "<TR>" & vbCrLf
         Response.Write "<TD>" & vbCrLf
         intDelimitPos = InStr(strSceneTnSize(intSceneIndex,i),",")
         strImgWidth = Left(strSceneTnSize(intSceneIndex,i),(intDelimitPos-1))
         strImgHeight = Right(strSceneTnSize(intSceneIndex,i),(Len(strSceneTnSize(intSceneIndex,i))-intDelimitPos))
         Response.Write "<A href=" & QUOT & "VirtualTour.asp?scene=" & strSceneName(intSceneIndex) & "&still=" & i & "#vtour_top" & QUOT & ">" & vbCrLf
         Response.Write "<IMG src=" & QUOT & "images/stills/" & LCase(strSceneName(intSceneIndex)) & "_still" & i & "_tn.jpg" & QUOT & " width=" & QUOT & strImgWidth & QUOT & " height=" & QUOT & strImgHeight & QUOT & " border=" & QUOT & "0" & QUOT & " alt=" & QUOT & "Click to view larger version" & QUOT & "></A></TD>" & vbCrLf 
         Response.Write "</TR></TABLE></TD>" & vbCrLf
         Response.Write "</TR>" & vbCrLf
         Response.Write "<TR>" & vbCrLf
         Response.Write "<TD width=" & QUOT & "110" & QUOT & "><IMG src=" & QUOT & "images/pixel.gif" & QUOT & " width=" & QUOT & "110" & QUOT & " height=" & QUOT & "10" & QUOT & "></TD>" & vbCrLf
         Response.Write "</TR>" & vbCrLf
      End If 
   Next
   Response.Write "</TABLE>" & vbCrLf
End If 
If ((bIsPano = TRUE) And (intSceneStills(intSceneIndex) => 1)) OR ((bIsStill = TRUE) And (intSceneStills(intSceneIndex) > 1)) Then 
   Response.Write "<SPAN class=" & QUOT & "Subtext" & QUOT & ">Click on thumbnail image to view larger version</SPAN>" & vbCrLf
End If 
Response.Write "</DIV>" & vbCrLf
%>
<!-- end of v tour thumbnails -->
</DIV>
</DIV>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
<TD class="SubpageContentBackground" valign="top" align="left"
width="31" bgcolor="#ffffff" height="463">
<TABLE height="100%" cellspacing="0" cellpadding="0" width="100%">
<TBODY>
<TR>
<TD valign="top" align="left"></TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>

<TR>
<TD class="Transparent" valign="bottom" align="right" width="1000"
bgcolor="#ffffff" colspan="2" height="22">
<TABLE height="100%" cellspacing="0" cellpadding="0" width="100%">
<TBODY>
<TR>
<TD valign="top">
<TABLE height="100%" cellspacing="0" cellpadding="0" width="100%">
<TBODY>
<TR>
<TD class="FooterRepeat" valign="bottom" align="middle" width=
"1000" bgcolor="#ffffff" colspan="2" height="25">
<TABLE height="100%" cellspacing="0" cellpadding="0" width="100%">
<TBODY>
<TR>
<TD valign="bottom" align="middle">
<TABLE id="Table1" style="MARGIN-TOP: 10px" height="10"
cellspacing="0" cellpadding="0" width="1000" border="0">
<TBODY>
<TR>
<TD><SPAN id="RadDesigner1">
<DIV id="RadDesigner1__ctl6_RadEditor_Footer1_editor1_wrapper">
<!-- 6.6.2 -->
<DIV id="RadDesigner1__ctl6_RadEditor_Footer1_editor1">&nbsp;</DIV>
</DIV>
</SPAN></TD>
</TR>
<TR>
<TD>

<p align="center"><script type="text/javascript"><!--
google_ad_client = "pub-5169407817026918";
/* 728x90, Highland Roasters created 11/24/09 */
google_ad_slot = "6339452252";
google_ad_width = 728;
google_ad_height = 90;
//-->
</script>
<script type="text/javascript"
src="http://pagead2.googlesyndication.com/pagead/show_ads.js">
</script>
</TD>
</TR>
<TR>
<TD>
<p align="right"><SPAN id="RadDesigner1">
<FONT class=
"AddressText">3330 Chuckwagon Road, Colorado Springs, Colorado
80919&nbsp; |&nbsp; 800-232-3599</FONT><SPAN class="Footer" id=
"RadDesigner1__ctl6_dlBotNav__ctl0_lblMenuItem"><font face="Arial" size="1">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
<a href="../index.htm">Home</a></font></SPAN></SPAN></TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>

<TR>
<TD class="BottomLeftCorner" valign="top" align="left" width="246"
bgcolor="#ffffff" height="21">
<TABLE height="100%" cellspacing="0" cellpadding="0" width="100%">
<TBODY>
<TR>
<TD valign="top" align="left"></TD>
</TR>
</TBODY>
</TABLE>
</TD>
<TD class="SubpageBottomCell" valign="top" align="left" width="754"
bgcolor="#ffffff" height="21">
<TABLE height="100%" cellspacing="0" cellpadding="0" width="100%">
<TBODY>
<TR>
<TD valign="top" align="left">
<TABLE height="19" cellspacing="0" cellpadding="0" align="center"
border="0">
<TBODY>
<TR>
<TD class="copyright" valign="bottom" align="middle" height="10">
© <SPAN id=
"RadDesigner1__ctl7_lblYear">2006-2007</SPAN>&nbsp;Flying W
Ranch</TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>

<TR>
<TD class="Transparent" valign="top" align="left" width="1000"
bgcolor="#ffffff" colspan="2" height="1">
<TABLE height="100%" cellspacing="0" cellpadding="0" width="100%">
<TBODY>
<TR>
<TD valign="top" align="left">
<TABLE style="MARGIN-LEFT: 15px; valign: middle" height="15"
cellspacing="0" cellpadding="0" align="left" border="0">
<TBODY>
<TR>
<TD>
<DIV id="admin_links"></DIV>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
</TBODY>
</TABLE>
</SPAN>
</DIV>
</TD>
</TR>
<DIV id="PoweredByPanel"></DIV>
</TBODY>
</TABLE>
<!-- start of image map for map navigation -->

<%
Response.Write "<MAP Name=" & QUOT & "Fw_maplinks" & QUOT & ">" & vbCrLf
Response.Write "<AREA Shape=" & QUOT & "Rect" & QUOT & " coords = " & QUOT & "177,-4,319,25" & QUOT & " href=" & QUOT & "VirtualTour.asp?scene=Christmas_Rock_Overlook#vtour_top" & QUOT & " onmouseover=" & QUOT & " imageOver('christmas_rock_overlook')" & QUOT & " onmouseout=" & QUOT & "imageOut('" & LCase(strScene) & "')" & QUOT & " alt=" & QUOT & "Christmas Rock Overlook" & QUOT & ">" & vbCrLf
Response.Write "<AREA Shape=" & QUOT & "Polygon" & QUOT & " coords = " & QUOT & "303,137,303,171,366,171,366,160,327,160,322,140,321,137" & QUOT & " href=" & QUOT & "VirtualTour.asp?scene=Chuckwagon#vtour_top" & QUOT & " onmouseover=" & QUOT & "imageOver('chuckwagon')" & QUOT & " onmouseout=" & QUOT & "imageOut('" & LCase(strScene) & "')" & QUOT & " alt=" & QUOT & "Chuckwagon" & QUOT & ">" & vbCrLf
Response.Write "<AREA Shape=" & QUOT & "Rect" & QUOT & " coords = " & QUOT & "226,146,302,186" & QUOT & " href=" & QUOT & "VirtualTour.asp?scene=Teepee#vtour_top" & QUOT & " onmouseover=" & QUOT & "imageOver('teepee')" & QUOT & " onmouseout=" & QUOT & "imageOut('" & LCase(strScene) & "')" & QUOT & " alt=" & QUOT & "Teepee" & QUOT & ">" & vbCrLf
Response.Write "<AREA Shape=" & QUOT & "Polygon" & QUOT & " coords = " & QUOT & "119,116,157,128,161,125,177,124,179,121,181,121,186,122,185,102,185,95,177,95,164,101,133,98,117,95,117,113,120,116" & QUOT & " href=" & QUOT & "VirtualTour.asp?scene=Frontier_Town2#vtour_top" & QUOT & " onmouseover=" & QUOT & "imageOver('frontier_town2')" & QUOT & " onmouseout=" & QUOT & "imageOut('" & LCase(strScene) & "')" & QUOT & " alt=" & QUOT & "Frontier Town2" & QUOT & ">" & vbCrLf
Response.Write "<AREA Shape=" & QUOT & "Polygon" & QUOT & " coords = " & QUOT & "61,150,95,159,114,141,112,129,119,128,121,124,121,118,113,115,101,125,86,130,80,131,62,132,61,149,60,149" & QUOT & " href=" & QUOT & "VirtualTour.asp?scene=Frontier_Town1#vtour_top" & QUOT & " onmouseover=" & QUOT & "imageOver('frontier_town1')" & QUOT & " onmouseout=" & QUOT & "imageOut('" & LCase(strScene) & "')" & QUOT & " alt=" & QUOT & "Frontier Town1" & QUOT & ">" & vbCrLf
Response.Write "<AREA Shape=" & QUOT & "Polygon" & QUOT & " coords = " & QUOT & "15,185,49,201,79,188,92,183,97,181,96,173,98,173,71,154,64,153,15,171,15,172" & QUOT & " href=" & QUOT & "VirtualTour.asp?scene=Winter_Steakhouse#vtour_top" & QUOT & " onmouseover=" & QUOT & "imageOver('winter_steakhouse')" & QUOT & " onmouseout=" & QUOT & "imageOut('" & LCase(strScene) & "')" & QUOT & " alt=" & QUOT & "Winter Steakhouse" & QUOT & ">" & vbCrLf 
Response.Write "<AREA Shape=" & QUOT & "Polygon" & QUOT & " coords = " & QUOT & "47,207,98,184,149,203,146,207,128,209,127,212,105,212,87,227,85,269,6,269,8,205,18,198,39,203,47,207" & QUOT & " href=" & QUOT & "VirtualTour.asp?scene=Outside_Dining_Hall#vtour_top" & QUOT & " onmouseover=" & QUOT & "imageOver('outside_dining_hall')" & QUOT & " onmouseout=" & QUOT & "imageOut('" & LCase(strScene) & "')" & QUOT & " alt=" & QUOT & "Outside Dining Hall" & QUOT & ">" & vbCrLf 
Response.Write "<AREA Shape=" & QUOT & "Polygon" & QUOT & " coords = " & QUOT & "155,220,186,218,191,216,213,219,261,218,282,253,279,257,283,257,283,268,156,268,155,221" & QUOT & " href=" & QUOT & "VirtualTour.asp?scene=Inside_Dining_Hall#vtour_top" & QUOT & " onmouseover=" & QUOT & "imageOver('inside_dining_hall')" & QUOT & " onmouseout=" & QUOT & "imageOut('" & LCase(strScene) & "')" & QUOT & " alt=" & QUOT & "Inside Dining Hall" & QUOT & ">" & vbCrLf 

Response.Write "<AREA Shape=" & QUOT & "Polygon" & QUOT & " coords = " & QUOT & "14,184,14,171,14,170,45,159,45,137,1,137,1,178,14,184" & QUOT & " href=" & QUOT & "VirtualTour.asp?scene=Village_Assembly_Hall#vtour_top" & QUOT & " onmouseover=" & QUOT & " imageOver('village_assembly_hall')" & QUOT & " onmouseout=" & QUOT & "imageOut('" & LCase(strScene) & "')" & QUOT & " alt=" & QUOT & "Village Assembly Hall" & QUOT & ">" & vbCrLf
Response.Write "<AREA Shape=" & QUOT & "Polygon" & QUOT & " coords = " & QUOT & "333,127,350,116,350,92,309,92,309,127,333,127" & QUOT & " href=" & QUOT & "VirtualTour.asp?scene=Outdoor_Wedding_Area#vtour_top" & QUOT & " onmouseover=" & QUOT & " imageOver('outdoor_wedding_area')" & QUOT & " onmouseout=" & QUOT & "imageOut('" & LCase(strScene) & "')" & QUOT & " alt=" & QUOT & "Outdoor Wedding Area" & QUOT & ">" & vbCrLf
Response.Write "<AREA Shape=" & QUOT & "Polygon" & QUOT & " coords = " & QUOT & "339,127,350,119,352,118,352,111,359,102,365,110,365,115,378,111,379,113,400,114,400,122,388,122,390,123,386,125,386,138,359,147,354,144,351,146,347,145,343,150,338,148,337,144,339,141,338,126,338,126" & QUOT & " href=" & QUOT & "VirtualTour.asp?scene=Chapel#vtour_top" & QUOT & " onmouseover=" & QUOT & " imageOver('chapel')" & QUOT & " onmouseout=" & QUOT & "imageOut('" & LCase(strScene) & "')" & QUOT & " alt=" & QUOT & "Chapel" & QUOT & ">" & vbCrLf

Response.Write "</MAP>" & vbCrLf
%>

<!-- end of image map for map navigation -->
</BODY>
</HTML>