function makearray()
	{
/*	Makearray returns an array of homes.  Simply add or delete an entire line to add or delete
	a home.  Primary index is Stock#.  
	MODEL#, STYLE, LOCATION, DISPLAY AVAILABLE, SQ FOOTAGE, NAME, MANUFACTURER, BEDROOMS, BATHS
	*/

	var homelist=new Array();
	var i=0;

	homelist[i++]=[109162,"1","Utica","Yes","1,165","Bayview 6677-1","Fairmont",3,2];
	homelist[i++]=[109218,"1","Utica","Yes","902","Sunwood 805","Skyline",3,2];
	homelist[i++]=[109224,"1","Utica","Yes","902","Bayview 6633","Fairmont",2,1];
	homelist[i++]=[109257,"1","Utica","Yes","1,165","Bayview 6633-1","Fairmont",3,2];
	homelist[i++]=[109365,"1","Utica","Yes","1,190","Inspirations Tupelo","Clayton",3,2];
	
	homelist[i++]=[108870,"r","Utica","Yes","1,580","Wood Manor 801","Skyline",3,2];
	homelist[i++]=[109123,"r","Utica","Sale Pending","1,352","Skyliner","Skyline",3,2];
	homelist[i++]=[109188,"r","Utica","No","1,496","Greenbriar","Skyline",3,2];
	homelist[i++]=[109321,"r","Utica","No","1,496","Triumph 181026","Fairmont",3,2];
	homelist[i++]=[109333,"r","Utica","No","1,600","Fireside 6028-5203","Schult",3,2];
	homelist[i++]=[109334,"r","Utica","No","1,200","Aspiration 5024-41","Schult",3,2];
	homelist[i++]=[109388,"r","Utica","No","1,280","Inspirations Fraser","Clayton",3,2];
	homelist[i++]=[109393,"r","Utica","No","1,144","Vista 4428-315","Schult",3,2];
	
	homelist[i++]=[108360,"c","Utica","Yes","1,320","Catskill","Excel",2,2];
	homelist[i++]=[108853,"c","Utica","No","1,257","Brockton","Ritz-Craft",2,2];
	homelist[i++]=[108854,"r","Utica","Sale Pending","1,312","Homestead 1","Ritz-Craft",3,2];
	homelist[i++]=[109084,"2","Utica","No","1,858","Rosewood","Ritz-Craft",3,3];
	homelist[i++]=[109191,"r","Utica","No","1,320","Harvest Gold","Ritz-Craft",3,2];
	homelist[i++]=[109203,"r","Utica","No","1,800","Friendship 92043","Fairmont",3,2];
	homelist[i++]=[109275,"r","Utica","No","1,540","Excel Custom Ranch","Excel",3,2];
	
//****************	
	
	homelist[i++]=[109213,"1","Oneonta","Yes","1,038","Bayview 6684-1","Fairmont",3,2];
	homelist[i++]=[109216,"1","Oneonta","Yes","902","Sunwood 810","Skyline",2,1];
	homelist[i++]=[109348,"1","Oneonta","Sale Pending","1,165","Bayview 6633-1","Fairmont",3,2];
	homelist[i++]=[109349,"1","Oneonta","Yes","902","Sunwood 824","Skyline",3,2];
	homelist[i++]=[109392,"1","Oneonta","Yes","640","Inspirations Aspen","Clayton",2,1];
	
	homelist[i++]=[108857,"r","Oneonta","No","1,158","Sunwood 570 Reverse","Skyline",3,2];
	homelist[i++]=[108864,"r","Oneonta","Yes","1,620","Westfield 81588","Fairmont",3,2];
	homelist[i++]=[109038,"r","Oneonta","Yes","1,836","Sea Island Manor","Fairmont",3,2];
	homelist[i++]=[109268,"r","Oneonta","No","1,369","Sunset Ridge 501","Skyline",3,2];
	homelist[i++]=[109371,"r","Oneonta","No","1,013","Inspirations Redwood","Clayton",3,2];
	
	homelist[i++]=[108462,"r","Oneonta","On Sale","1,554","Lakehurst","Excel",3,2];
	homelist[i++]=[108626,"c","Oneonta","Yes","1,960","Hartwick 2","Excel",3,2];
	homelist[i++]=[108649,"r","Oneonta","Sale Pending","1,727","Greenwood","Excel",3,2];
	homelist[i++]=[109140,"r","Oneonta","Yes","1,404","Fairmont 92701KA","Fairmont",3,2];
	homelist[i++]=[109176,"2","Oneonta","No","1,944","Southside Estate","Fairmont",4,3];
	homelist[i++]=[109253,"r","Oneonta","No","1,436","Harvest Gold","Ritz-Craft",3,2];
	homelist[i++]=[109364,"r","Oneonta","No","1,080","Queensbury","Fairmont",3,2];
	
//****************	
	
	homelist[i++]=[109142,"1","Brewerton","Yes","1,165","Bayview 6633-1","Fairmont",3,2];
	homelist[i++]=[109350,"1","Brewerton","Yes","902","Sunwood 805","Skyline",3,2];
	homelist[i++]=[109351,"1","Brewerton","Yes","902","Sunwood 298","Skyline",2,1];
	homelist[i++]=[109361,"1","Brewerton","Yes","1,190","Inspirations Tupelo","Clayton",3,2];
	
	homelist[i++]=[109130,"r","Brewerton","No","1,580","Sunset Ridge 562","Skyline",3,2];
	homelist[i++]=[109180,"r","Brewerton","Sale Pending","1,369","Sunset Ridge 501","Skyline",3,2];
	homelist[i++]=[109211,"r","Brewerton","No","1,158","Sunwood 570","Skyline",3,2];
	homelist[i++]=[109354,"r","Brewerton","No","1,387","Inspirations Noble","Clayton",3,2];
	
	homelist[i++]=[108357,"2","Brewerton","On Sale","2,310","Rockland Manor","Design",4,3];
	homelist[i++]=[108504,"r","Brewerton","On Sale","1,540","Lakehurst","Excel",3,2];	
	homelist[i++]=[108960,"c","Brewerton","Sale Pending","1,312","Cape Alexandria","Ritz-Craft",2,2];
	homelist[i++]=[108992,"r","Brewerton","No","1,695","Siena Manor","Excel",3,2];
	homelist[i++]=[109009,"r","Brewerton","No","1,836","Seabrook Estate","Fairmont",3,2];
	homelist[i++]=[109124,"r","Brewerton","No","1,165","Kingsley 92700RK","Fairmont",2,2];
	homelist[i++]=[109171,"r","Brewerton","No","1,540","Ranch Chalet","Excel",3,2];
	homelist[i++]=[109181,"r","Brewerton","No","1,440","Harvest Gold","Ritz-Craft",3,2];
	
//****************	
	
	homelist[i++]=[109196,"1","whitney","Yes","1,165","Bayview 6677-1","Fairmont",3,2];
	homelist[i++]=[109273,"1","whitney","Yes","1,042","Bayview 6685-1","Fairmont",2,2];
	homelist[i++]=[109296,"1","whitney","Sale Pending","956","Sunwood 200","Skyline",3,2];
	homelist[i++]=[109383,"1","whitney","Yes","880","Inspirations Alder","Clayton",3,1];
	
	homelist[i++]=[109127,"r","whitney","No","1,158","Sunset Ridge 500","Skyline",3,2];
	homelist[i++]=[109175,"r","whitney","Yes","1,620","Triumph 181010","Fairmont",3,2];
	homelist[i++]=[109356,"r","whitney","No","1,280","Inspirations Douglas","Clayton",3,2];
	
	homelist[i++]=[108081,"c","whitney","Sale Pending","1,312","Cape Monaco","Pro-Built",2,2];
	homelist[i++]=[108959,"r","whitney","Yes","1,404","Fairmont 92554","Fairmont",3,2];
	homelist[i++]=[109128,"r","whitney","No","1,320","Harvest Gold","Ritz-Craft",3,2];
	homelist[i++]=[109234,"r","whitney","No","1,595","Sacandaga","Excel",3,2];
	
//****************	
	
	homelist[i++]=[109195,"1","Vernon","Yes","1,165","Bayview 6633-1","Fairmont",3,2];
	homelist[i++]=[109353,"1","Vernon","Yes","1,140","Vista 8016-4021","Schult",3,2];
	homelist[i++]=[109357,"1","Vernon","Yes","880","Inspirations Alder","Clayton",3,1];
	
	homelist[i++]=[109206,"r","Vernon","No","1,144","Sunset Ridge 500","Skyline",3,2];
	homelist[i++]=[109335,"r","Vernon","No","1,066","Vista 4028-15","Schult",2,2];
	homelist[i++]=[109336,"r","Vernon","No","1,386","Vista 5228-6011","Schult",3,2];
	
	homelist[i++]=[108433,"c","Vernon","Sale Pending","1,320","Cape Chelsey","Excel",2,2];
	homelist[i++]=[108974,"r","Vernon","No","1,386","Niagara","Ritz-Craft",3,2];
	homelist[i++]=[109014,"r","Vernon","No","1,165","Fairmont Kingsley 92700","Fairmont",3,2];
	homelist[i++]=[109230,"r","Vernon","No","1,620","Oceanside Estate","Fairmont",3,2];
	homelist[i++]=[109358,"c","Vernon","No","1,440","Harvest Gold Cape","Ritz-Craft",3,2];
	
//****************	
	
	homelist[i++]=[108036,"r","Archive","No","1,536","Vaulted Ranch Chalet","Design",3,2];
	homelist[i++]=[108500,"r","Archive","No","2,085","Rose Hill Estate","Fairmont",3,2];
	homelist[i++]=[107464,"c","Archive","No","1,800","Hartwick","Pro-Built",3,2];
	homelist[i++]=[107810,"r","Archive","No","1,430","Adirondack","Excel",3,2];
	homelist[i++]=[107040,"2","Archive","No","1,771","Malibu","Excel",3,2];
	homelist[i++]=[108428,"r","Archive","No","1,897","Lakeview","Design",3,3];
	homelist[i++]=[108411,"r","Archive","No","1,512","Canton Estate","Fairmont",3,2];
	homelist[i++]=[108652,"r","Archive","No","1,404","Lefton Manor (Optional Kitchen)","Fairmont",3,2];
	homelist[i++]=[108027,"r","Archive","No","1,404","Lefton Manor","Fairmont",3,2];
	homelist[i++]=[107014,"r","Archive","No","1,897","Schuyler Manor","Premier",3,2];
	homelist[i++]=[107320,"r","Archive","No","1,716","Townsend","Premier",3,2];
	homelist[i++]=[106156,"2","Archive","No","2,133","Somerset","Excel",3,3];
	homelist[i++]=[106653,"2","Archive","No","2,464","Cape Richards","Excel",4,3];
	homelist[i++]=[105967,"s","Archive","No","1,771","Split Level","Ritz-Craft",3,2];
	homelist[i++]=[108673,"r","Archive","No","1,836","Seabrook Estate","Fairmont",3,2];
	homelist[i++]=[107862,"2","Archive","No","2,772","Hartford","Design",3,3];
	homelist[i++]=[108591,"r","Archive","No","1,188","Westfield 81618","Fairmont",2,2];
	homelist[i++]=[108473,"r","Archive","No","1,840","Bennington Estate","Fairmont",3,2];
	homelist[i++]=[106946,"r","Archive","No","1,560","Timberbrook Estate","Fairmont",3,2];
	
	return(homelist);
	}

