// JavaScript Family History support programs - Version 2.0
//   Dave J. Barnes  WB4KDI
//
// It is next to impossible to manage all of the links to external
// web sites in all of the pages without putting all of the external
// links in one place.  This JavaScript file makes the job much easier by
// putting all of the external links here.
//
//
// Version 6.0 Big Changes!
//    Add DHTML Menus
// Version 6.1
//    Heritage Quest Census lookup
//    Heritage Quest Book lookup
// Version 6.2
//    LDS SSDI lookup
//    ADAHCivilWar database changes
//
// Version 5.0
//    Add ShowPhoto and LinkPhoto functions to get these large files from a
//    different fileserver if necessary.
//
// Version 4.0
//    Replace string arrays with objects (makes for faster code)
// Version 4.1
//    Code bashing again!
//
// Version 3.0
//    Added VBScript Surname Link Menus
// Version 3.1
//    Added VBScript County Link Menus
// Version 3.2
//    Added VBScript Confederate Link Menus
// Version 3.2a
//    Code bashing to improve performance
//
// Version 2.1
//    Added GraphicLink function.
//
//

//
// ** Simple External Links **
// create the method
function doLink()
{
  document.write('«<a href=\"http://',this.URL,'\">',this.Text,'</a>»');
}

// create the object definition
function XLink(URL, Text)
{
  this.URL = URL
  this.Text = Text
  this.doLink = doLink
}

// Create the CSA link objects
// Link                  URL                                                             Text
// ----                  ---                                                             ----
AL6I =        new XLink("www.rootsweb.com/~alcwroot/6th_alabama_inf/",                  "6th Alabama Infantry")
AL18I =       new XLink("www.geocities.com/coh41/18Al.html",                            "18th Alabama Infantry")
AL23I =       new XLink("www.canerossi.us/23ala/",                                      "23rd Alabama Infantry")
//  "AL23I", "members.aol.com/ArmyofTenn/23_ala_inf/23-home.htm",                "23rd Alabama Infantry",
AL25I =       new XLink("home.earthlink.net/~sdriskell/25th/25th.htm",                  "25th Alabama Infantry")
CCCCC =       new XLink("members.aol.com/dixieideals/CCCCav.htm",                       "@ Capt. Cleveland's Clarke Co. Cavalry")
GA2S =        new XLink("www.geocities.com/rickysahn/GSL/gslmain.htm",                  "@ 2nd Regiment, Gov. Joe Brown's \"The Georgia State Line\"")
//  GA2S =        new XLink("members.carol.net/~rickysahn/GSL/gslmain.htm",                 "2nd Regiment, Gov. Joe Brown's \"The Georgia State Line\"")
GA6I =        new XLink("www.rootsweb.com/~gataylor/tayg-6.htm",                        "6th Georgia Infantry")
//   GA44I =       new XLink("44ga.org/44GA/home.htm",                                       "44th Georgia Infantry")
//  "GA44I", "www.thehistorynet.com/AmericasCivilWar/articles/03962_cover.htm",  "44th Georgia Infantry",
GA46I =       new XLink("www.rootsweb.com/~gaupson/a-46.htm",                           "46th Georgia Infantry")
//======================
// External Links
//  "A&K",      "www.geocities.com/Paris/Concorde/6017/anckhome.htm",           "<em>Ancestors and Kin</em>",
AandK =       new XLink("freepages.genealogy.rootsweb.com/~larrimore/anckhome.htm",     "<em>Ancestors and Kin</em>")
ACourtHouse = new XLink("www.cviog.uga.edu/Projects/gainfo/courthouses/fultonoldCH1.htm","Fulton County Courthouse History")
ADAHcw =      new XLink("archives.state.al.us/civilwar/search.cfm",                     "Civil War Service Database")
Addy =        new XLink("familytreemaker.genealogy.com/users/t/a/g/Renee-G-Tagert/GENE1-0003.html#CHILD3", "Addy")
AHC =         new XLink("www.AtlantaHistoryCenter.com",                                 "Atlanta History Center")
AL1776 =      new XLink("www.archives.state.al.us/al_sldrs/~start.html",                "Thomas M. Owen's <em>Revolutionary Soldiers in Alabama</em>")
AlabamaMaps = new XLink("alabamamaps.ua.edu/index.html",				"Cartographic Research Laboratory")
BillandSons = new XLink("www.billandsons.net/storehistory/mainpage.htm",         "Bill and Sons Grocery")

