Actions: Added some fundamental movement actions.

Places: Added functions for adding and getting places, and for finding places of specific types. Added beds, chairs and chest as places.
NPC: Added places map and action queue.

actions/places.lua

@@ -0,0 +1,82 @@
+-- Places code for Advanced NPC by Zorman2000
+---------------------------------------------------------------------------------------
+-- Places functionality
+---------------------------------------------------------------------------------------
+-- In addition, the NPCs need to know where some places are, and know
+-- where there are nodes they can use. For example, they need to know where the
+-- chest they use is located, both to walk to it and to use it. They also need
+-- to know where the farm they work is located, or where the bed they sleep is.
+-- Other mods have to be supported for this to work correctly, as there are
+-- many sitting nodes, many beds, many tables, chests, etc. For now, by default,
+-- support for default and cottages is going to be provided.
+
+npc.places = {}
+
+npc.places.nodes = {
+  BEDS = {
+	 "beds:bed_bottom",
+	 "beds:fancy_bed_bottom"
+  }, 
+  CHAIRS = {
+	 "cottages:bench"
+  },
+  CHESTS = {
+	 "default:chest",
+	 "default:chest_locked"
+  }
+}
+
+npc.places.PLACE_TYPE = {
+	"OWN_BED",
+	"OWN_CHEST",
+	"HOUSE_CHAIR",
+	"HOUSE_TABLE",
+	"HOUSE_FURNACE",
+	"HOUSE_ENTRANCE"
+}
+
+
+function npc.places.add(self, place_name, place_type, pos)
+	self.places_map[place_name] = {type=place_type, pos=pos}
+end
+
+-- Adds a specific node to the NPC places, and modifies the
+-- node metadata to identify the NPC as the owner. This allows
+-- other NPCs to avoid to take this as their own.
+function npc.places.add_owned(self, place_name, place_type, pos)
+  -- Get node metadata
+  local meta = minetest.get_meta(pos)
+  -- Check if it is owned by an NPC?
+  if meta:get_string("npc_owner") == "" then
+    -- Set owned by NPC
+    meta:set_string("npc_owner", self.npc_id)
+    -- Add place to list
+    npc.places.add(self, place_name, place_type, pos)
+    return true
+  end
+  return false
+end
+
+function npc.places.get_by_type(self, place_type)
+	local result = {}
+	for place_name, place_entry in pairs(self.places_map) do
+		if place_entry.type == place_type then
+      table.insert(result, place_name)
+    end
+	end
+  return result
+end
+
+-- This function searches on a squared are of the given radius
+-- for nodes of the given type. The type should be npc.places.nodes
+function npc.places.find_new_nearby(self, type, radius)
+  -- Get current pos
+  local current_pos = self.object:getpos()
+   -- Determine area points
+  local start_pos = {x=current_pos.x - radius, y=current_pos.y - 1, z=current_pos.z - radius}
+  local end_pos = {x=current_pos.x + radius, y=current_pos.y + 1, z=current_pos.z + radius}
+  -- Get nodes
+  local nodes = minetest.find_nodes_in_area(start_pos, end_pos, type)
+  
+  return nodes
+end