MatheusGlad

function string.explode(str, sep) -- function by MatheusMkalo local dat = {} local lastsep = 0 for i = 1, #str do if str: sub(i, i+#sep-1) == sep then local addt = lastsep == 0 and str: sub(1, i-1) or str: sub(lastsep+#sep, i-1) if addt ~= "" then table.insert(dat, addt) end str = str:sub(1, i-1) .. str:sub(i+#sep-1) lastsep = i-#sep+1 end if #dat == 0 and i == #str then table.insert(dat, str) break end if i == #str then table.insert(dat, str: sub(lastsep+#sep, #str)) end end return dat end Funçao string.explode dos ots em lua... N funfa com pattern

Nao deu em nada tbm @Edit ACHEI O ERRO, O CHAR QUE EU TAVA TENTANDO NAO ERA PREMMY EU SOU MUITO BURRO PQP

local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local talkState = {} function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) talkState[cid] = 0 end function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end function onThink() npcHandler:onThink() end function creatureSayCallback(cid, type, msg) if(not npcHandler:isFocused(cid)) then return false end if msgcontains(msg:lower(), "addon") and getPlayerStorageValue(cid, 55413) == 2 then if os.time()-getPlayerStorageValue(cid, 55414) >= 2*60 then doPlayerAddOutfit(cid, 128, 1) doPlayerAddOutfit(cid, 136, 1) return selfSay("Just in time! Your backpack is finished. Here you go, I hope you like it.", cid) else return selfSay("Uh... I didn't expect you to return that early. Sorry, but I'm not finished yet with your backpack. I'm doing the best I can, promised.", cid) end end if msgcontains(msg:lower(), "addon") then selfSay("Sorry, the backpack I wear is not for sale. It's handmade from rare minotaur leather.", cid) elseif msgcontains(msg:lower(), "minotaur leather") then selfSay("Well, if you really like this backpack, I could make one for you, but minotaur leather is hard to come by these days. Are you willing to put some work into this?", cid) talkState[cid] = 1 elseif msgcontains(msg:lower(), "yes") and talkState[cid] == 1 then selfSay("Alright then, if you bring me 100 pieces of fine minotaur leather I will see what I can do for you. You probably have to kill really many minotaurs though... so good luck!", cid) setPlayerStorageValue(cid, 55413, 1) talkState[cid] = 0 elseif msgcontains(msg:lower(), "no") and talkState[cid] == 1 then selfSay("So what you want from me?", cid) talkState[cid] = 0 end if msgcontains(msg:lower(), "backpack") and getPlayerStorageValue(cid, 55413) == 1 then selfSay("Ah, right, almost forgot about the backpack! Have you brought me 100 pieces of minotaur leather as requested?", cid) talkState[cid] = 2 elseif msgcontains(msg:lower(), "yes") and talkState[cid] == 2 then if doPlayerRemoveItem(cid, 5878, 100) then selfSay("Great! Alright, I need a while to finish this backpack for you. Come ask me later, okay?", cid) setPlayerStorageValue(cid, 55413, 2) setPlayerStorageValue(cid, 55414, os.time()) else selfSay("You don't have 100 pieces of minotaur leather", cid) end talkState[cid] = 0 elseif msgcontains(msg:lower(), "no") and talkState[cid] == 2 then selfSay("So, come back when you have the 100 minotaur leathers.", cid) talkState[cid] = 0 end end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) Nao ta adicionando o addon n sei pq, mas tipo ele manda a msg: Just in time! Your backpack is finished. Here you go, I hope you like it. Entao ele executou a funçao pra add o addon mais n adicionou '-' Quem conseguir ganha um pirulito.

Em todos os scripts bote essas funçoes: 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 Mude todos addEvent por creatureEvent. Funções by Colex.

Falta informaçao: Ao clicar na estatua, ele perdera algum item/dinheiro? Precisa de level? ...

Erro: local tabela = { {nome="Bruno", idade=22, sexo="Masculino"}, {nome="Thiago", idade=17, sexo="Masculino"}, {nome="Marina", idade=16, sexo="Feminino"} } tabela[1][1] nao retorna Bruno, somente tabela[1].nome retorna bruno ou tabela[1]["nome"] Tirando isso ta bom o tutorial

em vez de print usa error(), so botar error(msg)

