Contact Us
Menu


Street Pictures

‘Ball Road’, ‘bar’=>’Barton Road’, ‘bel’=>’Bellvale Road’, ‘bou’=>’Boulevard’, ‘bri’=>’Briarcliff Road’, ‘cob’=>’Cobb Road’, ‘con’=>’Condit Road’, ‘cov’=>’Cove Place’, ‘cra’=>’Crane Road’, ‘cre’=>’Crestview Road’, ‘cry’=>’Crystal Road’, ‘dar’=>’Dartmouth Road’, ‘elm’=>’Elm Road’, ‘esh’=>’East Shore Road’, ‘fer’=>’Fernwood Place’, ‘gle’=>’Glen Road’, ‘han’=>’Hanover Road’, ‘hil’=>’Hillcrest Road’, ‘how’=>’Howell Road’, ‘int’=>’Intervale Road’, ‘ken’=>’Kenilworth Road’, ‘lak’=>’Lake Drive’, ‘lau’=>’Laurel Hill Road’, ‘loo’=>’Lookout Road’, ‘lar’=>’Larchdell Way’, ‘low’=>’Lowell Road’, ‘mel’=>’Melrose Road’, ‘mid’=>’Midvale Road’, ‘mor’=>’Morris Ave.’, ‘nbr’=>’North Briarcliff Road’, ‘ncr’=>’North Crane Rd’, ‘ngl’=>’North Glen Road’, ‘npo’=>’North Pocono Road’, ‘ncr’=>’North Crane Road’, ‘oak’=>’Oak Lane’, ‘ove’=>’Overlook Road’, ‘poc’=>’Pocono Road’, ‘poi’=>’Point View Place’, ‘pol’=>’Pollard Road’, ‘ray’=>’Raynold Road’, ‘tow’=>’Tower Hill Road’, ‘val’=>’Valley Road’, ‘woo’=>’Woodland Ave.’, ‘wsh’=>’West Shore Road’);

# House photos with non-standard names
$otherphotos = array (
‘Hbri017’,
‘Hbri023’,
‘Hgle027’,
‘Hlau150’,
‘Hloo044’,
‘Hmel074’,
‘Hmel080’,
‘Hmel089’,
‘Hmel090’,
‘Hken078’
);

# Environmental Variables
$data[‘Date’] = date(‘D M d, Y g:i:s a’);
$data[‘RequestMethod’] = $_SERVER[‘REQUEST_METHOD’];
$data[‘UserIP’] = $_SERVER[‘REMOTE_ADDR’];
$data[‘Userbrowser’] = $_SERVER[‘HTTP_USER_AGENT’];
# $data[‘Referer’] = $_SERVER[‘HTTP_REFERER’]; # Commented out. MW 7Apr13
$numfields = count($_POST);

# GET data
$S = $_GET[‘id’];

if ( preg_match(‘/S(…)/’,$S,$flds) ) {
$stsymb = $flds[1];
$stname = $sts[$stsymb];
} else {
# Added die – MW 30Jun13
die();
}

print “\"$stname\n\n”;

# Preset add array (MW 30Mar14)
$add = array();

$DIR = opendir(‘.’); # Open directory
while( $f=readdir($DIR) ) {
if ( preg_match(“/H$stsymb(…).*jpg/”,$f,$a) ) { $add[$a[1]] = true; } # Store relevant addresses
}

# Add streets with non-standard photos
foreach($otherphotos as $f) {
if ( preg_match(“/H$stsymb(…)/”,$f,$a) ) { $add[$a[1]] = true; } # Store relevant addresses
}

if ( count($add) == 0 ) {
print “

\nThere are no pictures for this street\n”;
}

else if ( count($add) > 0 ) {
print “

\n”;
print “The following pictures are available:

\n\n”;

ksort($add);
foreach ( array_keys($add) as $hnum ) {
$hnum1 = ltrim($hnum,’0′);
print “$hnum1 $stname\n”;
}
}

# Add-ons:
if( $S == ‘Sbou’ ) { print “
\nUnknown Number
\n”; }
if( $S == ‘Sbri’ ) { print “
\nParish Hall of Community Church
\n”; }
if( $S == ‘Sdar’ ) { print “
\nCorner of Lake Dr. and Dartmouth Rd.
\n”; }
if( $S == ‘Sesh’ ) { print “
\n* 15 East Shore Road includes a number of interior photos\n”; }
if( $S == ‘Slak’ ) {
print “
\nIntersection of Lake Dr. & Dartmouth Rd.
\n”;
print “
\nIntersection of Lake Dr. & Midvale Rd.
\n”;
}
if( $S == ‘Smid’ ) { print “
\nCorner of Lake Dr. and Midvale Rd.
\n”; }
if( $S == ‘Smel’ ) { print “
\nGroup picture of 74 Melrose Road, 80 Melrose Road, 89 Melrose Road, 90 Melrose Road, and 78 Kenilworth Road
\n”; }
if( $S == ‘Sken’ ) { print “
\nGroup picture of 78 Kenilworth Road and several houses on Melrose Road
\n”; }

?>