| ");
include( 'search.alc' );
print(" | ");
print "| Select Category |
|---|
";
$categories = array( 'Greek', 'Roman_Republic', 'Roman_Imperial_and_Provincial' );
while( list( $key, $value ) = each( $categories ))
{
print "| ";
$value = ereg_replace( "_", " ", $value );
print "$value | \n";
}
print " |
|---|
");
$nolines = ereg_replace("_", " ", $precanned );
if ( $precanned )
print("| Current Category: \"$nolines\" |
|---|
");
$leadins = array(
'*' => ' ',
'+' => ' ',
'2' => ' ',
'4' => ' '
);
if ( $precanned )
{
$fp = fopen( "canned/$precanned.txt", 'r');
while( $line = fgets( $fp, 256 ) )
{
$leading = '';
$explain = '';
$items = array();
ereg( '([^a-zA-Z ]*) *([^#]+)#*(.+)', $line, $items);
$term=rawurlencode("^[^[:space:]]+\W+".chop($items[2]).' ');
$leadin = $leadins[$items[1]];
if ( $items[1] == '-')
print("| $items[2]");
else
print(" | | $leadin$items[2]");
if ( ereg( '\w', $items[3] ))
print(" - $items[3]");
print(" | \n");
}
}
print " ";
print " |
");
print("