Mercurial > eagle-eye

comparison warfare.pl @ 232:978a949602e5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Auto-update Scientists numbers for Academy. Refined the rules for safehouse, the safe house must be same or higher level then Town Hall. Make people very happy, when the townHall is less then 16. Build museum first then tavern THG: changed warfare.pl
author "Rex Tsai <chihchun@kalug.linux.org.tw>"
date Thu, 06 Nov 2008 20:31:05 +0800
parents 31fca1e55ed5
children 64549ddddf4a
comparison
equal deleted inserted replaced
231:c0b9604b0be9 232:978a949602e5
75 my @cities = Ikariam::Cities->search_sheeps(($x + 6), ($x - 6), ($y + 6), ($y - 6)); 75 my @cities = Ikariam::Cities->search_sheeps(($x + 6), ($x - 6), ($y + 6), ($y - 6));
76 CITY: foreach my $city (@cities) { 76 CITY: foreach my $city (@cities) {
77 my $sheep = $city->user; 77 my $sheep = $city->user;
78 my $island = $city->island; 78 my $island = $city->island;
79 79
80 # TODO update sheep and island information.
80 81
81 # we don't fight friends. 82 # we don't fight friends.
82 # FIXME: This is very dirty for accessing to $::i directly. 83 # FIXME: This is very dirty for accessing to $::i directly.
83 foreach (keys(%{$::i->{friends}})) { 84 foreach (keys(%{$::i->{friends}})) {
84 next CITY if ($sheep->id == $_); 85 next CITY if ($sheep->id == $_);