comparison agent.pl @ 321:d3bcdaa0180c

changed level of barrack
author "Rex Tsai <chihchun@kalug.linux.org.tw>"
date Mon, 26 Jan 2009 00:24:35 +0800
parents ddfbb413d4dc
children 4cf62bfa4cbd
comparison
equal deleted inserted replaced
320:ddfbb413d4dc 321:d3bcdaa0180c
246 246
247 sub is_barracks_level_enough { 247 sub is_barracks_level_enough {
248 my ($self, $city) = @_; 248 my ($self, $city) = @_;
249 return 0 if(!defined($city->{buildings}->{barracks})); 249 return 0 if(!defined($city->{buildings}->{barracks}));
250 if($self->is_robotics_researched() eq 1) { 250 if($self->is_robotics_researched() eq 1) {
251 return ($city->{buildings}->{barracks} >= 16 ? 1 : 0); 251 return ($city->{buildings}->{barracks} >= 24 ? 1 : 0);
252 } 252 }
253 253
254 if($city->{buildings}->{townHall} >= 10) { 254 if($city->{buildings}->{townHall} >= 10) {
255 # optimum is 5 255 # optimum is 5
256 return ($city->{buildings}->{barracks} >= 5 ? 1 : 0); 256 return ($city->{buildings}->{barracks} >= 5 ? 1 : 0);