local keywordHandler = KeywordHandler:new()
local npcHandler = NpcHandler:new(keywordHandler)
function npcHandler:say(msg) selfSay(msg) end
NpcSystem.parseParameters(npcHandler)
local main = 278
-- 1 => Knows the word of greeting
-- 2 => Joined Marid Faction
-- 3 => Joined Efreet Faction
local Topic, event, eventW, tmpFocus = 0, 0, 0, nil
local function walkAgain()
if npcHandler.focuses == 0 then
tmpFocus = nil
selfFocus(0)
end
end
local function loop(msg, cid)
if npcHandler.focuses == 0 then
stopEvent(eventW)
if not tmpFocus then
selfFocus(cid)
tmpFocus = cid
end
eventW = addEvent(walkAgain, 6000)
end
doCreatureSay(getNpcCid(), msg[1], 1)
table.remove(msg, 1)
if msg[1] and isPlayer(cid) then
event = addEvent(loop, 5000, msg, cid)
end
end
function selfSay(msg, cid)
if npcHandler.focuses == 0 then
stopEvent(eventW)
if not tmpFocus then
selfFocus(cid)
tmpFocus = cid
end
eventW = addEvent(walkAgain, 6000)
end
stopEvent(event)
if type(msg) == 'table' then
event = addEvent(loop, 1000, msg, cid)
else
event = addEvent(doCreatureSay, 1000, getNpcCid(), msg, 1)
end
end
function msgcontains(message, keyword, ends)
message, keyword = message:lower(), keyword:lower()
if message:find(keyword) and not message:find('(%w+)' .. keyword) and (not ends or not message:find(keyword .. '(%w+)')) then
return true
end
end
function disappearCallback(cid)
stopEvent(event)
npcHandler:releaseFocus(cid)
if isPlayer(cid) then
selfSay('Back to work.', cid)
end
return false
end
npcHandler:setCallback(CALLBACK_CREATURE_DISAPPEAR, disappearCallback)
npcHandler:setCallback(CALLBACK_FAREWELL, disappearCallback)
function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end
function onCreatureDisappear(cid)
if cid == npcHandler.focuses then
stopEvent(event)
npcHandler:releaseFocus(cid)
end
end
function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end
function onThink()
if tmpFocus then
if npcHandler.focuses == 0 and isPlayer(tmpFocus) then
selfFocus(tmpFocus)
else
tmpFocus = nil
end
end
npcHandler:onThink()
end
function creatureSayCallback(cid, type, msg)
if not npcHandler:isFocused(cid) then
if (msgcontains(msg, 'hello', true) or msgcontains(msg, 'hi', true) or msgcontains(msg, 'greetings', true) or msgcontains(msg, 'djanni\'hah', true)) then
local v, p = getPlayerStorageValue(cid, main), getCreatureName(cid)
if v == 2 then
if npcHandler.focuses == 0 then
npcHandler:addFocus(cid)
selfSay(p .. "! How's it going these days?", cid)
Topic = 0
else
selfSay("Hey " .. p .. "! Please wait a second!", cid)
end
elseif msgcontains(msg, 'djanni\'hah') then
if v > 0 then
if npcHandler.focuses == 0 then
npcHandler:addFocus(cid)
selfSay({"Whoa? You know the word! Amazing, " .. p .. "! ...", "I should go and tell Fa'hradin. ...", "Well. Why are you here anyway, " .. p .. "?"}, cid)
Topic = 0
else
selfSay("Yikes! Another human? Where did you come from? Well, ehm - if you could please wait a second, " .. p .. "?", cid)
end
else
if npcHandler.focuses == 0 then
selfSay({"Hahahaha! ...", p .. ", that almost sounded like the word of greeting. Humans - cute they are!"}, cid)
else
selfSay("That almost sounded like the word of greeting, " .. p .. ". Humans - cute they are!", cid)
end
end
else
selfSay({npcHandler.focuses == 0 and "Whoa! A human! This is no place for you, " .. p .. ". ..." or "Another human! This is no place for you, " .. p .. ". ...", "Go and play somewhere else."}, cid)
end
else
return false
end
elseif msgcontains(msg, 'bye') or msgcontains(msg, 'farewell') then
npcHandler:releaseFocus(cid)
selfSay("<salutes>Aaaa -tention!", cid)
Topic = 0
elseif msgcontains(msg, 'name') then
selfSay("I am Umar. Pleased to meet you!", cid)
Topic = 0
elseif msgcontains(msg, 'job') then
selfSay("I am the gatekeeper of Ashta'daramai. That's what Gabel told me to do. You know - keeping the courtyard clean, getting rid of salesmen, keeping Efreet scum out... that kind of thing. But in my spare time I work as a part-time philosopher.", cid)
Topic = 0
elseif msgcontains(msg, 'philosopher') then
selfSay("Yes. Comes with the job. You see - here I am, sitting on the same chair all day and staring at the same blank wall. So what happens is that my mind starts wandering. And, you know, I start thinking. You know - about all kinds of things.", cid)
Topic = 0
elseif msgcontains(msg, 'philosopher') then
selfSay("Yes. Comes with the job. You see - here I am, sitting on the same chair all day and staring at the same blank wall. So what happens is that my mind starts wandering. And, you know, I start thinking. You know - about all kinds of things.", cid)
Topic = 0
elseif msgcontains(msg, 'things') then
selfSay("Yes. About the world and the gods and all that. And about girls. Yes, about girls, mostly.", cid)
Topic = 0
elseif msgcontains(msg, 'girls') then
selfSay("You did not know there are female djinns, did you? That's because they are quite rare. They are the greatest treasures of our race, and we guard them jealously.", cid)
Topic = 0
elseif msgcontains(msg, 'gate') then
selfSay("On the orders of king Gabel, who technically is no real king, only Marid may enter Ashta'daramai.", cid)
Topic = 0
elseif msgcontains(msg, 'pass') or msgcontains(msg, 'door') or msgcontains(msg, 'enter') or msgcontains(msg, 'join') or msgcontains(msg, 'follow') then
if getPlayerStorageValue(cid, main) == 2 then
selfSay("You allready have the permission to enter Ashta'daramai.", cid)
Topic = 0
else
selfSay({"If you want to enter our fortress you have to become one of us and fight the Efreet. ...", "So, are you willing to do so?"}, cid)
Topic = 1
end
elseif Topic == 1 then
if msgcontains(msg, 'yes') then
if getPlayerStorageValue(cid, main) == 3 then
selfSay("I don't believe you! You better go now.", cid)
npcHandler:releaseFocus(cid)
else
selfSay("Are you sure? You pledge loyalty to king Gabel, who is... you know. And you are willing to never ever set foot on Efreets' territory, unless you want to kill them? Yes?", cid)
Topic = 2
end
else
selfSay("This isn't your war anyway, human.", cid)
Topic = 0
end
elseif Topic == 2 then
if msgcontains(msg, 'yes') then
selfSay({"Oh. Ok. Welcome then. You may pass. ...","And don't forget to kill some Efreets, now and then."}, cid)
setPlayerStorageValue(cid, main, 2)
else
selfSay("This isn't your war anyway, human.", cid)
end
Topic = 0
elseif msgcontains(msg, 'gabel') then
selfSay("He is our king and leader. Well, he isn't a king, you know. I mean, from a technical point of view he is, but he does not wear a crown or anything, and he says he isn't one, so even though he is one he isn't. Right?", cid)
Topic = 0
elseif msgcontains(msg, 'king') then
selfSay({"Okay, let's do this again. Gabel says he isn't a king, but he acts like one, which makes him one anyway - right? ...","But you know, he does not really act like one, either. I mean, he does give us orders and all that, and we obey sure enough, but it's not that we have to, I mean, technically speaking. ...","I mean - I don't know what would happen if anybody would not follow his orders for a change. After all he is no longer a king, right? ...","But then I don't want to be the first one to find out what happens if you disobey, so I always do as I'm told. ...","Which means I do not really know whether or not he is king. <sighs> Things were so much easier when Gabel still said he was king. Matters were so much clearer then."}, cid)
Topic = 0
elseif msgcontains(msg, 'djinn') then
selfSay("Well, I am a djinn, but only as far as my physical aspect is concerned. As far as my way of thinking is concerned I think I might actually be somebody else. You now - not even a djinn. In fact, I think I might be a dwarf." )
Topic = 0
elseif msgcontains(msg, 'dwarf') then
selfSay({"Yes. Consider this: Dwarves live in the mountains. So do I. And just like dwarves I really like gold. But most of all, dwarves like beer. ...","Isn't that amazing? I think that is more than a coincidence. You know - perhaps I am a reincarnated dwarf or something. You never know."}, cid)
Topic = 0
elseif msgcontains(msg, 'human') then
selfSay({"See. That's another problem. In the past, it was us against you - djinn against humans. But one day this guy came along, and all of a sudden things were so much more complicated. ...","All of a sudden there was good djinn and evil djinn, and good humans and evil humans. Everything got so damn complicated. ...","All of a sudden we did not know who to trust and who to fight. Should we join the evil djnn and battle all humans? ...","Or was it smarter to ally with the good humans and to battle the bad djinn? ...","Perhaps we should join nobody and fight the bad humans? So many choices."}, cid)
Topic = 0
elseif msgcontains(msg, 'efreet') then
selfSay("I have thought long and hard about this and I have come to the conclusion that all Efreet are scum.", cid)
Topic = 0
elseif msgcontains(msg, 'ashta\'daramai') then
selfSay("This place is the Marids' safe haven. No enemy has ever managed to take this fortress by assault, and we will see to it that it stays this way.", cid)
Topic = 0
elseif msgcontains(msg, 'mal\'ouquah') then
selfSay("That is the Efreets fortress. I have never seen it, but I'm sure it can't compare to this place.", cid)
Topic = 0
elseif msgcontains(msg, 'marid') then
selfSay("That's us. I suppose we are the good guys in this war. Although good is relative, of course. So let's say, we are relatively good. Depends on the point of view, really.", cid)
Topic = 0
elseif msgcontains(msg, 'war') then
selfSay("We had thought the war was over for good when Malor was finally imprisoned. That little creep is as obstinate as... as... well, as a really obstinate djinn.", cid)
Topic = 0
elseif msgcontains(msg, 'malor') then
selfSay("Malor is evil. I mean - really evil. Things used to be much better when he was still locked away in that lamp.", cid)
Topic = 0
elseif msgcontains(msg, 'tibia') or msgcontains(msg, 'world') then
selfSay("Tibia is a beautiful world. Not that I see much of it, staring at this wall night and day.", cid)
Topic = 0
elseif msgcontains(msg, 'gods') then
selfSay("I have not made my mind up what to think about the gods yet. I am still struggling with Daraman's teachings.", cid)
Topic = 0
elseif msgcontains(msg, 'darama') then
selfSay("Daraman has changed our lives. I mean, we were not stupid or anything before he came, but still it was different. Fa'hradin says that while Zathroth made us intelligent, Daraman made us think." )
Topic = 0
elseif msgcontains(msg, 'zathroth') then
selfSay({"Zathroth is not very popular among the djinn because it is said that he abandoned us even though he was our creator. Legend has it that we failed to meet his expectations. ...","Fa'hradin once said that all djinn are oedipally traumatised because of this, but I have no idea what he is talking about."}, cid)
Topic = 0
elseif msgcontains(msg, 'darashia') then
selfSay("They say Darashia is a beautiful human city somewhere to the north. I would really love to see it, but I can't abandon my post.", cid)
Topic = 0
elseif msgcontains(msg, 'edron') or msgcontains(msg, 'thais') or msgcontains(msg, 'venore') or msgcontains(msg, 'kazordoon') or msgcontains(msg, 'carlin') or msgcontains(msg, 'ab\'dendriel') then
selfSay("I understand the humans have founded some beautiful cities. I would like to see them, but as long as I have to stay here that won't happen. Which means I will not go anywhere as long as the war goes on.", cid)
Topic = 0
elseif msgcontains(msg, 'ankrahmun') then
selfSay("I was there, long ago. We had a garrison based in Ankrahmun during the early phases of the war. That was before the whole plains of the Kha'labal were set on fire.", cid)
Topic = 0
elseif msgcontains(msg, 'scarab') then
selfSay("I don't care whether or not they are special animals. None of that creeping vermin will enter Ashta'daramai as long as I am here!", cid)
Topic = 0
elseif msgcontains(msg, 'pharaoh') then
selfSay("They say the new pharaoh is mad!", cid)
Topic = 0
elseif msgcontains(msg, 'palace') then
selfSay("I remember the palace. It was a beautiful place. Ah... those were happy days.", cid)
Topic = 0
elseif msgcontains(msg, 'temple') then
selfSay("In these heretic times the priests at Ankrahmun's temple are devoted to the teachings of that pompous pharaoh.", cid)
Topic = 0
elseif msgcontains(msg, 'ascension') then
selfSay("Apparently that is what the followers of the pharaoh are striving for. It has to do with that pharaoh's teachings.", cid)
Topic = 0
elseif msgcontains(msg, 'rah') or msgcontains(msg, 'uthun') or msgcontains(msg, 'akh') then
selfSay("That's just some heretic drivel. Don't ask me about it.", cid)
Topic = 0
elseif msgcontains(msg, 'kha\'zeel') then
selfSay("When I look up from my wall, what do I see? Huge, forbidding mountains! No wonder I feel claustrophobic.", cid)
Topic = 0
elseif msgcontains(msg, 'kha\'labal') then
selfSay({"Ah yes - the desert. I still remember how beautiful that land was back in the days before the war. ...","A land full of song and bliss it was - a veritable paradise. Fa'hradin once said its destruction was a supreme example of the transitoriness of all things mortal. ...","I am not sure I agree because I don't know what 'transitoriness' means."}, cid)
Topic = 0
elseif msgcontains(msg, 'djema') then
selfSay("You know her? She's a human like you. I like her lots because she often comes down here for a chat. Nobody else around here does that." )
Topic = 0
elseif msgcontains(msg, 'bo\'ques') then
selfSay("That fat old cook. I like his food, but I find him a bit boring. Food and cooking is all he ever talks about.", cid)
Topic = 0
elseif msgcontains(msg, 'alesar') then
selfSay("Ah. That guy. He was one of us, a Marid, but he left long ago. I have no idea why. Rumours and hearsay is all I ever get.", cid)
Topic = 0
elseif msgcontains(msg, 'fa\'hradin') then
selfSay("Fa'hradin is a powerful wizard and the smartest djinn I know. I love talking to him because there is so much he can teach me, but he rarely has time for me.", cid)
Topic = 0
elseif msgcontains(msg, 'lamp') then
selfSay("Djinns sleep in lamps. I don't know what is so special about that." )
Topic = 0
elseif msgcontains(msg, 'melchior') then
selfSay({"That name rings a bell. A trader from Ankrahmun... or was it Darashia? I remember him and his mule. He used to come up here quite often to do business with Haroun. ...","Lately I haven't seen him around, though. I think last time he came here was about 20 years ago."}, cid)
Topic = 0
end
return true
end
npcHandler:setMessage(MESSAGE_IDLETIMEOUT, "Back to work.")
npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
