Vinc

sim se tu instala ele da pra fase um script que so a uma voc possa usar duas armas.

one shot n seria melhor usar doCopyItem(item, attributes) para copiar os atributos?que vai que o item tenha upgrade e tals(tipo como seu script de forge).

na verdade o erro foi meu,eu coloquei uma letra minuscula no getCreaturePos o 'p' ta va minusculo), e o getCreaturestorageValue é que tava fasendo ums negocio pra pokemon pruncara,dae no pokemon tem essa função(que na verdade é a mesma coisa que com player). editado la obs: ele uso o script do exemplo.

cara pra n te que passa por cima de outro monstro é so edita o monster.xml e adiona a tag,dai da pra por o nome certinho pra usa /m

cara tem uma seção reservada para tutorias reportado para que um moderador mova

so pra diminui mesmo,é mais rapido pra digitar. sauhsasuahsauh obs1:usei essas funções numa outra biblioteca que to fasendo,vai fica muito foda,e bem organizada(se fosse pra posta ela sem a organização ja teria postado a muito tempo) obs2:a outra lib que citei acima tbm usara essa funções( na verdade fiz elas exatamente para isso).

1 use o exemplo nesse link http://www.xtibia.com/forum/topic/189268-tabletostring-e-loadtablestring/ a tag da talk fica <talkaction words="savepos;returnpos" event="script" value="nomedoarquivo.lua"/> n esquece de trocar o value pelo nome do arquivo que tu coloca, e é nessesario copiar as funções na lib 2 vc precisa de uma função setcreatureName, caso seu server n tenha,vc vai precisa das sourcers dele pois so é posivel fasela em c++,essa função esta disponivel na area de codigos prontos 3 mude oncastspell(cid,var) para onSay(cid,words,param) e use funções como doAddCondition(cid, condition) doRemoveCondition(cid, type[, subId]) doRemoveConditions(cid[, onlyPersistent]) doAreaCombatHealth(cid, type, pos, area, min, max, effect) doTargetCombatHealth(cid, target, type, min, max, effect) doAreaCombatMana(cid, pos, area, min, max, effect) doTargetCombatMana(cid, target, min, max, effect) doAreaCombatCondition(cid, pos, area, condition, effect) doTargetCombatCondition(cid, target, condition, effect) doAreaCombatDispel(cid, pos, area, type, effect) doTargetCombatDispel(cid, target, type, effect) 4 use um creturescript onTarget(cid,target) e use doTeleportThing(cid, getCreaturePos(target)),para n teleporta em tile que n dão para andar vose vai presisar de uma função getFreetile que pode ser encontrada nas lib de qualquer serve de pokemon

bom essa duas funções são bem simples de entder o que elas fazem . tabletostring comverte tabelas em strings iguais a elas(mas desordenadas pela função pairs) loadtablestring transforma uma string de table em uma table comun antes que venham pergunta ou criticar leiam as respostas abaixo random noob:lord, ja n existe a função table.concat?pra que essa? lordbug99: a funçao concat n ser pra isso,ela apenas pegas os elemtos de uma tabela e os junta numa string separados pelo sep que vc escolher ela excui os index, deixa sem as chaves(pois n fas parte da função dela),e se um dos elementos dessa tabela for uma tabela ela retorna um erro,já minha função tranforma em uma replica da tabela(com index,aceita tabelas dentro de tabelas). random noob2:mas n é so usar tosting? lordbug99:n se vc fiser isso ele vai so comverter a alocação da tabela em string(algo tipo 3xx2547) aki vão as funções(nessesario copiar tudo),assim já ia esqucendo de fala tem mais duas funçoes de bonus(istable e isstring) obs:obrigatoriamente tem que copiar as funções istring e istable(elas saõ usadas na tabletostring) para adiconalas basta ir a pasta lib e em qualque um dos arquivos, apos o final adicionalas(de preferencia adicioneas no arquivo 050-functions para ficar organizado) function tabletostring(tab) st = "{" k = 0 for x,y in pairs(tab) do if istable(x) then st = st.."["..tabletostring(x).."] = " k =1 elseif isstring(x) then st = st.."['"..x.."'] = " k =1 else st = st.."["..x.."] = " k =1 end if istable(y) then st = st..""..tabletostring(y).."," k =1 elseif isstring(y) then st = st.."'"..y .."'," k =1 else st = st..""..y.."," k =1 end end if k == 1 then st = st:sub(1,-2) end st = st.."}" return st end function istable(t) if type(t) == "table" then return true else return false end end function isstring(t) if type(t) == "string" then return true else return false end end function loadstringtable(str) if isstring(str) then t = loadstring('return'..str) tab = t() return tab end return false end table.tostring = tabletostring string.loadtable = loadstringtable exexemplo de uso(bem simples) function onSay(cid,words,param) if words:lower() == "savepos" then pos = getCreaturePos(cid) storagepos = tabletostring(pos) setPlayerStorageValue(cid,5754,storagepos) elseif words:lower() == "returnpos" then stroagepos = getPlayerStorageValue(cid,5754) pos = {} if isstring(storagepos) then pos = loadstringtable(storagepos) if pos then doTeleportThing(cid, pos) end end end return true end obs: lembre-se quer tab.x == tab["x"] (então todos vão ficar da forma ['x'])

tente assim function onTargetTile(cid, position) position.stackpos = 255 local k = doCreateMonster("headcaptor", position) if isMonster(k) then doConvinceCreature(cid, k) end doSendMagicEffect(position, CONST_ME_MAGIC_BLUE) return true end