//**********

function makelist()
	{
/*	Makelist takes the output of the search form & develops a sublist through successive filtration.
	A filtration consists of copying from an original homelist array into a new sublist array, only 
	copying those for which a filter criterion is true.  The final sublist is printed out.  */

	var style=search.style;	
	var location=search.location;	
	var display=search.display;
	var manufacturer=search.manufacturer;
	var beds=search.beds;
	var baths=search.baths;	

	var homelist=makearray();
	homelist.sort();

	var sublist=new Array();
	var homecount=homelist.length;
	for(var count=0;count<homecount;count++)
		sublist[count]=homelist[count];
		
	if(style)
		sublist=filterlist(sublist,1,style);

	if(location)
		sublist=filterlist(sublist,2,location);

	if(manufacturer)
		sublist=filterlist(sublist,6,manufacturer);

	if(display)
		sublist=filterlist(sublist,3,display);

	if(beds)
		sublist=filterlist(sublist,7,beds);

	if(baths)
		sublist=filterlist(sublist,8,baths);

	if(sublist.length)
		printlist(sublist);

	else
		document.write('<p align="center"><font size="4"><strong>Nothing there. Try again!</strong></font></p>');
   }

//**********

function makefulllist()
	{
	var homelist=makearray();
	homelist.sort();

	var sublist=new Array();
	var homecount=homelist.length;
	var subcount=0;
	for(var count=0;count<homecount;count++)
		if(homelist[count][2]!="Archive")
			{
			sublist[subcount]=homelist[count];
			subcount++;
			}

	if(sublist.length)
		printlist(sublist);

	else
		document.write('<p align="center"><font size="4"><strong>Nothing there. Try again!</strong></font></p>');
   }