Cyclorama=    new XLink("www.bcaatlanta.com/index.php?pid=81",                          "Atlanta Cyclorama <em>and so much more</em>")
CWH =         new XLink("www.civilwarhome.com",                                         "http://www.civilwarhome.com")
CWHSherman =  new XLink("www.civilwarhome.com/shermangeorgia.htm",                      "<em>Sherman in Georgia</em>")
CVIOG_UGA =   new XLink("www.cviog.uga.edu/Projects/gainfo/civilwar.htm",               "Carl Vinson Institute of Government, The University of Georgia")
DAR =         new XLink("www.dar.org",                                                  "Daughters of the American Revolution")
DLPGen =      new XLink("www.philen.com",						                        "Dan Philen's Web Site")
//  "DLPGen = new XLink("home.talkcity.com/BuckheadBlvd/sayochulese/Genealogy2.html",   "Dan Philen's Genealogy Website",
DutchRich =   new XLink("hometown.aol.com/patsgen/SouthernRichFamiliesindex.html",      "@ Descendants of James C. Rich")
FRBSF =       new XLink("www.frbsf.org/currency/index.html",                            "Federal Reserve Bank of San Francisco <em>American Currency Exhibit</em>")
FRBSFCW =     new XLink("www.frbsf.org/currency/civilwar/confederate/index.html",       "Confederate Currency")
GaCWPhoto =   new XLink("www.cviog.uga.edu/Projects/gainfo/cwphotos.htm",               "Civil War Photographs")
GatseyLand =  new XLink("www.glorecords.blm.gov/PatentSearch/Image.asp?Accession=AL2090%5F%5F%2E140&Format=SmallGIF&Page=1&Index=1&QryID=45449%2E38",
                                                                                         "<em><font color=blue>(319.88 acres)</font></em>")
//  "GatseyLand", "www.glorecords.blm.gov/JUKEBOXSRV/AL/2090/140.TIF",            "<em><font color=blue>(319.88 acres)</font></em>",
GDAHcw =      new XLink("docuweb.gsu.edu/CivilWar.htm",                                 "Civil War Pension Records")
Glenn =       new XLink("www.angelfire.com/biz6/dciris/glennfamily.html",               "Dr. John James Wingfield Glenn")
GCWU =        new XLink("gacsa.cobbslegion.com/frames/gacsa_frame.htm",                 "Georgia Civil War Units")
GenHoward =   new XLink("www.cviog.uga.edu/Projects/gainfo/atldestr.htm",               "General Howard's eyewitness")
GWCarver =    new XLink("www.tuskegee.edu/Global/story.asp?S=1107203&nav=CcXDDg4M",         "<em>Carver Tribute</em> - Tuskegee University, Tuskegee, Alabama")
Harp10_1865 = new XLink("cdl.library.cornell.edu/cgi-bin/moa/moa-cgi?notisid=ABK4014-0031-89",
                                                                                        "<em>Harper's Monthly</em> - October 1865")
HarUMCCem =   new XLink("members.tripod.com/~HappyStuff/HaralsonMethodist.html",        "Cemetery")
HenryPeck =   new XLink("worldconnect.rootsweb.com/cgi-bin/igm.cgi?op=GET&db=yp1227&id=I19376",
                                                                                        "Rev. Henry Peck")
