comparison sheep.pl @ 295:15c288dd7dc5

checking spy risks
author "Rex Tsai <chihchun@kalug.linux.org.tw>"
date Sun, 07 Dec 2008 15:10:14 +0800
parents c30080146c05
children efffa408eec5
comparison
equal deleted inserted replaced
290:2cdf6c6bfd0e 295:15c288dd7dc5
73 next if($capture < 200); 73 next if($capture < 200);
74 74
75 # 測試風險評估 75 # 測試風險評估
76 # $capture = $capture - ($sheep->army_score_main*100); 76 # $capture = $capture - ($sheep->army_score_main*100);
77 77
78 $line = sprintf("%d %s score %d army %d %s/%s,", 78 $line = sprintf("%d %s score %d army %d risk %d %s/%s,",
79 $capture, 79 $capture,
80 $c->status, $sheep->score, $sheep->army_score_main, $sheep->name, $sheep->ally); 80 $c->status, $sheep->score, $sheep->army_score_main, $c->risk, $sheep->name, $sheep->ally);
81 81
82 $line .= sprintf("\"%s\" %d [%d,%d] %s http://%s/index.php?view=island&id=%d&selectCity=%d\n", 82 $line .= sprintf("\"%s\" %d [%d,%d] %s http://%s/index.php?view=island&id=%d&selectCity=%d\n",
83 $c->cityname, $c->citylevel, 83 $c->cityname, $c->citylevel,
84 $island->x, $island->y, 84 $island->x, $island->y,
85 $tradegoodText[$island->tradegood], 85 $tradegoodText[$island->tradegood],