//**********

function filterlist(sublist,ival,checkval)
	{
/*	Filterlist is called by makelist & copies a list into a new list for true criteria.  It checks for
	any specific value passed from the search form.  */

   	var filtercount=sublist.length;
	var subcount=0;
	var newsublist= new Array();
	for(var count=0;count<filtercount;count++)
		if((sublist[count][ival]==checkval)||((ival==3)&&(checkval=="Yes")&&((sublist[count][ival]=="Sale Pending"))||sublist[count][ival]=="On Sale"))
			{
			newsublist[subcount]=sublist[count];
			subcount++;
			}
	return(newsublist);
	}

//**********

function printlist(sublist)
	{
/*	Printlist outputs the general search results to the screen.  */

	var results="";
	var address="";
	var subcount=sublist.length;
	
	results+=document.write('<table class="homelist" width="720" cellpadding="1" cellspacing="0" align="center">');
	results+=document.write('<tr><td class="homelist" colspan="9"><font size = "3"><i><center>For More Information & Pictures About The Houses Below, Simply Click On Their Stock Number</center></i></font></td></tr>');
   	results+=document.write('<tr><td class="homelist" colspan="9"><font size = "3"><i><center><font size="2">Display Model: Yes - The display model is available for sale<br>No - The display model is shown but not available for sale<br>Sale Pending - The display model is shown but already has been sold.<br>On Sale - Special pricing is available on the display model.</center></i></font></td></tr>');
   	results+=document.write('<tr><td class="homelist" align="center"><b>Stock Number</td>');
   	results+=document.write('<td class="homelist" align="center"><b>Home</td>');
   	results+=document.write('<td class="homelist" align="center"><b>Style</td>');
	results+=document.write('<td class="homelist" align="center"><b>Location</td>');
	results+=document.write('<td class="homelist" align="center"><b>Manufacturer</td>');
   	results+=document.write('<td class="homelist" align="center"><b>Display Model</td>');
	results+=document.write('<td class="homelist" align="center"><b>Size</td>');
	results+=document.write('<td class="homelist" align="center"><b># Beds</td>');
	results+=document.write('<td class="homelist" align="center"><b># Baths</td></tr>');


	for(count=0;count<subcount;count++)
		{
		
		address='<a href="http://www.gihomes.net/houses/'+sublist[count][0]+'/"';		
		
      	results+=document.write('<tr align="center"><td class="homelist">'+address+'>');
		results+=document.write(sublist[count][0]+'</a></td>');
      	results+=document.write('<td class="homelist" align="left">'+sublist[count][5]+'</td>');

		switch(sublist[count][1])
			{
			case "1":
				{
				results+=document.write('<td class="homelist">'+'Single Section'+'</td>');
               	break;
               	}
			case "r":
				{
				results+=document.write('<td class="homelist">'+'Ranch'+'</td>');
               	break;
               	}
         	case "c":
				{
				results+=document.write('<td class="homelist">'+'Cape Cod'+'</td>');
				break;
				}
			case "2":
				{
				results+=document.write('<td class="homelist">'+'2 Story'+'</td>');
                break;
                }
			case "s":
				{
				results+=document.write('<td class="homelist">'+'Split Level'+'</td>');
                break;
                }
			}

		if(sublist[count][2]=="whitney")
      		results+=document.write('<td class="homelist">'+'Whitney Point'+'</td>');
		else
      		results+=document.write('<td class="homelist">'+sublist[count][2]+'</td>');

		results+=document.write('<td class="homelist">'+sublist[count][6]+'</td>');
		
		results+=document.write('<td class="homelist">'+sublist[count][3]+'</td>');
		results+=document.write('<td class="homelist"  align="right">'+sublist[count][4]+' sqft'+'</td>');
		results+=document.write('<td class="homelist">'+sublist[count][7]+'</td>');
		results+=document.write('<td class="homelist">'+sublist[count][8]+'</td><tr>');
		}
	results+=document.write('</table>');
   	}