InmanUMC =    new XLink("www.rootsweb.ancestry.com/~gafayett/church/inmanumc/history.htm", "Inman United Methodist Church")
Linka =       new XLink("www.moering.org/~family/index.html",                           "Linka\'s Genealogy Page")
LinkaMcDanal= new XLink("www.moering.org/~family/Descendants%20of%20Angus%20McDanal.txt","<em>McDaniel<br>McDanal</em>")
LoCcwp =      new XLink("memory.loc.gov/ammem/cwphtml/cwphome.html",                    "Civil War Photographs")
LoCcwpSearch= new XLink("memory.loc.gov/pp/cwpquery.html",                              "Search")
MPLCCem =     new XLink("members.tripod.com/~HappyStuff/HaralsonLutheran.html",         "Cemetery")
Morgan =      new XLink("www.familytreemaker.com/users/w/e/b/David-Alan-Webb-MO/ODT6-0001.html",         "Morgan")
MtPilgrim =   new XLink("www.mtplutheran.org/index.htm",                                "Mount Pilgrim Evangelical Lutheran Church")
NARA_ARC =    new XLink("www.archives.gov/research/arc/index.html",                     "Archival Research Catalog (ARC)")
PondSpring =  new XLink("www.wheelerplantation.org/",                                   "Pond Spring and Wheeler Home history");
RevJoel =     new XLink("www.archives.state.al.us/al_sldrs/r_list.html",                "Thomas M. Owen's <em>Revolutionary Soldiers in Alabama</em>")
SAR =         new XLink("www.sar.org",                                                  "Sons of the American Revolution")
// SCGerman =    new XLink("www.netside.com/~genealogy/menu.shtml",                        "<em>Orangeburgh German-Swiss Genealogy Society</em>")
SCV =         new XLink("www.scv.org",                                                  "Sons of Confederate Veterans")
Shields =     new XLink("freepages.genealogy.rootsweb.com/~sassytazzy/family/surnames/shields/docs/shieldsstewartfamrec/shieldsstewartfamrec4.html",
											"Christopher and George Shields")
// Sistrunk =    new XLink("www.dfchapter.homestead.com/Seastrunk.html",                   "Henry Sistrunk Family")
Stewart =     new XLink("freepages.genealogy.rootsweb.com/~sassytazzy/family/surnames/shields/docs/shieldsstewartfamrec/shieldsstewartfamrec3.html",
											"Thomas and James Stewart")
Swygert =     new XLink("www.palmettoroots.org/Family_Swygert_John.html",               "John Swygert Family")
// Swygert =     new XLink("www.dfchapter.homestead.com/Swygert.html",                     "John Swygert Family")
TYR =         new XLink("www.trackingyourroots.com",                                    "<em>Tracking Your Roots <sub>&reg;</sub></em>&nbsp;")
UDC =         new XLink("www.hqudc.org",                                                "United Daughters of the Confederacy")
UMCAl =       new XLink("www.bsc.edu",                                                  "Archives of the North Alabama Conference")
UMCGa =       new XLink("www.pitts.emory.edu/collections/archives_ngca.cfm",            "Archives of the North Georgia Conference")
VanishGA =    new XLink("content.sos.state.ga.us/cdm4/vanishing.php",                   "Georgia Archives, <em>Vanishing Georgia</em>")
WWLowery =    new XLink("members.tripod.com/~wwlowery/lowery.htm",                      "<em>Lowery</em>")

//
//
// ======================
// ** Graphic External Links **
// Create the method
function doGraphicLink()
{
  document.write('<a href=\"http://',this.URL,'\"><img ',this.Options,' src=\"',this.Graphic,'\"></a>');
}

// create the object definition
function XGraphicLink(URL, Options, Graphic)
{
  this.URL = URL
  this.Options = Options
  this.Graphic = Graphic
  this.doGraphicLink = doGraphicLink
}

// CSA Flag links
AlArchives = "archives.state.al.us/referenc/FLAGS/"
PhotoText = "alt=\"Photograph of flag at ADAH, Montgomery, AL\""
// Link                      URL                                 Graphic
// ----                      ---                                 -------
AL6Iflag  = new XGraphicLink(AlArchives + "024.html", PhotoText, "http://" + AlArchives + "images/8639551.jpg")
AL18Iflag = new XGraphicLink(AlArchives + "035.html", PhotoText, "http://" + AlArchives + "images/8618681.jpg")
AL23Iflag = new XGraphicLink(AlArchives + "044.html", PhotoText, "http://" + AlArchives + "images/8618841.jpg")
AL50Iflag = new XGraphicLink(AlArchives + "049.html", PhotoText, "http://" + AlArchives + "images/8639431.jpg")
//
// Other Graphic Links
//Link                             URL                            Options        Graphic
//----                             ---                            -------        -------
ALGENWEBgraphic = new XGraphicLink("www.algenweb.us",             "align=left",  "algenweb.gif")
ADAHgraphic =     new XGraphicLink("archives.state.al.us",        "align=right", "alabama.gif")
ELCAgraphic =     new XGraphicLink("www.elca.org",                "align=right", "ELCA.jpg")
GA_ARCgraphic =   new XGraphicLink("www.sos.state.ga.us/archives","align=right", "georgia.gif")
GAGENWEBgraphic = new XGraphicLink("www.rootsweb.com/~gagenweb/", "align=left",  "gagenweb.gif")
LOCgraphic =      new XGraphicLink("www.loc.gov",                 "align=center","loclogo.jpg")
NARAgraphic =     new XGraphicLink("www.archives.gov",            "align=center","nara_logo.png")
UMCgraphic =      new XGraphicLink("www.umc.org",                 "align=right", "UMC.jpg")
UMCNGgraphic =    new XGraphicLink("www.ngumc.org",               "align=right", "UMC.jpg")
USGENWEBgraphic = new XGraphicLink("www.usgenweb.org",	          "align=left",  "usgenweb.gif")

