New backup guardian in the Deep Bellow, also concluding rolf & weisman story arc

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

game/modules/tome/data/general/objects/boss-artifacts.lua

@@ -901,3 +901,29 @@ newEntity{ base = "BASE_DIGGER",
 		combat_apr = 5,
 	},
 }
+
+newEntity{ base = "BASE_HEAVY_BOOTS",
+	define_as = "WARPED_BOOTS",
+	power_source = {unknown=true},
+	unique = true,
+	name = "The Warped Boots",
+	unided_name = "pair of painful-looking boots",
+	desc = [[These blackened boots have lost all vestige of any former glory they might have had. Now, they are a testament to the corruption of the Deep Bellow, and its power.]],
+	color = colors.DARK_GREEN,
+	level_range = {35, 45},
+	rarity = 250,
+	cost = 200,
+	material_level = 4,
+	wielder = {
+		combat_armor = 4,
+		combat_def = 2,
+		combat_dam = 10,
+		fatigue = 8,
+		combat_spellpower = 10,
+		combat_spellcrit = 9,
+		life_regen = -0.20,
+		inc_damage = { [DamageType.BLIGHT] = 15 },
+	},
+	max_power = 50, power_regen = 1,
+	use_talent = { id = Talents.T_SPIT_BLIGHT, level=3, power = 10 },
+}

game/modules/tome/data/lore/misc.lua

@@ -136,6 +136,37 @@ Rest easy, brother. It may have taken your eye, but think of what else it could
 
 Make sure you write the words on your next letter nice and big,
 Rolf]]}
+newLore{
+	id = "adventurer-letter-6",
+	category = "adventures",
+	name = "letter to Rolf (3)",
+	lore = [[Rolf,
+
+I can't remember anything from the fight save the sheer terror at being near something so horrid and powerful. There is no shame in running from a foe you cannot possibly hope to defeat, is there? Maybe ale from the tavern is a good idea, but maybe it is better to conquer your fear once and for all... I hope you can forgive me, but I must defeat this monster, if it takes me the rest of my life.
+
+Wishing you and your ale a hearty good-bye,
+
+Weisman.]]}
+newLore{
+	id = "adventurer-letter-7",
+	category = "adventures",
+	name = "letter to Weisman (4)",
+	lore = [[Weisman,
+
+By my ancestors' profits I hope you receive this message in good health and spirits. Please, old friend - there is no need to impress upon me your valour, I know full well how courageous you are. Please, do not go after that... that thing! If I must drag you away physically, that is what I shall do, but I beg of you, please, consider another foe to fight!
+
+Your friend,
+
+Rolf.]]}
+newLore{
+	id = "adventurer-letter-8",
+	category = "adventures",
+	name = "Last Will of Rolf",
+	bloodstains = 6,
+	lore = [[Last Will and Testament of Rolf Two-Axes
+
+I have failed. Oh by the great wyrm's maw, I have failed! The beast Weisman set out to slay was dead already by another's hand, but its corruption remained still. When I arrived in its chamber, Weisman was already half-gone; he was hacking away at foes only he could see. When I tried to stop him, he turned his axe on me... I am beaten and broken, hiding in some crevasse away from... from my own friend, who through the corruption in this place has been perverted into a monstrosity my axes were unable to fell. I hold no doubt that this is the last time I shall put quill to parchment, as even now I can hear my old friend's perverted voice.. calling to me. I bequeathe my belongings to any who slay ...
+#{italic}#(the ink blotch seems to indicate Weisman had caught up to his old friend, one-half of that abomination)#{normal}#]]}
 
 --------------------------------------------------------------
 -- Myths of creations

game/modules/tome/data/zones/deep-bellow/npcs.lua

@@ -78,6 +78,7 @@ newEntity{ base="BASE_NPC_CORRUPTED_HORROR", define_as = "THE_MOUTH",
 
 	on_die = function(self, who)
 		game.player:resolveSource():setQuestStatus("deep-bellow", engine.Quest.COMPLETED)
+		game.state:activateBackupGuardian("ABOMINATION", 3, 35, "I have heard a dwarf whispering about some abomination in the deep bellow.")
 	end,
 }
 
@@ -122,3 +123,76 @@ It seems to come from the digestive system of the mouth.]],
 		end
 	end,
 }
