/*
Author: Alex Osipov (alex@acky.net)
Publisher: ACKY.NET
*/

// Global variables.
domain		= '';
path		= '/';
secure		= 0;
var arrccc = Array("cccALL Community","actActivity Partners","atsArtists","kidChildcare","calEvents / Classes","comGeneral","grpGroups","lafLost+Found","mucMusicians","petPets","polPolitics","ridRideshare","volVolunteers");
var arrppp = Array("pppALL Personals","casCasual Encounters","m4mMen Seeking Men","m4wMen Seeking Women","msrMisc Romance","misMissed Connections","rnrRants And Raves","stpStrictly Platonic","w4wWomen Seek Women","w4mWomen Seeking Men");
var arrhhh = Array("hhhALL Housing","apaApts / Housing","swpHousing Swap","hswHousing Wanted","offOffice / Commercial","prkParking / Storage","rfsReal Estate For Sale","rooRooms / Shared","subSublets / Temporary","vacVacation Rentals");
var arrsss = Array("sssALL For Sale","babBaby+Kids","barBarter","bikBikes","bksBooks","carCars+Trucks","cloClothes+Acc","cltCollectibles","sysComputer","eleElectronics","zipFree","furFurniture","gmsGarage Sales","forGeneral","hshHousehold","mcyMotorcycles","msgMusic Instr","spoSporting","tixTickets","wanWanted");
var arrbbb = Array("bbbALL Services","aosAutomotive","cpsComputer","crsCreative","ersErotic","evsEvent","fnsFinancial","hssHousehold","lbsLabor/Move","lgsLegal","lssLessons","rtsReal Estate","sksSkill'D Trade","bizSm Biz Ads","thsTherapeutic");
var arrjjj = Array("jjjALL Jobs","accAccounting / Finance","ofcAdmin / Office","medArt / Media / Design","sciBiotech / Science","busBusiness / Mgmt","csrCustomer Service","eduEducation / Teaching","egrEngineering / Arch","etcEtc","humHuman Resources","engInternet Engineering","lggLegal / Government","marMarketing / Pr / Adv","heaMedical / Healthcare","npoNonprofit Sector","resResumes","retRetail / Food / Hosp","slsSales / Biz Dev","trdSkilled Trade / Craft","sofSoftware / Qa / Dba","sadSystems / Networks","tchTechnical Support","tfrTv / Film / Video","artWeb / Info Design","wriWriting / Editing");
var arrggg = Array("gggALL Gigs","cpgComputer","crgCreative","cwgCrew","dmgDomestic","evgEvent","lbgLabor","tlgTalent","wrgWriting");
var arreee = Array("eeeALL Events","clsClasses","eveEvents");
	
// Function to save a field.
function save_field(form,obj) {
	var cookie_value = '';
	var objType = new String(obj.type);
	if (obj.name=='lname') 
		obj.name='name';
	switch(objType.toLowerCase()) {
		case "checkbox" :
			if (obj.checked) cookie_value = obj.name + '=[1]'
			else cookie_value = obj.name + '=[0]'
			break;
		case "undefined" :
			// a.k.a. radio field.
			for (var i = 0; i < obj.length; i++) {
				if (obj[i].checked) cookie_value = obj[i].name + '=[' + i + ']'
			}
			break;
		case "select-one" :
			cookie_value = obj.name + '=[' + obj.selectedIndex + ']';
			break;
		case "select-multiple" :
			cookie_value = obj.name + '=[';
			for (var i = 0; i < obj.options.length; i++) {
				if (obj.options[i].selected) cookie_value += '+' + i
			}
			cookie_value += ']';
			break;
		default :
			// We assume all other fields will have
			// a valid obj.name and obj.value
			cookie_value = obj.name + '=[' + obj.value + ']';
	}
	//alert(form.name);//alert(form.count);alert(obj.name);
	//cookie_value = form.name + '=' + cookie_value;
	if (cookie_value) {
		var expires = new Date();
		expires.setYear(expires.getYear() + 1);
		document.cookie = form.name + '.' + cookie_value +
		((domain.length > 0) ? ';domain=' + domain : '') +
		((path) ? ';path=' + path : '') +
		((secure) ? ';secure' : '') +
		';expires=' + expires.toGMTString();
	}
	return 1;
}

