(Resolvido)Npc Comprar 100 unidades

jhosefra7 · Janeiro 27, 2017

ola Galera, gostaria de saber como faço para o npc comprar meus 100 Ruby/ diamond, pois tentei configurar e ele só aceita de 1 em 1

tibia 8.57

KotZletY · Janeiro 27, 2017

Esta é uma mensagem automática! Este tópico foi movido para a área correta.
Pedimos que você leia as regras do fórum.

Spoiler

This is an automated message! This topic has been moved to the correct area.
Please read the forum rules.

Ué ? Tem uma barra de quantidade, então quando for vender só rolar essa barra para 100. Ou você quer que só possa vender 100x de uma vez só, e se não tiver os 100x não vende ?

jhosefra7 · Janeiro 27, 2017

eu coloco os 100 na bag e quando rolo a barra e clico p vender aparece que nao possuo objeto

segue a imagem.

quem puder ajudar com script agradeço de "corassaum"

jhosefra7 · Janeiro 31, 2017

alguem ?

3 horas atrás, jhosefra7 disse:

alguem ?

@Noob II @Comedinha @KotZletY

Noob II · Janeiro 31, 2017

Qual o xml do NPC?

jhosefra7 · Janeiro 31, 2017

segue a foto do Mad.xml e Loot.lua

@Noob II se puder ajudar nessa , tentei pegar o npc que vende comida. consigo comprar 100 paes tranquilo mas na hora que modifiquei para eu vender os paes para ele deu o mesmo erro. só vende de 1 em 1

KotZletY · Fevereiro 1, 2017

@jhosefra7 pra que foto ? Manda o script cara, por isso ninguém ta lhe ajudando, posta o script ae em spolier pra gente tentar lhe ajudar. A gente precisa modificar o script, e não a foto!

Mds!

jhosefra7 · Fevereiro 1, 2017

"mad.xml"

<?xml version="1.0" encoding="UTF-8"?>
<npc name="Mad" script="data/npc/scripts/loot.lua" walkinterval="2000" floorchange="0">
   <health now="150" max="150"/>
   <look type="129" head="75" body="115" legs="125" feet="85" addons="3"/>
   <parameters>
       <parameter key="module_shop" value="1"/>
       <parameter key="message_greet" value="Hello |PLAYERNAME|. I buy swords, clubs, axes, helmets, boots, legs, shields and armors."/>
       <parameter key="shop_sellable" value="Pequenas Pedras magicas,2147,5;skull helmet,5741,35000;dreaded cleaver,7419,30000;dragonslayer,7402,20000;royal helmet,2498,40000;warrior helmet,2475,6000;crusader helmet,2497,9000;crown helmet,2491,5000;devil helmet,2462,4000;mystic turban,2663,500;chain helmet,2458,35;iron helmet,2459,30;steel boots,2645,40000;boots of haste,2195,40000;golden boots,2646,200000;magic plate armor,2472,200000;dragon scale mail,2492,60000;demon armor,2494,90000;golden armor,2466,30000;crown armor,2487,20000;knight armor,2476,5000;blue robe,2656,15000;lady armor,2500,2500;plate armor,2463,400;brass armor,2465,200;chain armor,2464,100;golden legs,2470,80000;crown legs,2488,15000;knight legs,2477,6000;plate legs,2647,500;mastermind shield,2514,150000;demon shield,2520,40000;blessed shield,2523,150000;great shield,2522,100000;vampire shield,2534,25000;medusa shield,2536,8000;amazon shield,2537,4000;crown shield,2519,5000;tower shield,2528,4000;guardian shield,2515,200;beholder shield,2518,1500;dwarven shield,2525,100;magic longsword,2390,150000;warlord sword,2408,100000;magic sword,2400,120000;giant sword,2393,10000;bright sword,2407,6000;ice rapier,2396,4000;fire sword,2392,3000;serpent sword,2409,1500;spike sword,2383,800;two handed sword,2377,400;broad sword,2413,70;short sword,2406,30;sword,2376,25;dragon lance,2414,10000;stonecutter axe,2431,90000;guardian halberd,2427,7500;fire axe,2432,10000;knight axe,2430,2000;double axe,2387,200;halberd,2381,200;paladin armor,8891,30000;skullcracker armor,8889,60000;battle axe,2378,100;hatchet,2388,20;war hammer,2391,6000;thunder hammer,2421,90000;skull staff,2436,1000;dragon hammer,2434,2000;clerical mace,2423,200;battle hammer,2417,60;mace,2398,30;"/>
       <parameter key="shop_buyable" value="helmet of the deep,5461,10000;blue legs,7730,20000 ;Boots of Haste,2195,45000"/>
   </parameters>
</npc>

Spoiler

<?xml version="1.0" encoding="UTF-8"?>
<npc name="Mad" script="data/npc/scripts/loot.lua" walkinterval="2000" floorchange="0">
   <health now="150" max="150"/>
   <look type="129" head="75" body="115" legs="125" feet="85" addons="3"/>
   <parameters>
       <parameter key="module_shop" value="1"/>
       <parameter key="message_greet" value="Hello |PLAYERNAME|. I buy swords, clubs, axes, helmets, boots, legs, shields and armors."/>
       <parameter key="shop_sellable" value="Pequenas Pedras magicas,2147,5;skull helmet,5741,35000;dreaded cleaver,7419,30000;dragonslayer,7402,20000;royal helmet,2498,40000;warrior helmet,2475,6000;crusader helmet,2497,9000;crown helmet,2491,5000;devil helmet,2462,4000;mystic turban,2663,500;chain helmet,2458,35;iron helmet,2459,30;steel boots,2645,40000;boots of haste,2195,40000;golden boots,2646,200000;magic plate armor,2472,200000;dragon scale mail,2492,60000;demon armor,2494,90000;golden armor,2466,30000;crown armor,2487,20000;knight armor,2476,5000;blue robe,2656,15000;lady armor,2500,2500;plate armor,2463,400;brass armor,2465,200;chain armor,2464,100;golden legs,2470,80000;crown legs,2488,15000;knight legs,2477,6000;plate legs,2647,500;mastermind shield,2514,150000;demon shield,2520,40000;blessed shield,2523,150000;great shield,2522,100000;vampire shield,2534,25000;medusa shield,2536,8000;amazon shield,2537,4000;crown shield,2519,5000;tower shield,2528,4000;guardian shield,2515,200;beholder shield,2518,1500;dwarven shield,2525,100;magic longsword,2390,150000;warlord sword,2408,100000;magic sword,2400,120000;giant sword,2393,10000;bright sword,2407,6000;ice rapier,2396,4000;fire sword,2392,3000;serpent sword,2409,1500;spike sword,2383,800;two handed sword,2377,400;broad sword,2413,70;short sword,2406,30;sword,2376,25;dragon lance,2414,10000;stonecutter axe,2431,90000;guardian halberd,2427,7500;fire axe,2432,10000;knight axe,2430,2000;double axe,2387,200;halberd,2381,200;paladin armor,8891,30000;skullcracker armor,8889,60000;battle axe,2378,100;hatchet,2388,20;war hammer,2391,6000;thunder hammer,2421,90000;skull staff,2436,1000;dragon hammer,2434,2000;clerical mace,2423,200;battle hammer,2417,60;mace,2398,30;"/>
       <parameter key="shop_buyable" value="helmet of the deep,5461,10000;blue legs,7730,20000 ;Boots of Haste,2195,45000"/>
   </parameters>
</npc>

Noob II · Fevereiro 1, 2017

Em 30/01/2017 ás 23:26, jhosefra7 disse:

Loot.lua

Troca o xml por esse e teste. Não mude nada, nem o preço

<?xml version="1.0" encoding="UTF-8"?>
<npc name="Mad" script="default.lua" walkinterval="2000" floorchange="0">
<health now="150" max="150"/>
<look type="129" head="75" body="115" legs="125" feet="85" addons="3"/>
<parameters>
<parameter key="message_greet" value="Hello dear customer! Are you here to see my offers? Come on, lets {trade}!"/>
<parameter key="message_farewell" value="Good bye!"/>
<parameter key="message_idletimeout" value="Good bye!"/>
<parameter key="message_walkaway" value="Good bye!"/>
<parameter key="module_shop" value="1"/>
<parameter key="shop_buyable" value="helmet of the deep,5461,10000;blue legs,7730,20000 ;Boots of Haste,2195,45000;"/>
<parameter key="shop_sellable" value="pequenas pedras magicas,2147,35000;skull helmet,5741,35000;dreaded cleaver,7419,30000;dragonslayer,7402,20000;royal helmet,2498,40000;warrior helmet,2475,6000;crusader helmet,2497,9000;crown helmet,2491,5000;devil helmet,2462,4000;mystic turban,2663,500;chain helmet,2458,35;iron helmet,2459,30;steel boots,2645,40000;boots of haste,2195,40000;golden boots,2646,200000;magic plate armor,2472,200000;dragon scale mail,2492,60000;demon armor,2494,90000;golden armor,2466,30000;crown armor,2487,20000;knight armor,2476,5000;blue robe,2656,15000;lady armor,2500,2500;plate armor,2463,400;brass armor,2465,200;chain armor,2464,100;golden legs,2470,80000;crown legs,2488,15000;knight legs,2477,6000;plate legs,2647,500;mastermind shield,2514,150000;demon shield,2520,40000;blessed shield,2523,150000;great shield,2522,100000;vampire shield,2534,25000;medusa shield,2536,8000;amazon shield,2537,4000;crown shield,2519,5000;tower shield,2528,4000;guardian shield,2515,200;beholder shield,2518,1500;dwarven shield,2525,100;magic longsword,2390,150000;warlord sword,2408,100000;magic sword,2400,120000;giant sword,2393,10000;bright sword,2407,6000;ice rapier,2396,4000;fire sword,2392,3000;serpent sword,2409,1500;spike sword,2383,800;two handed sword,2377,400;broad sword,2413,70;short sword,2406,30;sword,2376,25;dragon lance,2414,10000;stonecutter axe,2431,90000;guardian halberd,2427,7500;fire axe,2432,10000;knight axe,2430,2000;double axe,2387,200;halberd,2381,200;paladin armor,8891,30000;skullcracker armor,8889,60000;battle axe,2378,100;hatchet,2388,20;war hammer,2391,6000;thunder hammer,2421,90000;skull staff,2436,1000;dragon hammer,2434,2000;clerical mace,2423,200;battle hammer,2417,60;mace,2398,30;"/>
</parameters>
</npc>

jhosefra7 · Fevereiro 1, 2017

@Noob II Testei e nao funcionou,

Noob II · Fevereiro 1, 2017

2 horas atrás, jhosefra7 disse:

@Noob II Testei e nao funcionou,

Os outros itens vendem normal?

jhosefra7 · Fevereiro 2, 2017

vendem, se eu tiver 100 plate armor vende, mas se eu tiver 100 small ruby ou 100 paes ( itens acumulaveis) nao vende

@Noob II

@Guilherme

@xWhiteWolf

Noob II · Fevereiro 2, 2017

@jhosefra7 verifique se o item tá configurado assim no item editor

Dps olhe se no object builder ou dat editor está assim

Se não estiver você deixa igual

r0bert0lol · Fevereiro 2, 2017

Esse bug chat eu descobri como corrigir, o problema é que alguns servidores para download aqui vem com o modules do shop todo bugado, fiquei um tempao para corrigir esse bug no meu servidor, encontrei um modules em um forum gringo hoje e testei e com ele funcionou tudo certinho...

O bug não é por causa de atributos errados nos items, realmente o seu modules não le items stackable.

Para corrigir esse bug, acesse data/npc/lib/npcsystem/ e substitua seu arquivo modules.lua por este aqui.

-- Advanced NPC System (Created by Jiddo),
-- Modified by Talaturen.
-- Modified by Elf.
-- Edited by Limos.