//**********

function specificlist(location)
	{
/*	Specificlist works very similarly to makelist, only a single criterion, location, is searched for.*/		
		
	var homelist=makearray();
	homelist.sort();

	var sublist=new Array();
	var homecount=homelist.length;
		
	for(var count=0;count<homecount;count++)
		sublist[count]=homelist[count];

	if(location)
		sublist=filterlist(sublist,2,location);

	if(sublist.length)
		printlist3(sublist);
	else
		document.write('<p align="center"><font size="4"><strong>Nothing there. Try again!</strong></font></p>');
	}

//**********

function specificlist2(manufacturer)
	{
/*	Specificlist works very similarly to makelist, only a single criterion, manufacturer, is searched for.*/		
		
	var homelist=makearray();
	homelist.sort();

	var sublist=new Array();
	var homecount=homelist.length;
		
	for(var count=0;count<homecount;count++)
		sublist[count]=homelist[count];

	if(manufacturer)
		sublist=filterlist(sublist,6,manufacturer);

	if(sublist.length)
		printlist2(sublist);
	else
		document.write('<p align="center"><font size="4"><strong>Nothing there. Try again!</strong></font></p>');
	}

//**********

function specificlist3(display)
	{
/*	Specificlist works very similarly to makelist, only a single criterion, display, is searched for.*/		
		
	var homelist=makearray();
	homelist.sort();

	var sublist=new Array();
	var homecount=homelist.length;
		
	for(var count=0;count<homecount;count++)
		sublist[count]=homelist[count];

	if(display)
		sublist=filterlist(sublist,3,display);

	if(sublist.length)
		printlist(sublist);
	else
		document.write('<p align="center"><font size="4"><strong>Nothing there. Try again!</strong></font></p>');
	}

