gabrielzika

@leolovee69 no seu caso seria "127.0.0.1 + 10 null"!

@leolovee69 cara eu já te expliquei, não pode exceder o limite de carácteres e nem ter menos...

@Fabio Leandro function getPlayersInRange(position, radiusx, radiusy) local creaturesList = {} for x = -radiusx, radiusx do for y = -radiusy, radiusy do if not (x == 0 and y == 0) then local creature = getTopCreature({x = position.x+x, y = position.y+y, z = position.z}) if creature.type == 1 then table.insert(creaturesList, creature.uid) end end end end local creature = getTopCreature(position) if creature.type == 1 then if not(table.find(creaturesList, creature.uid)) then table.insert(creaturesList, creature.uid) end end return creaturesList end function isPositionInArray(haystack, needle) for i = 1, #haystack do if haystack.x == needle.x and haystack.y == needle.y and haystack.z == needle.z then return true end end return false end local t = { from = {x=261, y=134, z=7}, --- Zona Num 1 to = {x=275, y=144, z=7}, ---- zona Num 8 storage = { placed = 10001, max = 10002, radius = 10003 }, delay = 3000, bombID = 10570, effect = CONST_ME_FIREAREA, blockID = 9468, text = "BOOM!", temple = {x=498, y=541, z=9}, exceptions = { {x=261, y=134, z=7}, --- zona 1 {x=262, y=134, z=7}, --- zona 2 {x=261, y=135, z=7}, --- zona 3 {x=275, y=134, z=7}, --- zona 5 {x=274, y=134, z=7}, --- zona 4 {x=275, y=135, z=7}, --- zona 6 {x=261, y=144, z=7}, --- zona 12 {x=262, y=144, z=7}, --- zona 11 {x=261, y=143, z=7}, --- zona 10 {x=275, y=144, z=7}, --- zona 8 {x=274, y=144, z=7}, --- zona 9 {x=275, y=143, z=7} --- zona 7 } } function reset() local dummy = doCreateItem(10570, 1, {x=269,y=161,z=7}) --- Centro Del Juego for x = t.from.x, t.to.x do for y = t.from.y, t.to.y do local pos = {x=x,y=y,z=t.from.z} local i1, i2, i3 = getTileItemById(pos, 8304).uid, getTileItemById(pos, 8306).uid, getTileItemById(pos, 8310).uid end end end local N, E, W, S, l = 1, 1, 1, 1, getPlayerStorageValue(cid, t.storage.radius) function loopDir(dir) local _pos = {x=pos.x+(dir=="E" and E or dir=="W" and -W or 0), y=pos.y+(dir=="N" and -N or dir=="S" and S or 0), z=pos.z} if queryTileAddThing(v, _pos, 4) == RETURNVALUE_NOERROR or getTileItemById(_pos, t.blockID).uid > 0 then doSendMagicEffect(_pos, t.effect) local c = getTopCreature(_pos).uid if isPlayer(c) and isInRange(getThingPos(c), t.from, t.to) then doSendMagicEffect(_pos, CONST_ME_GIFT_WRAPS) doTeleportThing(c, t.temple) doSendMagicEffect(t.temple, CONST_ME_MORTAREA) local n1, n2 = getPlayerName(c), getPlayerName(cid) doBroadcastMessage(n1==n2 and n1 .. " killed " .. (getPlayerSex(c) == 0 and "her" or "him") .. "self![Bomberman]" or n1 .. " was killed by " .. n2 .. "![Bomberman]", MESSAGE_STATUS_WARNING) local a = getPlayersInRange({x=497, y=500, z=9}, 7, 5) --- CENTRO DEl JUEGO if #a < 2 then doBroadcastMessage(getPlayerName(a[1]) .. " has won the match![Bomberman]", MESSAGE_STATUS_WARNING) doTeleportThing(a[1], t.temple) doSendMagicEffect(t.temple, CONST_ME_FIREWORK_RED) reset() reset() return "endgame" end else local b = getTileItemById(_pos, t.blockID).uid if b > 0 then doSendMagicEffect(_pos, CONST_ME_BLOCKHIT) doRemoveItem(b) local r = math.random(10) if r < 4 then doCreateItem(r==1 and 8304 or r==2 and 8306 or r==3 and 8310, 1, _pos) end return false end end elseif queryTileAddThing(v, _pos, 4) == 3 then return false end return true end while N <= l do local q = loopDir("N") if q == "endgame" then return doRemoveItem(v, 1) elseif not q then break else N = N + 1 end end while E <= l do local q = loopDir("E") if q == "endgame" then return doRemoveItem(v, 1) elseif not q then break else E = E + 1 end end while W <= l do local q = loopDir("W") if q == "endgame" then return doRemoveItem(v, 1) elseif not q then break else W = W + 1 end end while S <= l do local q = loopDir("S") if q == "endgame" then return doRemoveItem(v, 1) elseif not q then break else S = S + 1 end doRemoveItem(v, 1) end function onSay(cid, words, param, channel) if isInRange(getThingPos(cid), t.from, t.to) then setPlayerStorageValue(cid, t.storage.placed, math.max(getPlayerStorageValue(cid, t.storage.placed), 0)) setPlayerStorageValue(cid, t.storage.max, math.max(getPlayerStorageValue(cid, t.storage.max), 1)) setPlayerStorageValue(cid, t.storage.radius, math.max(getPlayerStorageValue(cid, t.storage.radius), 1)) if getPlayerStorageValue(cid, t.storage.placed) < getPlayerStorageValue(cid, t.storage.max) then doCreateItem(t.bombID, 1, getThingPos(cid)) addEvent(boom, t.delay, getThingPos(cid), cid) setPlayerStorageValue(cid, t.storage.placed, getPlayerStorageValue(cid, t.storage.placed) + 1) end return true end end

