Banner com Efeitos

	seuserver.com.br	DESCRIÇÃO: ANUNCIE AQUI neste countdown e dê maior visibilidade ao seu lançamento \| Fórum Otserv \| Downloads \| Tutoriais \| IA Especializada para otserv \| Lista de Servidores \| mais de 10 anos de conteúdos!	INICIA EM:

(Ajuda) Como Colocar Tempo No Npc

Postado Maio 31, 2015 10 anos

Autor

local focus = 0
local talk_start = 0
local target = 0
local days = 0
local tempo = 10 -- em segundos
local strg = 12980 -- Storage onde salvará o tempo (Não Mexa)
 
function onThingMove(creature, thing, oldpos, oldstackpos)
 
end
 
 
function onCreatureAppear(creature)
 
end
 
 
function onCreatureDisappear(cid, pos)
if focus == cid then
selfSay('Good bye then.')
focus = 0
talk_start = 0
end
end
 
 
function onCreatureTurn(creature)
 
end
 
 
function msgcontains(txt, str)
return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)'))
end
 
 
function onCreatureSay(cid, type, msg)
msg = string.lower(msg)
 
if (msgcontains(msg, 'hi') and (focus == 0)) and getDistanceToCreature(cid) < 4 then
selfSay('Hello ' .. getCreatureName(cid) .. '! Oi eu lhe dou 1 nivel por 10 Gold')
focus = cid
talk_start = os.clock()
 
elseif msgcontains(msg, 'hi') and (focus ~= cid) and getDistanceToCreature(cid) < 4 then
selfSay('Sorry, ' .. getCreatureName(cid) .. '! I talk to you in a minute.')
 
elseif focus == cid then
talk_start = os.clock()
 
if msgcontains(msg, 'promotion') or msgcontains(msg, 'promote') then
if getPlayerVocation(cid) > 4 then
selfSay('Sorry, you are already promoted.')
talk_state = 0
elseif not isPremium(cid) then
selfSay('Sorry, you must be premium to buy promotion.')
talk_state = 0
else
selfSay('Do you want to buy promotion for 20k?')
talk_state = 1
end
 
elseif msgcontains(msg, 'desbug') or msgcontains(msg, 'desbugar') then
selfSay('Quer Desbugar por 10 Gold?')
talk_state = 2
 
elseif talk_state == 1 then
if msgcontains(msg, 'yes') then
if pay(cid,200000000) then
doPlayerSetVocation(cid, getPlayerVocation(cid)+4)
selfSay('You are now promoted!')
else
selfSay('Sorry, you do not have enough money.')
end
end
talk_state = 0

if not exhaustion.check(cid, strg) then
exhaustion.set(cid, strg, tempo)
 else
        doPlayerSendCancel(cid, "Voce precisa aguardar "..exhaustion.get(cid, strg).." segundos para usar novamente.")
    end
 
 
 
                elseif talk_state == 2 then
if msgcontains(msg, 'yes') then
                 if doPlayerRemoveItem(cid,2160,10) == 0 then
  selfSay('Voce Nao Tem Golds Suficiente.')
                 else  
selfSay('Voce Foi Desbugado.')
 
                  addLevel(cid, 1)
     
        end
        end
        talk_state = 0
 
elseif msgcontains(msg, 'bye') and getDistanceToCreature(cid) < 4 then
selfSay('Good bye, ' .. getCreatureName(cid) .. '!')
focus = 0
talk_start = 0
end
end
end
 
function onThink()
doNpcSetCreatureFocus(focus)
if (os.clock() - talk_start) > 45 then
if focus > 0 then
selfSay('Next Please...')
end
focus = 0
end
if focus ~= 0 then
if getDistanceToCreature(focus) > 5 then
selfSay('Good bye then.')
focus = 0
end
end

end

olha tem certeza que ta certo cara o meu e um dbo 8.0 ainda deu certo nao ele permite de o cara falar hi desbug toda hora ainda

Editado Maio 31, 2015 10 anos por anthonyx22 (veja o histórico de edições)

Citar

Mention

Respostas 19
Visualizações 644
Created 10 anos10 anos
Última resposta 10 anos10 anos

Popular Days

Mai 31 2015 19 posts

Most Popular Posts

Wakon

Maio 31, 2015 10 anos

Modifiquei uma parte, testa ai: Eu testei na base do Tibia e está normal, porém as funções podem ser diferentes, se der erro verifique se aparece algum erro na distro ao dar /reload npcs ou
Wakon

Maio 31, 2015 10 anos

Tente assim:
Wend II