Faz um script.lua na pasta actions/scripts com o nome de hota e bota esse script: function onUse(cid, item) local recompensa = 2342 -- | local ids = {2335,2336,2337,2338,2339,2340,2341} -- | Mude se precisar local tilepos = {x=32807,y=32270,z=12} -- | local tab = {} local value = true if getPlayerStorageValue(cid, 66654) >= 1 then return doPlayerSendCancel(cid, "Voce ja fez essa quest.") end for i = 1,7 do tab[i] = getThingFromPos({x=tilepos.x,y=tilepos.y,z=tilepos.z,stackpos=i}).itemid end for i = 1,7 do if not table.find(ids, tab[i]) then value = false break end ids[table.find(ids, tab[i])] = nil end if value then doPlayerAddItem(cid, recompensa) setPlayerStorageValue(cid, 66654, 1) for i = 1,7 do doRemoveItem(getThingFromPos({x=tilepos.x,y=tilepos.y,z=tilepos.z,stackpos=1}).uid) end end return TRUE end Agora va em actions.xml e bote essa tag: <action actionid="66654" event="script" value="hota.lua"/> Ai é so voce botar o ActionID 66654 em uma alavanca pedra, tanto faz que quando der use nela vai retirar os items do tile e da um hota pro player

Quando vai começar a contar? Quando ele passar por uma porta? Entrar num teleport? Pisar em um chao? E tambem quando vai terminar, somente quando os segundos acabarem?

Tem que botar o tempo nos dois scripts, eles devem ser iguais ...

nunca mesmo '-' Jv no gmail: eu: Voce ainda me acha puxa saco? '-' jvchequer: aquilo nao fui eu que fiz -.-

function doAddMonsterInXML(monstername, file) local monsterxml = "C:/Users/user/Desktop/Snowz Thyranic 3.1 (8.6)/data/monster/monsters.xml" local fil = io.open(monsterxml, "r") local text = fil:read("*a") local fil2 = io.open(monsterxml, "w") local k,x = text:find("</monsters>") local tex = text:sub(1, k-1) .. '\n <monster name="' .. monstername .. '" file="' .. file .. '"/>' .. "\n </monsters>" fil2:write(tex) return TRUE end doAddMonsterInXML("Dragon", "Apes/dragon.xml") Ai voce edita o monsterxml pra o local do seu monsters.xml

function doEditName(file, newname, oldname) local fil = io.open(file, "a+") local text = fil:read("*all") fil:close() local k,x = text:find(oldname) local wrt = text:sub(1, k-1) .. newname .. text:sub(x+1) local fip = io.open(file, "w") fip:write(wrt) fip:close() return TRUE end doEditName("C:/Users/user/Desktop/Snowz Thyranic 3.1 (8.6)/data/monster/Apes/sibang.xml", "Dragon", "Sibang") function doCopyFile(file, newfile) local fil = io.open(file, "r") local text = fil:read("*a") local fil2 = io.open(newfile, "a+") fil2:write(text) fil2:close() fil:close() return TRUE end doCopyFile("C:/Users/user/Desktop/Snowz Thyranic 3.1 (8.6)/data/monster/Apes/sibang.xml", "C:/Users/user/Desktop/Snowz Thyranic 3.1 (8.6)/data/monster/Apes/dragon.xml")

data/actions/scripts/itemlife.lua: function onUse(cid, item) setCreatureMaxHealth(cid, getCreatureMaxHealth(cid)+10000) doRemoveItem(item.uid, 1) return TRUE end TAG: <action itemid="ITEMID" event="script" value="itemlife.lua"/> Aonde ta ITEMID voce bota o id do item que vai dar 10k de life.

oO Cara e as informaçoes dos itens? frases? npc?