@leozincorsair em vname = "Sasuke Akatsuki" você tem que colocar o nome certinho da vocação, caso contrário não vai ir.... aqui de todas a maneiras q mandei até agora, funcinou 100% Tenta assim: local vocs = { [1] = {outfit = 400, effect = 35, cd = 1, vname = "Sakura"}, [2] = {outfit = 93, effect = 14, cd = 1, vname = "Sasuke Akatsuki"}, [3] = {outfit = 402, effect = 35, cd = 1, vname = "Naruto"}, } local storage = 4444 -- storage para nao poder ficar usando toda hora.. function onSay(cid, words, param) if (param == '') then local str = "" str = str .. "Vocations:\n\n" for a = 1, #vocs do str = str..""..vocs[a].vname.."\n" end doShowTextDialog(cid, 7416, str) return true end if getPlayerStorageValue(cid, storage) >= 1 then doPlayerSendTextMessage(cid,25,"Você já está usando uma outfit.") return true end for x = 1, #vocs do if string.find(string.lower(vocs[x].vname), string.lower(param)) and getPlayerVocationName(cid) ~= vocs[x].vname then doPlayerSendTextMessage(cid,25,"Sua vocação é " .. getPlayerVocationName(cid) ..".") -- quando alguem tenta usar outfit q n é da sua vocação end end for x = 1, #vocs do if string.find(string.lower(vocs[x].vname), string.lower(param)) and getPlayerVocationName(cid) == vocs[x].vname then addEvent( function() doRemoveCondition(cid, CONDITION_OUTFIT) setPlayerStorageValue(cid, storage, -1) end, vocs[x].cd * 60 * 1000) -- tempo em minutos para a outfit sair doSendMagicEffect(getThingPos(cid), vocs[x].effect) -- efeito que sai quando usa o comando doSetCreatureOutfit(cid, {lookType = vocs[x].outfit, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1) setPlayerStorageValue(cid, storage, 1) doPlayerSendTextMessage(cid,25,"Você ganhou temporariamente um outfit de ".. vocs[x].vname .."!") end end return true end

