Mercurial > eagle-eye
comparison sheep.pl @ 341:6296a9cd6878
get more army we can fight
author | "Rex Tsai <chihchun@kalug.linux.org.tw>" |
---|---|
date | Thu, 12 Feb 2009 21:13:39 +0800 |
parents | 7077be1a14d5 |
children | 85d60a0569bf |
comparison
equal
deleted
inserted
replaced
339:a3cbe8bb4890 | 341:6296a9cd6878 |
---|---|
9 $myAlly = Ikariam::Ally->retrieve($mime->allyId) | 9 $myAlly = Ikariam::Ally->retrieve($mime->allyId) |
10 if(defined($mime->allyId) && $mime->allyId ne '0'); | 10 if(defined($mime->allyId) && $mime->allyId ne '0'); |
11 | 11 |
12 # only challenge the small victims | 12 # only challenge the small victims |
13 my $army_score_main = ($mime->army_score_main / 3); | 13 my $army_score_main = ($mime->army_score_main / 3); |
14 $army_score_main = 300; | |
15 | 14 |
16 my @tradegoodText = qw/NULL 葡萄酒 大理石 水晶 硫磺/; | 15 my @tradegoodText = qw/NULL 葡萄酒 大理石 水晶 硫磺/; |
17 | 16 |
18 Ikariam::User->has_many(cities => 'Ikariam::Cities'); | 17 Ikariam::User->has_many(cities => 'Ikariam::Cities'); |
19 Ikariam::User->has_a(ally => 'Ikariam::Ally'); | 18 Ikariam::User->has_a(ally => 'Ikariam::Ally'); |