// Function to retrieve a field.
function retrieve_field(form,obj) {
	var cookie = '', real_value = '';
	cookie = document.cookie;
	var objType = new String(obj.type);
	if (obj.name){
	if (obj.name=='lname') 
		obj.name='name';
		var objName = new String(obj.name);}
	else
		var objName = new String(obj[0].name);
	if (form.name)
		var formName = new String(form.name);
	else
		var formName = new String(form[0].name);
	
	var offset_start = cookie.indexOf(formName + '.' + objName + '=[');
	if (offset_start == -1) return 1;
	var offset_start_length = formName.length + objName.length + 3;
	offset_start = offset_start + offset_start_length;
	var offset_end = cookie.indexOf(']', offset_start);
	
	real_value = cookie.substring(offset_start, offset_end);
	switch(objType.toLowerCase()) {
		case "checkbox" :
			if (real_value == '1') obj.checked = 1
			else obj.checked = 0
			break;
		case "undefined" :
			obj[real_value].checked = 1;
			break;
		case "select-one" :
			obj.selectedIndex = real_value;
			break;
		case "select-multiple" :
			for (var i = 0; i < obj.options.length; i++) {
				if ((real_value.indexOf('+' + i)) > -1)
					obj.options[i].selected = 1;
				else
					obj.options[i].selected = 0;
			}
			break;
		default :
			obj.value = real_value;
			break;
	}
	if (obj.name=='name') 
		obj.name='lname';
	return 1;
}

// ---------------------------------------------
// --- Name:    Easy DHTML Treeview           --
// --- Author:  D.D. de Kerf                  --
// --- Version: 0.1           Date: 6-6-2001  --
// ---------------------------------------------
var MAX_ENGINES = 32;
//var displayframe = parent.frames[1].location.href;
var SNARK_STRING = "hunting+the+snark";

function MakeArray(n) {
   for (var i = 1; i <= n; i++) {
     this[i] = 0;
   }
   this.maxlen = n;
   this.len = 0;
   return this;
}

var engs = new MakeArray(MAX_ENGINES);
var tengs = new MakeArray(6);

function find_substring(needle, haystack) {
   var i, needlen = needle.length, haylen = haystack.length;
   for (i=0; i<=haylen-needlen; i++) {
      if (needle == haystack.substring(i,i+needlen))
        return i;
   }
   return false;
}

function Engine(name, opts, home, search) {
  var snark = find_substring(SNARK_STRING, search);
  this.name = name;
  this.opts = opts;
  this.home = home;
  this.pre_snark = search.substring(0,snark);
  this.post_snark= search.substring(snark+SNARK_STRING.length, search.length);
}

function Add(name, opts, home, search) {
  engs.len++;
  if (engs.len <= engs.maxlen) {
    engs[engs.len] = new Engine(name, opts, home, search)
  }
  else {
    alert("Better increase MAX_ENGINES: " + engs.len + ">" + engs.maxlen)
  }
}

function TAdd(name, opts, home, search) {
  tengs.len++;
  if (tengs.len <= tengs.maxlen) {
    tengs[tengs.len] = new Engine(name, opts, home, search)
  }
  else {
    alert("Better increase MAX_ENGINES: " + tengs.len + ">" + tengs.maxlen)
  }
}

// ADD YOUR OWN SEARCH ENGINES BELOW.  (See http://www.cs.cmu.edu/~jab/snark/ )


