Mercurial > eagle-eye
diff sheep.pl @ 33:d183277b4d93
refined the output message.
author | "Rex Tsai <chihchun@kalug.linux.org.tw>" |
---|---|
date | Sat, 11 Oct 2008 05:19:29 +0800 |
parents | 93d4e6ffe330 |
children | 5849b6fdc76c |
line wrap: on
line diff
--- a/sheep.pl Sat Oct 11 01:22:16 2008 +0800 +++ b/sheep.pl Sat Oct 11 05:19:29 2008 +0800 @@ -82,15 +82,18 @@ my $robbery = $c->citylevel * ($c->citylevel - 1) * $sheep->trader_score_secondary / 10000; next if($robbery < 2000); + $line = sprintf("%d %s army %d %s/%s(%d),", $robbery, $c->status, $sheep->army_score_main, $sheep->name, $sheep->ally, $members); - $line .= sprintf("\"%s\" %d [%d,%d] %s http://s2.ikariam.tw/index.php?view=island&id=%d\n", + $line .= sprintf("\"%s\" %d [%d,%d] %s http://s2.ikariam.tw/index.php?view=island&id=%d&selectCity=%d\n", $c->cityname, $c->citylevel, $island->x, $island->y, $tradegoodText[$island->tradegood], - $island->id); + $island->id, + $c->cityId + ); printf("%s", $line); }