modalClick = true
initialMode = 1
mouseOverIconMode = 1
menuHeader = "<BR><BR>"
defFolderFont = "<font>"
defDocFont = "<font face=Arial size=2 color=008080>" 
levelDefFont[0] = "<font face=Arial size=4 color=008080>"
levelDefFont[1] = "<font face=Arial size=2 color=008080>" 
levelDefFont[2] = "<font face=Arial size=2 color=008080>" 


var menuFooter = "<br><br><br><br><br><br><br><br><br><br><font size=-1 color=008080><br><br><img src='/Samian/Home/Key.gif' border=0> Some parts of this database are password protected<br><br><a href='http://www.unicode.org' ><img src='/Samian/Home/UnicodeLogo.gif' border='0'></a> Browser Unicode settings required</font>"


fT = gFld("<i><font color='#FF6600'>Samian Navigator</font></i>", "")

aux1 = insDoc(fT, gFld("Names on Terra Sigillata", ""))
	      aux2 = insDoc(aux1, gLnk("<img src='/Samian/Home/Key.gif' border=0> Search dies", "/IPS/Queries/IPSInput.cfm"))
	      aux2 = insDoc(aux1, gLnk("<img src='/Samian/Home/Key.gif' border=0> Plot dies", "/IPS/Queries/IPSPlotInput.cfm"))
	      aux2 = insDoc(aux1, gLnk("<img src='/Samian/Home/Key.gif' border=0> Plot potter averages", "/IPS/Queries/IPSDistributionAverageInput_new.cfm"))
	      aux2 = insDoc(aux1, gLnk("<img src='/Samian/Home/Key.gif' border=0> Chart sites", "/IPS/Queries/ChartSitesInput.cfm"))
	      aux2 = insDoc(aux1, gLnk("<img src='/Samian/Home/Key.gif' border=0> Export volumes", "/IPS/Queries/ChartPotterExportDateMidpointsInput.cfm"))



	aux1 = insDoc(fT, gFld("Decorated Vessels", ""))
	      aux2 = insDoc(aux1, gLnk("Name-marked vessels", "/Samian/Queries/Cat29Input.cfm"))
	      aux2 = insDoc(aux1, gFld("Ovolo vessels", ""))
	      
	      aux3 = insDoc(aux2, gLnk(" Search Ovolo Vessels", "/Samian/Queries/getOvoloVesselsInput.cfm"))

	      aux3 = insDoc(aux2, gLnk(" List Ovolos", "/Samian/Queries/getOvolosOverviewOutput.cfm"))
	      
	      aux3 = insDoc(aux2, gLnk(" <img src='/Samian/Home/Key.gif' border=0>Manage", "/Samian/Queries/getOvolosManageConsole.cfm"))


	      aux2 = insDoc(aux1, gLnk("Drag. 29 Die Images", "/Samian/Queries/DieInput.cfm"))

	      aux2 = insDoc(aux1, gLnk("<img src='/Samian/Home/Key.gif' border=0> Plot pots", "/Samian/Queries/Protected/PlotInput.cfm"))
	      aux2 = insDoc(aux1, gLnk("<img src='/Samian/Home/Key.gif' border=0> Graph Die Variety", "/Samian/Queries/Protected/GraphDieVarietyInput.cfm"))
	      
	      aux2 = insFld(aux1, gFld("<img src='/Samian/Home/Key.gif' border=0> Work", ""))
		
	      

	      aux3 = insDoc(aux2, gLnk("<img src='/Samian/Home/Key.gif' border=0> List old numbering", "/Samian/Queries/Protected/Cat29GetOldNumbering.cfm"))

	      aux3 = insDoc(aux2, gLnk("<img src='/Samian/Home/Key.gif' border=0> Add Pot record", "/Samian/Queries/Protected/Cat29addinput.cfm"))
        aux3 = insDoc(aux2, gLnk("<img src='/Samian/Home/Key.gif' border=0> Upload Full size files", "/Samian/Queries/Protected/UploadCFFTPFullSize.cfm"))
	      aux3 = insDoc(aux2, gLnk("<img src='/Samian/Home/Key.gif' border=0> Upload Thumb files", "/Samian/Queries/Protected/UploadCFFTPThumbs.cfm"))
	      aux3 = insDoc(aux2, gLnk("<img src='/Samian/Home/Key.gif' border=0> List Files Thumbnails", "/Samian/Queries/Protected/Cat29DirThumbImages.cfm"))
	      aux3 = insDoc(aux2, gLnk("<img src='/Samian/Home/Key.gif' border=0> List Files Full size", "/Samian/Queries/Protected/Cat29DirFullImages.cfm"))
	      aux3 = insDoc(aux2, gLnk("<img src='/Samian/Home/Key.gif' border=0> Last modified Thumbnails", "/Samian/Queries/Protected/Cat29DirLastModifiedThumbs.cfm"))
	      aux3 = insDoc(aux2, gLnk("<img src='/Samian/Home/Key.gif' border=0> Last modified Full size", "/Samian/Queries/Protected/Cat29DirLastModifiedFullImage.cfm"))



	//aux1 = insDoc(fT, gFld("Coordinates", ""))
	//      aux2 = insDoc(aux1, gLnk("Pickup Coordinates", "http://www3.rgzm.de/gns"))
  //            aux2.setTarget(1)
              
  aux1 = insDoc(fT, gFld("Recording Samian", ""))
	      aux2 = insDoc(aux1, gLnk("Digital Scanning", "/Samian/DigitalSamianScanning/ScanningSamian.html"))
	      aux2 = insDoc(aux1, gLnk("Creating rubbings", "/Samian/Home/HowToCreateRubbings.htm"))
	      

 aux1 = insDoc(fT, gFld("Books", ""))
	      aux2 = insDoc(aux1, gLnk("Books", "/Samian/Home/Books.htm"))


	aux1 = insDoc(fT, gFld("About", ""))
	      aux2 = insDoc(aux1, gLnk("About this project", "/Samian/Home/About.htm"))