Poccnn

substitua essa linha do código: por essa:

onstatchange quer dizer que já foi sofrido o dano. o que tu pode fazer com esse script é devolver parte do valor do dano sofrido.

function onSay(cid, words, param) if(getPlayerPremiumDays(cid) <= 0)then return true,doPlayerSendCancel(cid, 'Need premium.')end if exhaustion.get(cid, 501) then doPlayerSendCancel(cid, 'Você precisa espera 10 segundos para usar novamente.') elseif getPlayerStorageValue(cid, 32001) == 1 or getPlayerStorageValue(cid, 17000) == 1 or getPlayerStorageValue(cid, 17001) == 1 then doPlayerSendCancel(cid, "Você não pode usar bike e correr ao mesmo tempo") return false elseif isCreature(cid) then doCreatureSay(cid, "correr", TALKTYPE_ORANGE_1) setPlayerStorageValue(cid, 19000, 1) doChangeSpeed(cid, 1 * 5000) doSendMagicEffect(getPlayerPosition(cid), 1) exhaustion.set(cid, 501, 10) addEvent(function() setPlayerStorageValue(cid, 19000, 0) doRegainSpeed(cid) end, 15000) -- Tempo que vai durar a talkaction end return true end local minutes = 15 -- Minutos function onSay(cid, words, param) if(getPlayerPremiumDays(cid) <= 0)then return true,doPlayerSendCancel(cid, 'Need premium.')end doSetCreatureLight(cid, 50000, 2000, minutes*60*1000) doSendAnimatedText(getCreaturePosition(cid), "Luz", math.random(1, 255)) return true end