Maio 31, 2015 10 anos

ainda continua a mesma coisa, ele repeti desbug quantas vezes quiser e ainda continua sem o tempo

Postado Maio 31, 2015 10 anos

Meu olho quase fechando huehue

local focus = 0
local talk_start = 0
local target = 0
local days = 0
local waittime = 300 -- (300 seconds)
local storage = 5560
 
function onThingMove(creature, thing, oldpos, oldstackpos)
 
end
 
 
function onCreatureAppear(creature)
 
end
 
 
function onCreatureDisappear(cid, pos)
if focus == cid then
selfSay('Good bye then.')
focus = 0
talk_start = 0
end
end
 
 
function onCreatureTurn(creature)
 
end
 
 
function msgcontains(txt, str)
return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)'))
end
 
 
function onCreatureSay(cid, type, msg)
msg = string.lower(msg)
 
if (msgcontains(msg, 'hi') and (focus == 0)) and getDistanceToCreature(cid) < 4 then
selfSay('Hello ' .. getCreatureName(cid) .. '! Oi eu lhe dou 1 nivel por 10 Gold')
focus = cid
talk_start = os.clock()
 
elseif msgcontains(msg, 'hi') and (focus ~= cid) and getDistanceToCreature(cid) < 4 then
selfSay('Sorry, ' .. getCreatureName(cid) .. '! I talk to you in a minute.')
 
elseif focus == cid then
talk_start = os.clock()
 
if msgcontains(msg, 'promotion') or msgcontains(msg, 'promote') then
if getPlayerVocation(cid) > 4 then
selfSay('Sorry, you are already promoted.')
talk_state = 0
elseif not isPremium(cid) then
selfSay('Sorry, you must be premium to buy promotion.')
talk_state = 0
else
selfSay('Do you want to buy promotion for 20k?')
talk_state = 1
end
 
elseif msgcontains(msg, 'desbug') or msgcontains(msg, 'desbugar') then
selfSay('Quer Desbugar por 10 Gold?')
talk_state = 2
 
 if exhaustion.get(cid, storage) == FALSE then
exhaustion.set(cid, storage, waittime)
doSendMagicEffect(getPlayerPosition(cid), 180)
else
                doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, "You must wait another " .. exhaustion.get(cid, storage) .. " seconds.")
        end     return true
end
 
elseif talk_state == 1 then
if msgcontains(msg, 'yes') then
if pay(cid,200000000) then
doPlayerSetVocation(cid, getPlayerVocation(cid)+4)
selfSay('You are now promoted!')
else
selfSay('Sorry, you do not have enough money.')
end
end
talk_state = 0
 
 
                elseif talk_state == 2 then
if msgcontains(msg, 'yes') then
                 if doPlayerRemoveItem(cid,2160,10) == 0 then
  selfSay('Voce Nao Tem Golds Suficiente.')
                 else  
selfSay('Voce Foi Desbugado.')
 
 
                  addLevel(cid, 1)
     
        end
        end
        talk_state = 0
 
elseif msgcontains(msg, 'bye') and getDistanceToCreature(cid) < 4 then
selfSay('Good bye, ' .. getCreatureName(cid) .. '!')
focus = 0
talk_start = 0
end
end
end
 
function onThink()
doNpcSetCreatureFocus(focus)
if (os.clock() - talk_start) > 45 then
if focus > 0 then
selfSay('Next Please...')
end
focus = 0
end
if focus ~= 0 then
if getDistanceToCreature(focus) > 5 then
selfSay('Good bye then.')
focus = 0
end
end
end

dar algum erro na distro?

Editado Maio 31, 2015 10 anos por TopllDanStar (veja o histórico de edições)

Citar

Mention

Postado Maio 31, 2015 10 anos

Autor

Meu olho quase fechando huehue

local focus = 0
local talk_start = 0
local target = 0
local days = 0
local waittime = 300 -- (300 seconds)
local storage = 5560
 
function onThingMove(creature, thing, oldpos, oldstackpos)
 
end
 
 
function onCreatureAppear(creature)
 
end
 
 
function onCreatureDisappear(cid, pos)
if focus == cid then
selfSay('Good bye then.')
focus = 0
talk_start = 0
end
end
 
 
function onCreatureTurn(creature)
 
end
 
 
function msgcontains(txt, str)
return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)'))
end
 
 
function onCreatureSay(cid, type, msg)
msg = string.lower(msg)
 
if (msgcontains(msg, 'hi') and (focus == 0)) and getDistanceToCreature(cid) < 4 then
selfSay('Hello ' .. getCreatureName(cid) .. '! Oi eu lhe dou 1 nivel por 10 Gold')
focus = cid
talk_start = os.clock()
 
