Carregador De Soft Boots

Hehe ai fiz um npc que recarrega a soft boots quando acaba.

Intao Vamos lá!

Primeiro vá em (data\npc). Copie uma pasta. Abra-a. e cole isto.

<?xml version="1.0"?>

<npc name="Tomboy" script="data/npc/scripts/soft.lua" access="3" lookdir="1" autowalk="100" speed="200">
   <health now="100" max="100"/>
   <look type="151" head="78" body="95" legs="113" feet="114" addons="1" corpse="2212"/>
   <parameters/>
</npc>

Mude o nome se quiser.

Agora vá em (data\npc\scripts). Copie uma pasta. Renomeia para "soft.lua".

E cole o seguinte:

local keywordHandler = KeywordHandler:new()

local npcHandler = NpcHandler:new(keywordHandler)

NpcSystem.parseParameters(npcHandler)



-- OTServ event handling functions start

function onCreatureAppear(cid)                npcHandler:onCreatureAppear(cid) end

function onCreatureDisappear(cid)             npcHandler:onCreatureDisappear(cid) end

function onCreatureSay(cid, type, msg)     npcHandler:onCreatureSay(cid, type, msg) end

function onThink()                         npcHandler:onThink() end

-- OTServ event handling functions end



function creatureSayCallback(cid, type, msg)

  -- Place all your code in here. Remember that hi, bye and all that stuff is already handled by the npcsystem, so you do not have to take care of that yourself.

  if(npcHandler.focus ~= cid) then

      return false

  end



      if msgcontains(msg, 'specialised') or msgcontains(msg, 'boot') then

          selfSay('Yes, my fathers was a great one blacksmith, it was a wise person , but when he decided to teach me he dies and i just learn about the lovely boots. So, did you bring me some boots? which one?')

      elseif msgcontains(msg, '[color="#FF0000"]soft boots'[/color]) or msgcontains(msg, '[color="#FF0000"]worn soft boots[/color]') or msgcontains(msg, 'soft boot') or msgcontains(msg, 'worn soft boot') then

          selfSay('Did u like that i fix ur worn soft boots? it will cost 100 platinum coins')

          talk_state = 1





      elseif msgcontains(msg, 'yes') and talk_state == 1 then

          if getPlayerItemCount(cid,6530) >= 1 and getPlayerItemCount(cid,2152) >= 1 then

              if doPlayerTakeItem(cid,6530,1) and doPlayerTakeItem(cid,2152,100) == 0 then

              selfSay('Here you are.')

                  doPlayerAddItem(cid,2640,1)

              end

          else

              selfSay('Sorry, you don\'t have the item.')

          end





      elseif msgcontains(msg, 'no') and (talk_state >= 1 and talk_state <= 5) then

          selfSay('Ok than.')

          talk_state = 0

      end

  -- Place all your code in here. Remember that hi, bye and all that stuff is already handled by the npcsystem, so you do not have to take care of that yourself.

  return true

end



npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)

npcHandler:addModule(FocusModule:new())

Explicando:

O que esta de vermelho e o que vc deve falar pra trocar a soft veia peloa soft nova .

OBS: custa 10k.

Creditos: Renato

Qualquer coisa poste ai que eu corrijo.

Desculpe aew. Esqueci de avisar. Esse aki deu certo mais o meu é Ares 8.1.

nao ta funcionando pra tfs 8.31 =/

Não funciona.

Ele cata a Worn Soft Boots e não cata os 10k e não da a soft boots nova .

Tenta arruma ae

Dei uma arrumada, testem:

local keywordHandler = KeywordHandler:new()

 

local npcHandler = NpcHandler:new(keywordHandler)

 

NpcSystem.parseParameters(npcHandler)

 

 

 

-- OTServ event handling functions start

 

function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end

 

function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end

 

function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end

 

function onThink() npcHandler:onThink() end

 

-- OTServ event handling functions end

 

 

 

function creatureSayCallback(cid, type, msg)

 

-- Place all your code in here. Remember that hi, bye and all that stuff is already handled by the npcsystem, so you do not have to take care of that yourself.

 

if(npcHandler.focus ~= cid) then

 

return false

 

end

 

 

 

if msgcontains(msg, 'specialised') or msgcontains(msg, 'boot') then

 

selfSay('Yes, my fathers was a great one blacksmith, it was a wise person , but when he decided to teach me he dies and i just learn about the lovely boots. So, did you bring me some boots? which one?')

 

elseif msgcontains(msg, 'soft boots') or msgcontains(msg, 'worn soft boots') or msgcontains(msg, 'soft boot') or msgcontains(msg, 'worn soft boot') then

 

selfSay('Did u like that i fix ur worn soft boots? it will cost 100 platinum coins')

 

talk_state = 1

 

 

 

 

 

elseif msgcontains(msg, 'yes') and talk_state == 1 then

 

if getPlayerItemCount(cid,6530) >= 1 and getPlayerItemCount(cid,2152) >= 100 then

 

if doPlayerTakeItem(cid,6530,1) and doPlayerTakeItem(cid,2152,100) then

 

selfSay('Here you are.')

 

doPlayerAddItem(cid,2640,1)

 

end

 

else

 

selfSay('Sorry, you don\'t have the item.')

 

end

 

 

 

 

 

elseif msgcontains(msg, 'no') and (talk_state >= 1 and talk_state <= 5) then

 

selfSay('Ok than.')

 

talk_state = 0

 

end

 

-- Place all your code in here. Remember that hi, bye and all that stuff is already handled by the npcsystem, so you do not have to take care of that yourself.

 

return true

 

end

 

 

 

npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)

 

npcHandler:addModule(FocusModule:new())

Dei uma arrumada, testem:

vlw aew por corrigir ^^, e que esqueci de falar q o meu é Ares 8.10 ai pensei q dava certo em todos... sry awe.

noobinhu ainda n ta funfando no tfs o npc nao respond nada que eu digo...

na realidade eu digo hi e ele responde depois que eu falo pra concerta a bota ele pega os itens e n me da a bota nova e os resto dos comandos ele n diz nada ate quando eu dgo bye ele num responde....

se vc podesse arrumar isso ae eu agradeceria.... vlw

noobinhu ainda n ta funfando no tfs o npc nao respond nada que eu digo...

 

na realidade eu digo hi e ele responde depois que eu falo pra concerta a bota ele pega os itens e n me da a bota nova e os resto dos comandos ele n diz nada ate quando eu dgo bye ele num responde....

se vc podesse arrumar isso ae eu agradeceria.... vlw

Vou tentar arrumar aki .. vlws awe hehe, depois eu edito

Eu fiz um meu aqui está:

http://www.xtibia.com/forum/tfs-Npc-Soft-Boots-t101439.html

hum .. axo que nen preciza disso, sei la !