if(Modules == nil) then
   -- Constants used to separate buying from selling.
   SHOPMODULE_SELL_ITEM = 1
   SHOPMODULE_BUY_ITEM = 2
   SHOPMODULE_BUY_ITEM_CONTAINER = 3

   -- Constants used for shop mode. Notice: addBuyableItemContainer is working on all modes
   SHOPMODULE_MODE_TALK = 1 -- Old system used before Tibia 8.2: sell/buy item name
   SHOPMODULE_MODE_TRADE = 2 -- Trade window system introduced in Tibia 8.2
   SHOPMODULE_MODE_BOTH = 3 -- Both working at one time

   -- Used in shop mode
   SHOPMODULE_MODE = SHOPMODULE_MODE_BOTH

   -- Constants used for outfit giving mode
   OUTFITMODULE_FUNCTION_OLD = doPlayerAddOutfit -- Gives outfit through look type
   OUTFITMODULE_FUNCTION_NEW = doPlayerAddOutfitId -- Gives outfit through outfit id

   -- Used in outfit module
   OUTFITMODULE_FUNCTION = OUTFITMODULE_FUNCTION_NEW
   if(OUTFITMODULE_FUNCTION == nil) then
       OUTFITMODULE_FUNCTION = OUTFITMODULE_FUNCTION_OLD
   end

   Modules = {
       parseableModules = {}
   }

   StdModule = {}

   -- These callback function must be called with parameters.npcHandler = npcHandler in the parameters table or they will not work correctly.
   -- Notice: The members of StdModule have not yet been tested. If you find any bugs, please report them to me.
   -- Usage:
       -- keywordHandler:addKeyword({'offer'}, StdModule.say, {npcHandler = npcHandler, text = 'I sell many powerful melee weapons.'})
   function StdModule.say(cid, message, keywords, parameters, node)
       local npcHandler = parameters.npcHandler
       if(npcHandler == nil) then
           error('StdModule.say called without any npcHandler instance.')
       end

       local onlyFocus = (parameters.onlyFocus == nil or parameters.onlyFocus == true)
       if(not npcHandler:isFocused(cid) and onlyFocus) then
           return false
       end

       local parseInfo = {[TAG_PLAYERNAME] = getCreatureName(cid)}
       npcHandler:say(npcHandler:parseMessage(parameters.text or parameters.message, parseInfo), cid, parameters.publicize and true)
       if(parameters.reset == true) then
           npcHandler:resetNpc()
       elseif(parameters.moveup ~= nil and type(parameters.moveup) == 'number') then
           npcHandler.keywordHandler:moveUp(parameters.moveup)
       end

       return true
   end

   --Usage:
       -- local node1 = keywordHandler:addKeyword({'promot'}, StdModule.say, {npcHandler = npcHandler, text = 'I can promote you for 20000 brozne coins. Do you want me to promote you?'})
       --        node1:addChildKeyword({'yes'}, StdModule.promotePlayer, {npcHandler = npcHandler, cost = 20000, promotion = 1, level = 20}, text = 'Congratulations! You are now promoted.')
       --        node1:addChildKeyword({'no'}, StdModule.say, {npcHandler = npcHandler, text = 'Alright then, come back when you are ready.'}, reset = true)
   function StdModule.promotePlayer(cid, message, keywords, parameters, node)
       local npcHandler = parameters.npcHandler
       if(npcHandler == nil) then
           error('StdModule.promotePlayer called without any npcHandler instance.')
       end

       if(not npcHandler:isFocused(cid)) then
           return false
       end

       if(isPlayerPremiumCallback(cid) or not getBooleanFromString(getConfigValue('premiumForPromotion')) or not(parameters.premium)) then
           if(getPlayerPromotionLevel(cid) >= parameters.promotion) then
               npcHandler:say('You are already promoted!', cid)
           elseif(getPlayerLevel(cid) < parameters.level) then
               npcHandler:say('I am sorry, but I can only promote you once you have reached level ' .. parameters.level .. '.', cid)
           elseif(not doPlayerRemoveMoney(cid, parameters.cost)) then
               npcHandler:say('You do not have enough money!', cid)
           else
               setPlayerPromotionLevel(cid, parameters.promotion)
               npcHandler:say(parameters.text, cid)
           end
       else
           npcHandler:say("You need a premium account in order to get promoted.", cid)
       end

       npcHandler:resetNpc()
       return true
   end

   function StdModule.learnSpell(cid, message, keywords, parameters, node)
       local npcHandler = parameters.npcHandler
       if(npcHandler == nil) then
           error('StdModule.learnSpell called without any npcHandler instance.')
       end

       if(not npcHandler:isFocused(cid)) then
           return false
       end

       if(isPlayerPremiumCallback(cid) or not(parameters.premium)) then
           if(getPlayerLearnedInstantSpell(cid, parameters.spellName)) then
               npcHandler:say('You already know this spell.', cid)
           elseif(getPlayerLevel(cid) < parameters.level) then
               npcHandler:say('You need to obtain a level of ' .. parameters.level .. ' or higher to be able to learn ' .. parameters.spellName .. '.', cid)
           elseif(getPlayerVocation(cid) ~= parameters.vocation and getPlayerVocation(cid) ~= parameters.vocation + 4 and vocation ~= 9) then
               npcHandler:say('This spell is not for your vocation', cid)
           elseif(not doPlayerRemoveMoney(cid, parameters.price)) then
               npcHandler:say('You do not have enough money, this spell costs ' .. parameters.price .. ' gold coins.', cid)
           else
               npcHandler:say('You have learned ' .. parameters.spellName .. '.', cid)
               playerLearnInstantSpell(cid, parameters.spellName)
           end
       else
           npcHandler:say('You need a premium account in order to buy ' .. parameters.spellName .. '.', cid)
       end

       npcHandler:resetNpc()
       return true
   end

   function StdModule.bless(cid, message, keywords, parameters, node)
       local npcHandler = parameters.npcHandler
       if(npcHandler == nil) then
           error('StdModule.bless called without any npcHandler instance.')
       end

       if(not npcHandler:isFocused(cid)) then
           return false
       end

       if(isPlayerPremiumCallback(cid) or not getBooleanFromString(getConfigValue('blessingsOnlyPremium')) or not parameters.premium) then
           local price = parameters.baseCost
           if(getPlayerLevel(cid) > parameters.startLevel) then
               price = (price + ((math.min(parameters.endLevel, getPlayerLevel(cid)) - parameters.startLevel) * parameters.levelCost))
           end

           if(getPlayerBlessing(cid, parameters.number)) then
               npcHandler:say("Gods have already blessed you with this blessing!", cid)
           elseif(not doPlayerRemoveMoney(cid, price)) then
               npcHandler:say("You don't have enough money for blessing.", cid)
           else
               npcHandler:say("You have been blessed by one of the five gods!", cid)
               doPlayerAddBlessing(cid, parameters.number)
           end
       else
           npcHandler:say('You need a premium account in order to be blessed.', cid)
       end

       npcHandler:resetNpc()
       return true
   end

   function StdModule.travel(cid, message, keywords, parameters, node)
       local npcHandler = parameters.npcHandler
       if(npcHandler == nil) then
           error('StdModule.travel called without any npcHandler instance.')
       end

       if(not npcHandler:isFocused(cid)) then
           return false
       end

       local storage, pzLocked = parameters.storageValue or (EMPTY_STORAGE + 1), parameters.allowLocked or false
       if(parameters.premium and not isPlayerPremiumCallback(cid)) then
           npcHandler:say('I can only allow premium players to travel with me.', cid)
       elseif(parameters.level ~= nil and getPlayerLevel(cid) < parameters.level) then
           npcHandler:say('You must reach level ' .. parameters.level .. ' before I can let you go there.', cid)
       elseif(parameters.storageId ~= nil and getPlayerStorageValue(cid, parameters.storageId) < storage) then
           npcHandler:say(parameters.storageInfo or 'You may not travel there!', cid)
       elseif(not pzLocked and isPlayerPzLocked(cid)) then
           npcHandler:say('Get out of there with this blood!', cid)
       elseif(not doPlayerRemoveMoney(cid, parameters.cost)) then
           npcHandler:say('You do not have enough money.', cid)
       else
           npcHandler:say('It was a pleasure doing business with you.', cid)
           npcHandler:releaseFocus(cid)

           doTeleportThing(cid, parameters.destination, false)
           doSendMagicEffect(parameters.destination, CONST_ME_TELEPORT)
       end

       npcHandler:resetNpc()
       return true
   end

   FocusModule = {
       npcHandler = nil
   }

   -- Creates a new instance of FocusModule without an associated NpcHandler.
   function FocusModule:new()
       local obj = {}
       setmetatable(obj, self)
       self.__index = self
       return obj
   end

   -- Inits the module and associates handler to it.
   function FocusModule:init(handler)
       self.npcHandler = handler
       for i, word in pairs(FOCUS_GREETWORDS) do
           local obj = {}
           table.insert(obj, word)
           obj.callback = FOCUS_GREETWORDS.callback or FocusModule.messageMatcher
           handler.keywordHandler:addKeyword(obj, FocusModule.onGreet, {module = self})
       end

       for i, word in pairs(FOCUS_FAREWELLWORDS) do
           local obj = {}
           table.insert(obj, word)
           obj.callback = FOCUS_FAREWELLWORDS.callback or FocusModule.messageMatcher
           handler.keywordHandler:addKeyword(obj, FocusModule.onFarewell, {module = self})
       end
   end

   -- Greeting callback function.
   function FocusModule.onGreet(cid, message, keywords, parameters)
       parameters.module.npcHandler:onGreet(cid)
       return true
   end

   -- UnGreeting callback function.
   function FocusModule.onFarewell(cid, message, keywords, parameters)
       if(not parameters.module.npcHandler:isFocused(cid)) then
           return false
       end

       parameters.module.npcHandler:onFarewell(cid)
       return true
   end

   -- Custom message matching callback function for greeting messages.
   function FocusModule.messageMatcher(keywords, message)
       local spectators = getSpectators(getCreaturePosition(getNpcId()), 7, 7)
       for i, word in pairs(keywords) do
           if(type(word) == 'string') then
               if(string.find(message, word) and not string.find(message, '[%w+]' .. word) and not string.find(message, word .. '[%w+]')) then
                   if(string.find(message, getCreatureName(getNpcId()))) then
                       return true
                   end

                   for i, uid in ipairs(spectators) do
                       if(string.find(message, getCreatureName(uid))) then
                           return false
                       end
                   end

                   return true
               end
           end
       end

       return false
   end

   KeywordModule = {
       npcHandler = nil
   }
   -- Add it to the parseable module list.
   Modules.parseableModules['module_keywords'] = KeywordModule

   function KeywordModule:new()
       local obj = {}
       setmetatable(obj, self)
       self.__index = self
       return obj
   end

   function KeywordModule:init(handler)
       self.npcHandler = handler
   end

   -- Parses all known parameters.
   function KeywordModule:parseParameters()
       local ret = NpcSystem.getParameter('keywords')
       if(ret ~= nil) then
           self:parseKeywords(ret)
       end
   end

   function KeywordModule:parseKeywords(data)
       local n = 1
       for keys in string.gmatch(data, '[^;]+') do
           local i = 1

           local keywords = {}
           for temp in string.gmatch(keys, '[^,]+') do
               table.insert(keywords, temp)
               i = i + 1
           end

           if(i ~= 1) then
               local reply = NpcSystem.getParameter('keyword_reply' .. n)
               if(reply ~= nil) then
                   self:addKeyword(keywords, reply)
               else
                   print('[Warning] NpcSystem:', 'Parameter \'' .. 'keyword_reply' .. n .. '\' missing. Skipping...')
               end
           else
               print('[Warning] NpcSystem:', 'No keywords found for keyword set #' .. n .. '. Skipping...')
           end

           n = n + 1
       end
   end

   function KeywordModule:addKeyword(keywords, reply)
       self.npcHandler.keywordHandler:addKeyword(keywords, StdModule.say, {npcHandler = self.npcHandler, onlyFocus = true, text = reply, reset = true})
   end

   TravelModule = {
       npcHandler = nil,
       destinations = nil,
       yesNode = nil,
       noNode = nil,
   }
   -- Add it to the parseable module list.
   Modules.parseableModules['module_travel'] = TravelModule

   function TravelModule:new()
       local obj = {}
       setmetatable(obj, self)
       self.__index = self
       return obj
   end

   function TravelModule:init(handler)
       self.npcHandler = handler
       self.yesNode = KeywordNode:new(SHOP_YESWORD, TravelModule.onConfirm, {module = self})
       self.noNode = KeywordNode:new(SHOP_NOWORD, TravelModule.onDecline, {module = self})

       self.destinations = {}
   end

   -- Parses all known parameters.
   function TravelModule:parseParameters()
       local ret = NpcSystem.getParameter('travel_destinations')
       if(ret ~= nil) then
           self:parseDestinations(ret)
           for _, word in ipairs({'destination', 'list', 'where', 'travel'}) do
               self.npcHandler.keywordHandler:addKeyword({word}, TravelModule.listDestinations, {module = self})
           end
       end
   end

   function TravelModule:parseDestinations(data)
       for destination in string.gmatch(data, '[^;]+') do
           local i, name, pos, cost, premium, level, storage = 1, nil, {x = nil, y = nil, z = nil}, nil, false
           for tmp in string.gmatch(destination, '[^,]+') do
               if(i == 1) then
                   name = tmp
               elseif(i == 2) then
                   pos.x = tonumber(tmp)
               elseif(i == 3) then
                   pos.y = tonumber(tmp)
               elseif(i == 4) then
                   pos.z = tonumber(tmp)
               elseif(i == 5) then
                   cost = tonumber(tmp)
               elseif(i == 6) then
                   premium = getBooleanFromString(tmp)
               else
                   print('[Warning] NpcSystem:', 'Unknown parameter found in travel destination parameter.', tmp, destination)
               end

               i = i + 1
           end

           if(name ~= nil and pos.x ~= nil and pos.y ~= nil and pos.z ~= nil and cost ~= nil) then
               self:addDestination(name, pos, cost, premium)
           else
               print('[Warning] NpcSystem:', 'Parameter(s) missing for travel destination:', name, pos, cost, premium)
           end
       end
   end

   function TravelModule:addDestination(name, position, price, premium)
       table.insert(self.destinations, name)
       local parameters = {
           cost = price,
           destination = position,
           premium = premium,
           module = self
       }

       local keywords, bringwords = {}, {}
       table.insert(keywords, name)

       table.insert(bringwords, 'bring me to ' .. name)
       self.npcHandler.keywordHandler:addKeyword(bringwords, TravelModule.bring, parameters)

       local node = self.npcHandler.keywordHandler:addKeyword(keywords, TravelModule.travel, parameters)
       node:addChildKeywordNode(self.yesNode)
       node:addChildKeywordNode(self.noNode)
   end

   function TravelModule.travel(cid, message, keywords, parameters, node)
       local module = parameters.module
       if(not module.npcHandler:isFocused(cid)) then
           return false
       end

       module.npcHandler:say('Do you want to travel to ' .. keywords[1] .. ' for ' .. parameters.cost .. ' gold coins?', cid)
       return true
   end

   function TravelModule.onConfirm(cid, message, keywords, parameters, node)
       local module = parameters.module
       if(not module.npcHandler:isFocused(cid)) then
           return false
       end

       local parent = node:getParent():getParameters()
       if(isPlayerPremiumCallback(cid) or not parent.premium) then
           if(not isPlayerPzLocked(cid)) then
               if(doPlayerRemoveMoney(cid, parent.cost)) then
                   module.npcHandler:say('It was a pleasure doing business with you.', cid)
                   module.npcHandler:releaseFocus(cid)

                   doTeleportThing(cid, parent.destination, true)
                   doSendMagicEffect(parent.destination, CONST_ME_TELEPORT)
               else
                   module.npcHandler:say('You do not have enough money.', cid)
               end
           else
               module.npcHandler:say('Get out of there with this blood!', cid)
           end
       else
           modulenpcHandler:say('I can only allow premium players to travel there.', cid)
       end

       module.npcHandler:resetNpc()
       return true
   end

   -- onDecline keyword callback function. Generally called when the player sais 'no' after wanting to buy an item.
   function TravelModule.onDecline(cid, message, keywords, parameters, node)
       local module = parameters.module
       if(not module.npcHandler:isFocused(cid)) then
           return false
       end

       module.npcHandler:say(module.npcHandler:parseMessage(module.npcHandler:getMessage(MESSAGE_DECLINE), {[TAG_PLAYERNAME] = getCreatureName(cid)}), cid)
       module.npcHandler:resetNpc()
       return true
   end

   function TravelModule.bring(cid, message, keywords, parameters, node)
       local module = parameters.module
       if(not module.npcHandler:isFocused(cid)) then
           return false
       end

       if((isPlayerPremiumCallback(cid) or not parameters.premium) and not isPlayerPzLocked(cid) and doPlayerRemoveMoney(cid, parameters.cost)) then
           module.npcHandler:say('Sure!', cid)
           module.npcHandler:releaseFocus(cid)

           doTeleportThing(cid, parameters.destination, false)
           doSendMagicEffect(parameters.destination, CONST_ME_TELEPORT)
       end

       module.npcHandler:releaseFocus(cid)
       return true
   end

   function TravelModule.listDestinations(cid, message, keywords, parameters, node)
       local module = parameters.module
       if(not module.npcHandler:isFocused(cid)) then
           return false
       end

       local msg = nil
       for _, destination in ipairs(module.destinations) do
           if(msg ~= nil) then
               msg = msg .. ", "
           else
               msg = ""
           end

           msg = msg .. "{" .. destination .. "}"
       end

       module.npcHandler:say(msg .. ".", cid)
       module.npcHandler:resetNpc()
       return true
   end

   OutfitModule = {
       npcHandler = nil,
       outfits = nil,
       yesNode = nil,
       noNode = nil,
   }
   -- Add it to the parseable module list.
   Modules.parseableModules['module_outfit'] = OutfitModule

   function OutfitModule:new()
       if(OUTFITMODULE_FUNCTION == nil) then
           return nil
       end

       local obj = {}
       setmetatable(obj, self)
       self.__index = self
       return obj
   end

   function OutfitModule:init(handler)
       self.npcHandler = handler
       self.yesNode = KeywordNode:new(SHOP_YESWORD, OutfitModule.onConfirm, {module = self})
       self.noNode = KeywordNode:new(SHOP_NOWORD, OutfitModule.onDecline, {module = self})

       self.outfits = {}
   end

   -- Parses all known parameters.
   function OutfitModule:parseParameters()
       local ret = NpcSystem.getParameter('outfits')
       if(ret ~= nil) then
           self:parseKeywords(ret)
           for _, word in ipairs({'outfits', 'addons'}) do
               self.npcHandler.keywordHandler:addKeyword({word}, OutfitModule.listOutfits, {module = self})
           end
       end
   end

   function OutfitModule:parseKeywords(data)
       local n = 1
       for outfit in string.gmatch(data, '[^;]+') do
           local i, keywords = 1, {}
           for tmp in string.gmatch(outfit, '[^,]+') do
               table.insert(keywords, tmp)
               i = i + 1
           end

           if(i > 0) then
               local ret = NpcSystem.getParameter('outfit' .. n)
               if(ret ~= nil) then
                   self:parseList(keywords, ret)
               else
                   print('[Warning] NpcSystem:', 'Missing \'outfit' .. n .. '\' parameter, skipping...')
               end
           else
               print('[Warning] NpcSystem:', 'No keywords found for outfit set #' .. n .. ', skipping...')
           end

           n = n + 1
       end
   end

   function OutfitModule:parseList(keywords, data)
       local outfit, items = nil, {}
       for list in string.gmatch(data, '[^;]+') do
           local a, b, c, d, e = nil, nil, nil, nil, 1
           for tmp in string.gmatch(list, '[^,]+') do
               if(e == 1) then
                   a = tmp
               elseif(e == 2) then
                   b = tmp
               elseif(e == 3) then
                   c = tmp
               elseif(e == 4) then
                   d = tmp
               else
                   print('[Warning] NpcSystem:', 'Unknown parameter found in outfit list while parsing ' .. (outfit == nil and 'outfit' or 'item') .. '.', tmp, list)
               end

               e = e + 1
           end

           if(outfit == nil) then
               outfit = {tonumber(a), tonumber(b), getBooleanFromString(c), d}
           elseif(a ~= nil) then
               local tmp = tonumber(a)
               if((tmp ~= nil or tostring(a) == "money") and b ~= nil and c ~= nil) then
                   a = tmp or 20000
                   tmp = tonumber(d)
                   if(tmp == nil) then
                       tmp = -1
                   end

                   items[a] = {b, tmp, c}
               else
                   print('[Warning] NpcSystem:', 'Missing parameter(s) for outfit items.', b, c, d)
               end
           else
               print('[Warning] NpcSystem:', 'Missing base parameter for outfit items.', a)
           end
       end

       if(type(outfit) == 'table') then
           local tmp = true
           for i = 1, 2 do
               if(outfit == nil) then
                   tmp = false
                   break
               end
           end

           if(tmp and table.maxn(items) > 0) then
               self:addOutfit(keywords, outfit, items)
           else
               print('[Warning] NpcSystem:', 'Invalid outfit, addon or empty items pool.', data)
           end
       end
   end

   function OutfitModule:addOutfit(keywords, outfit, items)
       table.insert(self.outfits, keywords[1])
       local parameters = {
           outfit = outfit[1],
           addon = outfit[2],
           premium = outfit[3],
           gender = nil,
           items = items,
           module = self
       }

       if(outfit[4] ~= nil) then
           local tmp = string.lower(tostring(outfit[5]))
           if(tmp == 'male' or tmp == '1') then
               parameters.gender = 1
           elseif(tmp == 'female' or tmp == '0') then
               parameters.gender = 0
           end
       end

       for i, name in pairs(keywords) do
           local words = {}
           table.insert(words, name)

           local node = self.npcHandler.keywordHandler:addKeyword(words, OutfitModule.obtain, parameters)
           node:addChildKeywordNode(self.yesNode)
           node:addChildKeywordNode(self.noNode)
       end
   end

   function OutfitModule.obtain(cid, message, keywords, parameters, node)
       local module = parameters.module
       if(not module.npcHandler:isFocused(cid)) then
           return false
       end

       local items = nil
       for k, v in pairs(parameters.items) do
           if(v[1] ~= "storageset") then
               if(items ~= nil) then
                   items = items .. ", "
               else
                   items = ""
               end

               if(tonumber(v[1]) ~= nil and tonumber(v[1]) > 1) then
                   items = items .. v[1] .. " "
               end

               items = items .. v[3]
           end
       end

       module.npcHandler:say('Do you want ' .. keywords[1] .. ' ' .. (addon == 0 and "outfit" or "addon") .. ' for ' .. items .. '?', cid)
       return true

   end

   function OutfitModule.onConfirm(cid, message, keywords, parameters, node)
       local module = parameters.module
       if(not module.npcHandler:isFocused(cid)) then
           return false
       end

       local parent = node:getParent():getParameters()
       if(isPlayerPremiumCallback(cid) or not parent.premium) then
           if(not canPlayerWearOutfitId(cid, parent.outfit, parent.addon)) then
               if(parent.addon == 0 or canPlayerWearOutfitId(cid, parent.outfit)) then
                   if(parent.gender == nil or parent.gender == getPlayerSex(cid)) then
                       local found = true
                       for k, v in pairs(parent.items) do
                           local tmp = tonumber(v[1])
                           if(tmp == nil) then
                               if(v[1] == "storagecheck") then
                                   if(getCreatureStorage(cid, k) < v[2]) then
                                       found = false
                                   end
                               elseif(v[1] == "outfitid") then
                                   if(not canPlayerWearOutfitId(cid, k, v[2])) then
                                       found = false
                                   end
                               elseif(v[1] == "outfit") then
                                   if(not canPlayerWearOutfit(cid, k, v[2])) then
                                       found = false
                                   end
                               else
                                   found = false
                               end
                           elseif(k == 20000) then
                               if(getPlayerMoney(cid) < tmp) then
                                   found = false
                               end
                           elseif(getPlayerItemCount(cid, k, v[2]) < tmp) then
                               found = false
                           end

                           if(not found) then
                               break
                           end
                       end

                       if(found) then
                           for k, v in pairs(parent.items) do
                               if(tonumber(v[1]) ~= nil) then
                                   if(k == 20000) then
                                       doPlayerRemoveMoney(cid, v[1])
                                   else
                                       doPlayerRemoveItem(cid, k, v[1], v[2])
                                   end
                               elseif(v[1] == "storageset") then
                                   doCreatureSetStorage(cid, k, v[2])
                               end
                           end

                           module.npcHandler:say('It was a pleasure to dress you.', cid)
                           OUTFITMODULE_FUNCTION(cid, parent.outfit, parent.addon)
                           doPlayerSetStorageValue(cid, parent.storageId, storage)
                       else
                           module.npcHandler:say('You don\'t have these items!', cid)
                       end
                   else
                       module.npcHandler:say('Sorry, this ' .. (parent.addon == 0 and 'outfit' or 'addon') .. ' is not for your gender.', cid)
                   end
               else
                   module.npcHandler:say('I will not dress you with addon of outfit you cannot wear!', cid)
               end
           else
               module.npcHandler:say('You alrady have this ' .. (parent.addon == 0 and 'outfit' or 'addon') .. '!', cid)
           end
       else
           module.npcHandler:say('Sorry, I dress only premium players.', cid)
       end

       module.npcHandler:resetNpc()
       return true
   end

   -- onDecline keyword callback function. Generally called when the player sais 'no' after wanting to buy an item.
   function OutfitModule.onDecline(cid, message, keywords, parameters, node)
       local module = parameters.module
       if(not module.npcHandler:isFocused(cid)) then
           return false
       end

       module.npcHandler:say(module.npcHandler:parseMessage(module.npcHandler:getMessage(MESSAGE_DECLINE), {[TAG_PLAYERNAME] = getCreatureName(cid)}), cid)
       module.npcHandler:resetNpc()
       return true
   end

   function OutfitModule.listOutfits(cid, message, keywords, parameters, node)
       local module = parameters.module
       if(not module.npcHandler:isFocused(cid)) then
           return false
       end

       local msg = nil
       if(table.maxn(module.outfits) > 0) then
           for _, outfit in ipairs(module.outfits) do
               if(msg ~= nil) then
                   msg = msg .. ", "
               else
                   msg = "I can dress you into "
               end

               msg = msg .. "{" .. outfit .. "}"
           end
       else
           msg = "Sorry, I have nothing to offer right now."
       end

       module.npcHandler:say(msg .. ".", cid)
       module.npcHandler:resetNpc()
       return true
   end

   ShopModule = {
       npcHandler = nil,
       yesNode = nil,
       noNode = nil,
       noText = '',
       maxCount = 100,
       amount = 0
   }

   -- Add it to the parseable module list.
   Modules.parseableModules['module_shop'] = ShopModule

   -- Creates a new instance of ShopModule
   function ShopModule:new()
       local obj = {}
       setmetatable(obj, self)
       self.__index = self
       return obj
   end

   -- Parses all known parameters.
   function ShopModule:parseParameters()
       local ret = NpcSystem.getParameter('shop_buyable')
       if(ret ~= nil) then
           self:parseBuyable(ret)
       end

       local ret = NpcSystem.getParameter('shop_sellable')
       if(ret ~= nil) then
           self:parseSellable(ret)
       end

       local ret = NpcSystem.getParameter('shop_buyable_containers')
       if(ret ~= nil) then
           self:parseBuyableContainers(ret)
       end
   end

   -- Parse a string contaning a set of buyable items.
   function ShopModule:parseBuyable(data)
       for item in string.gmatch(data, '[^;]+') do
           local i = 1

           local name = nil
           local itemid = nil
           local cost = nil
           local subType = nil
           local realName = nil

           for temp in string.gmatch(item, '[^,]+') do
               if(i == 1) then
                   name = temp
               elseif(i == 2) then
                   itemid = tonumber(temp)
               elseif(i == 3) then
                   cost = tonumber(temp)
               elseif(i == 4) then
                   subType = tonumber(temp)
               elseif(i == 5) then
                   realName = temp
               else
                   print('[Warning] NpcSystem:', 'Unknown parameter found in buyable items parameter.', temp, item)
               end
               i = i + 1
           end

           if(SHOPMODULE_MODE == SHOPMODULE_MODE_TRADE) then
               if(itemid ~= nil and cost ~= nil) then
                   if((isItemRune(itemid) or isItemFluidContainer(itemid)) and subType == nil) then
                       print('[Warning] NpcSystem:', 'SubType missing for parameter item:', item)
                   else
                       self:addBuyableItem(nil, itemid, cost, subType, realName)
                   end
               else
                   print('[Warning] NpcSystem:', 'Parameter(s) missing for item:', itemid, cost)
               end
           else
               if(name ~= nil and itemid ~= nil and cost ~= nil) then
                   if((isItemRune(itemid) or isItemFluidContainer(itemid)) and subType == nil) then
                       print('[Warning] NpcSystem:', 'SubType missing for parameter item:', item)
                   else
                       local names = {}
                       table.insert(names, name)
                       self:addBuyableItem(names, itemid, cost, subType, realName)
                   end
               else
                   print('[Warning] NpcSystem:', 'Parameter(s) missing for item:', name, itemid, cost)
               end
           end
       end
   end

   -- Parse a string contaning a set of sellable items.
   function ShopModule:parseSellable(data)
       for item in string.gmatch(data, '[^;]+') do
           local i = 1

           local name = nil
           local itemid = nil
           local cost = nil
           local realName = nil

           for temp in string.gmatch(item, '[^,]+') do
               if(i == 1) then
                   name = temp
               elseif(i == 2) then
                   itemid = tonumber(temp)
               elseif(i == 3) then
                   cost = tonumber(temp)
               elseif(i == 4) then
                   realName = temp
               else
                   print('[Warning] NpcSystem:', 'Unknown parameter found in sellable items parameter.', temp, item)
               end
               i = i + 1
           end

           if(SHOPMODULE_MODE == SHOPMODULE_MODE_TRADE) then
               if(itemid ~= nil and cost ~= nil) then
                   self:addSellableItem(nil, itemid, cost, realName)
               else
                   print('[Warning] NpcSystem:', 'Parameter(s) missing for item:', itemid, cost)
               end
           else
               if(name ~= nil and itemid ~= nil and cost ~= nil) then
                   local names = {}
                   table.insert(names, name)
                   self:addSellableItem(names, itemid, cost, realName)
               else
                   print('[Warning] NpcSystem:', 'Parameter(s) missing for item:', name, itemid, cost)
               end
           end
       end
   end

   -- Parse a string contaning a set of buyable items.
   function ShopModule:parseBuyableContainers(data)
       for item in string.gmatch(data, '[^;]+') do
           local i = 1

           local name = nil
           local container = nil
           local itemid = nil
           local cost = nil
           local subType = nil
           local realName = nil

           for temp in string.gmatch(item, '[^,]+') do
               if(i == 1) then
                   name = temp
               elseif(i == 2) then
                   itemid = tonumber(temp)
               elseif(i == 3) then
                   itemid = tonumber(temp)
               elseif(i == 4) then
                   cost = tonumber(temp)
               elseif(i == 5) then
                   subType = tonumber(temp)
               elseif(i == 6) then
                   realName = temp
               else
                   print('[Warning] NpcSystem:', 'Unknown parameter found in buyable items parameter.', temp, item)
               end
               i = i + 1
           end

           if(name ~= nil and container ~= nil and itemid ~= nil and cost ~= nil) then
               if((isItemRune(itemid) or isItemFluidContainer(itemid)) and subType == nil) then
                   print('[Warning] NpcSystem:', 'SubType missing for parameter item:', item)
               else
                   local names = {}
                   table.insert(names, name)
                   self:addBuyableItemContainer(names, container, itemid, cost, subType, realName)
               end
           else
               print('[Warning] NpcSystem:', 'Parameter(s) missing for item:', name, container, itemid, cost)
           end
       end
   end

   -- Initializes the module and associates handler to it.
   function ShopModule:init(handler)
       self.npcHandler = handler
       self.yesNode = KeywordNode:new(SHOP_YESWORD, ShopModule.onConfirm, {module = self})
       self.noNode = KeywordNode:new(SHOP_NOWORD, ShopModule.onDecline, {module = self})

       self.noText = handler:getMessage(MESSAGE_DECLINE)
       if(SHOPMODULE_MODE ~= SHOPMODULE_MODE_TALK) then
           for i, word in pairs(SHOP_TRADEREQUEST) do
               local obj = {}
               table.insert(obj, word)

               obj.callback = SHOP_TRADEREQUEST.callback or ShopModule.messageMatcher
               handler.keywordHandler:addKeyword(obj, ShopModule.requestTrade, {module = self})
           end
       end
   end

   -- Custom message matching callback function for requesting trade messages.
   function ShopModule.messageMatcher(keywords, message)
       for i, word in pairs(keywords) do
           if(type(word) == 'string') then
               if string.find(message, word) and not string.find(message, '[%w+]' .. word) and not string.find(message, word .. '[%w+]') then
                   return true
               end
           end
       end

       return false
   end

   -- Resets the module-specific variables.
   function ShopModule:reset()
       self.amount = 0
   end

   -- Function used to match a number value from a string.
   function ShopModule:getCount(message)
       local ret = 1
       local b, e = string.find(message, PATTERN_COUNT)
       if b ~= nil and e ~= nil then
           ret = tonumber(string.sub(message, b, e))
       end

       if(ret <= 0) then
           ret = 1
       elseif(ret > self.maxCount) then
           ret = self.maxCount
       end

       return ret
   end

   -- Adds a new buyable item.
   --   names = A table containing one or more strings of alternative names to this item. Used only for old buy/sell system.
   --   itemid = The itemid of the buyable item
   --   cost = The price of one single item
   --   subType - The subType of each rune or fluidcontainer item. Can be left out if it is not a rune/fluidcontainer. Default value is 1.
   --   realName - The real, full name for the item. Will be used as ITEMNAME in MESSAGE_ONBUY and MESSAGE_ONSELL if defined. Default value is nil (getItemNameById will be used)
   function ShopModule:addBuyableItem(names, itemid, cost, subType, realName)
       if(SHOPMODULE_MODE ~= SHOPMODULE_MODE_TALK) then
           if(self.npcHandler.shopItems[itemid] == nil) then
               self.npcHandler.shopItems[itemid] = {buyPrice = -1, sellPrice = -1, subType = 1, realName = ""}
           end

           self.npcHandler.shopItems[itemid].buyPrice = cost
           self.npcHandler.shopItems[itemid].realName = realName or getItemNameById(itemid)
           self.npcHandler.shopItems[itemid].subType = subType or 1
       end

       if(names ~= nil and SHOPMODULE_MODE ~= SHOPMODULE_MODE_TRADE) then
           local parameters = {
               itemid = itemid,
               cost = cost,
               eventType = SHOPMODULE_BUY_ITEM,
               module = self,
               realName = realName or getItemNameById(itemid),
               subType = subType or 1
           }

           for i, name in pairs(names) do
               local keywords = {}
               table.insert(keywords, 'buy')
               table.insert(keywords, name)

               local node = self.npcHandler.keywordHandler:addKeyword(keywords, ShopModule.tradeItem, parameters)
               node:addChildKeywordNode(self.yesNode)
               node:addChildKeywordNode(self.noNode)
           end
       end
   end

   -- Adds a new buyable container of items.
   --   names = A table containing one or more strings of alternative names to this item.
   --   container = Backpack, bag or any other itemid of container where bought items will be stored
   --   itemid = The itemid of the buyable item
   --   cost = The price of one single item
   --   subType - The subType of each rune or fluidcontainer item. Can be left out if it is not a rune/fluidcontainer. Default value is 1.
   --   realName - The real, full name for the item. Will be used as ITEMNAME in MESSAGE_ONBUY and MESSAGE_ONSELL if defined. Default value is nil (getItemNameById will be used)
   function ShopModule:addBuyableItemContainer(names, container, itemid, cost, subType, realName)
       if(names ~= nil) then
           local parameters = {
               container = container,
               itemid = itemid,
               cost = cost,
               eventType = SHOPMODULE_BUY_ITEM_CONTAINER,
               module = self,
               realName = realName or getItemNameById(itemid),
               subType = subType or 1
           }

           for i, name in pairs(names) do
               local keywords = {}
               table.insert(keywords, 'buy')
               table.insert(keywords, name)

               local node = self.npcHandler.keywordHandler:addKeyword(keywords, ShopModule.tradeItem, parameters)
               node:addChildKeywordNode(self.yesNode)
               node:addChildKeywordNode(self.noNode)
           end
       end
   end

   -- Adds a new sellable item.
   --   names = A table containing one or more strings of alternative names to this item. Used only by old buy/sell system.
   --   itemid = The itemid of the sellable item
   --   cost = The price of one single item
   --   realName - The real, full name for the item. Will be used as ITEMNAME in MESSAGE_ONBUY and MESSAGE_ONSELL if defined. Default value is nil (getItemNameById will be used)
   function ShopModule:addSellableItem(names, itemid, cost, realName)
       if(SHOPMODULE_MODE ~= SHOPMODULE_MODE_TALK) then
           if(self.npcHandler.shopItems[itemid] == nil) then
               self.npcHandler.shopItems[itemid] = {buyPrice = -1, sellPrice = -1, subType = 1, realName = ""}
           end

           self.npcHandler.shopItems[itemid].sellPrice = cost
           self.npcHandler.shopItems[itemid].realName = realName or getItemNameById(itemid)
       end

       if(names ~= nil and SHOPMODULE_MODE ~= SHOPMODULE_MODE_TRADE) then
           local parameters = {
               itemid = itemid,
               cost = cost,
               eventType = SHOPMODULE_SELL_ITEM,
               module = self,
               realName = realName or getItemNameById(itemid)
           }

           for i, name in pairs(names) do
               local keywords = {}
               table.insert(keywords, 'sell')
               table.insert(keywords, name)

               local node = self.npcHandler.keywordHandler:addKeyword(keywords, ShopModule.tradeItem, parameters)
               node:addChildKeywordNode(self.yesNode)
               node:addChildKeywordNode(self.noNode)
           end
       end
   end

   -- onModuleReset callback function. Calls ShopModule:reset()
   function ShopModule:callbackOnModuleReset()
       self:reset()
       return true
   end

   -- Callback onBuy() function. If you wish, you can change certain Npc to use your onBuy().
   function ShopModule:callbackOnBuy(cid, itemid, subType, amount, ignoreCap, inBackpacks)
       if(self.npcHandler.shopItems[itemid] == nil) then
           error("[ShopModule.onBuy]", "items[itemid] == nil")
           return false
       end

       if(self.npcHandler.shopItems[itemid].buyPrice == -1) then
           error("[ShopModule.onSell]", "Attempt to buy a non-buyable item")
           return false
       end

       local backpack = 1988
       local totalCost = amount * self.npcHandler.shopItems[itemid].buyPrice
       if(inBackpacks) then
           totalCost = totalCost + (math.max(1, math.floor(amount / getContainerCapById(backpack))) * 20)
       end

       local parseInfo = {
           [TAG_PLAYERNAME] = getPlayerName(cid),
           [TAG_ITEMCOUNT] = amount,
           [TAG_TOTALCOST] = totalCost,
           [TAG_ITEMNAME] = self.npcHandler.shopItems[itemid].realName
       }

       if(getPlayerMoney(cid) < totalCost) then
           local msg = self.npcHandler:getMessage(MESSAGE_NEEDMONEY)
           msg = self.npcHandler:parseMessage(msg, parseInfo)
           doPlayerSendCancel(cid, msg)
           return false
       end

       local subType = self.npcHandler.shopItems[itemid].subType or 1
       local a, b = doNpcSellItem(cid, itemid, amount, subType, ignoreCap, inBackpacks, backpack)
       if(a < amount) then
           local msgId = MESSAGE_NEEDMORESPACE
           if(a == 0) then
               msgId = MESSAGE_NEEDSPACE
           end

           local msg = self.npcHandler:getMessage(msgId)
           parseInfo[TAG_ITEMCOUNT] = a
           msg = self.npcHandler:parseMessage(msg, parseInfo)
           doPlayerSendCancel(cid, msg)
           if(NPCHANDLER_CONVBEHAVIOR ~= CONVERSATION_DEFAULT) then
               self.npcHandler.talkStart[cid] = os.time()
           else
               self.npcHandler.talkStart = os.time()
           end

           if(a > 0) then
               doPlayerRemoveMoney(cid, ((a * self.npcHandler.shopItems[itemid].buyPrice) + (b * 20)))
               return true
           end

           return false
       else
           local msg = self.npcHandler:getMessage(MESSAGE_BOUGHT)
           msg = self.npcHandler:parseMessage(msg, parseInfo)
           doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, msg)
           doPlayerRemoveMoney(cid, totalCost)
           if(NPCHANDLER_CONVBEHAVIOR ~= CONVERSATION_DEFAULT) then
               self.npcHandler.talkStart[cid] = os.time()
           else
               self.npcHandler.talkStart = os.time()
           end

           return true
       end
   end

   -- Callback onSell() function. If you wish, you can change certain Npc to use your onSell().
   function ShopModule:callbackOnSell(cid, itemid, subType, amount, ignoreCap, inBackpacks)
       if(self.npcHandler.shopItems[itemid] == nil) then
           error("[ShopModule.onSell]", "items[itemid] == nil")
           return false
       end

       if(self.npcHandler.shopItems[itemid].sellPrice == -1) then
           error("[ShopModule.onSell]", "Attempt to sell a non-sellable item")
           return false
       end

       local parseInfo = {
           [TAG_PLAYERNAME] = getPlayerName(cid),
           [TAG_ITEMCOUNT] = amount,
           [TAG_TOTALCOST] = amount * self.npcHandler.shopItems[itemid].sellPrice,
           [TAG_ITEMNAME] = self.npcHandler.shopItems[itemid].realName
       }

       if(subType < 1 or getItemInfo(itemid).stackable) then
           subType = -1
       end

       if(doPlayerRemoveItem(cid, itemid, amount, subType)) then
           local msg = self.npcHandler:getMessage(MESSAGE_SOLD)
           msg = self.npcHandler:parseMessage(msg, parseInfo)
           doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, msg)
           doPlayerAddMoney(cid, amount * self.npcHandler.shopItems[itemid].sellPrice)
           if(NPCHANDLER_CONVBEHAVIOR ~= CONVERSATION_DEFAULT) then
               self.npcHandler.talkStart[cid] = os.time()
           else
               self.npcHandler.talkStart = os.time()
           end
           return true
       else
           local msg = self.npcHandler:getMessage(MESSAGE_NEEDITEM)
           msg = self.npcHandler:parseMessage(msg, parseInfo)
           doPlayerSendCancel(cid, msg)
           if(NPCHANDLER_CONVBEHAVIOR ~= CONVERSATION_DEFAULT) then
               self.npcHandler.talkStart[cid] = os.time()
           else
               self.npcHandler.talkStart = os.time()
           end
           return false
       end
   end

   -- Callback for requesting a trade window with the NPC.
   function ShopModule.requestTrade(cid, message, keywords, parameters, node)
       local module = parameters.module
       if(not module.npcHandler:isFocused(cid)) then
           return false
       end

       local itemWindow = {}
       for itemid, attr in pairs(module.npcHandler.shopItems) do
           local item = {id = itemid, buy = attr.buyPrice, sell = attr.sellPrice, subType = attr.subType, name = attr.realName}
           table.insert(itemWindow, item)
       end

       if(itemWindow[1] == nil) then
           local parseInfo = { [TAG_PLAYERNAME] = getPlayerName(cid) }
           local msg = module.npcHandler:parseMessage(module.npcHandler:getMessage(MESSAGE_NOSHOP), parseInfo)
           module.npcHandler:say(msg, cid)
           return true
       end

       local parseInfo = { [TAG_PLAYERNAME] = getPlayerName(cid) }
       local msg = module.npcHandler:parseMessage(module.npcHandler:getMessage(MESSAGE_SENDTRADE), parseInfo)
       openShopWindow(cid, itemWindow,
           function(cid, itemid, subType, amount, ignoreCap, inBackpacks) module.npcHandler:onBuy(cid, itemid, subType, amount, ignoreCap, inBackpacks) end,
           function(cid, itemid, subType, amount, ignoreCap, inBackpacks) module.npcHandler:onSell(cid, itemid, subType, amount, ignoreCap, inBackpacks) end)
       module.npcHandler:say(msg, cid)
       return true
   end

   -- onConfirm keyword callback function. Sells/buys the actual item.
   function ShopModule.onConfirm(cid, message, keywords, parameters, node)
       local module = parameters.module
       if(not module.npcHandler:isFocused(cid)) then
           return false
       end

       local parentParameters = node:getParent():getParameters()
       local parseInfo = {
           [TAG_PLAYERNAME] = getPlayerName(cid),
           [TAG_ITEMCOUNT] = module.amount,
           [TAG_TOTALCOST] = parentParameters.cost * module.amount,
           [TAG_ITEMNAME] = parentParameters.realName
       }

       if(parentParameters.eventType == SHOPMODULE_SELL_ITEM) then
           local ret = doPlayerSellItem(cid, parentParameters.itemid, module.amount, parentParameters.cost * module.amount)
           if(ret) then
               local msg = module.npcHandler:getMessage(MESSAGE_ONSELL)
               msg = module.npcHandler:parseMessage(msg, parseInfo)
               module.npcHandler:say(msg, cid)
           else
               local msg = module.npcHandler:getMessage(MESSAGE_MISSINGITEM)
               msg = module.npcHandler:parseMessage(msg, parseInfo)
               module.npcHandler:say(msg, cid)
           end
       elseif(parentParameters.eventType == SHOPMODULE_BUY_ITEM) then
           local ret = doPlayerBuyItem(cid, parentParameters.itemid, module.amount, parentParameters.cost * module.amount, parentParameters.subType)
           if(ret) then
               if parentParameters.itemid == ITEM_PARCEL then
                   doPlayerBuyItem(cid, ITEM_LABEL, module.amount, 0, parentParameters.subType)
               end
               local msg = module.npcHandler:getMessage(MESSAGE_ONBUY)
               msg = module.npcHandler:parseMessage(msg, parseInfo)
               module.npcHandler:say(msg, cid)
           else
               local msg = module.npcHandler:getMessage(MESSAGE_MISSINGMONEY)
               msg = module.npcHandler:parseMessage(msg, parseInfo)
               module.npcHandler:say(msg, cid)
           end
       elseif(parentParameters.eventType == SHOPMODULE_BUY_ITEM_CONTAINER) then
           local ret = doPlayerBuyItemContainer(cid, parentParameters.container, parentParameters.itemid, module.amount, parentParameters.cost * module.amount, parentParameters.subType)
           if(ret) then
               local msg = module.npcHandler:getMessage(MESSAGE_ONBUY)
               msg = module.npcHandler:parseMessage(msg, parseInfo)
               module.npcHandler:say(msg, cid)
           else
               local msg = module.npcHandler:getMessage(MESSAGE_MISSINGMONEY)
               msg = module.npcHandler:parseMessage(msg, parseInfo)
               module.npcHandler:say(msg, cid)
           end
       end

       module.npcHandler:resetNpc()
       return true
   end

   -- onDecliune keyword callback function. Generally called when the player sais 'no' after wanting to buy an item.
   function ShopModule.onDecline(cid, message, keywords, parameters, node)
       local module = parameters.module
       if(not module.npcHandler:isFocused(cid)) then
           return false
       end

       local parentParameters = node:getParent():getParameters()
       local parseInfo = {
           [TAG_PLAYERNAME] = getPlayerName(cid),
           [TAG_ITEMCOUNT] = module.amount,
           [TAG_TOTALCOST] = parentParameters.cost * module.amount,
           [TAG_ITEMNAME] = parentParameters.realName
       }

       local msg = module.npcHandler:parseMessage(module.noText, parseInfo)
       module.npcHandler:say(msg, cid)
       module.npcHandler:resetNpc()
       return true
   end

   -- tradeItem callback function. Makes the npc say the message defined by MESSAGE_BUY or MESSAGE_SELL
   function ShopModule.tradeItem(cid, message, keywords, parameters, node)
       local module = parameters.module
       if(not module.npcHandler:isFocused(cid)) then
           return false
       end

       local count = module:getCount(message)
       module.amount = count
       local parseInfo = {
           [TAG_PLAYERNAME] = getPlayerName(cid),
           [TAG_ITEMCOUNT] = module.amount,
           [TAG_TOTALCOST] = parameters.cost * module.amount,
           [TAG_ITEMNAME] = parameters.realName
       }

       if(parameters.eventType == SHOPMODULE_SELL_ITEM) then
           local msg = module.npcHandler:getMessage(MESSAGE_SELL)
           msg = module.npcHandler:parseMessage(msg, parseInfo)
           module.npcHandler:say(msg, cid)
       elseif(parameters.eventType == SHOPMODULE_BUY_ITEM) then
           local msg = module.npcHandler:getMessage(MESSAGE_BUY)
           msg = module.npcHandler:parseMessage(msg, parseInfo)
           module.npcHandler:say(msg, cid)
       elseif(parameters.eventType == SHOPMODULE_BUY_ITEM_CONTAINER) then
           local msg = module.npcHandler:getMessage(MESSAGE_BUY)
           msg = module.npcHandler:parseMessage(msg, parseInfo)
           module.npcHandler:say(msg, cid)
       end

       return true
   end
