Calc paths when restore

spec/command_spec.cr

@@ -94,8 +94,10 @@ module Game::TestCommand
       world = World.new create_map_with_resource
       world.resources.inc(Resource::Type::Crystals, 20)
       command = RestoreCommand.new Point.new(0, 1), once: true
-      world.push command
+      time_point = (20 + 2 * 2 + 1 * 2).to_i64
-      world.run 20
+      done_at = world.push command
+      done_at.should eq time_point
+      world.run time_point
       # Check world resources
       world.resources[Resource::Type::Crystals].should eq 15
       # Check tile deposit

src/game/command.cr

@@ -118,12 +118,17 @@ module Game
       end
       resource = restoration.resource
       @deposit_tile = nearest_deposit(world, resource.type)
-      if @deposit_tile
+      stock_tile = nearest_stock(world)
+      if @deposit_tile && stock_tile
         world.resources.dec restoration.input
         @holded = resource
-      end
+        restoration.ts +
+          2 * tile.point.distance(stock_tile.point) +
+          2 * tile.point.distance(@deposit_tile.as(DepositTile).point)
+      else
         restoration.ts
       end
+    end
 
     def finish(world : World)
       if @deposit_tile && @holded
@@ -140,6 +145,13 @@ module Game
       end
       tile.as?(DepositTile)
     end
+
+    private def nearest_stock(world : World) : BuildingTile?
+      tile = world.map.nearest_tile @point do |t|
+        t.is_a?(BuildingTile) && t.building.has_role Building::Role::Storehouse
+      end
+      tile.as?(BuildingTile)
+    end
   end
 
   # class BuildCrystalHarvesterCommand < Command