TAdd("UPS", "",
   "http://www.ups.com/",
   "http://wwwapps.ups.com/WebTracking/processInputRequest?HTMLVersion=5.0&sort_by=status&term_warn=yes&button_index=201&tracknums_displayed=1&TypeOfInquiryNumber=T&loc=en_US&InquiryNumber1=hunting+the+snark&AgreeToTermsAndConditions=yes&track.x=31&track.y=3" );
TAdd("Fed Ex", "",
   "http://www.fedex.com/",
   "http://www.fedex.com/cgi-bin/tracking?action=track&language=english&cntry_code=us&initial=x&tracknumbers=hunting+the+snark" );
TAdd("Airborne", "",
   "http://www.airborne.com/",
   "http://track.airborne.com/TrackByNbr.asp?ShipmentNumber=hunting+the+snark" );
TAdd("USPS", "",
   "http://www.usps.com/",
   "http://www.bipedinfo.com/TrackUSPS.HTML?TrackNo=hunting+the+snark" );
TAdd("DHL", "",
   "http://www.dhl-usa.com/",
   "http://www.dhl-usa.com/cgi-bin/tracking.pl?AWB=hunting+the+snark&LAN=ENG&TID=US_ENG&FIRST_DB=US" );
TAdd("American Airlines", "",
   "http://www.aa.com/",
   "http://www.bipedinfo.com/TrackAA.HTML?TrackNo=hunting+the+snark" );

Add("the Web: Google", "SELECTED",
   "http://www.google.com/",
   "http://www.google.com/search?hl=en&lr=&ie=UTF-8&as_qdr=all&q=hunting+the+snark" );

Add("the Web: Yahoo!", "",
   "http://www.yahoo.com/",
   "http://search.yahoo.com/bin/search?p=hunting+the+snark" );

Add("for Actors/Movie Info : Internet Movie Database", "",
   "http://www.imdb.com",
   "http://us.imdb.com/find?q=hunting+the+snark");

Add("Los Angeles and Beyond @LA Directory Search", "",
   "http://www.at-la.com",
   "http://www.at-la.com/scripts/wwcgi.dll?@la-srch=hunting+the+snark");

Add("WWW Info: Domain Name Information", "",
   "http://www.checkdomain.com/",
   "http://www.checkdomain.com/cgi-bin/checkdomain.pl?domain=hunting+the+snark" );

Add("the Web: Mamma", "",
   "http://www.mamma.com/",
   "http://www.mamma.com/PSearch?query=hunting+the+snark&eng%5B%5D=1681&eng%5B%5D=1697&eng%5B%5D=1668&eng%5B%5D=1691&eng%5B%5D=518&eng%5B%5D=1736&eng%5B%5D=1716&eng%5B%5D=599&eng%5B%5D=1620&eng%5B%5D=1694&highlight=1&timeout=4&new_window=1&rpp=100&desc=0&savesettings=0&qtype=0");
   
Add("the Web: Ask Jeeves", "",
   "http://www.ask.com/",
   "http://web.ask.com/web?q=hunting+the+snark&qsrc=62&page=1" );

Add(" ","","http://www.bipedinfo.com/BipedTools2.html","http://www.bipedinfo.com/BipedTools2.html?q=hunting+the+snark");

Add("Shopping: Amazon", "",
   "http://www.amazon.com/",
   "http://www.amazon.com/exec/obidos/search-handle-url/index%3Daps%26field-keywords%3Dhunting+the+snark%26url%3Dindex%3Daps%26store-name%3Dall-product-search" );

Add("Price Comparison: Froogle", "",
   "http://froogle.google.com/",
   "http://froogle.google.com/froogle?q=hunting+the+snark&scoring=p" );

Add("Price Comparison: Pricegrabber", "",
   "http://www.pricegrabber.com/",
   "http://www.pricegrabber.com/search_gen_top.php?topcat_search=1&form_keyword=hunting+the+snark&found=" );