@leozincorsair acho que já sei, testa ai... local vocs = { [1] = {outfit = 400, effect = 35, cd = 1, vname = "Sakura", id = 1}, [2] = {outfit = 93, effect = 14, cd = 1, vname = "Sasuke Akatsuki", id = 502}, [3] = {outfit = 402, effect = 35, cd = 1, vname = "Naruto", id = 3}, } local storage = 4444 -- storage para nao poder ficar usando toda hora.. function onSay(cid, words, param) if (param == '') then local str = "" str = str .. "Vocations:\n\n" for a = 1, #vocs do str = str..""..vocs[a].vname.."\n" end doShowTextDialog(cid, 7416, str) return true end if getPlayerStorageValue(cid, storage) >= 1 then doPlayerSendTextMessage(cid,25,"Você já está usando uma outfit.") return true end for x = 1, #vocs do if string.find(string.lower(vocs[x].vname), string.lower(param)) and getPlayerVocation(cid) ~= vocs[x].id then doPlayerSendTextMessage(cid,25,"Sua vocação é " .. getPlayerVocationName(cid) ..".") -- quando alguem tenta usar outfit q n é da sua vocação end end for x = 1, #vocs do if string.find(string.lower(vocs[x].vname), string.lower(param)) and getPlayerVocation(cid) == vocs[x].id then addEvent( function() doRemoveCondition(cid, CONDITION_OUTFIT) setPlayerStorageValue(cid, storage, -1) end, vocs[x].cd * 60 * 1000) -- tempo em minutos para a outfit sair doSendMagicEffect(getThingPos(cid), vocs[x].effect) -- efeito que sai quando usa o comando doSetCreatureOutfit(cid, {lookType = vocs[x].outfit, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1) setPlayerStorageValue(cid, storage, 1) doPlayerSendTextMessage(cid,25,"Você ganhou temporariamente um outfit de ".. vocs[x].vname .."!") end end return true end

@leozincorsair Seguinte... tira um print e manda aqui... eu coloquei pra aparecer essa mensagem só quando exemplo, uma vocação tentasse usar a outfit de outra.... ex: um naruto falando /out sasuke

@leozincorsair Tenta assim: local vocs = { [1] = {outfit = 400, effect = 35, cd = 1, vname = "Sakura", id = 1}, [2] = {outfit = 93, effect = 14, cd = 1, vname = "Sasuke", id = 502}, [3] = {outfit = 402, effect = 35, cd = 1, vname = "Naruto", id = 3}, } local storage = 4444 -- storage para nao poder ficar usando toda hora.. function onSay(cid, words, param) if (param == '') then local str = "" str = str .. "Vocations:\n\n" for a = 1, #vocs do str = str..""..vocs[a].vname.."\n" end doShowTextDialog(cid, 7416, str) return true end if getPlayerStorageValue(cid, storage) >= 1 then doPlayerSendTextMessage(cid,25,"Você já está usando uma outfit.") return true end for x = 1, #vocs do if string.find(string.lower(vocs[x].vname), string.lower(param)) and getPlayerVocation(cid) ~= vocs[x].id then doPlayerSendTextMessage(cid,25,"Sua vocação é " .. getPlayerVocationName(cid) ..".") -- quando alguem tenta usar outfit q n é da sua vocação end end for x = 1, #vocs do if string.find(string.lower(vocs[x].vname), string.lower(param)) and getPlayerVocation(cid) == vocs[x].id then addEvent( function() doRemoveCondition(cid, CONDITION_OUTFIT) setPlayerStorageValue(cid, storage, -1) end, vocs[x].cd * 60 * 1000) -- tempo em minutos para a outfit sair doSendMagicEffect(getThingPos(cid), vocs[x].effect) -- efeito que sai quando usa o comando doSetCreatureOutfit(cid, {lookType = vocs[x].outfit, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1) setPlayerStorageValue(cid, storage, 1) doPlayerSendTextMessage(cid,25,"Você ganhou temporariamente um outfit de ".. vocs[x].vname .."!") end end return true end se der outro erro manda ai... desiste não mano!

o erro ainda é o mesmo? de sendmsgplayer???

