function event_say(e)
	if(e.other:GetFactionValue(e.self) >= 500) then -- req kindly cov
		if(e.message:findi("hail")) then
			e.self:Say("Greetings, " .. e.other:GetCleanName() .. ". I am the keeper of relics. If you are brave I have tasks to test your might and perhaps rewards.");
		elseif(e.message:findi("rewards")) then
			e.self:Say("One should ask of the tasks before worrying about rewards," .. e.other:Race() .. ".");
		elseif(e.message:findi("tasks")) then
			e.self:Say("Enter into the halls of testing to complete these tasks. Seek out the ancient ones inside and see if your might is as great as theirs and fear not, those who you slay will be returned to the temple by the gift of Veeshan's great power. I have three tasks, which any may complete, as well as a request of both the arcane and the strong.");
		elseif(e.message:findi("arcane")) then
			e.self:Say("Those who seek knowledge, will seek this task out for its reward is great. Three tears and a glowing orb will garner one an ancient mask. The White tear and the black tear for balance the runed tear to hold the balance and a glowing orb to return raw energy to the ancient mask.");
		elseif(e.message:findi("strong")) then
			e.self:Say("Those who believe they are strong may be surprised after such a task. Seek out the cursed one and slay him, return to me when you have gathered a silver tear, a poison tear, a flame kissed tear and a serrated tear. End the cursed ones torment for a short time, before the high priest raises him to continue his suffering for eternity.");
		elseif(e.message:findi("three")) then
			e.self:Say("Tears from the cursed you much seek for each task. The test of the Ruby Tear, the test of the Platinum Tear and the test of the Emerald Tear await all who wish to partake of them.");
		elseif(e.message:findi("ruby tear")) then
			e.self:Say("The test of the ruby tear sounds simple enough, enter the halls of testing, secure a ruby tear, a white symbol, a silver symbol and a ruby symbol. I warn you mortal, those who walk the halls will rend your body and mind if you are not worthy.");
		elseif(e.message:findi("platinum tear")) then
			e.self:Say("Seek the platinum tear and three symbols to bind its powers to a bracelet. The black symbol to add raw power, the serrated symbol to enchant its powers and the runed symbol to hold the powers to the bracelet.");
		elseif(e.message:findi("emerald tear")) then
			e.self:Say("The emerald tear of Veeshan entrusted to the cursed one. Return this tear to me so I may return the powers of an ancient shield. Three symbols you must also seek. Emerald like the tear, one kissed by the flames of the elder wurms and one made of the ancient wyverns venomous poison.");
		end
 	elseif(e.other:GetFactionValue(e.self) >= 0) then
		e.self:Say("You need to prove your dedication to our cause before I can discuss such matters with you.");
	else
		e.self:Say(eq.ChooseRandom("I didn't know Slime could speak common.  Go back to the sewer before I lose my temper.","Is that your BREATH, or did something die in here?  Now go away!","I wonder how much I could get for the tongue of a blithering fool?  Leave before I decide to find out for myself.","Oh look..a talking lump of refuse..how novel!"));
	end
end

function event_trade(e)
	local item_lib = require("items");
	
	if(e.other:GetFactionValue(e.self) >= 500 and item_lib.check_turn_in(e.self, e.trade, {item1 = 31262,item2 = 31261,item3 = 31263,item4 = 31260})) then -- request of the arcane
		FactionHits(e);
		e.other:QuestReward(e.self,0,0,0,0,31463,20000);
	elseif(e.other:GetFactionValue(e.self) >= 500 and item_lib.check_turn_in(e.self, e.trade, {item1 = 31267,item2 = 31266,item3 = 31265,item4 = 31264})) then -- request of the strong
		FactionHits(e);
		e.other:QuestReward(e.self,0,0,0,0,31464,20000);
	elseif(e.other:GetFactionValue(e.self) >= 500 and item_lib.check_turn_in(e.self, e.trade, {item1 = 31259,item2 = 31270,item3 = 31253,item4 = 31250})) then -- test of the ruby tear
		FactionHits(e);
		e.other:QuestReward(e.self,0,0,0,0,31460,20000);
	elseif(e.other:GetFactionValue(e.self) >= 500 and item_lib.check_turn_in(e.self, e.trade, {item1 = 31251,item2 = 31269,item3 = 31252,item4 = 31254})) then -- test of the platinum tear
		FactionHits(e);
		e.other:QuestReward(e.self,0,0,0,0,31461,20000);
	elseif(e.other:GetFactionValue(e.self) >= 500 and item_lib.check_turn_in(e.self, e.trade, {item1 = 31257,item2 = 31268,item3 = 31256,item4 = 31255})) then -- test of the emerald tear
		FactionHits(e);
		e.other:QuestReward(e.self,0,0,0,0,31462,20000);
	end
	item_lib.return_items(e.self, e.other, e.trade)
end

function FactionHits(e)
	e.self:Say("You have done well, ".. e.other:Race() .. ". You have proven that you are strong, but do you dare enter those halls again?");
	e.other:Faction(e.self,430,75); -- Faction: Claws of Veeshan
	e.other:Faction(e.self,436,18); -- Faction: Yelinak
	e.other:Faction(e.self,448,-37); -- Faction: Kromzek
end