function event_say(e)
if(e.message:findi("Hail")) then
e.self:Say("It is good to see our numbers growing on this land. Welcome! May your travels be as prosperous as mine have. There are many [new powers] to be gained from this land.");
elseif(e.message:findi("new powers")) then
e.self:Say("The new powers are scrolls that give us access to new and powerful spells. My collection is almost complete. I am simply [lacking] four more and then I will return back to the homeland.");
elseif(e.message:findi("lacking")) then
e.self:Say("I am missing the scroll Atol's Spectral Shackles, Tears of Druzzil, Inferno of Al'kabor, and Pillar of Frost. Should you run into one, bring it to me and I'll perform an exchange for another scroll.");
end
end
function event_trade(e)
local item_lib = require("items");
local count = item_lib.count_handed_item(e.self, e.trade, {19315, 19322, 19318, 19319});
if(count > 0) then
repeat
e.self:Say("Here is the scroll that I promised. We have both gained much knowledge today. I hope to do business with you again soon. Farewell!");
e.other:QuestReward(e.self,0,0,0,0,eq.ChooseRandom(19329,19320,19324,19317),1000);
count = count - 1;
until count == 0;
end
item_lib.return_items(e.self, e.other, e.trade)
end
-------------------------------------------------------------------------------------------------
-- Converted to .lua using MATLAB converter written by Stryd and manual edits by Speedz
-- Find/replace data for .pl --> .lua conversions provided by Speedz, Stryd, Sorvani and Robregen
-------------------------------------------------------------------------------------------------