// ADAH Civil War database lookups
ADAHDavisES = new Array(47085,47086,47087,47088,47118,47119,0)
ADAHDavisESWounded = new Array(47119,0)
ADAHFranklinGB = new Array(65138,0)
ADAHGlassM = new Array(71453,0)
ADAHMcCormackCD = new Array(130354,0)
ADAHRichJM = new Array(169665,0)
ADAHRichJohn = new Array(169672,0)
ADAHRiversJMM = new Array(171056,171057,0)
ADAHStewartGH = new Array(194070,194080,0)
ADAHWrightJ   = new Array(226659,226768,226769,226770,0)
ADAHGatesCE = new Array(68785,68786,0)
ADAHMcCormackAC = new Array(130343,0)
ADAHMcCormackAM = new Array(130345,0)
ADAHPhilenM = new Array(158266,158267,0)
ADAHRiversE = new Array(171049,0)
ADAHRiversHP = new Array(171051,171052,171053,0)
ADAHStewartJN = new Array(194221,0)
ADAHWrightDR = new Array(0)
// ** END OF DEFINITIONS **
// ========================

function ADAHCivilWarInit()
{
	document.write('<dd><em>Alabama Confederate Service/Pension Records:</em>');
}

function TIFFimage()
{
	document.write('<font size=1><strong><sub>«<a href=\"http://www.alternatiff.com\">TIFF</a>»</sub></strong></font>');
}

function LDSSSDI(nSSN)
{
	document.write('<dd><em>«<a href=\"http://www.familysearch.org/Eng/Search/ssdi/individual_record.asp?recid=',parseInt(nSSN/10)/(nSSN%10),'\">Social Security Death Index</a>»<font size=1><strong> (via «<a href=\"http://www.familysearch.org\">FamilySearch</a>»)</strong></font></em>');
}

function LDSCensusInit()
{
	document.write('<dd><em>Census Records: <font size=1><strong> (via «<a href=\"http://www.familysearch.org\">FamilySearch</a>»)</strong></font></em><ul>');
}

function LDSCensus(nCensus, nHouseHold, szText)
{
//	document.write('«<a href=\"http://www.familysearch.org/Eng/Search/census/household_record.asp?HOUSEHOLD_CODE=',nCensus,'US_',nHouseHold,'\">',nCensus,'</a>»<font size=1><strong> (via «<a href=\"http://www.familysearch.org\">FamilySearch</a>»)</strong></font>');
	document.write('<li>«<a href=\"http://www.familysearch.org/Eng/Search/census/household_record.asp?HOUSEHOLD_CODE=',nCensus,'US_',nHouseHold,'\">',nCensus,' - ',szText,'</a>»');
}

function HQBookInit()
{
	document.write('&nbsp;&nbsp;');

	TIFFimage();
	document.write('<em><font size=1><strong> (via «<a href=\"http://www.heritagequest.com\">HeritageQuest</a>»)</strong></font></em>');
}

function HQBook(szHQC,szText)
{
	document.write(' «<a href=\"http://www.heritagequestonline.com/dvimage/genealogy/stage/dvimage?filename=/HQO/image1/genprod',szHQC,'.tif&mimeType=image/tiff\">',szText,'</a>»');
}

function HQCensusInit()
{
	document.write("<dd><em>Census Images: </em>");
	TIFFimage();
	document.write('<em><font size=1><strong> (via «<a href=\"http://www.heritagequest.com\">HeritageQuest</a>»)</strong></font></em><ul>');
}