//**********

function printlist2(sublist)
	{
/*	Printlist2 works very much like printlist, only location is not printed.  It is called only by the
	specific location's page.  */	
		
	var results="";
   	var address="";
	var subcount=sublist.length;

   	results+=document.write('<table class="homelist"  cellpadding="1" cellspacing="0" align="center">');
	results+=document.write('<tr><td class="homelist" colspan="9"><font size = "3"><i><center>For More Information & Pictures About The Houses Below, Simply Click On Their Stock Number<br><font size="2">Display Available: Yes - The display model is available for sale<br>No - The display model is shown but not available for sale<br>Sale Pending - The display model is shown but already has been sold.<br>On Sale - Special pricing is available on the display model.</center></i></font></td></tr>');
   	results+=document.write('<tr><td class="homelist" align="center"><b>Stock Number</td>');
   	results+=document.write('<td class="homelist" align="center"><b>Home</td>');
   	results+=document.write('<td class="homelist" align="center"><b>Style</td>');
	results+=document.write('<td class="homelist"align="center"><b>Manufacturer</td>');
   	results+=document.write('<td class="homelist" align="center"><b>Display Model Available?</td>');
	results+=document.write('<td class="homelist" align="center"><b>Size</td>');
	results+=document.write('<td class="homelist" align="center"><b># Beds</td>');
	results+=document.write('<td class="homelist" align="center"><b># Baths</td></tr>');

	for(count=0;count<subcount;count++)
		{
      	address='<a href="http://www.gihomes.net/houses/'+sublist[count][0]+'/"';
      	results+=document.write('<tr align="center"><td class="homelist">'+address+'>');
		results+=document.write(sublist[count][0]+'</a></td>');
      	results+=document.write('<td class="homelist" align="left">'+sublist[count][5]+'</td>');

      	switch(sublist[count][1])
      		{
      		case "1":
				{
				results+=document.write('<td class="homelist">'+'Single Section'+'</td>');
				break;
				}
         	case "r":
				{
				results+=document.write('<td class="homelist">'+'Ranch'+'</td>');
				break;
				}
         	case "c":
				{
				results+=document.write('<td class="homelist">'+'Cape Cod'+'</td>');
                break;
                }
         	case "2":
				{
				results+=document.write('<td class="homelist">'+'2 Story'+'</td>');
                break;
                }
         	case "s":
				{
				results+=document.write('<td class="homelist">'+'Split Level'+'</td>');
                break;
                }
			}

   	results+=document.write('<td class="homelist">'+sublist[count][6]+'</td>');
	
	results+=document.write('<td class="homelist">'+sublist[count][3]+'</td>');
    results+=document.write('<td class="homelist" align="right">'+sublist[count][4]+' sqft'+'</td>');
	results+=document.write('<td class="homelist">'+sublist[count][7]+'</td>');
	results+=document.write('<td class="homelist">'+sublist[count][8]+'</td><tr>');    
	}
   	results+=document.write('</table>');
   	}
   	
