# HG changeset patch # User "Rex Tsai " # Date 1228659952 -28800 # Node ID efffa408eec58849915f487afd251148464e23b4 # Parent 07f51bb67e56e3c92f7ad097b060746e4433306d refined the output of spy information diff -r 07f51bb67e56 -r efffa408eec5 enemy.pl --- 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}, diff -r 07f51bb67e56 -r efffa408eec5 sheep.pl --- 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 葡萄酒 大理石 水晶 硫磺/;