Add("Auctions: eBay", "",
   "http://www.ebay.com/",
   "http://search-desc.ebay.com/search/search.dll?cgiurl=http%3A%2F%2Fcgi.ebay.com%2Fws%2F&krd=1&from=R10&MfcISAPICommand=GetResult&search_option=1&srchdesc=y&ht=1&SortProperty=MetaEndSort&TextSearched=2&query=hunting+the+snark" );

Add(" ","","http://www.bipedinfo.com/BipedTools2.html","http://www.bipedinfo.com/BipedTools2.html?q=hunting+the+snark");

Add("Software/Windows: Freeware/Trialware", "",
   "http://www.download.com/",
   "http://download.com.com/sort/3120-20-0-1-2.html?qt=hunting+the+snark&author=&titlename=&desc=&dlcount=&daysback=&swlink=&os=&li=50&dlsize=&ca=" );

Add("Software/MAC: Freeware/Trialware", "",
   "http://www.download.com/",
   "http://download.com.com/sort/3120-2003-0-1-2.html?qt=hunting+the+snark&author=&titlename=&desc=&li=50&os=&swlink=" );

Add("Usenet Files: Binaries Search", "",
   "http://www.binsearch.info/",
   "http://www.binsearch.info/index.php?q=hunting+the+snark&max=250&adv_g=&adv_age=50&adv_sort=date&minsize=&maxsize=&font=&postdate=");

Add("Usenet Files: Audio Find", "",
   "http://www.audiofind.com/",
   "http://audiofind.com/srch?s=hunting+the+snark" );

Add("Usenet Files: Binaries Search Alternate", "",
   "http://alt.binaries.nl/",
   "http://alt.binaries.nl/search/?q=hunting+the+snark" );
   
Add(" ","","http://www.bipedinfo.com/BipedTools2.html","http://www.bipedinfo.com/BipedTools2.html?q=hunting+the+snark");

Add("Reference - Convert Phone # To Letters - Enter # or Word","","http://www.phonetic.com","http://www.phonetic.com/phonetic.cgi?number=hunting+the+snark&qz=79&dict=english&check=on&word=");
Add("Reference - Dictionary","","http://www.onelook.com","http://www.onelook.com/?w=hunting+the+snark&ls=b");
Add("Reference - Thesaurus/Synonyms","","http://www.rhymezone.com","http://www.rhymezone.com/r/rhyme.cgi?Word=hunting+the+snark&typeofrhyme=syn&org1=syl&org2=l");
Add("Reference - Words that Rhyme with","","http://www.rhymezone.com","http://www.rhymezone.com/r/rhyme.cgi?Word=hunting+the+snark&typeofrhyme=perfect&org1=syl&org2=l");
Add("Reference - Wikipedia","","http://www.wikipedia.org","http://en.wikipedia.org/wiki/Special:Search?search=hunting+the+snark&fulltext=Search");
Add("Reference - Yahoo Reference","","http://education.yahoo.com","http://education.yahoo.com/search/ref?p=hunting+the+snark");

Add("Recipe Search - Cooks.com","","http://www.cooks.com","http://www.cooks.com/rec/search?q=hunting+the+snark");
Add("Recipe Search - Simply Recipes","","http://just-recipes.net.master.com","http://just-recipes.net.master.com/texis/master/search/?q=hunting+the+snark&s=SS");
Add(" ","","http://www.bipedinfo.com/BipedTools2.html","http://www.bipedinfo.com/BipedTools2.html?q=hunting+the+snark");

Add("Medical / Health : PDR Drug Info Search","","http://www.pdrhealth.com/drug_info/index.html","http://www.picosearch.com/cgi-bin/ts.pl");

Add("Medical / Health : Health On The Net Complete Search","","http://www.hon.ch/MedHunt/","http://www.hon.ch/MedHunt/");

Add("Medical / Health : Medline Plus - Trusted Health Info for You", "",
"http://www.nlm.nih.gov/",
"http://search.nlm.nih.gov/medlineplus/query?MAX=500&SERVER1=server1&SERVER2=server2&PARAMETER=hunting+the+snark&DISAMBIGUATION=true&FUNCTION=search");