elseif msgcontains(msg, 'hi') and (focus ~= cid) and getDistanceToCreature(cid) < 4 then
selfSay('Sorry, ' .. getCreatureName(cid) .. '! I talk to you in a minute.')
 
elseif focus == cid then
talk_start = os.clock()
 
if msgcontains(msg, 'promotion') or msgcontains(msg, 'promote') then
if getPlayerVocation(cid) > 4 then
selfSay('Sorry, you are already promoted.')
talk_state = 0
elseif not isPremium(cid) then
selfSay('Sorry, you must be premium to buy promotion.')
talk_state = 0
else
selfSay('Do you want to buy promotion for 20k?')
talk_state = 1
end
 
elseif msgcontains(msg, 'desbug') or msgcontains(msg, 'desbugar') then
selfSay('Quer Desbugar por 10 Gold?')
talk_state = 2
 
 if exhaustion.get(cid, storage) == FALSE then
exhaustion.set(cid, storage, waittime)
doSendMagicEffect(getPlayerPosition(cid), 180)
else
                doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, "You must wait another " .. exhaustion.get(cid, storage) .. " seconds.")
        end     return true
end
 
elseif talk_state == 1 then
if msgcontains(msg, 'yes') then
if pay(cid,200000000) then
doPlayerSetVocation(cid, getPlayerVocation(cid)+4)
selfSay('You are now promoted!')
else
selfSay('Sorry, you do not have enough money.')
end
end
talk_state = 0
 
 
                elseif talk_state == 2 then
if msgcontains(msg, 'yes') then
                 if doPlayerRemoveItem(cid,2160,10) == 0 then
  selfSay('Voce Nao Tem Golds Suficiente.')
                 else  
selfSay('Voce Foi Desbugado.')
 
 
                  addLevel(cid, 1)
     
        end
        end
        talk_state = 0
 
elseif msgcontains(msg, 'bye') and getDistanceToCreature(cid) < 4 then
selfSay('Good bye, ' .. getCreatureName(cid) .. '!')
focus = 0
talk_start = 0
end
end
end
 
function onThink()
doNpcSetCreatureFocus(focus)
if (os.clock() - talk_start) > 45 then
if focus > 0 then
selfSay('Next Please...')
end
focus = 0
end
if focus ~= 0 then
if getDistanceToCreature(focus) > 5 then
selfSay('Good bye then.')
focus = 0
end
end
end

dar algum erro na distro?

nao funciono e da um erro sim erro: data/npc/desbug.lua:67:attempt to index global 'exhaustion' <nil value>

Citar

Mention

Postado Maio 31, 2015 10 anos

nao funciono e da um erro sim erro: data/npc/desbug.lua:67:attempt to index global 'exhaustion' <nil value>

Se tivesse com um servidor aqui já tinha resolvido

local focus = 0
local talk_start = 0
local target = 0
local days = 0
local time = 60     --Em minutos. 
local storage = 91838
 
function onThingMove(creature, thing, oldpos, oldstackpos)
 
end
 
 
function onCreatureAppear(creature)
 
end
 
 
function onCreatureDisappear(cid, pos)
if focus == cid then
selfSay('Good bye then.')
focus = 0
talk_start = 0
end
end
 
 
function onCreatureTurn(creature)
 
end
 
 
function msgcontains(txt, str)
return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)'))
end
 
 
function onCreatureSay(cid, type, msg)
msg = string.lower(msg)
 
if (msgcontains(msg, 'hi') and (focus == 0)) and getDistanceToCreature(cid) < 4 then
selfSay('Hello ' .. getCreatureName(cid) .. '! Oi eu lhe dou 1 nivel por 10 Gold')
focus = cid
talk_start = os.clock()
 
elseif msgcontains(msg, 'hi') and (focus ~= cid) and getDistanceToCreature(cid) < 4 then
selfSay('Sorry, ' .. getCreatureName(cid) .. '! I talk to you in a minute.')
 
elseif focus == cid then
talk_start = os.clock()
 
if msgcontains(msg, 'promotion') or msgcontains(msg, 'promote') then
if getPlayerVocation(cid) > 4 then
selfSay('Sorry, you are already promoted.')
talk_state = 0
elseif not isPremium(cid) then
selfSay('Sorry, you must be premium to buy promotion.')
talk_state = 0
else
selfSay('Do you want to buy promotion for 20k?')
talk_state = 1
end
 
