Mercurial > eagle-eye

comparison warfare.pl @ 268:285d5b39ef2c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
we hused 3 Phalanx for plunder
author "Rex Tsai <chihchun@kalug.linux.org.tw>"
date Tue, 25 Nov 2008 23:46:42 +0800
parents 53827cc442b6
children 6bce423892f4
comparison
equal deleted inserted replaced
267:06ee88d2bb2a 268:285d5b39ef2c
63 } 63 }
64 64
65 sub is_army_available { 65 sub is_army_available {
66 my ($self, $city) = @_; 66 my ($self, $city) = @_;
67 # 方陣撞不死 67 # 方陣撞不死
68 return ($city->{army}->{Swordsman} >= 2 && $city->{army}->{Phalanx} >= 1) ? 1 : 0; 68 # return ($city->{army}->{Swordsman} >= 2 && $city->{army}->{Phalanx} >= 1) ? 1 : 0;
69 return ($city->{army}->{Phalanx} >= 3) ? 1 : 0;
69 } 70 }
70 71
71 sub locateVictim { 72 sub locateVictim {
72 my ($self, $city, $x, $y, $tradegood) = @_; 73 my ($self, $city, $x, $y, $tradegood) = @_;
73 74