New quest to unlock the Tempest, available at lowish levels (around level 14)

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

game/modules/tome/class/Game.lua

@@ -613,13 +613,10 @@ function _M:setupCommands()
 		end,
 		[{"_g","ctrl"}] = function()
 			if config.settings.tome.cheat then
-				local npc = self.zone:makeEntityByName(self.level, "actor", "NPC_PHOENIX")
-				if npc then
-					self.zone:addEntity(self.level, npc, "actor", self.player.x, self.player.y+1)
-				end
---				self.level.map:particleEmitter(self.player.x, self.player.y, 3, "farportal_lightning")
---				self:changeLevel(1, "grushnak-pride")
---				self.player:grantQuest("master-jeweler")
+				self.player:grantQuest("lightning-overload")
+				self.player:setQuestStatus("lightning-overload", engine.Quest.COMPLETED, "saved-bree")
+				self.player:setQuestStatus("lightning-overload", engine.Quest.COMPLETED, "tempest-located")
+				self:changeLevel(1, "tempest-peak")
 			end
 		end,
 	}

game/modules/tome/data/achievements/quests.lua

@@ -117,6 +117,10 @@ newAchievement{
 	name = "Curse Lifter", id = "CURSE_ERASER",
 	desc = [[Killed Ben Cruthdar the Cursed.]],
 }
