Mercurial > eagle-eye
diff enemy.pl @ 357:f9a6b226fb79
capture scores names nothing, fixed the risk of spy
author | "Rex Tsai <chihchun@kalug.linux.org.tw>" |
---|---|
date | Sun, 15 Feb 2009 15:00:09 +0800 |
parents | 6c03c2c80429 |
children | 2cfa03edc22e |
line wrap: on
line diff
--- a/enemy.pl Sun Feb 15 14:21:27 2009 +0800 +++ b/enemy.pl Sun Feb 15 15:00:09 2009 +0800 @@ -108,7 +108,6 @@ printf("\nCities\n"); foreach my $city ($u->cities) { my $island = Ikariam::Island->retrieve($city->island); - my $capture = $city->citylevel * ($city->citylevel - 1) * $u->trader_score_secondary / 10000; printf("Name: %s [%s:%s]\n", $city->cityname, $island->x, $island->y); if(defined($city->status)) { @@ -127,12 +126,11 @@ $spydata->{city}->{buildings}->{wall}, $spydata->{city}->{buildings}->{port}, $spydata->{city}->{buildings}->{safehouse}, - $spydata->{risks}[1]); + $spydata->{risks}[4]); } else { printf("Level: %s, Rsik %d\n", $city->citylevel, $city->risk); } - printf("Capture: %d\n", $capture); printf("Tradegood: %s, Wonder: %s\n", $tradegoodText[$island->tradegood], $wonderText[$island->wonder]); # printf("Island: %s\n", $island->name);