comparison warfare.pl @ 124:f8c97e5d77ab

translated comments.
author "Rex Tsai <chihchun@kalug.linux.org.tw>"
date Thu, 30 Oct 2008 17:25:20 +0800
parents 11541129a389
children 4374173bab47
comparison
equal deleted inserted replaced
123:6043e9bfdeef 124:f8c97e5d77ab
58 58
59 foreach my $city (@cities) { 59 foreach my $city (@cities) {
60 my $sheep = $city->user; 60 my $sheep = $city->user;
61 my $island = $city->island; 61 my $island = $city->island;
62 62
63 # Ignore 假期模式 63 # Ignore the user in vacation which we can not attack.
64 next if($city->status eq 'v'); 64 next if($city->status eq 'v');
65 unless ($city->status eq 'i') { 65 unless ($city->status eq 'i') {
66 unless (!defined($sheep->allyId) || $sheep->allyId == 0) { 66 unless (!defined($sheep->allyId) || $sheep->allyId == 0) {
67 my $ally = Ikariam::Ally->retrieve($sheep->allyId); 67 my $ally = Ikariam::Ally->retrieve($sheep->allyId);
68 # Ignore the ally which have more then 10 members. 68 # Ignore the ally which have more then 10 members.