Mercurial > eagle-eye

changeset 302:efffa408eec5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
refined the output of spy information
author "Rex Tsai <chihchun@kalug.linux.org.tw>"
date Sun, 07 Dec 2008 22:25:52 +0800
parents 07f51bb67e56
children 50cff2eee239
files enemy.pl sheep.pl
diffstat 2 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/enemy.pl	Sun Dec 07 22:25:30 2008 +0800
+++ b/enemy.pl	Sun Dec 07 22:25:52 2008 +0800
@@ -115,7 +115,8 @@
         if(-f sprintf("spy-%d-dump.yaml", $city->cityId)) {
             my $spydata = LoadFile(sprintf("spy-%d-dump.yaml", $city->cityId));
             if($spydata->{city}->{buildings}->{townHall} ne $city->citylevel) {
-                printf("*OUTDATED* ");
+                printf("Hall: %s", $city->citylevel);
+                printf("\n*OUTDATED* ");
             }
             printf("Hall: %s, Wall: %s, Port: %s, Safehouse: %s, Risk: %s\n", 
                     $spydata->{city}->{buildings}->{townHall}, 
--- a/sheep.pl	Sun Dec 07 22:25:30 2008 +0800
+++ b/sheep.pl	Sun Dec 07 22:25:52 2008 +0800
@@ -11,6 +11,7 @@
 
 # only challenge the small victims
 my $army_score_main = ($mime->army_score_main / 3);
+$army_score_main = 300;
 
 my @tradegoodText = qw/NULL 葡萄酒 大理石 水晶 硫磺/;