function HQCensus(szHQC,szText)
{
	document.write('<li>«<a href=\"http://www.heritagequestonline.com/dvimage/genealogy/stage/dvimage?filename=/heritage/vault/hqc',szHQC,'.tif&mimeType=image/tiff\">',szText,'</a>»');
}

function GADeath(nRecord)
{
	document.write('<dd>«<a href="http://content.sos.state.ga.us/u?/gadeaths,',nRecord,'"><em>Death Certificates, Vital Records, Public Health, RG 26-5-95, Georgia Archives</em></a>»');
}

function ShowPhoto(szPhoto, szThumbType)
{
  /* szPhoto points to graphic file without extension
     szThumbType is what size image to show on page
     ie.  small = 320
          thumb = 160
          head = buttonized image at top of pages.
  */

  document.write('<a href=\"http://',szHost[nHostIndex+1],(bPhotoPath ? '/Photos/' : '/Family%20History/'),szPhoto,'.jpg\">');
  document.write('<img src=\"http://',szHost[nHostIndex],(bPhotoPath ? '/Photos/' : '/Family%20History/'),szPhoto,'(',szThumbType,').jpg\" alt=\"Click for hi-res image\"></a>');
}

function LinkPhoto(szPhoto,szText)
{
  document.write('<a href=\"http://',szHost[nHostIndex+1],'/Family%20History/',szPhoto,'.jpg\">',szText,'</a>');
}

function LinkDoc(szDoc,szText)
{
  document.write('<a href=\"http://',szHost[nHostIndex+1],'/Family%20History/',szDoc,'.tif\">',szText,'</a>');
}

function CSALink(szUnit)
{
  eval(szUnit + ".doLink()");
}

function ExternalLink(szLink)
{
  eval(szLink + ".doLink()");
}

function CSAFlag(szUnit)
{
  document.write("<font size=1><b>(Alabama Department of Archives and History, Montgomery, Alabama)</b></font><br>");

  eval(szUnit + "flag" + ".doGraphicLink()");
}

function GraphicLink(szLink)
{
  eval(szLink + "graphic" + ".doGraphicLink()");
}

function ADAHCivilWarSoldier(szSoldier)
{
	this.aData = eval("ADAH" + szSoldier);
	n = 0;
	while (this.aData[n])
	{
		document.write(" «<a href=\"http://archives.state.al.us/civilwar/soldier.cfm?id=" + this.aData[n] + "\">",this.aData[n],"</a>»");
        n++;
    }
}

// ** Internet QuikLink2 Menu Buttons **
// Determine Browser engine
// MSIE = 1, Gecko/Firefox = 2
var nBrowser=2;
function InternetQuikLink()
{
  if (navigator.userAgent.indexOf("MSIE") > 0) nBrowser=1;
//  if (navigator.userAgent.indexOf("Gecko") > 0) nBrowser=2;
  document.write("<p align=right><table><tr><td bgcolor=\"#c0c0c0\" align=right><font size=1 color=blue><em>dbQLX2/menu</em></font></td></tr></table></p>");
//  if (nBrowser == 2) document.write('<p class="font80" align=right>Move mouse pointer over chevrons <span class="menuNormal"><img src="/scripts/MenuButton.gif"></span> for menu.</p>');
}

// NEW DROP DOWN MENU STUFF //
function expand(s)
{
  var td = s;
  var d = td.getElementsByTagName("div").item(0);

  td.className = "menuHover";
  d.className = "menuHover";
}

function collapse(s)
{
  var td = s;
  var d = td.getElementsByTagName("div").item(0);

  td.className = "menuNormal";
  d.className = "menuNormal";
}

