diff warfare.pl @ 268:285d5b39ef2c

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
line wrap: on
line diff
--- a/warfare.pl	Tue Nov 25 23:08:00 2008 +0800
+++ b/warfare.pl	Tue Nov 25 23:46:42 2008 +0800
@@ -65,7 +65,8 @@
 sub is_army_available {
     my ($self, $city) = @_;
     # 方陣撞不死
-    return ($city->{army}->{Swordsman} >= 2 && $city->{army}->{Phalanx} >= 1) ? 1 : 0;
+    # return ($city->{army}->{Swordsman} >= 2 && $city->{army}->{Phalanx} >= 1) ? 1 : 0;
+    return ($city->{army}->{Phalanx} >= 3) ? 1 : 0;
 }
 
 sub locateVictim {