//**********

function printlist3(sublist)
	{
/*	Printlist3 works very much like printlist, only location is not printed.  It is called only by the
	specific location's page.  */	
		
	var results="";
   	var address="";
	var subcount=sublist.length;

   	results+=document.write('<table class="homelist"  cellpadding="1" cellspacing="0" align="center">');
	
	if(sublist[0][2]=="Archive")
		results+=document.write('<tr><td class="homelist" colspan="9"><font size = "3"><i><center>Previous Popular Homes<br><font size="2">These homes are no longer on display, but can be ordered and show some of the possibilities available!</font></center></i></font></td></tr>');
	
	results+=document.write('<tr><td class="homelist" colspan="9"><font size = "3"><i><center>For More Information & Pictures About The Houses Below, Simply Click On Their Stock Number<br></center></i></font></td></tr>');
   	
   	if(sublist[0][2]!="Archive")
		results+=document.write('<tr><td class="homelist" colspan="9"><i><center><font size="2">Display Available: Yes - The display model is available for sale<br>No - The display model is shown but not available for sale<br>Sale Pending - The display model is shown but already has been sold.<br>On Sale - Special pricing is available on the display model.</center></i></font></td></tr>');
	
   	
   	results+=document.write('<tr><td class="homelist" align="center"><b>Stock Number</td>');
   	results+=document.write('<td class="homelist" align="center"><b>Home</td>');
   	results+=document.write('<td class="homelist" align="center"><b>Style</td>');
	results+=document.write('<td class="homelist"align="center"><b>Manufacturer</td>');
   	
   	if(sublist[0][2]!="Archive")
	   	results+=document.write('<td class="homelist" align="center"><b>Display Model Available?</td>');
	
	results+=document.write('<td class="homelist" align="center"><b>Size</td>');
	results+=document.write('<td class="homelist" align="center"><b># Beds</td>');
	results+=document.write('<td class="homelist" align="center"><b># Baths</td></tr>');

	for(count=0;count<subcount;count++)
		{
      	address='<a href="http://www.gihomes.net/houses/'+sublist[count][0]+'/"';
      	results+=document.write('<tr align="center"><td class="homelist">'+address+'>');
		results+=document.write(sublist[count][0]+'</a></td>');
      	results+=document.write('<td class="homelist" align="left">'+sublist[count][5]+'</td>');

      	switch(sublist[count][1])
      		{
      		case "1":
				{
				results+=document.write('<td class="homelist">'+'Single Section'+'</td>');
				break;
				}
         	case "r":
				{
				results+=document.write('<td class="homelist">'+'Ranch'+'</td>');
				break;
				}
         	case "c":
				{
				results+=document.write('<td class="homelist">'+'Cape Cod'+'</td>');
                break;
                }
         	case "2":
				{
				results+=document.write('<td class="homelist">'+'2 Story'+'</td>');
                break;
                }
         	case "s":
				{
				results+=document.write('<td class="homelist">'+'Split Level'+'</td>');
                break;
                }
			}

   	results+=document.write('<td class="homelist">'+sublist[count][6]+'</td>');
	
	if(sublist[0][2]!="Archive")
		results+=document.write('<td class="homelist">'+sublist[count][3]+'</td>');
    
    results+=document.write('<td class="homelist" align="right">'+sublist[count][4]+' sqft'+'</td>');
	results+=document.write('<td class="homelist">'+sublist[count][7]+'</td>');
	results+=document.write('<td class="homelist">'+sublist[count][8]+'</td><tr>');    
	}
   	results+=document.write('</table>');
   	}