function MakeMenu(aszLinks,szID,szText)
{
  switch (nBrowser) {
  case 1: // MSIE
    // Use ActiveX Menu
    // Create the object
    szHTML = '&nbsp;' +
           '<object id=QuikLink2_' + szID +
           '  codebase="http://activex.microsoft.com/activex/controls/iexplorer/x86/btnmenu.cab"' +
           '  classid=\"clsid:52DFAE60-CEBF-11CF-A3A9-00A0C9034920\"'+
           '  width=20' +
           '  height=25' +
           '  align=middle>' +
           '<param NAME=\"Caption\" value=' +'&nbsp;' + '>\r';

    nLink = 0;
    while (aszLinks[nLink])
      {
  		szHTML += '<param NAME=\"Menuitem[' + (nLink / 2) + ']\" value=\"' + aszLinks[nLink + 1] + '\">\r';
          nLink += 2;
      }

    szHTML += '</object>\r';

    // Create VBScript Code
    szHTML += '<script language=\"VBScript\">\r<!--\rsub QuikLink2_' + szID + '_select(Menuitem)\rselect case(Menuitem)\r'

    nLink = 0;
    while (aszLinks[nLink])
      {
        szHTML += 'case(' + ((nLink / 2) + 1) + ')\rwindow.location.href=\"http://' + aszLinks[nLink] + szText + '\"\r';
        nLink += 2;
      }

    szHTML += 'end select\rend sub\r-->\r</script>\r&nbsp;'

    document.write(szHTML);
    break;

  case 99: // Gecko/Firefox *** DO NOT USE ***
  // Use CSS Menu

    document.write('<span class="menu"><span class="menubutton">«»</span><ul>');
    nLink = 0;
    while (aszLinks[nLink]) {
      document.write('<li><a class="dropmenu" HREF="http://',aszLinks[nLink],szText,'">',aszLinks[nLink+1],'</a></li>');
      nLink+=2;
      }
    document.write('</ul></span>');
    break;

  case 2:
  // DHTML Menu
    szRootPath = (((document.URL).search(/rootsweb/) > 0) ? "/~wb4kdi" : "")
    document.writeln('<table id="navbar" class="inline"><tr><td class="menuNormal" onmouseover="expand(this);" onmouseout="collapse(this);"><img src="',szRootPath,'/Scripts/MenuButton.gif">');
    document.writeln('<div class="menuNormal"><table class="menu">');
    nLink = 0;
    while (aszLinks[nLink]) {
      document.writeln('<tr><td class="menuNormal"><a HREF="http://',aszLinks[nLink],szText,'" class="menuitem">',aszLinks[nLink+1],'</a></td></tr>');
      nLink+=2;
      }
    document.writeln('</table></div></td></tr></table>');
    break;

  }
}

// ** Menu Button Definitions **
function ConfederateLinkMenu(szState)
{
    aszConfederateLinks = new Array (
//       Link                                        Text
         "www.itd.nps.gov/cwss/",                    "Civil War Soldiers and Sailors System",
         "www.tarleton.edu/~kjones/confeds.html",    "Confederate Regimental Histories Directory",
         0
         )

    MakeMenu(aszConfederateLinks,szState,"");
}

RootsWeb = "www.rootsweb.com/";
RootsWebSearch = "searches2.rootsweb.com/cgi-bin/listsearch.pl?list=";
RootsWebThreaded = "archiver.rootsweb.com/th/index/";
AncestryMessageBoard= "boards.ancestry.com/mbexec?htx=board&r=rw";
TrackingYourRoots = "www.trackingyourroots.com/"
USGenWebArchives = "www.usgwarchives.org/"
//
function SurnameLinkMenu(szSurname)
{
    aszSurnameLinks = new Array (
//    Link
      RootsWebSearch,                          szSurname + '-L',
      RootsWebThreaded,                        '&nbsp;&nbsp;-&nbsp;Threaded',
      AncestryMessageBoard + "&p=surnames.",   'Message Board',
      "genforum.genealogy.com/",               'GenForum',
      0
      )

    MakeMenu(aszSurnameLinks,szSurname,szSurname)
}


// Define the object
function CountyLink (State, Abbr, URL)
{
	this.State = State
	this.Abbr = Abbr
	this.URL = URL
}

// County                                    USGENWEB
// Alabama
choctaw =    new CountyLink("alabama", "al" ,"www.algenweb.us/choctaw/")
clarke =     new CountyLink("alabama", "al" ,"www.algenweb.us/clarke/index.html")
lauderdale = new CountyLink("alabama", "al" ,"www.rootsweb.com/~allauder/index.htm")
limestone =  new CountyLink("alabama", "al", "www.rootsweb.com/~allimest/")
marengo =    new CountyLink("alabama", "al" ,"www.rootsweb.com/~almareng/")
monroe =     new CountyLink("alabama", "al" ,"www.rootsweb.com/~almonroe/")
walker =     new CountyLink("alabama", "al" ,"www.rootsweb.ancestry.com/~alwalker/")
wilcox =     new CountyLink("alabama", "al" ,"www.prairiebluff.com/algenweb/wilcox/")
// Georgia
coweta =     new CountyLink("georgia", "ga" ,"www.rootsweb.com/~gacoweta/")
fayette =    new CountyLink("georgia", "ga" ,"www.rootsweb.com/~gafayett/index.html")
lincoln =    new CountyLink("georgia", "ga" ,"www.rootsweb.com/~galincol")
meriwether = new CountyLink("georgia", "ga" ,"personal.atl.bellsouth.net/atl/m/s/msaffold/meriweth.htm")