elseif msgcontains(msg, 'desbug') or msgcontains(msg, 'desbugar') then
selfSay('Quer Desbugar por 10 Gold?')
talk_state = 2
 
elseif talk_state == 1 then
if msgcontains(msg, 'yes') then
elseif getPlayerStorageValue(cid, storage) < os.time() then
if pay(cid,200000000) then
doPlayerSetVocation(cid, getPlayerVocation(cid)+4)
setPlayerStorageValue(cid, storage, os.time() + time * 60)
selfSay('You are now promoted!')
else
selfSay('Sorry, you do not have enough money.')
end
end
talk_state = 0
 
 
                elseif talk_state == 2 then
if msgcontains(msg, 'yes') then
                 if doPlayerRemoveItem(cid,2160,10) == 0 then
  selfSay('Voce Nao Tem Golds Suficiente.')
                 else  
selfSay('Voce Foi Desbugado.')
 
                  addLevel(cid, 1)
     
        end
        end
        talk_state = 0
 
elseif msgcontains(msg, 'bye') and getDistanceToCreature(cid) < 4 then
selfSay('Good bye, ' .. getCreatureName(cid) .. '!')
focus = 0
talk_start = 0
end
end
end
 
function onThink()
doNpcSetCreatureFocus(focus)
if (os.clock() - talk_start) > 45 then
if focus > 0 then
selfSay('Next Please...')
end
focus = 0
end
if focus ~= 0 then
if getDistanceToCreature(focus) > 5 then
selfSay('Good bye then.')
focus = 0
end
end
end

Citar

Mention

Postado Maio 31, 2015 10 anos

Autor

Se tivesse com um servidor aqui já tinha resolvido

local focus = 0
local talk_start = 0
local target = 0
local days = 0
local time = 60     --Em minutos. 
local storage = 91838
 
function onThingMove(creature, thing, oldpos, oldstackpos)
 
end
 
 
function onCreatureAppear(creature)
 
end
 
 
function onCreatureDisappear(cid, pos)
if focus == cid then
selfSay('Good bye then.')
focus = 0
talk_start = 0
end
end
 
 
function onCreatureTurn(creature)
 
end
 
 
function msgcontains(txt, str)
return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)'))
end
 
 
function onCreatureSay(cid, type, msg)
msg = string.lower(msg)
 
if (msgcontains(msg, 'hi') and (focus == 0)) and getDistanceToCreature(cid) < 4 then
selfSay('Hello ' .. getCreatureName(cid) .. '! Oi eu lhe dou 1 nivel por 10 Gold')
focus = cid
talk_start = os.clock()
 
elseif msgcontains(msg, 'hi') and (focus ~= cid) and getDistanceToCreature(cid) < 4 then
selfSay('Sorry, ' .. getCreatureName(cid) .. '! I talk to you in a minute.')
 
elseif focus == cid then
talk_start = os.clock()
 
if msgcontains(msg, 'promotion') or msgcontains(msg, 'promote') then
if getPlayerVocation(cid) > 4 then
selfSay('Sorry, you are already promoted.')
talk_state = 0
elseif not isPremium(cid) then
selfSay('Sorry, you must be premium to buy promotion.')
talk_state = 0
else
selfSay('Do you want to buy promotion for 20k?')
talk_state = 1
end
 
elseif msgcontains(msg, 'desbug') or msgcontains(msg, 'desbugar') then
selfSay('Quer Desbugar por 10 Gold?')
talk_state = 2
 
elseif talk_state == 1 then
if msgcontains(msg, 'yes') then
elseif getPlayerStorageValue(cid, storage) < os.time() then
if pay(cid,200000000) then
doPlayerSetVocation(cid, getPlayerVocation(cid)+4)
setPlayerStorageValue(cid, storage, os.time() + time * 60)
selfSay('You are now promoted!')
else
selfSay('Sorry, you do not have enough money.')
end
end
talk_state = 0
 
 
                elseif talk_state == 2 then
if msgcontains(msg, 'yes') then
                 if doPlayerRemoveItem(cid,2160,10) == 0 then
  selfSay('Voce Nao Tem Golds Suficiente.')
                 else  
selfSay('Voce Foi Desbugado.')
 
                  addLevel(cid, 1)
     
        end
        end
        talk_state = 0
 
elseif msgcontains(msg, 'bye') and getDistanceToCreature(cid) < 4 then
selfSay('Good bye, ' .. getCreatureName(cid) .. '!')
focus = 0
talk_start = 0
end
end
end
 