Add("Medical / Health : National Library of Medicine", "",
"http://www.nlm.nih.gov/",
"http://search.nlm.nih.gov/homepage/query?PARAMETER=hunting+the+snark&FUNCTION=search&MAX=250&DISAMBIGUATION=true");



// ADD YOUR OWN SEARCH ENGINES ABOVE.  (See http://www.cs.cmu.edu/~jab/snark/ )
function trimstr(strText) { 
    // this will get rid of leading spaces 
    while (strText.substring(0,1) == ' ') 
        strText = strText.substring(1, strText.length);

    // this will get rid of trailing spaces 
    while (strText.substring(strText.length-1,strText.length) == ' ')
        strText = strText.substring(0, strText.length-1);

   return strText;
}

function HandleForm(form) {
  form.submit();  // This fixes a mysterious Netscape bug.  Without this line,
                  // you can't use <enter> to start the search the first time.
  var oldq = new String(form.q.value);
  var i, newq="";
  oldq = trimstr(oldq);
  form.q.value = oldq;
  save_field(form,form.q);
  save_field(form,form.service);
  for (i=0; i<oldq.length; i++) {  // compress [ ]+ into \+
    var thischar = oldq.charAt(i);
    if (thischar != ' ')
      newq += thischar;
    else if (lastchar != ' ')
      newq += '+';
    lastchar = thischar;
  }
  var eng = engs[1+form.service.selectedIndex];
  if (eng.name == "the Web: Google")
  {
	form.action = "http://www.google.com/custom";
	form.method = "get";
	form.submit();
  } 
  else if (eng.name == "Shopping: Amazon")
  {
	form.action = "http://www.amazon.com/exec/obidos/external-search";
	form.method = "get";
	form.q.name = "keyword";
	form.submit();        
  }
  else if (eng.name == "Los Angeles and Beyond @LA Directory Search")
  {
	form.action = "http://www.at-la.com/scripts/wwcgi.dll?@la-srch";
	form.method = "post";
	form.q.name = "iText1";
	form.submit();        
  }
  else if (eng.name == " ")
  {
	form.action = "http://www.bipedinfo.com/BipedTools2.html";
	form.method = "";
	form.q.name = "";
	//form.submit();        
  }
  else if (eng.name == "Medical / Health : PDR Drug Info Search")
  {
	form.action = "http://www.picosearch.com/cgi-bin/ts.pl";
	form.method = "post";
	form.q.name = "query";
	form.submit();        
  }
  else if (eng.name == "WWW Info: Domain Name Information")
  {
	form.action = "http://www.checkdomain.com/cgi-bin/checkdomain.pl";
	form.method = "get";
	form.q.name = "domain";
	form.submit();        
  }
  else if (eng.name == "Medical / Health : Health On The Net Complete Search")
  {
	form.action = "http://129.195.254.71/cgi-bin/find?1+search";
	form.method = "post";
	form.q.name = "SEARCH";
	form.submit();        
  }
  else
  {
     //document.location.href = newq ? eng.pre_snark + newq + eng.post_snark : eng.home;
     form.action = newq ? eng.pre_snark + newq + eng.post_snark : eng.home;
     form.method = "post";
     form.submit();
  }  
}

function HandleTrackingForm(form) {
  form.submit();  // This fixes a mysterious Netscape bug.  Without this line,
                  // you can't use <enter> to start the search the first time.
  var i, oldq=form.trackingnum.value, newq="";
  save_field(form,form.trackingnum);
  for (i=0; i<oldq.length; i++) {  // compress [ ]+ into \+
    var thischar = oldq.charAt(i);
    if (thischar != ' ')
      newq += thischar;
    else if (lastchar != ' ')
      newq += '+';
    lastchar = thischar;
  }
  var teng = tengs[1+form.tracker.selectedIndex];
  //window.location = newq ? teng.pre_snark + newq + teng.post_snark : teng.home;
     form.action = newq ? teng.pre_snark + newq + teng.post_snark : teng.home;
     form.method = "post";
     form.submit();
}