end

de nada :D

Editado Fevereiro 2, 2017 por r0bert0lol (veja o histórico de edições)

jhosefra7 · Fevereiro 2, 2017

@r0bert0lol Que isso mano namora Cmg, ficou top muito obrigado !!!!

r0bert0lol · Fevereiro 2, 2017

1 minuto atrás, jhosefra7 disse:

@r0bert0lol Que isso mano namora Cmg, ficou top muito obrigado !!!!

kkkk nada :D

xWhiteWolf · Fevereiro 2, 2017

56 minutos atrás, r0bert0lol disse:

Esse bug chat eu descobri como corrigir, o problema é que alguns servidores para download aqui vem com o modules do shop todo bugado, fiquei um tempao para corrigir esse bug no meu servidor, encontrei um modules em um forum gringo hoje e testei e com ele funcionou tudo certinho...

O bug não é por causa de atributos errados nos items, realmente o seu modules não le items stackable.

É exatamente o que eu ia falar, se não era problema nas libs do npc system. Obrigado por ter ajudado :D

KotZletY · Fevereiro 2, 2017

@xWhiteWolf Tive um erro nas libs dos npc, quando eu migrei do 0.3.6 para o 0.4, erro diferente, nunca passou pela minha cabeça que essa poderia ser a causa!!