tenta sssim function getTime(s) local n = math.floor(s / 60) s = s - (60 * n) return n, s end CreatureEventChecker = function(event, ...) -- Colex if isCreature(arg[1]) then event(unpack(arg)) end end creatureEvent = function(event, delay, ...) -- Colex addEvent(CreatureEventChecker, delay, event, unpack(arg)) end function onUse(cid,item,frompos,item2,topos) configs = { time = 300, needpa = TRUE, needlvl = {TRUE, level = 1}, costmana = {TRUE, mana = 10}, removeonuse = TRUE } if configs.needpa and not isPremium(cid) then return doPlayerSendCancel(cid, "You need to be a premmium account to use this item.") end if configs.needlvl[1] and getPlayerLevel(cid) < configs.needlvl.level then return doPlayerSendCancel(cid, "You need to be level " .. configs.needlvl.level .. " to use this item.") end if configs.costmana[1] then if getCreatureMana(cid) < configs.costmana.mana then return doPlayerSendCancel(cid, "You need " .. configs.costmana.mana .. " mana to use this item.") else doCreatureAddMana(cid, -configs.costmana.mana) end end if configs.removeonuse then doRemoveItem(item.uid, 1) end for i = configs.time*60, 1, -1 do local a = math.floor(i/60) .. ":" .. i - (60 * math.floor(i/60)) if #a < 4 then a = string.sub(a,1,2) .. "0" .. string.sub(a, 3) end if i == configs.time*60 then creatureEvent(doPlayerSendCancel, configs.time*60*1000, cid, "The effect of the double exp potion end.") end creatureEvent(doPlayerSendCancel, (configs.time*60-i)*1000, cid, "The effect of the double exp will end in "..a..".") end doPlayerSetExperienceRate(cid, 2) creatureEvent(doPlayerSetExperienceRate, configs.time *60*1000, cid, 1) doPlayerSendTextMessage(cid, 22, "Agora voce ira receber o dobro de exp por matar os mosntros.") return TRUE end

n é isso o problema provavelmente e nas flag dos groups, de god e cm,gm va na pasta XML e abra groups depois procure no google "calculadora de flags tibia" escolha as flags que quer pro seus god e gm e tals e copie no campo de flags do god e mesmo para gms

eu n testei.eu apenas avisei, por que estava visivel. e nem testarei

cara usa a area de pedidos,né infelis

essa annemotta ão ruizinha, que n consegue nem ser banida......

deu bug na formatação,algums sinais como "<",">" e outros bugaram,arrume

function onStepIn(cid, item, position, fromPosition) local reset = 2 ---Quantidade de reset necessaria-------- function getPlayerReset(cid) local qr = db.getResult("SELECT `reset` FROM `players` WHERE `id`= "..getPlayerGUID(cid)..";") rss = qr:getDataInt("reset", getPlayerGUID(cid)) if rss <= 0 then rss = 0 end return tonumber(rss) end if getPlayerReset(cid) < reset then doTeleportThing(cid, fromPosition, true) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Voce nao tem "..reset.." de reset") doSendMagicEffect(getThingPos(cid), CONST_ME_MAGIC_BLUE) return TRUE end doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Seja bem vindo") return TRUE end

mas se uso a talk desse sistema?a talk é diferente é !autoloot nomedoitem ou !autoloot nomedoitem,nomedooutroitem,outroitem... se uso /aloot ou !autoloot add n vai funfa mesmo

tava flatando o sinal < na linha 7 function onStepIn(cid, item, position, fromPosition) local reset = 2 ---Quantidade de reset necessaria-------- function getPlayerReset(cid) local qr = db.getResult("SELECT `reset` FROM `players` WHERE `id`= "..getPlayerGUID(cid)..";") rss = qr:getDataInt("reset", getPlayerGUID(cid)) if rss <= 0 then rss = 0 end return rss end if not getPlayerReset(cid) >= reset then doTeleportThing(cid, fromPosition, true) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Voce nao tem "..reset.." de reset") doSendMagicEffect(getThingPos(cid), CONST_ME_MAGIC_BLUE) return TRUE end doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Seja bem vindo") return TRUE end

usa o do mkalo, que tem na seção de systemas e mods http://www.xtibia.com/forum/topic/173614-auto-loot-system/

formatão maldita ta bugando tudo,na da pra entede nada

vaja os stages

qual o erro? poste-o obs; n pode ser auqle erro de antes,porque akilo era um erro de formatção do site

cara se dexo a variavel completamente errada e tinha um erro grave na comparação de valores(so tinha um =) function onStepIn(cid, item, position, fromPosition) local reset = 2 ---Quantidade de reset necessaria-------- function getPlayerReset(cid) local qr = db.getResult("SELECT `reset` FROM `players` WHERE `id`= "..getPlayerGUID(cid)..";") rss = qr:getDataInt("reset", getPlayerGUID(cid)) if rss = 0 then rss = 0 end return rss end if not getPlayerReset(cid) >= reset then doTeleportThing(cid, fromPosition, true) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Voce nao tem "..reset.." de reset") doSendMagicEffect(getThingPos(cid), CONST_ME_MAGIC_BLUE) return TRUE end doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Seja bem vindo") return TRUE end

se pode usar o launcher http://www.xtibia.com/forum/topic/188059-launcher-update-para-o-seu-otserver/

seila,cara dai n sei,as veses é o caso de usa uma table e shopwindow.