function makebox(){
	var arrnames = Array("arrccc","arreee","arrggg","arrhhh","arrjjj","arrppp","arrsss","arrbbb");
	var which_array = arrnames[[document.craigss.box1.options.selectedIndex]];
	var array_name = eval(which_array);
                                          
	for (i=0; i < 26; i++){
		document.craigss.cat.options[i].text = "";
		document.craigss.cat.options[i].value = "";
	}//ends FOR
	document.craigss.cat.options.selectedIndex = 0;
	for (i=0; i < array_name.length; i++){
		var tempstr = new String();
		tempstr = array_name[i];
		document.craigss.cat.options[i].text = tempstr.substring(3,tempstr.length);		
		document.craigss.cat.options[i].value = tempstr.substring(0,3);
	}//ends FOR
}//ends function

function submitCraig(){
   var urllist = new Array("0http://albuquerque.craigslist.org/","0http://anchorage.craigslist.org/","0http://atlanta.craigslist.org/",
			"0http://austin.craigslist.org/","0http://baltimore.craigslist.org/","0http://boise.craigslist.org/",
			"0http://boston.craigslist.org/","0http://buffalo.craigslist.org/","0http://charlotte.craigslist.org/","0http://chicago.craigslist.org/",
			"0http://cincinnati.craigslist.org/","0http://cleveland.craigslist.org/","0http://columbus.craigslist.org/","0http://dallas.craigslist.org/",
			"0http://denver.craigslist.org/","0http://detroit.craigslist.org/","0http://dublin.craigslist.org/","0http://edinburgh.craigslist.org/",
			"0http://fresno.craigslist.org/","0http://hartford.craigslist.org/","0http://honolulu.craigslist.org/","0http://houston.craigslist.org/",
			"0http://indianapolis.craigslist.org/","0http://kansascity.craigslist.org/","0http://lasvegas.craigslist.org/","0http://london.craigslist.org/",
			"0http://losangeles.craigslist.org/","0http://manchester.craigslist.org/","0http://melbourne.craigslist.org/","0http://memphis.craigslist.org/",
			"0http://miami.craigslist.org/","0http://milwaukee.craigslist.org/","0http://minneapolis.craigslist.org/","0http://montreal.craigslist.org/",
			"0http://nashville.craigslist.org/","0http://neworleans.craigslist.org/","0http://newyork.craigslist.org/","4http://newyork.craigslist.org/",
			"2http://newyork.craigslist.org/","7http://newyork.craigslist.org/","1http://newyork.craigslist.org/","6http://newyork.craigslist.org/",
			"3http://newyork.craigslist.org/","5http://newyork.craigslist.org/","8http://newyork.craigslist.org/","0http://norfolk.craigslist.org/",
			"0http://orlando.craigslist.org/","0http://philadelphia.craigslist.org/","0http://phoenix.craigslist.org/","0http://pittsburgh.craigslist.org/",
			"0http://portland.craigslist.org/","0http://providence.craigslist.org/","0http://raleigh.craigslist.org/","0http://sacramento.craigslist.org/",
			"0http://saltlakecity.craigslist.org/","0http://sandiego.craigslist.org/","0http://www.craigslist.org/","1http://www.craigslist.org/",
			"3http://www.craigslist.org/","4http://www.craigslist.org/","5http://www.craigslist.org/","2http://www.craigslist.org/",
			"0http://santabarbara.craigslist.org/","0http://seattle.craigslist.org/","0http://stlouis.craigslist.org/","0http://sydney.craigslist.org/",
			"0http://tampa.craigslist.org/","0http://toronto.craigslist.org/","0http://vancouver.craigslist.org/","0http://washingtondc.craigslist.org/");
	var urlstr = new String(urllist[document.craigss.city.options.selectedIndex]);
	document.craigss.action=urlstr.substring(1,urlstr.length) + "cgi-bin/search";
	document.craigss.subAreaID.value=urlstr.substring(0,1);
	document.craigss.catAbbreviation.value=document.craigss.cat.options[document.craigss.cat.options.selectedIndex].value;
	document.craigss.areaID.value=document.craigss.city.options[document.craigss.city.options.selectedIndex].value;
	save_field(document.craigss,document.craigss.city);
	save_field(document.craigss,document.craigss.box1);
	save_field(document.craigss,document.craigss.cat);
	save_field(document.craigss,document.craigss.query);
	document.craigss.submit();
}       