@mostjf veja se o seu funciona assim: local rnd = {"VIP"} function onLogin(cid) if isPremium(cid) == true then sendEffect(cid) end return true end function sendEffect(cid) if isPlayer(cid) then local w = math.random (1,#rnd) doSendAnimatedText(getCreaturePosition(cid), ""..rnd[w].."", 251) addEvent(sendEffect, 2000,cid) end return true end Ps: Não testei!

@mostjf local tempo = 10 --tempo em segundos function onLogin(cid) if isPremium(cid) == true then TopEffect(cid) end return true end function TopEffect(cid) if isPlayer(cid) then doSendAnimatedText(getCreaturePosition(cid), "[VIP]", TEXTCOLOR_LIGHTBLUE) addEvent(TopEffect, tempo*1000, cid) end return true end

@leozincorsair local vocs = { [1] = {outfit = 400, effect = 35, cd = 1, vname = "Sakura", id = 1, msg = "Você ganhou temporariamente um outfit da Sakura!"}, [2] = {outfit = 93, effect = 14, cd = 1, vname = "Sasuke", id = 502, msg = "Você ganhou temporariamente um outfit da Sasuke!"}, [3] = {outfit = 402, effect = 35, cd = 1, vname = "Naruto", id = 3, msg = "Você ganhou temporariamente um outfit da Naruto!"}, } local storage = 4444 -- storage para nao poder ficar usando toda hora.. function onSay(cid, words, param) if (param == '') then local str = "" str = str .. "Vocations:\n\n" for a = 1, #vocs do str = str..""..vocs[a].vname.."\n" end doShowTextDialog(cid, 7416, str) return true end if getPlayerStorageValue(cid, storage) >= 1 then sendMsgToPlayer(cid, 27, "Você já está usando uma outfit") return true end for x = 1, #vocs do if string.find(string.lower(vocs[x].vname), string.lower(param)) and getPlayerVocation(cid) ~= vocs[x].id then sendMsgToPlayer(cid, 27, "Sua vocação é " .. getPlayerVocationName(cid) .."") -- quando alguem tenta usar outfit q n é da sua vocação end end for x = 1, #vocs do if string.find(string.lower(vocs[x].vname), string.lower(param)) and getPlayerVocation(cid) == vocs[x].id then addEvent( function() doRemoveCondition(cid, CONDITION_OUTFIT) setPlayerStorageValue(cid, storage, -1) end, vocs[x].cd * 60 * 1000) -- tempo em minutos para a outfit sair doSendMagicEffect(getThingPos(cid), vocs[x].effect) -- efeito que sai quando usa o comando doSetCreatureOutfit(cid, {lookType = vocs[x].outfit, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1) setPlayerStorageValue(cid, storage, 1) sendMsgToPlayer(cid, 27, "".. vocs[x].msg.. "") end end return true end

@leozincorsair manda o script com as alterações que você fez...

@leozincorsair post editado, erro corrigido!

@joaopedrodepaiva fala o ip que você tá querendo por, vou tentar colocar pra você! ou ao menos a quantidade de caracteres...

@bismarkzika tenta importar o seu mapa

@leozincorsair veja se é isso que você quer testei aqui e está 100%... se quiser que perca quando desloga , eu posso fazer tambem Abraço! Neste Script quando o Player Digitar somente; /out -- o comando pode ser trocado na tag do .xml abrirá uma janela com o nome de todas as vocações que tem esse comando... local vocs = { [1] = {outfit = 400, effect = 35, cd = 1, vname = "Sakura", id = 1, msg = "Você ganhou temporariamente um outfit da Sakura!"}, [2] = {outfit = 401, effect = 35, cd = 1, vname = "Sasuke", id = 2, msg = "Você ganhou temporariamente um outfit da Sasuke!"}, [3] = {outfit = 402, effect = 35, cd = 1, vname = "Naruto", id = 3, msg = "Você ganhou temporariamente um outfit da Naruto!"}, } local storage = 4444 -- storage para nao poder ficar usando toda hora.. function onSay(cid, words, param) if (param == '') then local str = "" str = str .. "Vocations:\n\n" for a = 1, #vocs do str = str..""..vocs[a].vname.."\n" end doShowTextDialog(cid, 7416, str) return true end if getPlayerStorageValue(cid, storage) >= 1 then sendMsgToPlayer(cid, 27, "Você já está usando uma outfit") return true end for x = 1, #vocs do if string.find(string.lower(vocs[x].vname), string.lower(param)) and getPlayerVocation(cid) ~= vocs[x].id then sendMsgToPlayer(cid, 27, "Sua vocação é " .. getPlayerVocationName(cid) .."") -- quando alguem tenta usar outfit q n é da sua vocação end end for x = 1, #vocs do if string.find(string.lower(vocs[x].vname), string.lower(param)) and getPlayerVocation(cid) == vocs[x].id then addEvent( function() doRemoveCondition(cid, CONDITION_OUTFIT) setPlayerStorageValue(cid, storage, -1) end, vocs[x].cd * 60 * 1000) -- tempo em minutos para a outfit sair doSendMagicEffect(getThingPos(cid), vocs[x].effect) -- efeito que sai quando usa o comando doSetCreatureOutfit(cid, {lookType = vocs[x].outfit, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1) setPlayerStorageValue(cid, storage, 1) sendMsgToPlayer(cid, 27, vocs[x].msg) end end return true end <talkaction hide="yes" words="/out;!out" event="script" value="NomeDoArquivo.lua"/>

@leozincorsair local level = 200 local premio = 2160 local storage = 444445 function onUse(cid, item, frompos, item2, topos) if item.uid == 7181 then queststatus = getPlayerStorageValue(cid,storage) if queststatus == -1 then if getPlayerLevel(cid) >= level then doPlayerSendTextMessage(cid,25,"Parabens...") doPlayerAddItem(cid,premio,1) setPlayerStorageValue(cid,storage,1) else doPlayerSendTextMessage(cid,25,"Voce Precisa de LEVEL "..level..".") end else doPlayerSendTextMessage(cid, 22, "Vázio") end return 0 end return 1 end <action uniqueid="7181" event="script" value="quests/NomeDoArquivo.lua"/>

Talvez tenha algo de errado no Shop do Site...

@FelipeMeyrelles veja se o Meu Funciona ai... function onThink(interval, lastExecution, thinkInterval) local result = db.getResult("SELECT * FROM shop_history WHERE `processed` = 0;") if(result:getID() ~= -1) then while(true) do cid = getCreatureByName(tostring(result:getDataString("player"))) product = tonumber(result:getDataInt("product")) itemr = db.getResult("SELECT * FROM shop_offer WHERE `id` = "..product..";") if isPlayer(cid) then local id = tonumber(itemr:getDataInt("item")) local tid = tonumber(result:getDataInt("id")) local count = tonumber(itemr:getDataInt("count")) local tipe = tonumber(itemr:getDataInt("type")) local productn = tostring(itemr:getDataString("name")) if isInArray({5,8},tipe) then if getPlayerFreeCap(cid) >= getItemWeightById(id, count) then if isContainer(getPlayerSlotItem(cid, 3).uid) then received = doAddContainerItem(getPlayerSlotItem(cid, 3).uid, id,count) if received then doPlayerSendTextMessage(cid,19, "You have received >> "..productn.." << from Shop.") db.executeQuery("UPDATE `shop_history` SET `processed`='1' WHERE id = " .. tid .. ";") else doPlayerSendTextMessage(cid,19, "Sorry, you don't have enough space on container to receive >> "..productn.." <<") end else doPlayerSendTextMessage(cid,19, "Sorry, you don't have a container to receive >> "..productn.." <<") end else doPlayerSendTextMessage(cid,19, "Sorry, you don't have enough capacity to receive >> "..productn.." << (You need: "..getItemWeightById(id, count).." Capacity)") end elseif isInArray({6,7},tipe) then if tipe == 6 then bcap = 8 bid = 1987 elseif tipe == 7 then bcap = 20 bid = 1988 end if isItemRune(id) then count = 1 end if getPlayerFreeCap(cid) >= (getItemWeightById(1987, 1) + getItemWeightById(id,count * bcap)) then local bag = doCreateItemEx(bid, 1) for i = 1,bcap do doAddContainerItem(bag, id, count) end received = doPlayerAddItemEx(getPlayerSlotItem(cid, 3).uid, bag) if received == RETURNVALUE_NOERROR then doPlayerSendTextMessage(cid,19, "You have received >> "..productn.." << from Shop.") db.executeQuery("UPDATE `shop_history` SET `processed`='1' WHERE id = " .. tid .. ";") else doPlayerSendTextMessage(cid,19, "Sorry, you don't have enough space to receive >> "..productn.." <<") end else doPlayerSendTextMessage(cid,19, "Sorry, you don't have enough capacity to receive >> "..productn.." << (You need: "..getItemWeightById(id, count).." Capacity)") end end end itemr:free() if not(result:next()) then break end end result:free() end return true end

@FelipeMeyrelles manda seu shop.lua ai

@leolovee69 veja ai onde você errou! editei o client aqui e está funcionando. Tibia.exe

@leolovee69 manda o Link do Client Original...

@leolovee69 depende de quantos digitos tiver o ip, o client necessita ler 19 caracteres... você coloca o seu ip + o NULL pra interar 19.. exemplo quando vc for trocar de ip terá que apagar o 127.0.0.1 + os 10 NULL que você colocou!

@leolovee69 Beleza, faz o seguinte! Abre seu NotePad++ vai em editar ai lá embaixo vai ter Painel de Caracteres... clique lá no canto direito vai aparecer todos os caracteres vai onde você colocou o 127.0.0.1 na frente do 1 Aperta 10x no NULL.. parecido com isso: tem que ser 10x se for menos irá bugar, se for mais tbm!

@leolovee69 Qual Ip estava Lá antes?? e quantos digitos tem o ip q você tá querendo colocar?