Bem eu nao botei opçao pra vip e outras pois o autor do pedido nao pediu isso, se eu estivesse postando, concerteza botaria. A pra nao aparecer no default, esqueci de por um baguizin: function isWalkable(pos, creature, proj, pz)-- by Nord if getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}).itemid == 0 then return false end if getTopCreature(pos).uid > 0 and creature then return false end if getTileInfo(pos).protection and pz then return false, true end local n = not proj and 3 or 2 for i = 0, 255 do pos.stackpos = i local tile = getTileThingByPos(pos) if tile.itemid ~= 0 and not isCreature(tile.uid) then if hasProperty(tile.uid, n) or hasProperty(tile.uid, 7) then return false end end end return true end function onSay(cid, words) if not getHouseByPlayerGUID(getPlayerGUID(cid)) then return doPlayerSendCancel(cid, "Voce nao tem casa.") end local pos = getHouseEntry(getHouseByPlayerGUID(getPlayerGUID(cid))) if getCreatureCondition(cid, CONDITION_INFIGHT) then return doPlayerSendCancel(cid, "Voce tem que estar sem battle.") end if not getTilePzInfo({x=pos.x-1, y=pos.y, z=pos.z}) and isWalkable({x=pos.x-1, y=pos.y, z=pos.z}) then pos = {x=pos.x-1, y=pos.y, z=pos.z} elseif not getTilePzInfo({x=pos.x+1, y=pos.y, z=pos.z}) and isWalkable({x=pos.x+1, y=pos.y, z=pos.z}) then pos = {x=pos.x+1, y=pos.y, z=pos.z} elseif not getTilePzInfo({x=pos.x, y=pos.y+1, z=pos.z}) and isWalkable({x=pos.x, y=pos.y+1, z=pos.z}) then pos = {x=pos.x, y=pos.y+1, z=pos.z} elseif not getTilePzInfo({x=pos.x, y=pos.y-1, z=pos.z}) and isWalkable({x=pos.x, y=pos.y-1, z=pos.z}) then pos = {x=pos.x, y=pos.y-1, z=pos.z} end doTeleportThing(cid, pos) return TRUE end

Va em data/talkactions/scripts adicione um script.lua com o nome de home e bote esse script: function isWalkable(pos, creature, proj, pz)-- by Nord if getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}).itemid == 0 then return false end if getTopCreature(pos).uid > 0 and creature then return false end if getTileInfo(pos).protection and pz then return false, true end local n = not proj and 3 or 2 for i = 0, 255 do pos.stackpos = i local tile = getTileThingByPos(pos) if tile.itemid ~= 0 and not isCreature(tile.uid) then if hasProperty(tile.uid, n) or hasProperty(tile.uid, 7) then return false end end end return true end function onSay(cid, words) if not getHouseByPlayerGUID(getPlayerGUID(cid)) then return doPlayerSendCancel(cid, "Voce nao tem casa.") end local pos = getHouseEntry(getHouseByPlayerGUID(getPlayerGUID(cid))) if getCreatureCondition(cid, CONDITION_INFIGHT) then return doPlayerSendCancel(cid, "Voce tem que estar sem battle.") end if not getTilePzInfo({x=pos.x-1, y=pos.y, z=pos.z}) and isWalkable({x=pos.x-1, y=pos.y, z=pos.z}) then pos = {x=pos.x-1, y=pos.y, z=pos.z} elseif not getTilePzInfo({x=pos.x+1, y=pos.y, z=pos.z}) and isWalkable({x=pos.x+1, y=pos.y, z=pos.z}) then pos = {x=pos.x+1, y=pos.y, z=pos.z} elseif not getTilePzInfo({x=pos.x, y=pos.y+1, z=pos.z}) and isWalkable({x=pos.x, y=pos.y+1, z=pos.z}) then pos = {x=pos.x, y=pos.y+1, z=pos.z} elseif not getTilePzInfo({x=pos.x, y=pos.y-1, z=pos.z}) and isWalkable({x=pos.x, y=pos.y-1, z=pos.z}) then pos = {x=pos.x, y=pos.y-1, z=pos.z} end doTeleportThing(cid, pos) end Agora va em talkactions.xml e adicione essa linha: <talkaction words="!home" event="script" value="home.lua"/>

if getPlayerItemCount(cid, balls, 2589) <= 6 then A funçao /\ no otscript live nao retorna nada, nil. Portanto vai dar error se tu tenta comparar ela com um numero

Comprei 20k e ainda nao chego :'( kkk Jaja chega, eles sao bem serios, ligaram ate pra minha casa pra falar com a minha mae oO

function getUidsInContainer(containeruid) -- By MatheusMkalo local dat = {} for i = 0, (getContainerSize(containeruid)-1) do local item = getContainerItem(containeruid, i) if isContainer(item.uid) then local items = getUidsInContainer(item.uid) for i = 0, #items do table.insert(dat, items[i]) end else table.insert(dat, item.uid) end end return dat end Observaçoes: Nao botei pra pegar o uid das Backpacks ou bags ou qualquer coisa que seja container dentro do container. Os uids vem numa table assim: {70000, 700001} Espero que ajude

Ae sim em. Ficou bunitenho. Caverna Feita pelo Caverna