Poccnn 385 Postado Agosto 31, 2020 Share Postado Agosto 31, 2020 Elane.xml <?xml version="1.0"?> <npc name="Elane" script="data/npc/scripts/Thais/Elane.lua" walkinterval="2000"> <health now="200" max="200" /> <look type="137" head="113" body="100" legs="119" feet="119" addons="3"/> <parameters> <parameter key="message_greet" value="Welcome to the paladins' guild, |PLAYERNAME|! How can I {help} you?" /> <parameter key="module_shop" value="1"/> <parameter key="shop_buyable" value="" /> <parameter key="shop_sellable" value="sniper gloves,5875,2000" /> <parameter key="module_keywords" value="1" /> <parameter key="keywords" value="name;help;job;Paladins;warriors;magicians;missile;news;members;advantages;spells;general;army;excalibug;Ferumbras;time;crossbow;Baxter;Bozo;McRonalds;Eclesius;Elane;Frodo;Galuna;Gorn;Gregor;Harkath Bloodblade;king tibianus;Lugri;Lynda;Marvik;Muriel;Oswald;Quentin;Sam;" /> <parameter key="keyword_reply1" value="My name is Elane. I am the famous leader of the {Paladins}." /> <parameter key="keyword_reply2" value="I am the leader of the {Paladins}. I help our members." /> <parameter key="keyword_reply3" value="I am the leader of the {Paladins}. I help our members." /> <parameter key="keyword_reply4" value="Paladins are great {warriors} and {magicians}. Besides that we are excellent missile fighters. Many people in Tibia want to join us." /> <parameter key="keyword_reply5" value="Of course, we aren't as strong as {knights}, but no {druid} or {sorcerer} will ever defeat a paladin with a sword." /> <parameter key="keyword_reply6" value="There are many magic spells and runes paladins can use." /> <parameter key="keyword_reply7" value="Paladins are the best missile fighters in Tibia!" /> <parameter key="keyword_reply8" value="I am a paladin, not a storyteller." /> <parameter key="keyword_reply9" value="Every paladin profits from his vocation. It has many advantages to be a paladin." /> <parameter key="keyword_reply10" value="We will help you to improve your skills. Besides I offer spells for paladins." /> <parameter key="keyword_reply11" value="Sorry, I don't teach spells." /> <parameter key="keyword_reply12" value="Harkath Bloodblade is the royal general." /> <parameter key="keyword_reply13" value="Some paladins serve in the kings army." /> <parameter key="keyword_reply14" value="A weapon of myth. I don't believe that this weapon exists." /> <parameter key="keyword_reply15" value="Someday I will slay that bastard!" /> <parameter key="keyword_reply16" value="Oops. I have forgotten my watch." /> <parameter key="keyword_reply17" value="I really wonder what was on this fool's mind when he stole my crossbow. What a huge disappointment." /> <parameter key="keyword_reply18" value="He has some potential." /> <parameter key="keyword_reply19" value="How spineless do you have to be to become a jester?" /> <parameter key="keyword_reply20" value="The McRonalds are simple farmers." /> <parameter key="keyword_reply21" value="He must have been skilled before he became the way he is now. Such a pity." /> <parameter key="keyword_reply22" value="yes?" /> <parameter key="keyword_reply23" value="The alcohol he sells shrouds the mind and the eye." /> <parameter key="keyword_reply24" value="One of the most important members of our guild. She makes all the bows and arrows we need." /> <parameter key="keyword_reply25" value="He sells a lot of useful equipment." /> <parameter key="keyword_reply26" value="He and his guildfellows lack the grace of a true warrior." /> <parameter key="keyword_reply27" value="A fine warrior and a skilled general." /> <parameter key="keyword_reply28" value="King Tibianus is a wise ruler." /> <parameter key="keyword_reply29" value="A follower of evil that will get what he deserves one day." /> <parameter key="keyword_reply30" value="Mhm, a little too nice for my taste. Still, it's amazing how she endures all those men stalking her, especially this creepy Oswald." /> <parameter key="keyword_reply31" value="A skilled healer, that's for sure." /> <parameter key="keyword_reply32" value="Just another arrogant sorcerer." /> <parameter key="keyword_reply33" value="If there wouldn't be higher powers to protect him..." /> <parameter key="keyword_reply34" value="A humble monk and a wise man." /> <parameter key="keyword_reply35" value="Strong man. But a little shy." /> </parameters> </npc> Elane.lua local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end function onThink() npcHandler:onThink() end local talkState,talkUser = {}, 0 local function say(npc,text,cid,talk) if not(npcHandler:isFocused(cid)) then return false end if talk and not(talkState[talkUser] == talk) then return false end doCreatureSay(npc,text,TALKTYPE_PRIVATE_NP,cid) end local function changeTalk(talk) talkState[talkUser] = talk end function creatureSayCallback(cid, type, msg) if not(npcHandler:isFocused(cid)) then return false end local msg = string.lower(msg) talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid if(msgcontains(msg, 'outfit'))then npcHandler:say("Oh, my winged tiara? Those are traditionally awarded after having completed a difficult task for our guild, only to female aspirants though. Male warriors will receive a hooded cloak.", cid) talkState[talkUser] = 1 elseif(talkState[talkUser] == 1 and msgcontains(msg, 'task'))then npcHandler:say("So you are saying that you would like to prove that you deserve to wear such a hooded cloak?",cid) talkState[talkUser] = 11 elseif(talkState[talkUser] == 11)then if(msgcontains(msg, 'yes'))then doPlayerSetStorageValue(cid,1835,1) --1835 npcHandler:say("Alright, I will give you a chance. Pay close attention to what I'm going to tell you now. ...",cid) addEvent(say,6000,getNpcCid(),"... Recently, one of our members moved to Liberty Bay out of nowhere, talking about some strange cult. That is not the problem, but he took my favourite crossbow with him. ...",cid,11) addEvent(say,14000,getNpcCid(),"... Please find my crossbow. It has my name engraved on it and is very special to me. ...",cid,11) addEvent(say,18000,getNpcCid(),"... Secondly, we need a lot of leather for new quivers. 100 pieces of lizard leather and 100 pieces of red dragon leather should suffice. ...",cid,11) addEvent(say,24000,getNpcCid(),"... Third, since we are giving out tiaras, we are always in need of enchanted chicken wings. Please bring me 5, that would help us tremendously. ...",cid,11) addEvent(say,30000,getNpcCid(),"... Lastly, for our arrow heads we need a lot of steel. Best would be one piece of royal steel, one piece of draconian steel and one piece of hell steel. ...",cid,11) addEvent(say,40000,getNpcCid(),"... Did you understand everything I told you and are willing to handle this task?",cid,11) addEvent(changeTalk,40000,12) else npcHandler:say("ok.",cid) talkState[talkUser] = 0 end elseif(talkState[talkUser] == 12)then if(msgcontains(msg, 'yes'))then npcHandler:say("That's the spirit! I hope you will find my crossbow, "..getCreatureName(cid)..".",cid) else npcHandler:say("Hmm, maybe next time.",cid) end talkState[talkUser] = 0 elseif(msgcontains(msg, 'crossbow'))then npcHandler:say("I'm so excited! Have you really found my crossbow?", cid) talkState[talkUser] = 2 elseif(talkState[talkUser] == 2 and msgcontains(msg, 'yes'))then if(getPlayerItemCount(cid,5947) >= 1)then npcHandler:say("Yeah! I could kiss you right here and there! Besides, you're a handsome one. Please bring me 100 pieces of lizard {leather} and 100 pieces of red dragon {leather} now!",cid) talkState[talkUser] = 21 else npcHandler:say("That's the spirit! I hope you will find my crossbow, "..getCreatureName(cid)..".",cid) talkState[talkUser] = 0 end elseif(talkState[talkUser] == 21 and msgcontains(msg, 'leather'))then npcHandler:say("Did you bring me 100 pieces of lizard leather and 100 pieces of red dragon leather?",cid) talkState[talkUser] = 22 elseif(talkState[talkUser] == 22 and msgcontains(msg, 'yes'))then if(getPlayerItemCount(cid,5876) >= 100 and getPlayerItemCount(cid,5948) >= 100)then npcHandler:say("Good work, "..getCreatureName(cid).."! That is enough leather for a lot of sturdy quivers. Now, please bring me 5 enchanted {chicken wings}.",cid) talkState[talkUser] = 23 else npcHandler:say("Ah! you dont have all items.", cid) talkState[talkUser] = 0 end elseif(talkState[talkUser] == 23 and msgcontains(msg, 'chicken wings'))then npcHandler:say("Were you able to get hold of 5 enchanted chicken wings?",cid) talkState[talkUser] = 24 elseif(talkState[talkUser] == 24 and msgcontains(msg, 'yes'))then if(getPlayerItemCount(cid,5891) >= 5)then npcHandler:say("Great! Now we can create a few more Tiaras. If only they weren't that expensive... Well anyway, please obtain one piece of royal steel, draconian steel and hell steel each.",cid) talkState[talkUser] = 25 else npcHandler:say("Ah! you dont have all items.", cid) talkState[talkUser] = 0 end elseif(talkState[talkUser] == 25 and msgcontains(msg, 'steel'))then npcHandler:say("Ah, have you brought one piece of royal steel, draconian steel and hell steel each?",cid) talkState[talkUser] = 26 elseif(talkState[talkUser] == 26 and msgcontains(msg, 'yes'))then if(getPlayerItemCount(cid,5887) >= 1 and getPlayerItemCount(cid,5888) >= 1 and getPlayerItemCount(cid,5889) >= 1 and getPlayerItemCount(cid,5891) >= 5 and getPlayerItemCount(cid,5876) >= 100 and getPlayerItemCount(cid,5948) >= 100 and getPlayerItemCount(cid,5947) >= 1)then doPlayerRemoveItem(cid,5887,1, true) doPlayerRemoveItem(cid,5888,1, true) doPlayerRemoveItem(cid,5889,1, true) doPlayerRemoveItem(cid,5891,5, true) doPlayerRemoveItem(cid,5876,100, true) doPlayerRemoveItem(cid,5948,100, true) doPlayerRemoveItem(cid,5947,1, true) if(getPlayerSex(cid) == PLAYERSEX_MALE)then doPlayerAddOutfit(cid,129,1) else doPlayerAddOutfit(cid,137,1) end npcHandler:say("Wow, I'm impressed, "..getCreatureName(cid)..". Your really are a valuable member of our paladin guild. I shall grant you your reward now. Wear it proudly!",cid) else npcHandler:say("Ah! you dont have all items.", cid) end talkState[talkUser] = 0 elseif(msgcontains(msg, 'sniper gloves'))then if(isPremium(Cid))then npcHandler:say("You found sniper gloves?! Incredible! Listen, if you give them to me, I will grant you the right to wear the sniper gloves accessory. How about it?", cid) else npcHandler:say("You found sniper gloves?! Incredible! I would love to grant you the sniper gloves accessory, but I can only do that for premium warriors. However, I would pay you 2000 gold pieces for them. How about it?", cid) end talkState[talkUser] = 3 elseif(talkState[talkUser] == 3 and msgcontains(msg, 'yes'))then if(getPlayerItemCount(cid,5875) >= 1)then doPlayerRemoveItem(cid,5875,1, true) if(isPremium(cid))then npcHandler:say("Great! I hereby grant you the right to wear the sniper gloves as accessory. Congratulations!",cid) if(getPlayerSex(cid) == PLAYERSEX_MALE)then doPlayerAddOutfit(cid,129,2) else doPlayerAddOutfit(cid,137,2) end else doPlayerAddMoney(cid, 2000) npcHandler:say("Congratulations!",cid) end else npcHandler:say("sorry, you dont have a sniper gloves.", cid) end talkState[talkUser] = 0 else npcHandler:say('...?',cid) end return true end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) Link para o comentário https://xtibia.com/forum/topic/252311-thais-elane/ Compartilhar em outros sites More sharing options...
Posts Recomendados