@r0bert0lol parabéns cara! xD

Marquei como melhor resposta, deixando fácil achar a solução caso outros membros do fórum tenham o mesmo problema!

.Foxxy · Abril 13, 2017

Bom dia, tive esse erro quando fiz a substituição:

Doria Louro · Setembro 23, 2023

Em 02/02/2017 em 16:02, r0bert0lol disse:

Esse bug chat eu descobri como corrigir, o problema é que alguns servidores para download aqui vem com o modules do shop todo bugado, fiquei um tempao para corrigir esse bug no meu servidor, encontrei um modules em um forum gringo hoje e testei e com ele funcionou tudo certinho...

O bug não é por causa de atributos errados nos items, realmente o seu modules não le items stackable.

Para corrigir esse bug, acesse data/npc/lib/npcsystem/ e substitua seu arquivo modules.lua por este aqui.

Mostrar conteúdo oculto

-- Advanced NPC System (Created by Jiddo),
-- Modified by Talaturen.
-- Modified by Elf.
-- Edited by Limos.

if(Modules == nil) then
   -- Constants used to separate buying from selling.
   SHOPMODULE_SELL_ITEM = 1
   SHOPMODULE_BUY_ITEM = 2
   SHOPMODULE_BUY_ITEM_CONTAINER = 3

   -- Constants used for shop mode. Notice: addBuyableItemContainer is working on all modes
   SHOPMODULE_MODE_TALK = 1 -- Old system used before Tibia 8.2: sell/buy item name
   SHOPMODULE_MODE_TRADE = 2 -- Trade window system introduced in Tibia 8.2
   SHOPMODULE_MODE_BOTH = 3 -- Both working at one time

   -- Used in shop mode
   SHOPMODULE_MODE = SHOPMODULE_MODE_BOTH

   -- Constants used for outfit giving mode
   OUTFITMODULE_FUNCTION_OLD = doPlayerAddOutfit -- Gives outfit through look type
   OUTFITMODULE_FUNCTION_NEW = doPlayerAddOutfitId -- Gives outfit through outfit id

   -- Used in outfit module
   OUTFITMODULE_FUNCTION = OUTFITMODULE_FUNCTION_NEW
   if(OUTFITMODULE_FUNCTION == nil) then
       OUTFITMODULE_FUNCTION = OUTFITMODULE_FUNCTION_OLD
   end

   Modules = {
       parseableModules = {}
   }

   StdModule = {}

   -- These callback function must be called with parameters.npcHandler = npcHandler in the parameters table or they will not work correctly.
   -- Notice: The members of StdModule have not yet been tested. If you find any bugs, please report them to me.
   -- Usage:
       -- keywordHandler:addKeyword({'offer'}, StdModule.say, {npcHandler = npcHandler, text = 'I sell many powerful melee weapons.'})
   function StdModule.say(cid, message, keywords, parameters, node)
       local npcHandler = parameters.npcHandler
       if(npcHandler == nil) then
           error('StdModule.say called without any npcHandler instance.')
       end

       local onlyFocus = (parameters.onlyFocus == nil or parameters.onlyFocus == true)
       if(not npcHandler:isFocused(cid) and onlyFocus) then
           return false
       end

       local parseInfo = {[TAG_PLAYERNAME] = getCreatureName(cid)}
       npcHandler:say(npcHandler:parseMessage(parameters.text or parameters.message, parseInfo), cid, parameters.publicize and true)
       if(parameters.reset == true) then
           npcHandler:resetNpc()
       elseif(parameters.moveup ~= nil and type(parameters.moveup) == 'number') then
           npcHandler.keywordHandler:moveUp(parameters.moveup)
       end

       return true
   end

   --Usage:
       -- local node1 = keywordHandler:addKeyword({'promot'}, StdModule.say, {npcHandler = npcHandler, text = 'I can promote you for 20000 brozne coins. Do you want me to promote you?'})
       --        node1:addChildKeyword({'yes'}, StdModule.promotePlayer, {npcHandler = npcHandler, cost = 20000, promotion = 1, level = 20}, text = 'Congratulations! You are now promoted.')
       --        node1:addChildKeyword({'no'}, StdModule.say, {npcHandler = npcHandler, text = 'Alright then, come back when you are ready.'}, reset = true)
   function StdModule.promotePlayer(cid, message, keywords, parameters, node)
       local npcHandler = parameters.npcHandler
       if(npcHandler == nil) then
           error('StdModule.promotePlayer called without any npcHandler instance.')
       end

       if(not npcHandler:isFocused(cid)) then
           return false
       end

       if(isPlayerPremiumCallback(cid) or not getBooleanFromString(getConfigValue('premiumForPromotion')) or not(parameters.premium)) then
           if(getPlayerPromotionLevel(cid) >= parameters.promotion) then
               npcHandler:say('You are already promoted!', cid)
           elseif(getPlayerLevel(cid) < parameters.level) then
               npcHandler:say('I am sorry, but I can only promote you once you have reached level ' .. parameters.level .. '.', cid)
           elseif(not doPlayerRemoveMoney(cid, parameters.cost)) then
               npcHandler:say('You do not have enough money!', cid)
           else
               setPlayerPromotionLevel(cid, parameters.promotion)
               npcHandler:say(parameters.text, cid)
           end
       else
           npcHandler:say("You need a premium account in order to get promoted.", cid)
       end

       npcHandler:resetNpc()
       return true
   end

   function StdModule.learnSpell(cid, message, keywords, parameters, node)
       local npcHandler = parameters.npcHandler
       if(npcHandler == nil) then
           error('StdModule.learnSpell called without any npcHandler instance.')
       end

       if(not npcHandler:isFocused(cid)) then
           return false
       end

       if(isPlayerPremiumCallback(cid) or not(parameters.premium)) then
           if(getPlayerLearnedInstantSpell(cid, parameters.spellName)) then
               npcHandler:say('You already know this spell.', cid)
           elseif(getPlayerLevel(cid) < parameters.level) then
               npcHandler:say('You need to obtain a level of ' .. parameters.level .. ' or higher to be able to learn ' .. parameters.spellName .. '.', cid)
           elseif(getPlayerVocation(cid) ~= parameters.vocation and getPlayerVocation(cid) ~= parameters.vocation + 4 and vocation ~= 9) then
               npcHandler:say('This spell is not for your vocation', cid)
           elseif(not doPlayerRemoveMoney(cid, parameters.price)) then
               npcHandler:say('You do not have enough money, this spell costs ' .. parameters.price .. ' gold coins.', cid)
           else
               npcHandler:say('You have learned ' .. parameters.spellName .. '.', cid)
               playerLearnInstantSpell(cid, parameters.spellName)
           end
       else
           npcHandler:say('You need a premium account in order to buy ' .. parameters.spellName .. '.', cid)
       end

       npcHandler:resetNpc()
       return true
   end

   function StdModule.bless(cid, message, keywords, parameters, node)
       local npcHandler = parameters.npcHandler
       if(npcHandler == nil) then
           error('StdModule.bless called without any npcHandler instance.')
       end

       if(not npcHandler:isFocused(cid)) then
           return false
       end

       if(isPlayerPremiumCallback(cid) or not getBooleanFromString(getConfigValue('blessingsOnlyPremium')) or not parameters.premium) then
           local price = parameters.baseCost
           if(getPlayerLevel(cid) > parameters.startLevel) then
               price = (price + ((math.min(parameters.endLevel, getPlayerLevel(cid)) - parameters.startLevel) * parameters.levelCost))
           end

           if(getPlayerBlessing(cid, parameters.number)) then
               npcHandler:say("Gods have already blessed you with this blessing!", cid)
           elseif(not doPlayerRemoveMoney(cid, price)) then
               npcHandler:say("You don't have enough money for blessing.", cid)
           else
               npcHandler:say("You have been blessed by one of the five gods!", cid)
               doPlayerAddBlessing(cid, parameters.number)
           end
       else
           npcHandler:say('You need a premium account in order to be blessed.', cid)
       end

       npcHandler:resetNpc()
       return true
   end

   function StdModule.travel(cid, message, keywords, parameters, node)
       local npcHandler = parameters.npcHandler
       if(npcHandler == nil) then
           error('StdModule.travel called without any npcHandler instance.')
       end

       if(not npcHandler:isFocused(cid)) then
           return false
       end

       local storage, pzLocked = parameters.storageValue or (EMPTY_STORAGE + 1), parameters.allowLocked or false
       if(parameters.premium and not isPlayerPremiumCallback(cid)) then
           npcHandler:say('I can only allow premium players to travel with me.', cid)
       elseif(parameters.level ~= nil and getPlayerLevel(cid) < parameters.level) then
           npcHandler:say('You must reach level ' .. parameters.level .. ' before I can let you go there.', cid)
       elseif(parameters.storageId ~= nil and getPlayerStorageValue(cid, parameters.storageId) < storage) then
           npcHandler:say(parameters.storageInfo or 'You may not travel there!', cid)
       elseif(not pzLocked and isPlayerPzLocked(cid)) then
           npcHandler:say('Get out of there with this blood!', cid)
       elseif(not doPlayerRemoveMoney(cid, parameters.cost)) then
           npcHandler:say('You do not have enough money.', cid)
       else
           npcHandler:say('It was a pleasure doing business with you.', cid)
           npcHandler:releaseFocus(cid)

           doTeleportThing(cid, parameters.destination, false)
           doSendMagicEffect(parameters.destination, CONST_ME_TELEPORT)
       end

       npcHandler:resetNpc()
       return true
   end

   FocusModule = {
       npcHandler = nil
   }

   -- Creates a new instance of FocusModule without an associated NpcHandler.
   function FocusModule:new()
       local obj = {}
       setmetatable(obj, self)
       self.__index = self
       return obj
   end

   -- Inits the module and associates handler to it.
   function FocusModule:init(handler)
       self.npcHandler = handler
       for i, word in pairs(FOCUS_GREETWORDS) do
           local obj = {}
           table.insert(obj, word)
           obj.callback = FOCUS_GREETWORDS.callback or FocusModule.messageMatcher
           handler.keywordHandler:addKeyword(obj, FocusModule.onGreet, {module = self})
       end

       for i, word in pairs(FOCUS_FAREWELLWORDS) do
           local obj = {}
           table.insert(obj, word)
           obj.callback = FOCUS_FAREWELLWORDS.callback or FocusModule.messageMatcher
           handler.keywordHandler:addKeyword(obj, FocusModule.onFarewell, {module = self})
       end
   end

   -- Greeting callback function.
   function FocusModule.onGreet(cid, message, keywords, parameters)
       parameters.module.npcHandler:onGreet(cid)
       return true
   end

   -- UnGreeting callback function.
   function FocusModule.onFarewell(cid, message, keywords, parameters)
       if(not parameters.module.npcHandler:isFocused(cid)) then
           return false
       end

       parameters.module.npcHandler:onFarewell(cid)
       return true
   end

   -- Custom message matching callback function for greeting messages.
   function FocusModule.messageMatcher(keywords, message)
       local spectators = getSpectators(getCreaturePosition(getNpcId()), 7, 7)
       for i, word in pairs(keywords) do
           if(type(word) == 'string') then
               if(string.find(message, word) and not string.find(message, '[%w+]' .. word) and not string.find(message, word .. '[%w+]')) then
                   if(string.find(message, getCreatureName(getNpcId()))) then
                       return true
                   end

                   for i, uid in ipairs(spectators) do
                       if(string.find(message, getCreatureName(uid))) then
                           return false
                       end
                   end

                   return true
               end
           end
       end

       return false
   end

   KeywordModule = {
       npcHandler = nil
   }
   -- Add it to the parseable module list.
   Modules.parseableModules['module_keywords'] = KeywordModule

   function KeywordModule:new()
       local obj = {}
       setmetatable(obj, self)
       self.__index = self
       return obj
   end

   function KeywordModule:init(handler)
       self.npcHandler = handler
   end

   -- Parses all known parameters.
   function KeywordModule:parseParameters()
       local ret = NpcSystem.getParameter('keywords')
       if(ret ~= nil) then
           self:parseKeywords(ret)
       end
   end

   function KeywordModule:parseKeywords(data)
       local n = 1
       for keys in string.gmatch(data, '[^;]+') do
           local i = 1

           local keywords = {}
           for temp in string.gmatch(keys, '[^,]+') do
               table.insert(keywords, temp)
               i = i + 1
           end

           if(i ~= 1) then
               local reply = NpcSystem.getParameter('keyword_reply' .. n)
               if(reply ~= nil) then
                   self:addKeyword(keywords, reply)
               else
                   print('[Warning] NpcSystem:', 'Parameter \'' .. 'keyword_reply' .. n .. '\' missing. Skipping...')
               end
           else
               print('[Warning] NpcSystem:', 'No keywords found for keyword set #' .. n .. '. Skipping...')
           end

           n = n + 1
       end
   end

   function KeywordModule:addKeyword(keywords, reply)
       self.npcHandler.keywordHandler:addKeyword(keywords, StdModule.say, {npcHandler = self.npcHandler, onlyFocus = true, text = reply, reset = true})
   end

   TravelModule = {
       npcHandler = nil,
       destinations = nil,
       yesNode = nil,
       noNode = nil,
   }
   -- Add it to the parseable module list.
   Modules.parseableModules['module_travel'] = TravelModule

   function TravelModule:new()
       local obj = {}
       setmetatable(obj, self)
       self.__index = self
       return obj
   end

   function TravelModule:init(handler)
       self.npcHandler = handler
       self.yesNode = KeywordNode:new(SHOP_YESWORD, TravelModule.onConfirm, {module = self})
       self.noNode = KeywordNode:new(SHOP_NOWORD, TravelModule.onDecline, {module = self})

       self.destinations = {}
   end

   -- Parses all known parameters.
   function TravelModule:parseParameters()
       local ret = NpcSystem.getParameter('travel_destinations')
       if(ret ~= nil) then
           self:parseDestinations(ret)
           for _, word in ipairs({'destination', 'list', 'where', 'travel'}) do
               self.npcHandler.keywordHandler:addKeyword({word}, TravelModule.listDestinations, {module = self})
           end
       end
   end

   function TravelModule:parseDestinations(data)
       for destination in string.gmatch(data, '[^;]+') do
           local i, name, pos, cost, premium, level, storage = 1, nil, {x = nil, y = nil, z = nil}, nil, false
           for tmp in string.gmatch(destination, '[^,]+') do
               if(i == 1) then
                   name = tmp
               elseif(i == 2) then
                   pos.x = tonumber(tmp)
               elseif(i == 3) then
                   pos.y = tonumber(tmp)
               elseif(i == 4) then
                   pos.z = tonumber(tmp)
               elseif(i == 5) then
                   cost = tonumber(tmp)
               elseif(i == 6) then
                   premium = getBooleanFromString(tmp)
               else
                   print('[Warning] NpcSystem:', 'Unknown parameter found in travel destination parameter.', tmp, destination)
               end

               i = i + 1
           end

           if(name ~= nil and pos.x ~= nil and pos.y ~= nil and pos.z ~= nil and cost ~= nil) then
               self:addDestination(name, pos, cost, premium)
           else
               print('[Warning] NpcSystem:', 'Parameter(s) missing for travel destination:', name, pos, cost, premium)
           end
       end
   end

   function TravelModule:addDestination(name, position, price, premium)
       table.insert(self.destinations, name)
       local parameters = {
           cost = price,
           destination = position,
           premium = premium,
           module = self
       }

       local keywords, bringwords = {}, {}
       table.insert(keywords, name)

       table.insert(bringwords, 'bring me to ' .. name)
       self.npcHandler.keywordHandler:addKeyword(bringwords, TravelModule.bring, parameters)

       local node = self.npcHandler.keywordHandler:addKeyword(keywords, TravelModule.travel, parameters)
       node:addChildKeywordNode(self.yesNode)
       node:addChildKeywordNode(self.noNode)
   end

   function TravelModule.travel(cid, message, keywords, parameters, node)
       local module = parameters.module
       if(not module.npcHandler:isFocused(cid)) then
           return false
       end

       module.npcHandler:say('Do you want to travel to ' .. keywords[1] .. ' for ' .. parameters.cost .. ' gold coins?', cid)
       return true
   end

   function TravelModule.onConfirm(cid, message, keywords, parameters, node)
       local module = parameters.module
       if(not module.npcHandler:isFocused(cid)) then
           return false
       end

       local parent = node:getParent():getParameters()
       if(isPlayerPremiumCallback(cid) or not parent.premium) then
           if(not isPlayerPzLocked(cid)) then
               if(doPlayerRemoveMoney(cid, parent.cost)) then
                   module.npcHandler:say('It was a pleasure doing business with you.', cid)
                   module.npcHandler:releaseFocus(cid)

                   doTeleportThing(cid, parent.destination, true)
                   doSendMagicEffect(parent.destination, CONST_ME_TELEPORT)
               else
                   module.npcHandler:say('You do not have enough money.', cid)
               end
           else
               module.npcHandler:say('Get out of there with this blood!', cid)
           end
       else
           modulenpcHandler:say('I can only allow premium players to travel there.', cid)
       end

       module.npcHandler:resetNpc()
       return true
   end

   -- onDecline keyword callback function. Generally called when the player sais 'no' after wanting to buy an item.
   function TravelModule.onDecline(cid, message, keywords, parameters, node)
       local module = parameters.module
       if(not module.npcHandler:isFocused(cid)) then
           return false
       end

       module.npcHandler:say(module.npcHandler:parseMessage(module.npcHandler:getMessage(MESSAGE_DECLINE), {[TAG_PLAYERNAME] = getCreatureName(cid)}), cid)
       module.npcHandler:resetNpc()
       return true
   end

   function TravelModule.bring(cid, message, keywords, parameters, node)
       local module = parameters.module
       if(not module.npcHandler:isFocused(cid)) then
           return false
       end

       if((isPlayerPremiumCallback(cid) or not parameters.premium) and not isPlayerPzLocked(cid) and doPlayerRemoveMoney(cid, parameters.cost)) then
           module.npcHandler:say('Sure!', cid)
           module.npcHandler:releaseFocus(cid)

           doTeleportThing(cid, parameters.destination, false)
           doSendMagicEffect(parameters.destination, CONST_ME_TELEPORT)
       end

       module.npcHandler:releaseFocus(cid)
       return true
   end

   function TravelModule.listDestinations(cid, message, keywords, parameters, node)
       local module = parameters.module
       if(not module.npcHandler:isFocused(cid)) then
           return false
       end

       local msg = nil
       for _, destination in ipairs(module.destinations) do
           if(msg ~= nil) then
               msg = msg .. ", "
           else
               msg = ""
           end

           msg = msg .. "{" .. destination .. "}"
       end

       module.npcHandler:say(msg .. ".", cid)
       module.npcHandler:resetNpc()
       return true
   end

   OutfitModule = {
       npcHandler = nil,
       outfits = nil,
       yesNode = nil,
       noNode = nil,
   }
   -- Add it to the parseable module list.
   Modules.parseableModules['module_outfit'] = OutfitModule

   function OutfitModule:new()
       if(OUTFITMODULE_FUNCTION == nil) then
           return nil
       end

       local obj = {}
       setmetatable(obj, self)
       self.__index = self
       return obj
   end

   function OutfitModule:init(handler)
       self.npcHandler = handler
       self.yesNode = KeywordNode:new(SHOP_YESWORD, OutfitModule.onConfirm, {module = self})
       self.noNode = KeywordNode:new(SHOP_NOWORD, OutfitModule.onDecline, {module = self})

       self.outfits = {}
   end

   -- Parses all known parameters.
   function OutfitModule:parseParameters()
       local ret = NpcSystem.getParameter('outfits')
       if(ret ~= nil) then
           self:parseKeywords(ret)
           for _, word in ipairs({'outfits', 'addons'}) do
               self.npcHandler.keywordHandler:addKeyword({word}, OutfitModule.listOutfits, {module = self})
           end
       end
   end

   function OutfitModule:parseKeywords(data)
       local n = 1
       for outfit in string.gmatch(data, '[^;]+') do
           local i, keywords = 1, {}
           for tmp in string.gmatch(outfit, '[^,]+') do
               table.insert(keywords, tmp)
               i = i + 1
           end

           if(i > 0) then
               local ret = NpcSystem.getParameter('outfit' .. n)
               if(ret ~= nil) then
                   self:parseList(keywords, ret)
               else
                   print('[Warning] NpcSystem:', 'Missing \'outfit' .. n .. '\' parameter, skipping...')
               end
           else
               print('[Warning] NpcSystem:', 'No keywords found for outfit set #' .. n .. ', skipping...')
           end

           n = n + 1
       end
   end

   function OutfitModule:parseList(keywords, data)
       local outfit, items = nil, {}
       for list in string.gmatch(data, '[^;]+') do
           local a, b, c, d, e = nil, nil, nil, nil, 1
           for tmp in string.gmatch(list, '[^,]+') do
               if(e == 1) then
                   a = tmp
               elseif(e == 2) then
                   b = tmp
               elseif(e == 3) then
                   c = tmp
               elseif(e == 4) then
                   d = tmp
               else
                   print('[Warning] NpcSystem:', 'Unknown parameter found in outfit list while parsing ' .. (outfit == nil and 'outfit' or 'item') .. '.', tmp, list)
               end

               e = e + 1
           end

           if(outfit == nil) then
               outfit = {tonumber(a), tonumber(b), getBooleanFromString(c), d}
           elseif(a ~= nil) then
               local tmp = tonumber(a)
               if((tmp ~= nil or tostring(a) == "money") and b ~= nil and c ~= nil) then
                   a = tmp or 20000
                   tmp = tonumber(d)
                   if(tmp == nil) then
                       tmp = -1
                   end

                   items[a] = {b, tmp, c}
               else
                   print('[Warning] NpcSystem:', 'Missing parameter(s) for outfit items.', b, c, d)
               end
           else
               print('[Warning] NpcSystem:', 'Missing base parameter for outfit items.', a)
           end
       end

       if(type(outfit) == 'table') then
           local tmp = true
           for i = 1, 2 do
               if(outfit == nil) then
                   tmp = false
                   break
               end
           end

           if(tmp and table.maxn(items) > 0) then
               self:addOutfit(keywords, outfit, items)
           else
               print('[Warning] NpcSystem:', 'Invalid outfit, addon or empty items pool.', data)
           end
       end
   end

   function OutfitModule:addOutfit(keywords, outfit, items)
       table.insert(self.outfits, keywords[1])
       local parameters = {
           outfit = outfit[1],
           addon = outfit[2],
           premium = outfit[3],
           gender = nil,
           items = items,
           module = self
       }

       if(outfit[4] ~= nil) then
           local tmp = string.lower(tostring(outfit[5]))
           if(tmp == 'male' or tmp == '1') then
               parameters.gender = 1
           elseif(tmp == 'female' or tmp == '0') then
               parameters.gender = 0
           end
       end

       for i, name in pairs(keywords) do
           local words = {}
           table.insert(words, name)

           local node = self.npcHandler.keywordHandler:addKeyword(words, OutfitModule.obtain, parameters)
           node:addChildKeywordNode(self.yesNode)
           node:addChildKeywordNode(self.noNode)
       end
   end

   function OutfitModule.obtain(cid, message, keywords, parameters, node)
       local module = parameters.module
       if(not module.npcHandler:isFocused(cid)) then
           return false
       end

       local items = nil
       for k, v in pairs(parameters.items) do
           if(v[1] ~= "storageset") then
               if(items ~= nil) then
                   items = items .. ", "
               else
                   items = ""
               end

               if(tonumber(v[1]) ~= nil and tonumber(v[1]) > 1) then
                   items = items .. v[1] .. " "
               end

               items = items .. v[3]
           end
       end

       module.npcHandler:say('Do you want ' .. keywords[1] .. ' ' .. (addon == 0 and "outfit" or "addon") .. ' for ' .. items .. '?', cid)
       return true

   end

   function OutfitModule.onConfirm(cid, message, keywords, parameters, node)
       local module = parameters.module
       if(not module.npcHandler:isFocused(cid)) then
           return false
       end

       local parent = node:getParent():getParameters()
       if(isPlayerPremiumCallback(cid) or not parent.premium) then
           if(not canPlayerWearOutfitId(cid, parent.outfit, parent.addon)) then
               if(parent.addon == 0 or canPlayerWearOutfitId(cid, parent.outfit)) then
                   if(parent.gender == nil or parent.gender == getPlayerSex(cid)) then
                       local found = true
                       for k, v in pairs(parent.items) do
                           local tmp = tonumber(v[1])
                           if(tmp == nil) then
                               if(v[1] == "storagecheck") then
                                   if(getCreatureStorage(cid, k) < v[2]) then
                                       found = false
                                   end
                               elseif(v[1] == "outfitid") then
                                   if(not canPlayerWearOutfitId(cid, k, v[2])) then
                                       found = false
                                   end
                               elseif(v[1] == "outfit") then
                                   if(not canPlayerWearOutfit(cid, k, v[2])) then
                                       found = false
                                   end
                               else
                                   found = false
                               end
                           elseif(k == 20000) then
                               if(getPlayerMoney(cid) < tmp) then
                                   found = false
                               end
                           elseif(getPlayerItemCount(cid, k, v[2]) < tmp) then
                               found = false
                           end

                           if(not found) then
                               break
                           end
                       end

                       if(found) then
                           for k, v in pairs(parent.items) do
                               if(tonumber(v[1]) ~= nil) then
                                   if(k == 20000) then
                                       doPlayerRemoveMoney(cid, v[1])
                                   else
                                       doPlayerRemoveItem(cid, k, v[1], v[2])
                                   end
                               elseif(v[1] == "storageset") then
                                   doCreatureSetStorage(cid, k, v[2])
                               end
                           end

                           module.npcHandler:say('It was a pleasure to dress you.', cid)
                           OUTFITMODULE_FUNCTION(cid, parent.outfit, parent.addon)
                           doPlayerSetStorageValue(cid, parent.storageId, storage)
                       else
                           module.npcHandler:say('You don\'t have these items!', cid)
                       end
                   else
                       module.npcHandler:say('Sorry, this ' .. (parent.addon == 0 and 'outfit' or 'addon') .. ' is not for your gender.', cid)
                   end
               else
                   module.npcHandler:say('I will not dress you with addon of outfit you cannot wear!', cid)
               end
           else
               module.npcHandler:say('You alrady have this ' .. (parent.addon == 0 and 'outfit' or 'addon') .. '!', cid)
           end
       else
           module.npcHandler:say('Sorry, I dress only premium players.', cid)
       end

       module.npcHandler:resetNpc()
       return true
   end

   -- onDecline keyword callback function. Generally called when the player sais 'no' after wanting to buy an item.
   function OutfitModule.onDecline(cid, message, keywords, parameters, node)
       local module = parameters.module
       if(not module.npcHandler:isFocused(cid)) then
           return false
       end

       module.npcHandler:say(module.npcHandler:parseMessage(module.npcHandler:getMessage(MESSAGE_DECLINE), {[TAG_PLAYERNAME] = getCreatureName(cid)}), cid)
       module.npcHandler:resetNpc()
       return true
   end

   function OutfitModule.listOutfits(cid, message, keywords, parameters, node)
       local module = parameters.module
       if(not module.npcHandler:isFocused(cid)) then
           return false
       end

       local msg = nil
       if(table.maxn(module.outfits) > 0) then
           for _, outfit in ipairs(module.outfits) do
               if(msg ~= nil) then
                   msg = msg .. ", "
               else
                   msg = "I can dress you into "
               end

               msg = msg .. "{" .. outfit .. "}"
           end
       else
           msg = "Sorry, I have nothing to offer right now."
       end

       module.npcHandler:say(msg .. ".", cid)
       module.npcHandler:resetNpc()
       return true
   end

   ShopModule = {
       npcHandler = nil,
       yesNode = nil,
       noNode = nil,
       noText = '',
       maxCount = 100,
       amount = 0
   }

   -- Add it to the parseable module list.
   Modules.parseableModules['module_shop'] = ShopModule

   -- Creates a new instance of ShopModule
   function ShopModule:new()
       local obj = {}
       setmetatable(obj, self)
       self.__index = self
       return obj
   end

   -- Parses all known parameters.
   function ShopModule:parseParameters()
       local ret = NpcSystem.getParameter('shop_buyable')
       if(ret ~= nil) then
           self:parseBuyable(ret)
       end

       local ret = NpcSystem.getParameter('shop_sellable')
       if(ret ~= nil) then
           self:parseSellable(ret)
       end

       local ret = NpcSystem.getParameter('shop_buyable_containers')
       if(ret ~= nil) then
           self:parseBuyableContainers(ret)
       end
   end

   -- Parse a string contaning a set of buyable items.
   function ShopModule:parseBuyable(data)
       for item in string.gmatch(data, '[^;]+') do
           local i = 1

           local name = nil
           local itemid = nil
           local cost = nil
           local subType = nil
           local realName = nil

           for temp in string.gmatch(item, '[^,]+') do
               if(i == 1) then
                   name = temp
               elseif(i == 2) then
                   itemid = tonumber(temp)
               elseif(i == 3) then
                   cost = tonumber(temp)
               elseif(i == 4) then
                   subType = tonumber(temp)
               elseif(i == 5) then
                   realName = temp
               else
                   print('[Warning] NpcSystem:', 'Unknown parameter found in buyable items parameter.', temp, item)
               end
               i = i + 1
           end

           if(SHOPMODULE_MODE == SHOPMODULE_MODE_TRADE) then
               if(itemid ~= nil and cost ~= nil) then
                   if((isItemRune(itemid) or isItemFluidContainer(itemid)) and subType == nil) then
                       print('[Warning] NpcSystem:', 'SubType missing for parameter item:', item)
                   else
                       self:addBuyableItem(nil, itemid, cost, subType, realName)
                   end
               else
                   print('[Warning] NpcSystem:', 'Parameter(s) missing for item:', itemid, cost)
               end
           else
               if(name ~= nil and itemid ~= nil and cost ~= nil) then
                   if((isItemRune(itemid) or isItemFluidContainer(itemid)) and subType == nil) then
                       print('[Warning] NpcSystem:', 'SubType missing for parameter item:', item)
                   else
                       local names = {}
                       table.insert(names, name)
                       self:addBuyableItem(names, itemid, cost, subType, realName)
                   end
               else
                   print('[Warning] NpcSystem:', 'Parameter(s) missing for item:', name, itemid, cost)
               end
           end
       end
   end

   -- Parse a string contaning a set of sellable items.
   function ShopModule:parseSellable(data)
       for item in string.gmatch(data, '[^;]+') do
           local i = 1

           local name = nil
           local itemid = nil
           local cost = nil
           local realName = nil

           for temp in string.gmatch(item, '[^,]+') do
               if(i == 1) then
                   name = temp
               elseif(i == 2) then
                   itemid = tonumber(temp)
               elseif(i == 3) then
                   cost = tonumber(temp)
               elseif(i == 4) then
                   realName = temp
               else
                   print('[Warning] NpcSystem:', 'Unknown parameter found in sellable items parameter.', temp, item)
               end
               i = i + 1
           end

           if(SHOPMODULE_MODE == SHOPMODULE_MODE_TRADE) then
               if(itemid ~= nil and cost ~= nil) then
                   self:addSellableItem(nil, itemid, cost, realName)
               else
                   print('[Warning] NpcSystem:', 'Parameter(s) missing for item:', itemid, cost)
               end
           else
               if(name ~= nil and itemid ~= nil and cost ~= nil) then
                   local names = {}
                   table.insert(names, name)
                   self:addSellableItem(names, itemid, cost, realName)
               else
                   print('[Warning] NpcSystem:', 'Parameter(s) missing for item:', name, itemid, cost)
               end
           end
       end
   end

   -- Parse a string contaning a set of buyable items.
   function ShopModule:parseBuyableContainers(data)
       for item in string.gmatch(data, '[^;]+') do
           local i = 1

           local name = nil
           local container = nil
           local itemid = nil
           local cost = nil
           local subType = nil
           local realName = nil

           for temp in string.gmatch(item, '[^,]+') do
               if(i == 1) then
                   name = temp
               elseif(i == 2) then
                   itemid = tonumber(temp)
               elseif(i == 3) then
                   itemid = tonumber(temp)
               elseif(i == 4) then
                   cost = tonumber(temp)
               elseif(i == 5) then
                   subType = tonumber(temp)
               elseif(i == 6) then
                   realName = temp
               else
                   print('[Warning] NpcSystem:', 'Unknown parameter found in buyable items parameter.', temp, item)
               end
               i = i + 1
           end

           if(name ~= nil and container ~= nil and itemid ~= nil and cost ~= nil) then
               if((isItemRune(itemid) or isItemFluidContainer(itemid)) and subType == nil) then
                   print('[Warning] NpcSystem:', 'SubType missing for parameter item:', item)
               else
                   local names = {}
                   table.insert(names, name)
                   self:addBuyableItemContainer(names, container, itemid, cost, subType, realName)
               end
           else
               print('[Warning] NpcSystem:', 'Parameter(s) missing for item:', name, container, itemid, cost)
           end
       end
   end

   -- Initializes the module and associates handler to it.
   function ShopModule:init(handler)
       self.npcHandler = handler
       self.yesNode = KeywordNode:new(SHOP_YESWORD, ShopModule.onConfirm, {module = self})
       self.noNode = KeywordNode:new(SHOP_NOWORD, ShopModule.onDecline, {module = self})

       self.noText = handler:getMessage(MESSAGE_DECLINE)
       if(SHOPMODULE_MODE ~= SHOPMODULE_MODE_TALK) then
           for i, word in pairs(SHOP_TRADEREQUEST) do
               local obj = {}
               table.insert(obj, word)

               obj.callback = SHOP_TRADEREQUEST.callback or ShopModule.messageMatcher
               handler.keywordHandler:addKeyword(obj, ShopModule.requestTrade, {module = self})
           end
       end
   end

   -- Custom message matching callback function for requesting trade messages.
   function ShopModule.messageMatcher(keywords, message)
       for i, word in pairs(keywords) do
           if(type(word) == 'string') then
               if string.find(message, word) and not string.find(message, '[%w+]' .. word) and not string.find(message, word .. '[%w+]') then
                   return true
               end
           end
       end

       return false
   end

   -- Resets the module-specific variables.
   function ShopModule:reset()
       self.amount = 0
   end

   -- Function used to match a number value from a string.
   function ShopModule:getCount(message)
       local ret = 1
       local b, e = string.find(message, PATTERN_COUNT)
       if b ~= nil and e ~= nil then
           ret = tonumber(string.sub(message, b, e))
       end

       if(ret <= 0) then
           ret = 1
       elseif(ret > self.maxCount) then
           ret = self.maxCount
       end

       return ret
   end

   -- Adds a new buyable item.
   --   names = A table containing one or more strings of alternative names to this item. Used only for old buy/sell system.
   --   itemid = The itemid of the buyable item
   --   cost = The price of one single item
   --   subType - The subType of each rune or fluidcontainer item. Can be left out if it is not a rune/fluidcontainer. Default value is 1.
   --   realName - The real, full name for the item. Will be used as ITEMNAME in MESSAGE_ONBUY and MESSAGE_ONSELL if defined. Default value is nil (getItemNameById will be used)
   function ShopModule:addBuyableItem(names, itemid, cost, subType, realName)
       if(SHOPMODULE_MODE ~= SHOPMODULE_MODE_TALK) then
           if(self.npcHandler.shopItems[itemid] == nil) then
               self.npcHandler.shopItems[itemid] = {buyPrice = -1, sellPrice = -1, subType = 1, realName = ""}
           end

           self.npcHandler.shopItems[itemid].buyPrice = cost
           self.npcHandler.shopItems[itemid].realName = realName or getItemNameById(itemid)
           self.npcHandler.shopItems[itemid].subType = subType or 1
       end

       if(names ~= nil and SHOPMODULE_MODE ~= SHOPMODULE_MODE_TRADE) then
           local parameters = {
               itemid = itemid,
               cost = cost,
               eventType = SHOPMODULE_BUY_ITEM,
               module = self,
               realName = realName or getItemNameById(itemid),
               subType = subType or 1
           }

           for i, name in pairs(names) do
               local keywords = {}
               table.insert(keywords, 'buy')
               table.insert(keywords, name)

               local node = self.npcHandler.keywordHandler:addKeyword(keywords, ShopModule.tradeItem, parameters)
               node:addChildKeywordNode(self.yesNode)
               node:addChildKeywordNode(self.noNode)
           end
       end
   end

   -- Adds a new buyable container of items.
   --   names = A table containing one or more strings of alternative names to this item.
   --   container = Backpack, bag or any other itemid of container where bought items will be stored
   --   itemid = The itemid of the buyable item
   --   cost = The price of one single item
   --   subType - The subType of each rune or fluidcontainer item. Can be left out if it is not a rune/fluidcontainer. Default value is 1.
   --   realName - The real, full name for the item. Will be used as ITEMNAME in MESSAGE_ONBUY and MESSAGE_ONSELL if defined. Default value is nil (getItemNameById will be used)
   function ShopModule:addBuyableItemContainer(names, container, itemid, cost, subType, realName)
       if(names ~= nil) then
           local parameters = {
               container = container,
               itemid = itemid,
               cost = cost,
               eventType = SHOPMODULE_BUY_ITEM_CONTAINER,
               module = self,
               realName = realName or getItemNameById(itemid),
               subType = subType or 1
           }

           for i, name in pairs(names) do
               local keywords = {}
               table.insert(keywords, 'buy')
               table.insert(keywords, name)

               local node = self.npcHandler.keywordHandler:addKeyword(keywords, ShopModule.tradeItem, parameters)
               node:addChildKeywordNode(self.yesNode)
               node:addChildKeywordNode(self.noNode)
           end
       end
   end

   -- Adds a new sellable item.
   --   names = A table containing one or more strings of alternative names to this item. Used only by old buy/sell system.
   --   itemid = The itemid of the sellable item
   --   cost = The price of one single item
   --   realName - The real, full name for the item. Will be used as ITEMNAME in MESSAGE_ONBUY and MESSAGE_ONSELL if defined. Default value is nil (getItemNameById will be used)
   function ShopModule:addSellableItem(names, itemid, cost, realName)
       if(SHOPMODULE_MODE ~= SHOPMODULE_MODE_TALK) then
           if(self.npcHandler.shopItems[itemid] == nil) then
               self.npcHandler.shopItems[itemid] = {buyPrice = -1, sellPrice = -1, subType = 1, realName = ""}
           end

           self.npcHandler.shopItems[itemid].sellPrice = cost
           self.npcHandler.shopItems[itemid].realName = realName or getItemNameById(itemid)
       end

       if(names ~= nil and SHOPMODULE_MODE ~= SHOPMODULE_MODE_TRADE) then
           local parameters = {
               itemid = itemid,
               cost = cost,
               eventType = SHOPMODULE_SELL_ITEM,
               module = self,
               realName = realName or getItemNameById(itemid)
           }

           for i, name in pairs(names) do
               local keywords = {}
               table.insert(keywords, 'sell')
               table.insert(keywords, name)

               local node = self.npcHandler.keywordHandler:addKeyword(keywords, ShopModule.tradeItem, parameters)
               node:addChildKeywordNode(self.yesNode)
               node:addChildKeywordNode(self.noNode)
           end
       end
   end

   -- onModuleReset callback function. Calls ShopModule:reset()
   function ShopModule:callbackOnModuleReset()
       self:reset()
       return true
   end

   -- Callback onBuy() function. If you wish, you can change certain Npc to use your onBuy().
   function ShopModule:callbackOnBuy(cid, itemid, subType, amount, ignoreCap, inBackpacks)
       if(self.npcHandler.shopItems[itemid] == nil) then
           error("[ShopModule.onBuy]", "items[itemid] == nil")
           return false
       end

       if(self.npcHandler.shopItems[itemid].buyPrice == -1) then
           error("[ShopModule.onSell]", "Attempt to buy a non-buyable item")
           return false
       end

       local backpack = 1988
       local totalCost = amount * self.npcHandler.shopItems[itemid].buyPrice
       if(inBackpacks) then
           totalCost = totalCost + (math.max(1, math.floor(amount / getContainerCapById(backpack))) * 20)
       end

       local parseInfo = {
           [TAG_PLAYERNAME] = getPlayerName(cid),
           [TAG_ITEMCOUNT] = amount,
           [TAG_TOTALCOST] = totalCost,
           [TAG_ITEMNAME] = self.npcHandler.shopItems[itemid].realName
       }

       if(getPlayerMoney(cid) < totalCost) then
           local msg = self.npcHandler:getMessage(MESSAGE_NEEDMONEY)
           msg = self.npcHandler:parseMessage(msg, parseInfo)
           doPlayerSendCancel(cid, msg)
           return false
       end

       local subType = self.npcHandler.shopItems[itemid].subType or 1
       local a, b = doNpcSellItem(cid, itemid, amount, subType, ignoreCap, inBackpacks, backpack)
       if(a < amount) then
           local msgId = MESSAGE_NEEDMORESPACE
           if(a == 0) then
               msgId = MESSAGE_NEEDSPACE
           end

           local msg = self.npcHandler:getMessage(msgId)
           parseInfo[TAG_ITEMCOUNT] = a
           msg = self.npcHandler:parseMessage(msg, parseInfo)
           doPlayerSendCancel(cid, msg)
           if(NPCHANDLER_CONVBEHAVIOR ~= CONVERSATION_DEFAULT) then
               self.npcHandler.talkStart[cid] = os.time()
           else
               self.npcHandler.talkStart = os.time()
           end

           if(a > 0) then
               doPlayerRemoveMoney(cid, ((a * self.npcHandler.shopItems[itemid].buyPrice) + (b * 20)))
               return true
           end

           return false
       else
           local msg = self.npcHandler:getMessage(MESSAGE_BOUGHT)
           msg = self.npcHandler:parseMessage(msg, parseInfo)
           doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, msg)
           doPlayerRemoveMoney(cid, totalCost)
           if(NPCHANDLER_CONVBEHAVIOR ~= CONVERSATION_DEFAULT) then
               self.npcHandler.talkStart[cid] = os.time()
           else
               self.npcHandler.talkStart = os.time()
           end

           return true
       end
   end

   -- Callback onSell() function. If you wish, you can change certain Npc to use your onSell().
   function ShopModule:callbackOnSell(cid, itemid, subType, amount, ignoreCap, inBackpacks)
       if(self.npcHandler.shopItems[itemid] == nil) then
           error("[ShopModule.onSell]", "items[itemid] == nil")
           return false
       end

       if(self.npcHandler.shopItems[itemid].sellPrice == -1) then
           error("[ShopModule.onSell]", "Attempt to sell a non-sellable item")
           return false
       end

       local parseInfo = {
           [TAG_PLAYERNAME] = getPlayerName(cid),
           [TAG_ITEMCOUNT] = amount,
           [TAG_TOTALCOST] = amount * self.npcHandler.shopItems[itemid].sellPrice,
           [TAG_ITEMNAME] = self.npcHandler.shopItems[itemid].realName
       }

       if(subType < 1 or getItemInfo(itemid).stackable) then
           subType = -1
       end

       if(doPlayerRemoveItem(cid, itemid, amount, subType)) then
           local msg = self.npcHandler:getMessage(MESSAGE_SOLD)
           msg = self.npcHandler:parseMessage(msg, parseInfo)
           doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, msg)
           doPlayerAddMoney(cid, amount * self.npcHandler.shopItems[itemid].sellPrice)
           if(NPCHANDLER_CONVBEHAVIOR ~= CONVERSATION_DEFAULT) then
               self.npcHandler.talkStart[cid] = os.time()
           else
               self.npcHandler.talkStart = os.time()
           end
           return true
       else
           local msg = self.npcHandler:getMessage(MESSAGE_NEEDITEM)
           msg = self.npcHandler:parseMessage(msg, parseInfo)
           doPlayerSendCancel(cid, msg)
           if(NPCHANDLER_CONVBEHAVIOR ~= CONVERSATION_DEFAULT) then
               self.npcHandler.talkStart[cid] = os.time()
           else
               self.npcHandler.talkStart = os.time()
           end
           return false
       end
   end

   -- Callback for requesting a trade window with the NPC.
   function ShopModule.requestTrade(cid, message, keywords, parameters, node)
       local module = parameters.module
       if(not module.npcHandler:isFocused(cid)) then
           return false
       end

       local itemWindow = {}
       for itemid, attr in pairs(module.npcHandler.shopItems) do
           local item = {id = itemid, buy = attr.buyPrice, sell = attr.sellPrice, subType = attr.subType, name = attr.realName}
           table.insert(itemWindow, item)
       end

       if(itemWindow[1] == nil) then
           local parseInfo = { [TAG_PLAYERNAME] = getPlayerName(cid) }
           local msg = module.npcHandler:parseMessage(module.npcHandler:getMessage(MESSAGE_NOSHOP), parseInfo)
           module.npcHandler:say(msg, cid)
           return true
       end

       local parseInfo = { [TAG_PLAYERNAME] = getPlayerName(cid) }
       local msg = module.npcHandler:parseMessage(module.npcHandler:getMessage(MESSAGE_SENDTRADE), parseInfo)
       openShopWindow(cid, itemWindow,
           function(cid, itemid, subType, amount, ignoreCap, inBackpacks) module.npcHandler:onBuy(cid, itemid, subType, amount, ignoreCap, inBackpacks) end,
           function(cid, itemid, subType, amount, ignoreCap, inBackpacks) module.npcHandler:onSell(cid, itemid, subType, amount, ignoreCap, inBackpacks) end)
       module.npcHandler:say(msg, cid)
       return true
   end

   -- onConfirm keyword callback function. Sells/buys the actual item.
   function ShopModule.onConfirm(cid, message, keywords, parameters, node)
       local module = parameters.module
       if(not module.npcHandler:isFocused(cid)) then
           return false
       end

       local parentParameters = node:getParent():getParameters()
       local parseInfo = {
           [TAG_PLAYERNAME] = getPlayerName(cid),
           [TAG_ITEMCOUNT] = module.amount,
           [TAG_TOTALCOST] = parentParameters.cost * module.amount,
           [TAG_ITEMNAME] = parentParameters.realName
       }

       if(parentParameters.eventType == SHOPMODULE_SELL_ITEM) then
           local ret = doPlayerSellItem(cid, parentParameters.itemid, module.amount, parentParameters.cost * module.amount)
           if(ret) then
               local msg = module.npcHandler:getMessage(MESSAGE_ONSELL)
               msg = module.npcHandler:parseMessage(msg, parseInfo)
               module.npcHandler:say(msg, cid)
           else
               local msg = module.npcHandler:getMessage(MESSAGE_MISSINGITEM)
               msg = module.npcHandler:parseMessage(msg, parseInfo)
               module.npcHandler:say(msg, cid)
           end
       elseif(parentParameters.eventType == SHOPMODULE_BUY_ITEM) then
           local ret = doPlayerBuyItem(cid, parentParameters.itemid, module.amount, parentParameters.cost * module.amount, parentParameters.subType)
           if(ret) then
               if parentParameters.itemid == ITEM_PARCEL then
                   doPlayerBuyItem(cid, ITEM_LABEL, module.amount, 0, parentParameters.subType)
               end
               local msg = module.npcHandler:getMessage(MESSAGE_ONBUY)
               msg = module.npcHandler:parseMessage(msg, parseInfo)
               module.npcHandler:say(msg, cid)
           else
               local msg = module.npcHandler:getMessage(MESSAGE_MISSINGMONEY)
               msg = module.npcHandler:parseMessage(msg, parseInfo)
               module.npcHandler:say(msg, cid)
           end
       elseif(parentParameters.eventType == SHOPMODULE_BUY_ITEM_CONTAINER) then
           local ret = doPlayerBuyItemContainer(cid, parentParameters.container, parentParameters.itemid, module.amount, parentParameters.cost * module.amount, parentParameters.subType)
           if(ret) then
               local msg = module.npcHandler:getMessage(MESSAGE_ONBUY)
               msg = module.npcHandler:parseMessage(msg, parseInfo)
               module.npcHandler:say(msg, cid)
           else
               local msg = module.npcHandler:getMessage(MESSAGE_MISSINGMONEY)
               msg = module.npcHandler:parseMessage(msg, parseInfo)
               module.npcHandler:say(msg, cid)
           end
       end

       module.npcHandler:resetNpc()
       return true
   end

   -- onDecliune keyword callback function. Generally called when the player sais 'no' after wanting to buy an item.
   function ShopModule.onDecline(cid, message, keywords, parameters, node)
       local module = parameters.module
       if(not module.npcHandler:isFocused(cid)) then
           return false
       end

       local parentParameters = node:getParent():getParameters()
       local parseInfo = {
           [TAG_PLAYERNAME] = getPlayerName(cid),
           [TAG_ITEMCOUNT] = module.amount,
           [TAG_TOTALCOST] = parentParameters.cost * module.amount,
           [TAG_ITEMNAME] = parentParameters.realName
       }

       local msg = module.npcHandler:parseMessage(module.noText, parseInfo)
       module.npcHandler:say(msg, cid)
       module.npcHandler:resetNpc()
       return true
   end

   -- tradeItem callback function. Makes the npc say the message defined by MESSAGE_BUY or MESSAGE_SELL
   function ShopModule.tradeItem(cid, message, keywords, parameters, node)
       local module = parameters.module
       if(not module.npcHandler:isFocused(cid)) then
           return false
       end

       local count = module:getCount(message)
       module.amount = count
       local parseInfo = {
           [TAG_PLAYERNAME] = getPlayerName(cid),
           [TAG_ITEMCOUNT] = module.amount,
           [TAG_TOTALCOST] = parameters.cost * module.amount,
           [TAG_ITEMNAME] = parameters.realName
       }

       if(parameters.eventType == SHOPMODULE_SELL_ITEM) then
           local msg = module.npcHandler:getMessage(MESSAGE_SELL)
           msg = module.npcHandler:parseMessage(msg, parseInfo)
           module.npcHandler:say(msg, cid)
       elseif(parameters.eventType == SHOPMODULE_BUY_ITEM) then
           local msg = module.npcHandler:getMessage(MESSAGE_BUY)
           msg = module.npcHandler:parseMessage(msg, parseInfo)
           module.npcHandler:say(msg, cid)
       elseif(parameters.eventType == SHOPMODULE_BUY_ITEM_CONTAINER) then
           local msg = module.npcHandler:getMessage(MESSAGE_BUY)
           msg = module.npcHandler:parseMessage(msg, parseInfo)
           module.npcHandler:say(msg, cid)
       end

       return true
   end
end

de nada

Estava com o mesmo problema no meu TFS 8.60, estava achando que teria que fazer gambiarra no codigo, me ajudou demais cara

Entrar

(Resolvido)Npc Comprar 100 unidades

Posts Recomendados

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Participe da conversa

Quem Está Navegando 0 membros estão online

TibiaKing

Open Tibia Server

Redes Sociais

Anuncie no TibiaKing

Informação Importante