function DisplayForm() {
  document.writeln('<FORM name="WebSearch" OnSubmit="HandleForm(this); return false">');
  document.writeln('Search <SELECT name="service">');
  for (i=1; i <= engs.len; i++) {
    document.writeln("<OPTION " + engs[i].opts + "> " + engs[i].name);
  }
  document.writeln('</SELECT><BR> for<IMG BORDER="0" SRC="http://www.bipedinfo.com/spacer.gif" WIDTH="20" HEIGHT="8"><INPUT type="text" name="q" size=26>');
  document.writeln('<input type="hidden" name="client" value="pub-9256550882855758"></input>');
  document.writeln('<input type="hidden" name="forid" value="1"></input>');
  document.writeln('<INPUT TYPE="hidden" NAME="tag" VALUE="biped-20"></input>');
  document.writeln('<input type="hidden" name="mode" value="blended"></input>');
  document.writeln('<input type="hidden" name="ie" value="ISO-8859-1"></input>');
  document.writeln('<input type="hidden" name="oe" value="ISO-8859-1"></input>');
  document.writeln('<input type="hidden" name="cof" value="GALT:#008000;GL:1;DIV:#336699;VLC:663399;AH:center;BGC:FFFFFF;LBGC:336699;ALC:0000FF;LC:0000FF;T:000000;GFNT:0000FF;GIMP:0000FF;FORID:1;"></input>');
  document.writeln('<input type="hidden" name="hl" value="en"></input>');
  document.writeln('<INPUT TYPE="hidden" NAME="Word" VALUE="And"></input>');
  document.writeln('<input type="hidden" NAME="preferences" VALUE=1></input>');
  document.writeln('<Input TYPE="hidden" NAME="AFF" VALUE="100"></input>');
  document.writeln('<Input TYPE="hidden" NAME="country" VALUE="Geographic/Domain: All"></input>');
  document.writeln('<INPUT type="hidden" value="165927" name="index"></input>');
  document.writeln('<INPUT type="hidden" value="psel" name="_SEL_drugs"></input>');
  document.writeln('<INPUT TYPE="HIDDEN" NAME="refURL" VALUE="http://www.bipedinfo.com/BipedTools2.html"></input>');
  retrieve_field(document.WebSearch,document.WebSearch.q);
  retrieve_field(document.WebSearch,document.WebSearch.service);
  document.writeln('<input type=submit name="sa" value="Search">');
  document.writeln('</FORM>');
}

function DisplayTrackingForm() {
  document.writeln('<CENTER><FORM name="TrackingForm" OnSubmit="HandleTrackingForm(this); return false">');
  document.writeln('Select Company <SELECT name="tracker">');
  for (i=1; i <= tengs.len; i++) {
    document.writeln("<OPTION " + tengs[i].opts + "> " + tengs[i].name);
  }
  document.writeln('</SELECT> Tracking Number <INPUT size=26 name="trackingnum">');
  retrieve_field(document.TrackingForm,document.TrackingForm.trackingnum);
  document.writeln('<input type=submit value=" GO!">');
  document.writeln('</FORM> </CENTER>');
}