+newAchievement{
+	name = "Eye of the storm", id = "EYE_OF_THE_STORM",
+	desc = [[Freed Bree from the onslaught of the mad Tempest, Urkis.]],
+}
 newAchievement{
 	name = "There and back again", id = "WEST_PORTAL",
 	desc = [[Opened a portal to Middle-earth from the Far East.]],

game/modules/tome/data/chats/angolwen-leader.lua

+-- ToME - Tales of Middle-Earth
+-- Copyright (C) 2009, 2010 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
+
+newChat{ id="welcome",
+	text = [[#LIGHT_GREEN#*A tall elven woman stands before you, her fair skin radiates incredible power throught her white robe.*#WHITE#
+I am Anlinwen Noromiel, head of the Circle of the Wise. Welcome to our city, @playerdescriptor.subclass@. What may I do for you?]],
+	answers = {
+		{"I require all the help I can get, not for my sake but for the town of Bree, in the north east of here.", jump="save-bree", cond=function(npc, player) local q = player:hasQuest("lightning-overload") return q and q:isCompleted("saved-bree") and not q:isCompleted("tempest-located") end},
+		{"I am ready, send me to Urkis!", jump="teleport-urkis", cond=function(npc, player) local q = player:hasQuest("lightning-overload") return q and q:isCompleted("tempest-located") end},
+		{"Nothing for now, sorry to have took your time. Farewell my lady."},
+	}
+}
+
+newChat{ id="save-bree",
+	text = [[Yes we have noticed the devastation that happened there. I have sent some friends to dispose of the cloud but the real threat is not there.
+We know who created this abomination: Urkis. He is a Tempest, a powerful archmage who can control the storms.
+A few years ago he has gone rogue, cutting himself from Angolwen. He remained quiet so we were reluctant to go against him openly, but it seems we have no choice now.
+The removal of the could will take much time, in the meanwhile we can, if you are willing, send you to Urkis lair to try stop him.
+I will not lie to you, we can send you there but this cuold be a death trap, and we have no way of knowing if there is a way for you to exit his lair as he lives on top of a tall peak in the misty mountains.]],
+	answers = {
+		{"I need to prepare myself, I will be back soon.", action=function(npc, player) player:setQuestStatus("lightning-overload", engine.Quest.COMPLETED, "tempest-located") end},
+		{"I am ready, send me, I will not let the good people of Bree down.", action=function(npc, player) player:setQuestStatus("lightning-overload", engine.Quest.COMPLETED, "tempest-located") player:hasQuest("lightning-overload"):teleport_urkis() end},
+	}
+}
+
+newChat{ id="teleport-urkis",
+	text = [[Good luck to you, you have the blessings of the Free People.]],
+	answers = {
+		{"Thank you.", action=function(npc, player) player:hasQuest("lightning-overload"):teleport_urkis() end},
+	}
+}
+
+return "welcome"

game/modules/tome/data/chats/bree-attack-over.lua

+-- ToME - Tales of Middle-Earth
+-- Copyright (C) 2009, 2010 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
+
+newChat{ id="welcome",
+	text = [[#LIGHT_GREEN#*A hobbit comes forth from his hidding place.*#WHITE#
+You killed them all? Are we safe now? Oh please tell me this was a bad dream!]],
+	answers = {
+		{"Be at easy, I have dispatched those monstrosities. Do you know where they came from or what they wanted?", jump="quest"},
+	}
+}
+
+newChat{ id="quest",
+	text = [[From nowhere! From the sky!
+I do not know, I was tending my crop just outside the town when I heard screaming. As I entered the town I saw the dark cloud over here, those .. those .. things where coming from it in blasts of lightning!]],
+	answers = {
+		{"It seems they have stopped coming for now, I will look for somebody who could help dispose of this nefarious cloud.", jump="quest2"},
+	}
+}
+
+newChat{ id="quest",
+	text = [[Thank you! You have saved many people today!
+I have heard of rumours of a reclusive town of wise and powerful men somewhere in the blue mountains, maybe they could help? If they even exist...]],
+	answers = {
+		{"I will not let you down.", action=function(npc, player) player:hasQuest("lightning-overload"):done_bree() end},
+	}
+}
+
+return "welcome"

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

+-- ToME - Tales of Middle-Earth
+-- Copyright (C) 2009, 2010 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
+
+local Talents = require("engine.interface.ActorTalents")
+
+newEntity{
+	define_as = "BASE_NPC_GWELGOROTH", -- gwelu goroth = air terror
+	type = "elemental", subtype = "air",
+	display = "E", color=colors.AQUAMARINE,
+
+	combat = { dam=resolvers.mbonus(40, 15), atk=15, apr=15, dammod={mag=0.8}, damtype=DamageType.FIRE },
+
+	body = { INVEN = 10, MAINHAND=1, OFFHAND=1, BODY=1 },
+
+	infravision = 20,
+	life_rating = 8,
+	rank = 2,
+	size_category = 3,
+
+	autolevel = "dexmage",
+	ai = "dumb_talented_simple", ai_state = { ai_move="move_dmap", talent_in=2, },
+	energy = { mod=1 },
+	stats = { str=10, dex=8, mag=6, con=16 },
+
+	resists = { [DamageType.PHYSICAL] = 10, [DamageType.LIGHTNING] = 100, [DamageType.FIRE] = -30, },
+
+	no_breath = 1,
+	poison_immune = 1,
+	desease_immune = 1,
+}
+
+newEntity{ base = "BASE_NPC_GWELGOROTH",
+	name = "gwelgoroth", color=colors.AQUAMARINE,
+	desc = [[Gwelgoroth are mighty air elementals, torn away from their home world by a powerful magic.]],
+	level_range = {10, nil}, exp_worth = 1,
+	rarity = 1,
+	max_life = resolvers.rngavg(70,80),
+	combat_armor = 0, combat_def = 20,
+	on_melee_hit = { [DamageType.LIGHTNING] = resolvers.mbonus(20, 10), },
+
+	resolvers.talents{
+		[Talents.T_LIGHTNING]=3,
+	},
+}
+
+newEntity{ base = "BASE_NPC_GWELGOROTH",
+	name = "greater gwelgoroth", color=colors.STEEL_BLUE,
+	desc = [[Gwelgoroth are mighty air elementals, torn away from their home world by a powerful magic.]],
+	level_range = {12, nil}, exp_worth = 1,
+	rarity = 3,
+	max_life = resolvers.rngavg(70,80), life_rating = 10,
+	combat_armor = 0, combat_def = 20,
+	on_melee_hit = { [DamageType.FIRE] = resolvers.mbonus(20, 10), },
+
+	resolvers.talents{
+		[Talents.T_LIGHTNING]=4,
+		[Talents.T_SHOCK]=3,
+	},
+	resolvers.sustains_at_birth(),
+}
+
+newEntity{ base = "BASE_NPC_GWELGOROTH",
+	name = "ultimate gwelgoroth", color=colors.ROYAL_BLUE,
+	desc = [[Gwelgoroth are mighty air elementals, torn away from their home world by a powerful magic.]],
+	level_range = {15, nil}, exp_worth = 1,
+	rarity = 5,
+	rank = 3,
+	max_life = resolvers.rngavg(70,80),
+	combat_armor = 0, combat_def = 20,
+	on_melee_hit = { [DamageType.FIRE] = resolvers.mbonus(20, 10), },
+
+	resolvers.talents{
+		[Talents.T_LIGHTNING]=5,
+		[Talents.T_SHOCK]=4,
+		[Talents.T_HURRICANE]=3,
+		[Talents.T_CHAIN_LIGHTNING]=4,
+	},
+	resolvers.sustains_at_birth(),
+}

game/modules/tome/data/maps/towns/angolwen.lua

@@ -28,6 +28,8 @@ quickEntity('4', {show_tooltip=true, name="Alchemist", display='4', color=colors
 quickEntity('5', {show_tooltip=true, name="Scribe", display='5', color=colors.WHITE, resolvers.store("SCROLL"), image="terrain/wood_store_book.png"})
 quickEntity('6', {show_tooltip=true, name="Staves & Wands", display='6', color=colors.RED, resolvers.store("ANGOLWEN_STAFF_WAND"), resolvers.chatfeature("magic-store"), image="terrain/wood_store_closed.png"})
 
+quickEntity('L', {show_tooltip=true, name="Circle of the Wise", display='*', color=colors.LIGHT_RED, resolvers.chatfeature("angolwen-leader"), image="terrain/wood_store_closed.png"})
+
 startx = 46
 starty = 43
 
@@ -54,7 +56,7 @@ return [[
 ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^       ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
 ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^T     o     T^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
 ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^      ooo      ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
-^^^^^^^^^^^^^^^^^^^^^^^^^^^^                ooToo               ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
+^^^^^^^^^^^^^^^^^^^^^^^^^^^L                ooToo               ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
 ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^      ooo      ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
 ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^T     o     T^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
 ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^       ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

game/modules/tome/data/maps/zones/tempest-peak-top.lua

+-- ToME - Tales of Middle-Earth
+-- Copyright (C) 2009, 2010 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
+
+
+-- defineTile section
+defineTile("#", "MOUNTAIN_WALL")
+quickEntity('-', {name='open sky', display=' ', does_block_move=true})
+defineTile(">", "DOWN")
+defineTile(".", "ROCKY_GROUND")
+
+startx = 16
+starty = 5
+
+-- ASCII map section
+return [[
+-------------------------
+-------------------------
+---------.....-----------
+--------.......---##-----
+-----.............#..----
+----.##..............----
+---..#.....###......-----
+---.......#####.....-----
+---.......######.....----
+----....###########..----
+-----...###########...---
+----...###########....---
+----....#########...#..--
+---.....########....##---
+---.......>#####......---
+----.......##.........---
+----.................----
+----.##...........-------
+----.##.-.......##-------
+------.--..-...##.-------
+--------..--......-------
+------------.....--------
+-------------------------
+-------------------------
+-------------------------]]

game/modules/tome/data/quests/lightning-overload.lua

+-- ToME - Tales of Middle-Earth
+-- Copyright (C) 2009, 2010 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
+
+name = "Storming the city"
+desc = function(self, who)
+	local desc = {}
+	desc[#desc+1] = "As you came to Bree you saw a huge dark cloud over the small town."
+	desc[#desc+1] = "When you entered you were greeted by an army of air elementals slaughtering the population."
+	if self:isCompleted("saved-bree") then
+		desc[#desc+1] = " * You have dispatched the elementals but the cloud lingers still. You must find a powerful ally to remove it. There are rumours of a secret town in the blue mountains, to the south west."
+	end
+	if self:isCompleted("tempest-located") then
+		desc[#desc+1] = " * You have learned the real threat comes from a rogue archmage, a Tempest: Urkis. The mages of Angolwen are ready to teleport you there."
+	end
+
+	return table.concat(desc, "\n")
+end
+
+on_grant = function(self, who)
+	-- Darken the level
+	game.level.map._map:setShown(0.3, 0.3, 0.3, 1)
+	game.level.map._map:setObscure(0.3*0.6, 0.3*0.6, 0.3*0.6, 1)
+	game.level.level = util.bound(game.player.level, 12, 20)
+
+	-- Add random lightning firing off
+	game.level.data.background = function(level)
+		local Map = require "engine.Map"
+		if rng.chance(12) then
+			local x1, y1 = rng.range(10, level.map.w - 11), rng.range(10, level.map.h - 11)
+			local x2, y2 = x1 + rng.range(-4, 4), y1 + rng.range(5, 10)
+			level.map:particleEmitter(x1, y1, math.max(math.abs(x2-x1), math.abs(y2-y1)), "lightning", {tx=x2-x1, ty=y2-y1})
+			game:playSoundNear({x=x1,y=y1}, "talents/thunderstorm")
+		end
+	end
+
+	-- Populate with nice air elementals
+	self.max_count = 0
+	for i = 1, 12 do
+		local m = game.zone:makeEntity(game.level, "actor", {special_rarity="bree_rarity"}, nil, true)
+		if m then
+			local x, y = rng.range(10, game.level.map.w - 11), rng.range(10, game.level.map.h - 11)
+			local tries = 0
+			while not m:canMove(x, y) and tries < 100 do
+				x, y = rng.range(10, game.level.map.w - 11), rng.range(10, game.level.map.h - 11)
+				tries = tries + 1
+			end
+			if tries < 100 then
+				m.on_die = function(self)
+					game.player:hasQuest("lightning-overload"):kill_one()
+				end
+				game.zone:addEntity(game.level, m, "actor", x, y)
+				self.max_count = self.max_count + 1
+			end
+		end
+	end
+	self.kill_count = 0
+
+	require("engine.ui.Dialog"):simpleLongPopup("Danger...", "As you arrive in Bree you notice a huge dark cloud hovering over the town.\nYou hear screams coming from the central place.", 400)
+end
+
+on_status_change = function(self, who, status, sub)
+	if self:isCompleted() then
+		who:setQuestStatus(self.id, engine.Quest.DONE)
+		game:setAllowedBuild("mage_tempest", true)
+		world:gainAchievement("EYE_OF_THE_STORM", game.player)
+	end
+end
+
+kill_one = function(self)
+	self.kill_count = self.kill_count + 1
+
+	if self.kill_count >= self.max_count then
+		local Chat = require "engine.Chat"
+		local chat = Chat.new("bree-attack-over", {name="Scared hobbit"}, game.player)
+		chat:invoke()
+	end
+end
+
+done_bree = function(self)
+	game.player:setQuestStatus(self.id, engine.Quest.COMPLETED, "saved-bree")
+end
+
+teleport_urkis = function(self)
+	game:changeLevel(1, "tempest-peak")
+	require("engine.ui.Dialog"):simpleLongPopup("Danger...", [[You step out on unfamiliar grounds, you are nearly on top of one of the highest peaks you can see.
+The storm is raging of your head.]], 400)
+end
+
+reenter_bree = function(self)
+	if (self:isCompleted() or self:isEnded()) and not self:isCompleted("restored-bree") then
+		game.level.map._map:setShown(1, 1, 1, 1)
+		game.level.map._map:setObscure(1*0.6, 1*0.6, 1*0.6, 1)
+		game.level.data.background = nil
+
+		game.player:setQuestStatus(self.id, engine.Quest.COMPLETED, "restored-bree")
+		require("engine.ui.Dialog"):simpleLongPopup("Clear sky", "It seems the mages have kept their word.\nBree is free of the storm could.", 400)
+	end
+end

game/modules/tome/data/texts/unlock-mage_tempest.lua

+-- ToME - Tales of Middle-Earth
+-- Copyright (C) 2009, 2010 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
+
+return "New Class: #LIGHT_GREEN#Tempest",
+[[
+Magic has not disappeared from Middle-earth with the downfall of Sauron and the departing of Gandalf the Grey.
+
+Before the war of the ring, Gandalf, fearing that he might die leaving his task incomplete, started a secret plan with a group of trusted elves and men to form a place of knowledge, hidden from all.
+This place is Angolwen, the City of Magic, and for over one hundred years has taught magic to preserve and expand it.
+
+You have uncovered the secrets of the storm magic and can now create new characters with the #LIGHT_GREEN#Tempest class#WHITE#.
+
+Tempests are specialized archmages, attuned to the magical properties of lightning.
+Class features:#YELLOW#
+- Cast potent lightning spells to zap your foes to death.
+- Unleash hurricanes and novas on your foes, making them all explode.
+- Learn to master the Tempest, a lightning so powerful it can damage even those resistant to normal lightning.
+- Manipulate the forces of magic themselves#WHITE#
+
+All mages use mana to cast their spells.
+It slowly replenishes over time.
+]]

game/modules/tome/data/timed_effects.lua

@@ -1661,3 +1661,21 @@ newEffect{
 		game:playSoundNear(self, "talents/lightning")
 	end,
 }
+
+newEffect{
+	name = "RECALL",
+	desc = "Recalling",
+	type = "magical",
+	status = "beneficial",
+	parameters = { },
+	activate = function(self, eff)
+	end,
+	deactivate = function(self, eff)
+		if self:canBe("worldport") then
+			game.logPlayer(self, "You are yanked out of this place!")
+			game:changeLevel(1, game.player.last_wilderness)
+		else
+			game.logPlayer(self, "Space restabilizes around you.")
+		end
+	end,
+}

game/modules/tome/data/zones/tempest-peak/grids.lua

+-- ToME - Tales of Middle-Earth
+-- Copyright (C) 2009, 2010 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
+
+load("/data/general/grids/basic.lua")
+load("/data/general/grids/mountain.lua")

game/modules/tome/data/zones/tempest-peak/npcs.lua

+-- ToME - Tales of Middle-Earth
+-- Copyright (C) 2009, 2010 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
+
+load("/data/general/npcs/gwelgoroth.lua", rarity(0))
+load("/data/general/npcs/xorn.lua", rarity(2))
+load("/data/general/npcs/snow-giant.lua", rarity(0))
+load("/data/general/npcs/storm-drake.lua", rarity(2))
+
+load("/data/general/npcs/all.lua", rarity(4, 35))
+
+local Talents = require("engine.interface.ActorTalents")
+
+newEntity{ define_as = "URKIS",
+	type = "humanoid", subtype = "human", unique = true,
+	name = "Urkis, the High Tempest",
+	display = "p", color=colors.VIOLET,
+	desc = [[Lightning crackles around this middle-age man. He radiates power.]],
+	level_range = {17, 22}, exp_worth = 2,
+	max_life = 250, life_rating = 17, fixed_rating = true,
+	max_mana = 850, mana_regen = 40,
+	rank = 4,
+	size_category = 2,
+	infravision = 20,
+	stats = { str=10, dex=12, cun=14, mag=25, con=16 },
+
+	instakill_immune = 1,
+	blind_immune = 1,
+	move_others=true,
+
+	body = { INVEN = 10, MAINHAND=1, OFFHAND=1, BODY=1 },
+	equipment = resolvers.equip{
+		{type="weapon", subtype="staff", ego_chance=100, autoreq=true},
+		{type="armor", subtype="cloth", ego_chance=100, autoreq=true},
+	},
+	resolvers.drops{chance=100, nb=4, {ego_chance=100} },
+	resolvers.drops{chance=100, nb=1, {defined="ROD_OF_RECALL"} },
+
+	resists = { [DamageType.LIGHTNING] = 100, },
+
+	resolvers.talents{
+		[Talents.T_FREEZE]=4,
+		[Talents.T_ICE_SHARDS]=4,
+		[Talents.T_LIGHTNING]=5,
+		[Talents.T_SHOCK]=4,
+		[Talents.T_HURRICANE]=4,
+		[Talents.T_NOVA]=4,
+		[Talents.T_THUNDERSTORM]=5,
+		[Talents.T_TEMPEST]=5,
+	},
+
+	autolevel = "warriormage",
+	ai = "dumb_talented_simple", ai_state = { talent_in=1, ai_move="move_astar" },
+
+	on_die = function(self, who)
+		game.player:resolveSource():setQuestStatus("lightning-overload", engine.Quest.COMPLETED)
+	end,
+}

game/modules/tome/data/zones/tempest-peak/objects.lua

+-- ToME - Tales of Middle-Earth
+-- Copyright (C) 2009, 2010 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
+
+load("/data/general/objects/objects.lua")
+
+newEntity{ base = "BASE_WAND",
+	define_as = "ROD_OF_RECALL",
+	name = "Rod of Recall", color=colors.LIGHT_BLUE, unique=true,
+	cost = 50,
+	elec_proof = true,
+
+	max_power = 1000, power_regen = 1,
+	use_power = { name = "recall the user to the worldmap", power = 1000,
+		use = function(self, who)
+			if who:canBe("worldport") then
+				who:setEffect(who.EFF_RECALL, 40, {})
+				game.logPlayer(who, "Space around you starts to disolve...")
+			else
+				game.logPlayer(who, "The rod emits a strange noise, glows briefly and returns to normal.")
+			end
+		end
+	},
+}

game/modules/tome/data/zones/tempest-peak/traps.lua

+-- ToME - Tales of Middle-Earth
+-- Copyright (C) 2009, 2010 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
+
+load("/data/general/traps/elemental.lua")

game/modules/tome/data/zones/tempest-peak/zone.lua

+-- ToME - Tales of Middle-Earth
+-- Copyright (C) 2009, 2010 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
+
+return {
+	name = "Tempest Peak",
+	level_range = {15, 22},
+	level_scheme = "player",
+	max_level = 2,
+	decay = {300, 800},
+	actor_adjust_level = function(zone, level, e) return zone.base_level + e:getRankLevelAdjust() + level.level-1 + rng.range(-1,2) end,
+	width = 70, height = 70,
+--	all_remembered = true,
+--	all_lited = true,
+	persistant = "zone",
+	ambiant_music = "World of Ice.ogg",
+	generator =  {
+		map = {
+			class = "engine.generator.map.Roomer",
+			nb_rooms = 14,
+			rooms = {"simple", "pilar", {"money_vault",5}, {"lesser_vault",8}},
+			lesser_vaults_list = {"circle"},
+			lite_room_chance = 100,
+			['.'] = "ROCKY_GROUND",
+			['#'] = "MOUNTAIN_WALL",
+			up = "UP",
+			down = "DOWN",
+			door = "DOOR",
+		},
+		actor = {
+			class = "engine.generator.actor.Random",
+			nb_npc = {20, 30},
+			guardian = "URKIS",
+		},
+		object = {
+			class = "engine.generator.object.Random",
+			nb_object = {6, 9},
+		},
+		trap = {
+			class = "engine.generator.trap.Random",
+			nb_trap = {6, 9},
+		},
+	},
+	levels =
+	{
+		[1] = {
+			generator = { map = {
+				class = "engine.generator.map.Static",
+				map = "zones/tempest-peak-top",
+			}, actor = {
+				nb_npc = {0, 0},
+			}, trap = {
+				nb_trap = {0, 0},
+			}, object = {
+				nb_object = {0, 0},
+			}, },
+			color_shown = {0.3, 0.3, 0.3, 1},
+			color_obscure = {0.3*0.6, 0.3*0.6, 0.3*0.6, 1},
+			all_remembered = true,
+			no_level_connectivity = true,
+			background = function(level)
+				local Map = require "engine.Map"
+				if rng.chance(12) then
+					local x1, y1 = rng.range(4, level.map.w - 5), rng.range(4, level.map.h - 5)
+					local x2, y2 = x1 + rng.range(-4, 4), y1 + rng.range(5, 10)
+					level.map:particleEmitter(x1, y1, math.max(math.abs(x2-x1), math.abs(y2-y1)), "lightning", {tx=x2-x1, ty=y2-y1})
+					game:playSoundNear({x=x1,y=y1}, "talents/thunderstorm")
+				end
+			end
+		},
+	},
+}

game/modules/tome/data/zones/town-bree/npcs.lua

@@ -17,3 +17,74 @@
 -- Nicolas Casalini "DarkGod"
 -- darkgod@te4.org
 
+load("/data/general/npcs/gwelgoroth.lua", function(e) if e.rarity then e.bree_rarity, e.rarity = e.rarity, nil end end)
+
+local Talents = require("engine.interface.ActorTalents")
+
+newEntity{
+	define_as = "BASE_NPC_BREE_TOWN",
+	type = "humanoid", subtype = "human",
+	display = "p", color=colors.WHITE,
+	faction = "reunited-kingdom",
+
+	combat = { dam=resolvers.rngavg(1,2), atk=2, apr=0, dammod={str=0.4} },
+
+	body = { INVEN = 10, MAINHAND=1, OFFHAND=1, BODY=1, QUIVER=1 },
+	lite = 3,
+
+	life_rating = 10,
+	rank = 2,
+	size_category = 3,
+
+	open_door = true,
+
+	autolevel = "warrior",
+	ai = "dumb_talented_simple", ai_state = { ai_move="move_dmap", talent_in=3, },
+	energy = { mod=1 },
+	stats = { str=12, dex=8, mag=6, con=10 },
+}
+
+newEntity{ base = "BASE_NPC_BREE_TOWN",
+	name = "bree guard", color=colors.LIGHT_UMBER,
+	desc = [[A stern looking guard, he will not let you disturb the town.]],
+	level_range = {1, nil}, exp_worth = 1,
+	rarity = 3,
+	max_life = resolvers.rngavg(70,80),
+	resolvers.equip{
+		{type="weapon", subtype="longsword", autoreq=true},
+		{type="armor", subtype="shield", autoreq=true},
+	},
+	combat_armor = 2, combat_def = 0,
+	resolvers.talents{ [Talents.T_RUSH]=1, [Talents.T_PERFECT_STRIKE]=1, },
+}
+
+newEntity{ base = "BASE_NPC_BREE_TOWN",
+	name = "hobbit slinger", color=colors.UMBER,
+	subtype = "hobbit",
+	desc = [[A hobbit, with a sling. Beware.]],
+	level_range = {1, nil}, exp_worth = 1,
+	rarity = 3,
+	max_life = resolvers.rngavg(50,60),
+	resolvers.talents{ [Talents.T_SHOOT]=1, },
+	ai_state = { talent_in=2, },
+	autolevel = "slinger",
+	resolvers.equip{ {type="weapon", subtype="sling", autoreq=true}, {type="ammo", subtype="shot", autoreq=true} },
+}
+
+newEntity{ base = "BASE_NPC_BREE_TOWN",
+	name = "human farmer", color=colors.WHITE,
+	desc = [[A weather worn human farmer.]],
+	level_range = {1, nil}, exp_worth = 1,
+	rarity = 1,
+	max_life = resolvers.rngavg(30,40),
+	combat_armor = 2, combat_def = 0,
+}
+
+newEntity{ base = "BASE_NPC_BREE_TOWN",
+	name = "hobbit gardener", color=colors.WHITE,
+	subtype = "hobbit",
+	desc = [[A hobbit, he seems to be looking for plants.]],
+	level_range = {1, nil}, exp_worth = 1,
+	rarity = 1,
+	max_life = resolvers.rngavg(30,40),
+}

game/modules/tome/data/zones/town-bree/zone.lua

@@ -20,6 +20,7 @@
 return {
 	name = "Bree",
 	level_range = {1, 1},
+	actor_adjust_level = function(zone, level, e) return zone.base_level + e:getRankLevelAdjust() + level.level-1 + rng.range(-1,2) end,
 	max_level = 1,
 	width = 196, height = 80,
 	persistant = "zone",
@@ -33,11 +34,19 @@ return {
 		},
 		actor = {
 			class = "engine.generator.actor.Random",
-			nb_npc = {0, 0},
+			nb_npc = {10, 10},
 		},
 		object = {
 			class = "engine.generator.object.Random",
 			nb_object = {0, 0},
 		},
-	}
+	},
+
+	on_enter = function(_, _, newzone)
+		if game.player.level >= 12 and game.player.level <= 20 and not game.player:hasQuest("lightning-overload") then
+			game.player:grantQuest("lightning-overload")
+		elseif game.player:hasQuest("lightning-overload") then
+			game.player:hasQuest("lightning-overload"):reenter_bree()
+		end
+	end
 }