wolves howl

git-svn-id: http://svn.net-core.org/repos/t-engine4@770 51575b47-30f0-44d4-a5cc-537603b46e54

game/modules/tome/data/general/npcs/canine.lua

@@ -58,6 +58,7 @@ newEntity{ base = "BASE_NPC_CANINE",
 	max_life = resolvers.rngavg(60,90),
 	combat_armor =2, combat_def = 4,
 	combat = { dam=6, atk=15, apr=3 },
+	resolvers.talents{ [Talents.T_HOWL]=1, },
 }
 
 newEntity{ base = "BASE_NPC_CANINE",
@@ -68,6 +69,7 @@ newEntity{ base = "BASE_NPC_CANINE",
 	max_life = resolvers.rngavg(80,110),
 	combat_armor = 3, combat_def = 5,
 	combat = { dam=9, atk=15, apr=4 },
+	resolvers.talents{ [Talents.T_HOWL]=1, },
 }
 
 newEntity{ base = "BASE_NPC_CANINE",
@@ -78,6 +80,7 @@ newEntity{ base = "BASE_NPC_CANINE",
 	max_life = resolvers.rngavg(70,100),
 	combat_armor = 3, combat_def = 4,
 	combat = { dam=8, atk=15, apr=3 },
+	resolvers.talents{ [Talents.T_HOWL]=2, },
 
 	resists = { [DamageType.FIRE] = -50, [DamageType.COLD] = 100 },
 }
@@ -90,6 +93,7 @@ newEntity{ base = "BASE_NPC_CANINE",
 	max_life = resolvers.rngavg(60,100),
 	combat_armor = 5, combat_def = 7,
 	combat = { dam=10, atk=17, apr=5 },
+	resolvers.talents{ [Talents.T_HOWL]=3, },
 }
 
 newEntity{ base = "BASE_NPC_CANINE",
@@ -117,6 +121,7 @@ newEntity{ base = "BASE_NPC_CANINE",
 		{type="animal", subtype="canine", name="warg", number=6},
 	},
 	resolvers.talents{
+		[Talents.T_HOWL]=5,
 		[Talents.T_RUSH]=3,
 		[Talents.T_CRIPPLE]=3,
 	},

game/modules/tome/data/talents/misc/npcs.lua

@@ -602,3 +602,35 @@ newTalent{
 		The damage will increase with the Strength stat]]):format(12 + self:getStr(50) * self:getTalentLevel(t))
 	end,
 }
+
+newTalent{
+	name = "Howl",
+	type = {"wild-gift/other", },
+	points = 5,
+	equilibrium = 5,
+	cooldown = 10,
+	tactical = {
+		ATTACK = 10,
+	},
+	range = 20,
+	action = function(self, t)
+		local rad = self:getTalentLevel(t) + 5
+		for i = self.x - rad, self.x + rad do for j = self.y - rad, self.y + rad do if game.level.map:isBound(i, j) then
+			local actor = game.level.map(i, j, game.level.map.ACTOR)
+			if actor and not actor.player then
+				if self:reactionToward(actor) >= 0 then
+					local tx, ty, a = self:getTarget()
+					if a then
+						actor:setTarget(a)
+					end
+				else
+					actor:setTarget(self)
+				end
+			end
+		end end end
+		return true
+	end,
+	info = function(self, t)
+		return ([[Howl a call to your hunting pack.]])
+	end,
+}