function onThink()
doNpcSetCreatureFocus(focus)
if (os.clock() - talk_start) > 45 then
if focus > 0 then
selfSay('Next Please...')
end
focus = 0
end
if focus ~= 0 then
if getDistanceToCreature(focus) > 5 then
selfSay('Good bye then.')
focus = 0
end
end
end

Se tivesse com um servidor aqui já tinha resolvido

local focus = 0
local talk_start = 0
local target = 0
local days = 0
local time = 60     --Em minutos. 
local storage = 91838
 
function onThingMove(creature, thing, oldpos, oldstackpos)
 
end
 
 
function onCreatureAppear(creature)
 
end
 
 
function onCreatureDisappear(cid, pos)
if focus == cid then
selfSay('Good bye then.')
focus = 0
talk_start = 0
end
end
 
 
function onCreatureTurn(creature)
 
end
 
 
function msgcontains(txt, str)
return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)'))
end
 
 
function onCreatureSay(cid, type, msg)
msg = string.lower(msg)
 
if (msgcontains(msg, 'hi') and (focus == 0)) and getDistanceToCreature(cid) < 4 then
selfSay('Hello ' .. getCreatureName(cid) .. '! Oi eu lhe dou 1 nivel por 10 Gold')
focus = cid
talk_start = os.clock()
 
elseif msgcontains(msg, 'hi') and (focus ~= cid) and getDistanceToCreature(cid) < 4 then
selfSay('Sorry, ' .. getCreatureName(cid) .. '! I talk to you in a minute.')
 
elseif focus == cid then
talk_start = os.clock()
 
if msgcontains(msg, 'promotion') or msgcontains(msg, 'promote') then
if getPlayerVocation(cid) > 4 then
selfSay('Sorry, you are already promoted.')
talk_state = 0
elseif not isPremium(cid) then
selfSay('Sorry, you must be premium to buy promotion.')
talk_state = 0
else
selfSay('Do you want to buy promotion for 20k?')
talk_state = 1
end
 
elseif msgcontains(msg, 'desbug') or msgcontains(msg, 'desbugar') then
selfSay('Quer Desbugar por 10 Gold?')
talk_state = 2
 
elseif talk_state == 1 then
if msgcontains(msg, 'yes') then
elseif getPlayerStorageValue(cid, storage) < os.time() then
if pay(cid,200000000) then
doPlayerSetVocation(cid, getPlayerVocation(cid)+4)
setPlayerStorageValue(cid, storage, os.time() + time * 60)
selfSay('You are now promoted!')
else
selfSay('Sorry, you do not have enough money.')
end
end
talk_state = 0
 
 
                elseif talk_state == 2 then
if msgcontains(msg, 'yes') then
                 if doPlayerRemoveItem(cid,2160,10) == 0 then
  selfSay('Voce Nao Tem Golds Suficiente.')
                 else  
selfSay('Voce Foi Desbugado.')
 
                  addLevel(cid, 1)
     
        end
        end
        talk_state = 0
 
elseif msgcontains(msg, 'bye') and getDistanceToCreature(cid) < 4 then
selfSay('Good bye, ' .. getCreatureName(cid) .. '!')
focus = 0
talk_start = 0
end
end
end
 
function onThink()
doNpcSetCreatureFocus(focus)
if (os.clock() - talk_start) > 45 then
if focus > 0 then
selfSay('Next Please...')
end
focus = 0
end
if focus ~= 0 then
if getDistanceToCreature(focus) > 5 then
selfSay('Good bye then.')
focus = 0
end
end
end

saio o erro mais ainda continua sem limite de tempo vei arruma um servidor ai so pra test msm pega qual quer um mano ai se faz tudo direito taligado

Citar

Mention

Participe da conversa

Você pode postar agora e se cadastrar mais tarde. Se você tem uma conta, faça o login para postar com sua conta.

https://tibiaking.com/topic/57889-ajuda-como-colocar-tempo-no-npc/

Seguidores

Ir para a lista de tópicos

Nenhum usuário registrado visualizando esta página.

Tópicos 96.9k
Posts 519.7k

Respostas 19
Visualizações 644
Created 10 anos10 anos
Última resposta 10 anos10 anos

Popular Days

Mai 31 2015 19 posts

Entrar

(Ajuda) Como Colocar Tempo No Npc

Featured Replies

Top Posters In This Topic

Popular Days

Most Popular Posts

Wakon

Wakon

Wend II

Participe da conversa

Quem Está Navegando 0

Estatísticas dos Fóruns

Top Posters In This Topic

Popular Days

Most Popular Posts

Wakon

Wakon

Wend II

Informação Importante

Account

Navigation

Pesquisar