moss tree

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

@@ -1842,6 +1842,43 @@ newDamageType{
 	end,
 }
 
+newDamageType{
+	name = "nurishing moss", type = "NURISHING_MOSS",
+	projector = function(src, x, y, type, dam)
+		local target = game.level.map(x, y, Map.ACTOR)
+		if target and src:reactionToward(target) < 0 then
+			local realdam = DamageType:get(DamageType.NATURE).projector(src, x, y, DamageType.NATURE, dam.dam)
+			if realdam > 0 then src:heal(realdam * dam.factor, target) end
+		end
+	end,
+}
+
+newDamageType{
+	name = "slippery moss", type = "SLIPPERY_MOSS",
+	projector = function(src, x, y, type, dam)
+		local target = game.level.map(x, y, Map.ACTOR)
+		if target and src:reactionToward(target) < 0 then
+			DamageType:get(DamageType.NATURE).projector(src, x, y, DamageType.NATURE, dam.dam)
+			target:setEffect(target.EFF_SLIPPERY_MOSS, 2, {apply_power=src:combatMindpower(), fail=dam.fail}, true)
+		end
+	end,
+}
+
+newDamageType{
+	name = "hallucinogenic moss", type = "HALLUCINOGENIC_MOSS",
+	projector = function(src, x, y, type, dam)
+		local target = game.level.map(x, y, Map.ACTOR)
+		if target and src:reactionToward(target) < 0 then
+			DamageType:get(DamageType.NATURE).projector(src, x, y, DamageType.NATURE, dam.dam)
+			if target:canBe("confusion") and rng.percent(dam.chance) then
+				target:setEffect(target.EFF_CONFUSED, 2, {apply_power=src:combatMindpower(), power=dam.power}, true)
+			else
+				game.logSeen(target, "%s resists!", target.name:capitalize())
+			end
+		end
+	end,
+}
+
 -- Circles
 newDamageType{
 	name = "sanctity", type = "SANCTITY",

+-- ToME - Tales of Maj'Eyal
+-- Copyright (C) 2009, 2010, 2011, 2012, 2013 Nicolas Casalini
+--
+-- This program is free software: you can redistribute it and/or modify
+-- it under the terms of the GNU General Public License as published by
+-- the Free Software Foundation, either version 3 of the License, or
+-- (at your option) any later version.
+--
+-- This program is distributed in the hope that it will be useful,
+-- but WITHOUT ANY WARRANTY; without even the implied warranty of
+-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+-- GNU General Public License for more details.
+--
+-- You should have received a copy of the GNU General Public License
+-- along with this program.  If not, see <http://www.gnu.org/licenses/>.
+--
+-- Nicolas Casalini "DarkGod"
+-- darkgod@te4.org
+
+base_size = 64
+
+local nb = 0
+
+return { generator = function()
+	local ad = rng.range(0, 360)
+	local a = math.rad(ad)
+	local dir = math.rad(ad)
+	local r = rng.range(0, 32)
+
+	return {
+		life = 120,
+		size = rng.range(24, 48), sizev = -0.05, sizea = 0,
+
+		x = r * math.cos(a), xv = 0, xa = 0,
+		y = r * math.sin(a), yv = 0, ya = 0,
+		dir = 0, dirv = 0, dira = 0,
+		vel = 0, velv = 0, vela = 0,
+
+		r = 0.3,   rv = 0, ra = 0,
+		g = 0.7,   gv = 0, ga = 0,
+		b = 0.3,   gv = 0, ga = 0,
+		a = rng.float(0.01, 0.05),   av = 0.032, aa = -0.0006,
+	}
+end, },
+function(self)
+	if nb == 0 then self.ps:emit(1) end
+	nb = nb + 1
+	if nb >= 10 then
+		nb = 0
+	end
+end,
+10, "particles_images/slime"..rng.range(1, 5)
\ No newline at end of file

@@ -30,11 +30,11 @@ newTalent{
 	type = {"wild-gift/moss", 1},
 	require = gifts_req1,
 	points = 5,
-	cooldown = 20,
+	cooldown = 16,
 	equilibrium = 5,
 	no_energy = true,
 	tactical = { ATTACKAREA = {NATURE=1}, DISABLE = {pin = 1} },
-	getDamage = function(self, t) return self:combatTalentMindDamage(t, 4, 30) end,
+	getDamage = function(self, t) return self:combatTalentMindDamage(t, 6, 40) end,
 	getDuration = function(self, t) return 3 + math.ceil(self:getTalentLevel(t)) end,
 	getSlow = function(self, t) return 30 + math.ceil(self:getTalentLevel(t) * 6) end,
 	getPin = function(self, t) return 20 + math.ceil(self:getTalentLevel(t) * 5) end,
@@ -52,7 +52,7 @@ newTalent{
 			DamageType.GRASPING_MOSS, {dam=self:mindCrit(t.getDamage(self, t)), pin=t.getPin(self, t), slow=t.getSlow(self, t)},
 			self:getTalentRadius(t),
 			5, nil,
-			engine.Entity.new{alpha=75, display='', color_br=60, color_bg=10, color_bb=60},
+			{type="moss"},
 			nil, false, false
 		)
 		activate_moss(self, t.id)
@@ -80,50 +80,46 @@ newTalent{
 	type = {"wild-gift/moss", 2},
 	require = gifts_req2,
 	points = 5,
-	equilibrium = 1,
-	cooldown = 12,
-	tactical = { PROTECT = 2, ATTACKAREA = { ARCANE = 1 } },
-	getDam = function(self, t) return self:combatTalentMindDamage(t, 15, 200) end,
-	on_pre_use = function(self, t)
-		if not game.level then return false end
-		for _, coor in pairs(util.adjacentCoords(self.x, self.y)) do
-			local act = game.level.map(coor[1], coor[2], Map.ACTOR)
-			if act and act.summoner == self and act.bloated_ooze then
-				return true
-			end
-		end
-		return false
+	cooldown = 16,
+	equilibrium = 5,
+	no_energy = true,
+	tactical = { ATTACKAREA = {NATURE=1}, DISABLE = {pin = 1} },
+	getDamage = function(self, t) return self:combatTalentMindDamage(t, 6, 40) end,
+	getDuration = function(self, t) return 3 + math.ceil(self:getTalentLevel(t)) end,
+	getHeal = function(self, t) return 50 + math.ceil(self:getTalentLevel(t) * 15) end,
+	range = 0,
+	radius = function(self, t)
+		return 2 + math.floor(self:getTalentLevelRaw(t)/2)
+	end,
+	target = function(self, t)
+		return {type="ball", range=self:getTalentRange(t), radius=self:getTalentRadius(t)}
 	end,
 	action = function(self, t)
-		local possibles = {}
-		for _, coor in pairs(util.adjacentCoords(self.x, self.y)) do
-			local act = game.level.map(coor[1], coor[2], Map.ACTOR)
-			if act and act.summoner == self and act.bloated_ooze then
-				possibles[#possibles+1] = act
-			end
-		end
-		if #possibles == 0 then return end
-
-		local act = rng.table(possibles)
-		act:die(self)
-
-		self:setEffect(self.EFF_PAIN_SUPPRESSION, math.ceil(3 + self:getTalentLevel(t)), {power=50})
-
-		local tg = {type="ball", radius=3, range=0, talent=t, selffire=false, friendlyfire=false}
-		self:project(tg, self.x, self.y, DamageType.MANABURN, self:mindCrit(t.getDam(self, t)))
-		game.level.map:particleEmitter(self.x, self.y, tg.radius, "acidflash", {radius=tg.radius})
-
+		-- Add a lasting map effect
+		game.level.map:addEffect(self,
+			self.x, self.y, self:spellCrit(t.getDuration(self, t)),
+			DamageType.NURISHING_MOSS, {dam=self:mindCrit(t.getDamage(self, t)), factor=t.getHeal(self, t)/100},
+			self:getTalentRadius(t),
+			5, nil,
+			{type="moss"},
+			nil, false, false
+		)
+		activate_moss(self, t.id)
+		game:playSoundNear(self, "talents/slime")
 		return true
 	end,
 	info = function(self, t)
-		return ([[You randomly merge with an adjacent bloated ooze, granting your a 50%% damage resistance for %d turns.
-		The merging also releases a burst of antimagic all around, dealing %0.2f manaburn damage in radius %d.
-		The effect will increase with your Mindpower.]]):
-		format(
-			math.ceil(3 + self:getTalentLevel(t)),
-			damDesc(self, DamageType.ARCANE, t.getDam(self, t)),
-			3
-		)
+		local damage = t.getDamage(self, t)
+		local duration = t.getDuration(self, t)
+		local heal = t.getHeal(self, t)
+		local radius = self:getTalentRadius(t)
+		return ([[Instantly grow a moss circle of radius %d at your feet.
+		Each turn the moss deals %0.2f nature damage to any foes with in its radius.
+		This moss has vampiric properties, all damage it deals also heals the user for %d%% of the damage done.
+		The moss lasts %d turns.
+		Using a moss talent takes no turn but places all other moss talents on a 3 turns cooldown.
+		The damage will increase with your Mindpower.]]):
+		format(radius, damDesc(self, DamageType.NATURE, damage), heal, duration)
 	end,
 }
 
@@ -132,89 +128,95 @@ newTalent{
 	type = {"wild-gift/moss", 3},
 	require = gifts_req3,
 	points = 5,
+	cooldown = 16,
 	equilibrium = 5,
-	cooldown = 8,
+	no_energy = true,
+	tactical = { ATTACKAREA = {NATURE=1}, DISABLE = {pin = 1} },
+	getDamage = function(self, t) return self:combatTalentMindDamage(t, 6, 40) end,
+	getDuration = function(self, t) return 3 + math.ceil(self:getTalentLevel(t)) end,
+	getFail = function(self, t) return 20 + math.ceil(self:getTalentLevel(t) * 6) end,
+	range = 0,
+	radius = function(self, t)
+		return 2 + math.floor(self:getTalentLevelRaw(t)/2)
+	end,
+	target = function(self, t)
+		return {type="ball", range=self:getTalentRange(t), radius=self:getTalentRadius(t)}
+	end,
 	action = function(self, t)
-		local ot = self:getTalentFromId(self.T_MITOSIS)
-		for i = 1, math.floor(self:getTalentLevel(t)) do
-			ot.spawn(self, ot, self:combatTalentMindDamage(t, 30, 300))
-		end
-
-		local list = {}
-		if game.party:hasMember(self) then
-			for act, def in pairs(game.party.members) do
-				if act.summoner and act.summoner == self and act.bloated_ooze then list[#list+1] = act end
-			end
-		else
-			for _, act in pairs(game.level.entities) do
-				if act.summoner and act.summoner == self and act.is_mucus_ooze then list[#list+1] = act	end
-			end
-		end
-
-		local tg = {type="ball", radius=self.sight}
-		local grids = self:project(tg, self.x, self.y, function() end)
-		local tgts = {}
-		for x, ys in pairs(grids) do for y, _ in pairs(ys) do
-			local target = game.level.map(x, y, Map.ACTOR)
-			if target and self:reactionToward(target) < 0 then tgts[#tgts+1] = target end
-		end end
-
-		while #tgts > 0 and #list > 0 do
-			local ooze = rng.tableRemove(list)
-			local target = rng.tableRemove(tgts)
-
-			local tx, ty = util.findFreeGrid(target.x, target.y, 10, true, {[Map.ACTOR]=true})
-			if tx then
-				local ox, oy = ooze.x, ooze.y
-				ooze:move(tx, ty, true)
-				if config.settings.tome.smooth_move > 0 then
-					ooze:resetMoveAnim()
-					ooze:setMoveAnim(ox, oy, 8, 5)
-				end
-				if core.fov.distance(tx, ty, target.x, target.y) <= 1 then
-					target:setTarget(ooze)
-					self:attackTarget(target, DamageType.ACID, self:combatTalentWeaponDamage(t, 0.6, 2.2), true)
-				end
-			end
-		end
-
+		-- Add a lasting map effect
+		game.level.map:addEffect(self,
+			self.x, self.y, self:spellCrit(t.getDuration(self, t)),
+			DamageType.SLIPPERY_MOSS, {dam=self:mindCrit(t.getDamage(self, t)), fail=t.getFail(self, t)},
+			self:getTalentRadius(t),
+			5, nil,
+			{type="moss"},
+			nil, false, false
+		)
+		activate_moss(self, t.id)
 		game:playSoundNear(self, "talents/slime")
 		return true
 	end,
 	info = function(self, t)
-		return ([[Instantly call all your bloated oozes to fight and if below the maximum number of oozes allowed by the Mitosis talent, at most %d will be created (with %d life).
-		Each of them will be transported near a random foe in sight grab its attention.
-		Taking advantage of the situation you channel a melee attack though all of them to their foes dealing %d%% weapon damage as acid.]]):
-		format(self:getTalentLevel(t), self:combatTalentMindDamage(t, 30, 300), self:combatTalentWeaponDamage(t, 0.6, 2.2) * 100)
+		local damage = t.getDamage(self, t)
+		local duration = t.getDuration(self, t)
+		local fail = t.getFail(self, t)
+		local radius = self:getTalentRadius(t)
+		return ([[Instantly grow a moss circle of radius %d at your feet.
+		Each turn the moss deals %0.2f nature damage to any foes with in its radius.
+		This moss is very slippery, any foes trying to perform complex actions has %d%% chances of failing.
+		The moss lasts %d turns.
+		Using a moss talent takes no turn but places all other moss talents on a 3 turns cooldown.
+		The damage will increase with your Mindpower.]]):
+		format(radius, damDesc(self, DamageType.NATURE, damage), fail, duration)
 	end,
 }
 
 newTalent{
-	name = "Halucigenic Moss",
+	name = "Hallucinogenic Moss",
 	type = {"wild-gift/moss", 4},
 	require = gifts_req4,
 	points = 5,
-	mode = "passive",
-	on_learn = function(self, t)
-		self:attr("blind_immune", 0.2)
-		self:attr("poison_immune", 0.2)
-		self:attr("disease_immune", 0.2)
-		self:attr("cut_immune", 0.2)
-		self:attr("confusion_immune", 0.2)
-		self:attr("ignore_direct_crits", 15)
-	end,
-	on_unlearn = function(self, t)
-		self:attr("blind_immune", -0.2)
-		self:attr("poison_immune", -0.2)
-		self:attr("disease_immune", -0.2)
-		self:attr("cut_immune", -0.2)
-		self:attr("confusion_immune", -0.2)
-		self:attr("ignore_direct_crits", -15)
+	cooldown = 16,
+	equilibrium = 5,
+	no_energy = true,
+	tactical = { ATTACKAREA = {NATURE=1}, DISABLE = {pin = 1} },
+	getDamage = function(self, t) return self:combatTalentMindDamage(t, 6, 40) end,
+	getDuration = function(self, t) return 3 + math.ceil(self:getTalentLevel(t)) end,
+	getChance = function(self, t) return 20 + math.ceil(self:getTalentLevel(t) * 5.5) end,
+	getPower = function(self, t) return 15 + math.ceil(self:getTalentLevel(t) * 5) end,
+	range = 0,
+	radius = function(self, t)
+		return 2 + math.floor(self:getTalentLevelRaw(t)/2)
+	end,
+	target = function(self, t)
+		return {type="ball", range=self:getTalentRange(t), radius=self:getTalentRadius(t)}
+	end,
+	action = function(self, t)
+		-- Add a lasting map effect
+		game.level.map:addEffect(self,
+			self.x, self.y, self:spellCrit(t.getDuration(self, t)),
+			DamageType.HALLUCINOGENIC_MOSS, {dam=self:mindCrit(t.getDamage(self, t)), chance=t.getChance(self, t), power=t.getPower(self, t)},
+			self:getTalentRadius(t),
+			5, nil,
+			{type="moss"},
+			nil, false, false
+		)
+		activate_moss(self, t.id)
+		game:playSoundNear(self, "talents/slime")
+		return true
 	end,
 	info = function(self, t)
-		return ([[Your body's internal organs are melted together, making it much harder to suffer critical hits.
-		All direct critical hits (physical, mental, spells) against you have a %d%% chance to instead do their normal damage.
-		In addition you gain %d%% disease, poison, cuts, confusion and blindness resistances.]]):
-		format(self:getTalentLevelRaw(t) * 15, self:getTalentLevelRaw(t) * 20)
+		local damage = t.getDamage(self, t)
+		local duration = t.getDuration(self, t)
+		local chance = t.getChance(self, t)
+		local power = t.getPower(self, t)
+		local radius = self:getTalentRadius(t)
+		return ([[Instantly grow a moss circle of radius %d at your feet.
+		Each turn the moss deals %0.2f nature damage to any foes with in its radius.
+		This moss is coated with strange fluids, any foes passing through it has %d%% chances to be confused (power %d%%) for 2 turns.
+		The moss lasts %d turns.
+		Using a moss talent takes no turn but places all other moss talents on a 3 turns cooldown.
+		The damage will increase with your Mindpower.]]):
+		format(radius, damDesc(self, DamageType.NATURE, damage), chance, power, duration)
 	end,
 }

@@ -2046,3 +2046,21 @@ newEffect{
 		self:effectTemporaryValue(eff, "combat_def", -eff.defense)
 	end,
 }
+
+newEffect{
+	name = "SLIPPERY_MOSS", image = "talents/slippery_moss.png",
+	desc = "Slippery Moss",
+	long_desc = function(self, eff) return ("The target is covered in slippery moss. Each time it tries to use a talent there is %d%% chance of failure."):format(eff.fail) end,
+	type = "physical",
+	subtype = { moss=true, nature=true },
+	status = "detrimental",
+	parameters = {fail=5},
+	on_gain = function(self, err) return "#Target# is covered in slippery moss!", "+Slippery Moss" end,
+	on_lose = function(self, err) return "#Target# is free from the slippery moss.", "-Slippery Moss" end,
+	activate = function(self, eff)
+		eff.tmpid = self:addTemporaryValue("talent_fail_chance", eff.fail)
+	end,
+	deactivate = function(self, eff)
+		self:removeTemporaryValue("talent_fail_chance", eff.tmpid)
+	end,
+}