comparison agent.pl @ 320:ddfbb413d4dc

maxium level of museum is 8
author "Rex Tsai <chihchun@kalug.linux.org.tw>"
date Mon, 12 Jan 2009 22:36:46 +0800
parents 61dd017416cf
children d3bcdaa0180c
comparison
equal deleted inserted replaced
319:61dd017416cf 320:ddfbb413d4dc
49 return ($city->{buildings}->{embassy} >= 6 ? 1 : 0); 49 return ($city->{buildings}->{embassy} >= 6 ? 1 : 0);
50 } 50 }
51 51
52 sub is_museum_enough { 52 sub is_museum_enough {
53 my ($self, $city) = @_; 53 my ($self, $city) = @_;
54 return 1 if($city->{buildings}->{museum} >= 9); 54 return 1 if($city->{buildings}->{museum} >= 8);
55 } 55 }
56 56
57 sub is_tavern_enough { 57 sub is_tavern_enough {
58 my ($self, $city) = @_; 58 my ($self, $city) = @_;
59 return 0 if(!defined($city->{buildings}->{tavern})); 59 return 0 if(!defined($city->{buildings}->{tavern}));