Last Hope mausoleum is now denoted with a quest

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

game/modules/tome/data/chats/alchemist-last-hope.lua

@@ -554,6 +554,7 @@ It's strange what death can do to people, how it can take over their minds. Some
 				game.nicer_tiles:updateAround(game.level, spot.x, spot.y)
 			end)
 			game.log("He points the location of the graveyard on your map.")
+			player:grantQuest("grave-necromancer")
 		end},
 	}
 }

game/modules/tome/data/lore/last-hope.lua

@@ -221,7 +221,10 @@ Amidst this darkness I have good news for you, my darling. I am with child. Thou
 
 I am cold and alone in this chilly crypt, thinking back on my times of warmth with you. Abominations lie beyond the walls, their haunting cries torturing my ears, reminding me of the black deeds I have performed. But every now and then I feel a gentle kick, and my resolve is stiffened, and to my experiments I return.
 
-I must live. For you, my love, I will live.]]
+I must live. For you, my love, I will live.]],
+	on_learn = function(who)
+		who:setQuestStatus("grave-necromancer", engine.Quest.COMPLETED, "note")
+	end,
 }
 
 local i = 0

game/modules/tome/data/quests/grave-necromancer.lua

+-- ToME - Tales of Maj'Eyal
+-- Copyright (C) 2009, 2010, 2011 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 = "And now for a grave"
+desc = function(self, who)
+	local desc = {}
+	desc[#desc+1] = "Ungrol of Last Hope asked you to look for his wife's friend Celia, who has been reported missing. She frequently visits her late husband's mausoleum, in the graveyard near Last Hope."
+	if self:isCompleted("note") then
+		desc[#desc+1] = "You searched for Celia in the graveyard near Last Hope, and found a note. In it, Celia reveals that she has been conducting experiments in the dark arts, in an attempt to extend her life... also, she is pregnant."
+	end
+	if self:isCompleted("coffins") then
+		desc[#desc+1] = "You have tracked Celia to her husband's mausoleum in the graveyard near Last Hope. It seems she has taken some liberties with the corpses there."
+	end
+	if self:isCompleted("kill") then
+		desc[#desc+1] = "You have laid Celia to rest, putting an end to her gruesome experiments."
+	elseif self:isCompleted("kill-necromancer") then
+		desc[#desc+1] = "You have laid Celia to rest, putting an end to her failed experiments. You have taken her heart, for your own experiments. You do not plan to fail as she did."
+	end
+	return table.concat(desc, "\n")
+end
+
+on_status_change = function(self, who, status, sub)
+	if self:isCompleted() then
+		who:setQuestStatus(self.id, engine.Quest.DONE)
+	end
+end

game/modules/tome/data/zones/last-hope-graveyard/npcs.lua

@@ -82,22 +82,25 @@ newEntity{ define_as = "CELIA",
 		if not game.zone.open_all_coffins then return val end
 		self.on_takehit = nil
 		game.zone.open_all_coffins(game.player, self)
+		local p = game:getPlayer(true)
+		p:setQuestStatus("grave-necromancer", engine.Quest.COMPLETED, "coffins")
 		return val
 	end,
 
 	on_die = function(self)
+		local p = game:getPlayer(true)
 		if game.player:hasQuest("lichform") then
 			game.player:setQuestStatus("lichform", engine.Quest.COMPLETED, "heart")
 
 			local o = game.zone:makeEntityByName(game.level, "object", "CELIA_HEART")
 			o:identify(true)
-			local p = game:getPlayer(true)
 			if p:addObject(p.INVEN_INVEN, o) then
 				game.logPlayer(p, "You receive: %s.", o:getName{do_color=true})
 			end
 
 			local Dialog = require("engine.ui.Dialog")
 			Dialog:simpleLongPopup("Celia", "As you deal the last blow you quickly carve out Celia's heart for your Lichform ritual.\nCarefully weaving magic around it to keep it beating.", 400)
+			p:setQuestStatus("grave-necromancer", engine.Quest.COMPLETED, "kill-necromancer")
 		else
 			if game.player:knownLore("necromancer-primer-1") and
 			   game.player:knownLore("necromancer-primer-2") and
@@ -105,6 +108,8 @@ newEntity{ define_as = "CELIA",
 			   game.player:knownLore("necromancer-primer-4") then
 				game:setAllowedBuild("mage_necromancer", true)
 			end
+			p:setQuestStatus("grave-necromancer", engine.Quest.COMPLETED, "kill")
 		end
+		p:setQuestStatus("grave-necromancer", engine.Quest.COMPLETED)
 	end,
 }