--- a/scan.pl	Wed Oct 08 01:51:08 2008 +0800
+++ b/scan.pl	Wed Oct 08 01:51:28 2008 +0800
@@ -8,12 +8,11 @@
 $i->login;
 
 my @islands;
-if($#ARGV >= 2) {
+if($#ARGV >= 1) {
     @islands = $i->viewWorldMap($ARGV[0], $ARGV[1]);
 } else {
     @islands = $i->viewHomeMap();
 }
-# my @islands = $i->viewWorldMap(50, 34);
 
 foreach my $island (@islands)
 {
@@ -33,11 +32,11 @@
         $city->{island} = $island->{id};
         if(my $c = Ikariam::Cities->retrieve($city->{cityId}))
         {
-            #foreach my $i (keys(%$city))
-            #{
-            #    eval($c->$i($city->{$i}));
+            foreach my $i (keys(%$city))
+            {
+                eval($c->$i($city->{$i}));
             #    printf("%s %s ", $i, $city->{$i});
-            #}
+            }
             #print ("\n");
 
             $c->autoupdate(1);
@@ -49,21 +48,4 @@
     }
 }
 
-
-# TODO
-# $i->worldmap($x, $y);
-# http://s2.ikariam.tw/index.php?view=worldmap_iso
-# xajax getMapData
-# xajaxargs[]   54
-# xajaxargs[]   30
-# xajaxr        1223302744553
-# $i->getAcount() account database.
-
-# 經濟, 軍事
-# http://s2.ikariam.tw/index.php
-# view	highscore
-# highscoreType	score
-# offset	-1
-# searchUser	chihchun
-
 # $i->getCityInfo();