Keyword = new Object();
 Address = new Object();
 Keyword[0] = 51

Keyword[1] = "Alabama"
Address[1] = "http://www.cals.ncsu.edu/herbarium/images/alabama.gif"
Keyword[2] = "Alaska"
Address[2] = "http://www.cals.ncsu.edu/herbarium/images/alaska.gif"
Keyword[3] = "Arizona"
Address[3] = "http://www.cals.ncsu.edu/herbarium/images/arizona.gif"
Keyword[4] = "Arkansas"
Address[4] = "http://www.cals.ncsu.edu/herbarium/images/arkansas.gif"
Keyword[5] = "California"
Address[5] = "http://www.cals.ncsu.edu/herbarium/images/california.gif"
Keyword[6] = "Colorado"
Address[6] = "http://www.cals.ncsu.edu/herbarium/images/colorado.gif"
Keyword[7] = "Connecticut"
Address[7] = "http://www.cals.ncsu.edu/herbarium/images/connecticut.gif"
Keyword[8] = "Delaware"
Address[8] = "http://www.cals.ncsu.edu/herbarium/images/delaware.gif"
Keyword[9] = "District of Columbia"
Address[9] = "http://www.cals.ncsu.edu/herbarium/images/district_of_columbia.gif"
Keyword[10] = "Florida"
Address[10] = "http://www.cals.ncsu.edu/herbarium/images/florida.gif"
Keyword[11] = "Georgia"
Address[11] = "http://www.cals.ncsu.edu/herbarium/images/georgia.gif"
Keyword[12] = "Hawaii"
Address[12] = "http://www.cals.ncsu.edu/herbarium/images/hawaii.gif"
Keyword[13] = "Idaho"
Address[13] = "http://www.cals.ncsu.edu/herbarium/images/idaho.gif"
Keyword[14] = "Illinois"
Address[14] = "http://www.cals.ncsu.edu/herbarium/images/illinois.gif"
Keyword[15] = "Indiana"
Address[15] = "http://www.cals.ncsu.edu/herbarium/images/indiana.gif"
Keyword[16] = "Iowa"
Address[16] = "http://www.cals.ncsu.edu/herbarium/images/iowa.gif"
Keyword[17] = "Kansas"
Address[17] = "http://www.cals.ncsu.edu/herbarium/images/kansas.gif"
Keyword[18] = "Kentucky"
Address[18] = "http://www.cals.ncsu.edu/herbarium/images/kentucky.gif"
Keyword[19] = "Louisiana"
Address[19] = "http://www.cals.ncsu.edu/herbarium/images/louisiana.gif"
Keyword[20] = "Maine"
Address[20] = "http://www.cals.ncsu.edu/herbarium/images/maine.gif"
Keyword[21] = "Maryland"
Address[21] = "http://www.cals.ncsu.edu/herbarium/images/maryland.gif"
Keyword[22] = "Massachusetts"
Address[22] = "http://www.cals.ncsu.edu/herbarium/images/massachusetts.gif"
Keyword[23] = "Michigan"
Address[23] = "http://www.cals.ncsu.edu/herbarium/images/michigan.gif"
Keyword[24] = "Minnesota"
Address[24] = "http://www.cals.ncsu.edu/herbarium/images/minnesota.gif"
Keyword[25] = "Mississippi"
Address[25] = "http://www.cals.ncsu.edu/herbarium/images/mississippi.gif"
Keyword[26] = "Missouri"
Address[26] = "http://www.cals.ncsu.edu/herbarium/images/missouri.gif"
Keyword[27] = "Montana"
Address[27] = "http://www.cals.ncsu.edu/herbarium/images/montana.gif"
Keyword[28] = "Nebraska"
Address[28] = "http://www.cals.ncsu.edu/herbarium/images/nebraska.gif"
Keyword[29] = "Nevada"
Address[29] = "http://www.cals.ncsu.edu/herbarium/images/nevada.gif"
Keyword[30] = "New Hampshire"
Address[30] = "http://www.cals.ncsu.edu/herbarium/images/new_hampshire.gif"
Keyword[31] = "New Jersey"
Address[31] = "http://www.cals.ncsu.edu/herbarium/images/new_jersey.gif"
Keyword[32] = "New Mexico"
Address[32] = "http://www.cals.ncsu.edu/herbarium/images/new_mexico.gif"
Keyword[33] = "New York"
Address[33] = "http://www.cals.ncsu.edu/herbarium/images/new_york.gif"
Keyword[34] = "North Carolina"
Address[34] = "http://www.cals.ncsu.edu/herbarium/images/north_carolina.gif"
Keyword[35] = "North Dakota"
Address[35] = "http://www.cals.ncsu.edu/herbarium/images/north_dakota.gif"
Keyword[36] = "Ohio"
Address[36] = "http://www.cals.ncsu.edu/herbarium/images/ohio.gif"
Keyword[37] = "Oklahoma"
Address[37] = "http://www.cals.ncsu.edu/herbarium/images/oklahoma.gif"
Keyword[38] = "Oregon"
Address[38] = "http://www.cals.ncsu.edu/herbarium/images/oregon.gif"
Keyword[39] = "Pennsylvania"
Address[39] = "http://www.cals.ncsu.edu/herbarium/images/pennsylvania.gif"
Keyword[40] = "Rhode Island"
Address[40] = "http://www.cals.ncsu.edu/herbarium/images/rhode_island.gif"
Keyword[41] = "South Carolina"
Address[41] = "http://www.cals.ncsu.edu/herbarium/images/south_carolina.gif"
Keyword[42] = "South Dakota"
Address[42] = "http://www.cals.ncsu.edu/herbarium/images/south_dakota.gif"
Keyword[43] = "Tennessee"
Address[43] = "http://www.cals.ncsu.edu/herbarium/images/tennessee3.gif"
Keyword[44] = "Texas"
Address[44] = "http://www.cals.ncsu.edu/herbarium/images/texas3.gif"
Keyword[45] = "Utah"
Address[45] = "http://www.cals.ncsu.edu/herbarium/images/utah.jpg"
Keyword[46] = "Vermont"
Address[46] = "http://www.cals.ncsu.edu/herbarium/images/vermont.gif"
Keyword[47] = "Virginia"
Address[47] = "http://www.cals.ncsu.edu/herbarium/images/virginia3.gif"
Keyword[48] = "Washington"
Address[48] = "http://www.cals.ncsu.edu/herbarium/images/washington.gif"
Keyword[49] = "West Virginia"
Address[49] = "http://www.cals.ncsu.edu/herbarium/images/west_virginia.gif"
Keyword[50] = "Wisconsin"
Address[50] = "http://www.cals.ncsu.edu/herbarium/images/wisconsin.gif"
Keyword[51] = "Wyoming"
Address[51] = "http://www.cals.ncsu.edu/herbarium/images/wyoming.gif"




 function contains(sub,s){
 strlen1=sub.length
 strlen2=s.length
 istrue=false
 for(i=0;i<=strlen2;i++)
 {
 comp=s.substring(i-1,strlen2)
 comp=comp.substring(0,strlen1)
 if(comp==sub){
 istrue=true
 break  
    }   
   }
 return istrue
  }

 function dolt() {
 loopCount=0;
 var Found=false
 var Item=document.forms[0].sub.value.toLowerCase();
 
stats='toolbar=no,location=no,scrollbars=yes,directories=no,status=yes,menubar=no,height=500,width=790,top=0,left=0'
stats += 'scrollbars=yes,resizable=yes'
MsgBox = window.open ("","msgWindow",stats) 
MsgBox.opener = window;
MsgBox.opener.name = "opener";
MsgBox.document.write("<head><title>Search Results: for "+Item+"</title></head>");

 if(document.form1.sub.value=="")
 MsgBox.document.write('<h5><font face="Verdana,Arial,Helvetica" color="#0000000">Search Results: for all found<HR></h5></font>');
 else
 MsgBox.document.write('<h5><font face="Verdana,Arial,Helvetica" color="#0000000">Search Results: for '+Item+'<HR></h5></font>');
 for(var i=1; i<=Keyword[0]; i++){
 contains(Item,Keyword[i].toLowerCase())
 if(comp==Item){
 loopCount++;
 Found=true;
  MsgBox.document.write('<div align="center"><center><table border="0" width="740" cellspacing="0" cellpadding="8"><tr><td width="2%" bgcolor="#FFFFFF" height="18"align="center"><font face="Verdana,Arial,Helvetica" size="2" color="#000000"><h5>'+loopCount+'. </h5></font></td>    <td width="150%" bgcolor="#FFFFFF" height="18" align="left"><font color="#000000"></font><fontcolor="#000000"><font face="Verdana,Arial,Helvetica" size="2" color="#000000">'+Keyword[i]+'<BR><A HREF='+Address[i]+' target="_blank">View map</A></font></h1></font><font color="#0000000"></font></td></tr></table></center></div>')
  MsgBox.document.write('<script Language="JavaScript">window.status=("Total '+loopCount+' found")</'+'script'+'>');

     }
  }

if(!Found)
MsgBox.document.write('<font face="Verdana,Arial,Helvetica" size="2" color="#FF0000">Sorry, no results were found</font>')
MsgBox.document.write('<font face="Verdana,Arial,Helvetica" size="2" color="#0F219B"><p align="center"><HR><small>Copyright © 2001 <a href="http://citrusoft.tripod.com">CitruSoft</a>. All rights reserved.</p></font>')
MsgBox.document.write('<style><!--A:link{color: #FF0000; text-decoration:none} A:visited {color: #FF9950; text-decoration:none}--></style>')
if(loopCount==0){
MsgBox.document.write('<script Language="JavaScript">window.status=("Total 0 found")</'+'script'+'>');
      }
    }