+
+newEntity{ base="BASE_NPC_CORRUPTED_HORROR", define_as = "ABOMINATION",
+	unique = true,
+	allow_infinite_dungeon = true,
+	name = "The Abomination",
+	display = "h", color=colors.VIOLET,
+	desc = [[A horrid mass of pustulent flesh, sinew, and bone; this creature seems to constantly be in pain. Two heads glare malevolently at you, an intruder in its domain.]],
+	level_range = {35, nil}, exp_worth = 3,
+	max_life = 350, life_rating = 23, fixed_rating = true,
+	life_regen = 30,
+	hate_regen = 10,
+	negative_regen = 14,
+	stats = { str=30, dex=8, cun=10, mag=15, con=20 },
+	rank = 4,
+	size_category = 3,
+	infravision = 10,
+	instakill_immune = 1,
+	blind_immune = 1,
+	see_invisible = 30,
+	move_others=true,
+
+	body = { INVEN = 10, MAINHAND=1, OFFHAND=1, BODY=1, FEET=1 },
+	resolvers.equip{
+		{type="weapon", subtype="battleaxe", force_drop=true, tome_drops="boss", autoreq=true},
+		{type="armor", subtype="boots", defined="WARPED_BOOTS", random_art_replace={chance=75}, autoreq=true},
+		{type="armor", subtype="massive", force_drop=true, tome_drops="boss", autoreq=true},
+	},
+	resolvers.drops{chance=100, nb=3, {tome_drops="boss"} },
+	resolvers.drops{chance=100, nb=1, {defined="ADV_LTR_8"} },
+
+	resolvers.talents{
+		[Talents.T_ARMOUR_TRAINING]=5,
+		[Talents.T_WEAPON_COMBAT]={base=5, every=5, max=10},
+		[Talents.T_WEAPONS_MASTERY]={base=5, every=5, max=10},
+
+		[Talents.T_ENRAGE]={base=3, every=7, max=5},
+		[Talents.T_SUPPRESSION]={base=4, every=7, max=6},
+		[Talents.T_GLOOM]={base=4, every=7, max=6},
+		[Talents.T_WEAKNESS]={base=4, every=7, max=6},
+		[Talents.T_TORMENT]={base=4, every=7, max=6},
+
+		[Talents.T_HYMN_OF_MOONLIGHT]={base=3, every=7, max=5},
+		[Talents.T_STARFALL]={base=3, every=7, max=7},
+		[Talents.T_SHADOW_BLAST]={base=3, every=7, max=7},
+	},
+	resolvers.sustains_at_birth(),
+
+	-- Supposed to drop two notes during the fight, if player has cooldowns to worry about player can snag these then.
+	on_takehit = function(self, val)
+		if self.life - val < self.max_life * 0.75 and not self.dropped_note6 then
+			local n = game.zone:makeEntityByName(game.level, "object", "ADV_LTR_6")
+			if n then
+				self.dropped_note6 = true
+				game.zone:addEntity(game.level, n, "object", self.x, self.y)
+				game.logSeen(self, "A parchment falls to the floor near The Abomination.")
+			end
+		end
+		if self.life - val < self.max_life * 0.25 and not self.dropped_note7 then
+			local n = game.zone:makeEntityByName(game.level, "object", "ADV_LTR_7")
+			if n then
+				self.dropped_note7 = true
+				game.zone:addEntity(game.level, n, "object", self.x, self.y)
+				game.logSeen(self, "A parchment falls to the floor near The Abomination.")
+			end
+		end
+		return val
+	end,
+
+	autolevel = "warriormage",
+	ai = "tactical", ai_state = { talent_in=1, ai_move="move_astar", },
+	ai_tactic = resolvers.tactic"melee",
+	resolvers.inscriptions(4, {}),
+}

game/modules/tome/data/zones/deep-bellow/objects.lua

@@ -29,3 +29,22 @@ newEntity{ base = "BASE_LORE",
 	encumberance = 0,
 }
 end
+
+newEntity{ base = "BASE_LORE",
+	define_as = "ADV_LTR_6",
+	name = "letter to Rolf (3)", lore="adventurer-letter-6",
+	desc = [[A paper scrap.]],
+	rarity = false,
+}
+newEntity{ base = "BASE_LORE",
+	define_as = "ADV_LTR_7",
+	name = "letter to Weisman (4)", lore="adventurer-letter-7",
+	desc = [[A paper scrap.]],
+	rarity = false,
+}
+newEntity{ base = "BASE_LORE",
+	define_as = "ADV_LTR_8",
+	name = "Last Will of Rolf", lore="adventurer-letter-8",
+	desc = [[A paper scrap.]],
+	rarity = false,
+}