Ir para conteúdo

MatheusGlad

Conde
  • Total de itens

    528
  • Registro em

  • Última visita

  • Dias Ganhos

    30

Tudo que MatheusGlad postou

  1. Tem erro sim pq soh vai funcionar quando falar open n vai dar pra fexar (se funcionar tem que testar) Eu fiz da forma que ta la pra ficar mais organizado... E nao consigui oq seria "mais facil" de configurar ai na ediçao que voce fez, ja que o script ele soh tem que configurar a table doors...
  2. local doors = { [1] = {x=361, y=72, z=7}, [2] = {x=362, y=72, z=7}, } local config = { openID = 9170, closedID = 9169 } function onSay(cid, words, param) if param == "open" then for i,x in ipairs(doors) do for stack = 0, 255 do x.stackpos = stack local item = getThingFromPos(x) if item.itemid == config.closedID then doTransformItem(item.uid, config.openID) break end end end elseif param == "close" then for i,x in ipairs(doors) do for stack = 0, 255 do x.stackpos = stack local item = getThingFromPos(x) if item.itemid == config.openID then doTransformItem(item.uid, config.closedID) break end end end end return true end !coliseum open !coliseum close Bota o resto das pos la, soh ir botando todas as pos das portas... flw
  3. voce incluiu isso quando disse que o meu script nao tinha mais vantagens... ja que fzer 1 loop infinito eh mais prejudicial do que 1 lib externa...
  4. voce acha mesmo que a funçao os.sleep faz um loop ate o tempo acabar? acho que nao hein e ja que voce usou a funçao os.clock creio que voce saiba oq ela retorna vejamos tente fazer isso: for i = 1, 400000000 do end print("oi") addEvent(print, 5000, "aee") vai printar oi, e aee praticamente ao mesmo tempo concerta seu script ai plz Edit: Whatever, pra acabar com esse seu argumento tosco de falar que eu to usando lib externa: local Events = {} function Events:new() return setmetatable({} ,{__index = self}) end function Events:add(func, time, ...) table.insert(self, {func, time, arg}) end function Events:check() local n = os.clock() while #self > 0 do for i,x in ipairs(self) do if os.clock()-n > x[2]/1000 then x[1](unpack(x[3])) table.remove(self, i) end end end end Com isso voce adiciona eventos e no final do script voce bota o check, claro se voce botar um loop grande antes do check nao vai funcionar de acordo, eh o maximo que pode chegar sem nenhuma lib. local events = Events:new() events:add(print, 5000, "Aee") events:add(print, 1000, "Oii") events:check()
  5. Voce tem que baixar o dev-cpp com as libs do tibia, se nao n compila xD da uma procurada: Stian's Repack Dev-cpp
  6. Nao vi erro no script mas... sei la talvez sua source esteja bugando no doPlayerSendTextMesssage tenta isso: function onStepIn(cid, item, position, fromPosition) local config = { msgDenied = "Você precisa ser vip.", msgWelcome = "Bem-Vindo a Area Vip!." } if getPlayerStorageValue(cid, 13540) - os.time() <= 0 then doTeleportThing(cid, fromPosition, true) doPlayerSendCancel(cid, config.msgDenied) return TRUE end doPlayerSendCancel(cid, config.msgWelcome) return TRUE end
  7. Da esse error qual? '-' assim fica dificil e qual eh o script
  8. Ohhh lorrd que erro feio meu function onSay(cid, words, param) if param:lower() ~= "vip" then return false end local str = getPlayerStorageValue(cid, 13540)-os.time() > 0 and getPlayerStorageValue(cid, 13540)-os.time() or 0 if getPlayerLevel(cid) >= 400 then if getPlayerStorageValue(cid, 12667) < 1 then setPlayerStorageValue(cid, 13540, os.time()+str+2*24*60*60) setPlayerStorageValue(cid, 12667, 1) doPlayerSendTextMessage(cid, 25, "You received 2 vip days for free.") else return doPlayerSendCancel(cid, "You already test vip.") end else return doPlayerSendCancel(cid, "You need to be level 400 or higher.") end return true end testa ai xD
  9. Dear lord, to vendo que o negocio ta brabo entao vou tentar ajudar Vejamos 1 Talkaction, que ganha 2 dias somente depois do level 400 talz soh usa 1 vez, pelo menos foi oq eu consigui entender da parte do trojan.. data/talkactions/scripts/testvip.lua: function onSay(cid, words, param) if param:lower() ~= "vip" then return false end local str = getPlayerStorageValue(cid, 13540) if getPlayerLevel(cid) >= 400 then if getPlayerStorageValue(cid, 12666) < 1 then setPlayerStorageValue(cid, 13540, str+2*24*60*60) setPlayerStorageValue(cid, 12666, 1) doPlayerSendTextMessage(cid, 25, "You received 2 vip days for free.") else return doPlayerSendCancel(cid, "You already test vip.") end else return doPlayerSendCancel(cid, "You need to be level 400 or higher.") end return true end data/talkactions/talkaction.xml (tag): <talkaction words="!test" event="script" value="testvip.lua"/> Soh falar !test vip em um lvl 400 ou maior
  10. Eu nao sabia oq voce queria exatamente a minha funçao voce pode fazer isso: executeArray({print, ["text"] = "OII"}) se voce fizer como voce disse dando unpack no array, simplesmente nao vai printar nada...
  11. Se voce acha que baixar 17 kb da lib eh MTO DIFICIL tanto que vai perder o braço pra isso, mesmo assim ainda vale a pena xD
  12. Funciona com milesegundos???? DUSAGHUDSAUYDGSA os.time retorna milesegundos agora neh ¬¬ Filho o os.time nao retorna o tempo em milesegundos e sim em segundos. E trava o interpretador mas come menos memoria... O seu parametro pode ate ser posto em milesegundos mas na pratica nao vai dar em nada xD, vai arredondar pra cima Ou seja se eu botar 1500 vai demorar 2 segundos pra rodar o addEvent Se eu botar 1100 vai demorar 2 segundos Se eu botar 1001 vai demorar 2 segundos Se eu botar 1000.001 vai demorar 2 segundos OBS: Eu nao pedi nada pra ele, mostrei o topico, pra ele aprender algo novo e ele tava mexendo com a lib ex entao eu decidi mostrar pra ele.... ele posta oq ele quizer Byerne: function executeArray(array) local func = array[1] local parameters = {} table.remove(array, 1) for i,x in pairs(array) do table.insert(parameters, x) end return func(unpack(parameters)) end executeArray({doPlayerSendCancel, cid, "LOOOOL."})
  13. Demonbholder, porque em vez de voce fazer um loop infinito e ainda nao suportar milesegundos porque voce nao faz algo desse tipo: function addEvent(func, t, ...) require "ex" os.sleep(t, 1e3) func(unpack(arg)) end Muito mais pratico.
  14. www.youtube.com/watch?v=94iCS9BawnU
  15. kkkkkkk SE MATA MLK NAO DA PRA EDITAR CLIENTE POR LUA? OKAY NEH. Soh pra te zuar ainda faço aki olha: Fail em demonbholder
  16. Gabdi, nem a cipsoft fez isso de banir automaticamente quem loga com bot se acha que algum programador daqui vai consiguir? O maximo que alguem pode tentar eh checar o tempo de hunt do cara se exceder tantas horas de hunt o player recebe algum tipo de mensagem com um codigo de confirmaçao..
  17. Impressao ou praticamente todos os topicos postados com discussoes acabam tomando outro rumo que nao tem nada haver com o post principal? -- Edit Fui parar pra ler o post do amiguinho ali atraz e olha oq eu acho ¬¬. Cara nao compara idade com conhecimento okay? Conheço grandes programadores e eles nao tem nem 16 anos ... E quem es tu pra dizer que c++ eh horrivel pra desenvolver? kk
  18. Soh tem uma coisa errada, o trabalho amador ja começou a mto tempo voce que nao tinha percebido ainda xD
  19. aiai que topic fail, pq eu fiz esse topico? esqueci que aki soh tem babaca que n quer jogar tibia, flw vou convidar pessoas via msn agora... da mais futuro fuiz
  20. NOSSA VEI SE MATA TU ACHA QUE JUNTAR TIME DE 10 LVL 60 PRA MATAR UM LVL 70 EH LEGAL? SE MATA PORRA JUNTAR TIME DE 10 LVL 60 SOH SE FOR PRA MATAR LVL 500 SEU NOOB E OBS: Se acha que nos vai ficar jogando nessa porra de mundo por quantos meses? ¬¬ 3 dias, 5 depois que pegar red ou black ja era abandona e pronto... Se quer que nos upe que lvl em 3 dias? 45? okay nos vai pegar free account ainda okay
  21. Aiai leigos, devilmoon ctz nunca pasou do lvl 30 no tibia se passou nao foi mto longe, tambem... E esse demonbholder 2x0? k comedia hein estou xorando aki de tao ofendido que eu to nossa vei acho que vou ate me suicidar
  22. calem a boca seus malditos noobs quem n quer jogar n jogue nossa que saco voces quem quizer jogar seja bem vindo simples vao trollar outro topic
  • Quem Está Navegando   0 membros estão online

    • Nenhum usuário registrado visualizando esta página.
×
×
  • Criar Novo...