Coin Images
 Home    Coin Photos   Links
 

**Please Note: None of these coins are for sale **

"); if ( file_exists( "$precanned.jpg")) print(""); print("
"); include( 'search.alc' ); print(""); print ""; $categories = array( 'Greek', 'Roman_Republic', 'Roman_Imperial_and_Provincial' ); while( list( $key, $value ) = each( $categories )) { print "\n"; } print ""); $nolines = ereg_replace("_", " ", $precanned ); if ( $precanned ) print(""); $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("\n"); } } print "
Select Category
"; $value = ereg_replace( "_", " ", $value ); print "$value
Search For: "; $now = time(); $month = strftime("%b", $now); $monthnumber = strftime( "%m", $now ); $day = strftime( "%d", $now ); $year = strftime( "%Y", $now ); print("
New Since:
Current Category: \"$nolines\"
$items[2]"); else print("
$leadin$items[2]"); if ( ereg( '\w', $items[3] )) print(" - $items[3]"); print("
"; print "
"; ?>