local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end function onThink() npcHandler:onThink() end local _,_,itemName = nil,nil,'' local function getCount(str) --[[( Marcryzius )]] return tonumber(str:match('(%d+)')) or 0 end local function tradeSay(str) --[[( Marcryzius )]]-- local tab,str = {},str:lower() tab[1] = str:match('sell') or str:match('buy') or '' -- Retorna se vai comprar ou vender. tab[2] = getCount(str) < 1 and 1 or getCount(str) -- Retorna a quantidade. tab[3] = str:match(tab[1]..(str:match('(%d+)') and "%s%d+%s" or " ").."(.+)") -- Retorna o nome do item. if not(tab[3])then local name = '' for nome in str:gmatch("(%a+)") do if(nome)then name = name..(name ~= '' and ' ' or '')..nome end end tab[3] = name end return unpack(tab) end local function getTabNames(tab) --[[( Marcryzius )]]-- -- Essa função retornar o valor dos index de uma tabela. local str = {} for t,v in pairs(tab) do if v then str[#str+1] = t end end return table.concat(str,', ')..'.' end ------------------- Configuração dos Itens ----------------------- local bonuscoin = 5984548 local tab = { --[nome] = {qte=quantidade de bonus coin,ID=ID dos Itens} ["pokeball"] = {qte=10,ID=12683}, ["greatball"] = {qte=12,ID=12682}, ["superball"] = {qte=15,ID=12684}, ["facebook"] = {qte=20,ID=12681}, ["holding"] = {qte=25,ID=2365}, ["love teddy"] = {qte=30,ID=15600}, ["dogs house"] = {qte=40,ID=23828}, ["music box"] = {qte=50,ID=17069}, } function creatureSayCallback(cid, type, msg) if(not npcHandler:isFocused(cid)) then return false end local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid local _,_,prod = tradeSay(msg) ------------------- MESSAGES INICIAIS ---------------------------------------- if(tab[prod])then itemName = prod selfSay('Deseja comprar um {'..getItemNameById(tab[itemName].ID)..'} Por '..(tab[itemName].qte)..' online points?', cid) selfSay('Para saber quantos pontos possui digite {!opshop}.', cid) talkState[talkUser] = 1 elseif (msgcontains(msg, 'negociar') or msgcontains(msg, 'trade')) then selfSay('No momento tenho disponivel em meu estoque os seguintes itens: '..getTabNames(tab), cid) talkState[talkUser] = 0 ---------------------- NEGOCIAÇÃO ------------------------------- elseif talkState[talkUser] == 1 then if (msgcontains(msg, 'sim') or msgcontains(msg, 'yes')) then if getPlayerStorageValue(cid, bonuscoin) >= tab[itemName].qte then setPlayerStorageValue(cid, bonuscoin, getPlayerStorageValue(cid, bonuscoin) - tab[itemName].qte) doPlayerAddItem(cid, tab[itemName].ID, 1) selfSay('Parabéns, voce acabou de adquirir 1x '..getItemNameById(tab[itemName].ID)..'!', cid) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Agora voce tem: " .. getPlayerStorageValue(cid,bonuscoin) .. " Online Bonus.") else selfSay('Voce precisa de '..(tab[itemName].qte..' online bonus para adquirir esse item.', cid) end else selfSay('Morra! FDP!', cid) end talkState[talkUser] = 0 else npcHandler:say('Foda-se! nao sei o que tu quer.', cid) end return true end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new())

na tabela items só existem 8 elementos. na linha 65, existe uma concatenação de dados que está buscando, na tabela "items", mais de 8 elementos; mais precisamente, estou citando isso aqui: Para solucionar isso, tu pode remover essas duas menções excedentes ou formular uma função que pegue os dados de forma automática da tabela.

function onUse(player, item) if(getPlayerItemCount(player, 32255) >= 1)then doPlayerRemoveItem(player, 32255, 1) local itx = doCreateItemEx(32256,1) doItemSetAttribute(itx, "description", "Item comprado por " .. getCreatureName(player)) doPlayerAddItemEx(player, itx) else doPlayerSendCancel(player, "Voce não possui coins suficiente para pegar esse item") end return true end

o log de erro do distro listou um arquivo diferente do actions.lua na qual tu cita.

onde está?

eu não te ajudo porque eu não conheço nada dos servidores 1.0+

descreva melhor o problema.

remove isso do items.xml <attribute key="slotType" value="shield" />

vá em actions.xml e adicione essa tag: <action itemid="id do item" event="script" value="changeOutFit.lua"/> agora na pasta scripts crie um arquivo com extensão lua e adicione esse código nele. caso não saiba criar um arquivo com extensão lua, copie qualquer arquivo e renomeie ele para changeOutFit abra o arquivo e apague tudo o que estiver dentro dele e adicione esse codígo: function onUse(cid, item, fromPosition, itemEx, toPosition) local outid = getCreatureOutfit(cid) local store = getPlayerStorageValue(cid,10000) -- um valor qualquer if store < 0 then doPlayerSetStorageValue(uid, 10000, outid) -- o mesmo valor qualquer doCreatureChangeOutfit(cid, newoutfitID) -- id do novo outfit else doPlayerSetStorageValue(uid, 10000, -1) -- o mesmo valor qualquer doCreatureChangeOutfit(cid, store) end return true end salve todos os arquivos e rode o servidor.

trabalhoso.

quando ele diz: duplicate move event found: ..... ele está dizendo que o codigo foi duplicado e por isso ele não sabe o que fazer. busca onde está o codigo duplicado através dos ids (8906,8907) e remove o que estiver duplicado.

ao invés de analisar cada sqm, remove tudo e cria do zero o labirinto. O script não faria analise de sqm e sim apagaria tudo e criaria o labirinto assim evitando delay de execução.

posta o shovel.lua e descreva as ações que acometeram ao erro.

local outid = getCreatureOutfit(cid) local store = getPlayerStorageValue(cid,10000) -- um valor qualquer if store < 0 then doPlayerSetStorageValue(uid, 10000, outid) -- o mesmo valor qualquer doCreatureChangeOutfit(cid, newoutfitID) -- id do novo outfit else doPlayerSetStorageValue(uid, 10000, -1) -- o mesmo valor qualquer doCreatureChangeOutfit(cid, store) end independente da collor que o player use, ela vai mudar o outfit apenas.

tem.

bless?

vai no vocations xml e ao criar o promotion tu adiciona o parametro de skills como 0 (zero).

Bom trabalho.

se o intuito é ser fiel ao da cipsoft tu teria que disponibilizar o scripts dos npcs também.

O pedido neste tópico de foi atendido e/ou o autor do tópico resolveu sua duvida. Este tópico está fechado e foi movido para Pedidos - Resolvidos. Se você tiver outros pedidos, crie um novo tópico.

Bem... parece que continua sendo ainda...