function CountyLinkMenu(szCounty)
{

    var szStateAbbr = eval(szCounty + ".Abbr");
    var TYR = TrackingYourRoots + szCounty + ".htm";
    aszCountyLinks = new Array (
//    Link                                                   Text
      RootsWebSearch + szStateAbbr + szCounty.substring(0,6),
                                                             szStateAbbr + szCounty.substring(0,6) + '-L',
      RootsWebThreaded + szStateAbbr + szCounty.substring(0,6),
                                                             "&nbsp;&nbsp;-&nbsp;threaded",
      AncestryMessageBoard + "&p=localities.northam.usa.states." + eval(szCounty + ".State") + ".counties." + szCounty,
                                                             "Message Board",
      eval(szCounty + ".URL"),                               "USGenWeb",

//      RootsWeb + "~usgenweb/" + szStateAbbr + "/" +  (szStateAbbr == "al" ? szCounty : szCounty.substring(0,8)) + ".htm",
      USGenWebArchives + szStateAbbr + "/" + (szStateAbbr == "al" ? szCounty : szCounty.substring(0,8)) + ".htm",
                                                             "&nbsp;&nbsp;-&nbsp;archives",
      (szStateAbbr == "al" ? TYR : 0),                       "TrackingYourRoots",
      0
      )


      MakeMenu(aszCountyLinks, szCounty, "");
}

// ***************************
// NameEmail object definition
function NameEmail(Name, Email)
{
	this.Name = Name
	this.Email = Email
}

DJB = new NameEmail("Dave J. Barnes",  "DJBemail.jpg")
TLB = new NameEmail("Tammie L. Barnes","DJBemail.jpg")

function Copyright(szWho)
{
// JavaScript Copyright for WEB documents

// Fixup the year for brain dead browsers!
  FileYear = new Date(document.lastModified).getYear();
  if (FileYear < 200)
  {
    if (FileYear < 50) FileYear += 2000;
    else  FileYear += 1900;
  }

// and Fix the year from brain dead servers too!
  if (FileYear < 1990) FileYear = 2003;

  szHTML = "<a href=\"MailTo:&#100;&#106;&#98;_pizza&#64;&#105;eee.&#111;r&#103;" +
             "?subject=" + document.title + "\">" + "<img src=\"" +
             (((document.URL).search(/rootsweb/) > 0) ? "/~wb4kdi" : "") +
             "/Scripts/" + eval(szWho + ".Email") +
             "\"></a><br>" + "&copy;" +
             FileYear +
             "<em>" + eval(szWho + ".Name") + "</em><br>" +
             (((document.URL).search(/rootsweb/) > 0) ? "" : document.lastModified);

  document.write(szHTML);
}

// Set nHostIndex for ShowPhoto(), LinkPhoto() and LinkDoc()
szHost = new Array (

//  Host                                 Photo Host
	"www",                               "www",
	"freepages.genealogy.rootsweb.com/~wb4kdi",  "freepages.genealogy.rootsweb.com/~wb4kdi",
	"webpages.charter.com/dbarnes3367",  "freepages.genealogy.rootsweb.com/~wb4kdi"
	);

nHostIndex = 0;
if ((document.URL).search(/charter/) > 0) nHostIndex = 4;
if ((document.URL).search(/rootsweb/) > 0) nHostIndex = 2;

bPhotoPath = ((document.URL).search(/Photos/) > 0) ? 1 : 0;

if (nBrowser) {
  switch (nBrowser) {
  case 1: // MSIE
  // Add stuff here that's specific to IE
    break;

  case 2: // Gecko/Firefox
  // DHTML MENU STUFF
    break;

  default: // Opera & etc. ?
  //
    break;

  }
}