Ir para conteúdo

MaXwEllDeN

Barão
  • Total de itens

    246
  • Registro em

  • Última visita

  • Dias Ganhos

    2

Tudo que MaXwEllDeN postou

  1. Para quem está começando tá de parabéns, só precisa melhorar a Identação hein, que tá horrível Z;
  2. No momento não estou disposto a posta-lo, e nem tenho um projeto atualmente, Esse sistema no momento só está disponível para negociação.
  3. No momento não, fiz esse sistema porque tive a ideia e tava sem nada pra fazer, quem sabe quando eu abrir um servidor eu ponho...
  4. Pelos seguintes motivos: 1_ Precisa baixar os arquivos para que possa usar as funções desta API. 2_ Ele trava o interpretador do mesmo jeito. 3_ Se fosse testar a minha função, vai ver que suporta milisegundos. Então, meu caro, eu duvido que seja mais prático ter que baixar arquivos só para diminuir algumas linha do script. Ah, e mkalo, favor não ficar pedindo pras pessoas do seu msn postarem essas merdas no meu tópico. Valeu. Eu acho que não hein brother #semata ele não mandou/pediu pra que eu postasse nada, só achei que você foi owned. -k
  5. maxwellden@hotmail.com
  6. @Shaykie Tá massa Shaykie, quando ficar pronto ficará ótimo , qualquer coisa se precisar de ajuda pra fazer o sistema de cruzamento pode falar comigo, tenho até uma ideia de como fazer já, sem usar onThink pra não pesar o serv . REP +
  7. @Pess0a Eu desenvolvi ele para 8.54, mas estou adaptando para 8.60, é só um detalhezinho.
  8. MaXwEllDeN

    Auto Shop

    Como eu disse no vídeo, talvez posto o sistema '-'
  9. Faz assim: abre o arquivo data/spells/spells.xml e delete a linha <rune name="Magic Wall" id="2293" allowfaruse="1" charges="3" lvl="32" maglv="9" exhaustion="2000" blocktype="all" event="script" value="support/magic wall rune.lua"/> agora abra data/actions.xml e adicione a tag: <action itemid="2293" event="script" value="mwrune.lua"/> agora abra a pasta data/actions/scripts copie qualquer arquivo com extenção lua renomeie ele para mwrune delete todo o conteúdo copie esse e salve: local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_ENERGY) setCombatParam(combat, COMBAT_PARAM_CREATEITEM, 1497) function onUse(cid, item, frompos, item2, topos) local pos = {x = 127, y = 160, z = 7} if (topos.x == pos.x) and (topos.y == pos.y) and (topos.z == pos.z) then else return doCombat(cid, combat, numberToVariant(cid)) end end
  10. Versão 1 (Quando Mata o player ele perde x porcento aleatorio de dinheiro do player, e quando o monstro morre, ele dropa todo dinheiro que ele roubou de todos os players que tentaram matar ele.) Versão 2 (Quando o monstro vai atacando o player o player vai perdendo uma porcentagem aleatoria de 2 à 10 do dinheiro dele, e quando o monstro morre, ele dropa todo dinheiro que ele roubou de todos os players que tentaram matar ele.)
  11. Autor: MaXwEllDeN (Maxwell Denisson) Versão testada: TFS 0.3.6, 8.54 #Explicação Eu falo com um npc, e digo à ele bless, ai ele me abençoa, ai na próxima vez que eu morrer, só eu posso abrir o meu corpo. #Instalação @Actions Na pasta scripts copie qualquer arquivo com a extenção lua, e renomeie ele para BlessDie, abra, delete tudo que houver dentro dele, copie esse conteúdo e salve: function onUse(cid, item, fromPosition, itemEx, toPosition) if item.uid ~= getPlayerGUID(cid) + 1000 then doPlayerSendCancel(cid, "This corpse has blessed by the gods, so it you can't touch it.") return true end end TAG: <action actionid="90100" script="BlessDie.lua"/> @Creaturescripts Na pasta scripts copie qualquer arquivo com a extenção lua, e renomeie ele para BlessDie, abra, delete tudo que houver dentro dele, copie esse conteúdo e salve: function onDeath(cid, corpse, deathList) if getPlayerStorageValue(cid, 21718) > 0 then setPlayerStorageValue(cid, 21718, -1) doItemSetAttribute(corpse.uid, "aid", 90100) doItemSetAttribute(corpse.uid, "uid", getPlayerGUID(cid) + 1000) end return true end TAG: <event type="death" name="BlessDie" event="script" value="blessdie.lua"/> Abra o arquivo login.lua, que está na pasta scripts, e antes do return true coloque isso: registerCreatureEvent(cid, "BlessDie") @NPC Fiz um npc só de exemplo pra mostrar como por a bless... ai está o xml dele: <?xml version="1.0" encoding="UTF-8"?> <npc name="Max" script="BlessDie.lua" walkinterval="0" floorchange="0"> <health now="150" max="150"/> <look type="335" head="79" body="95" legs="95" feet="81" corpse="2212"/> <parameters> <parameter key="message_greet" value= 'Olá |PLAYERNAME|, estou distribuindo uma bless especial que quando você morre ninguém pode tocar no seu corpo.'/> </parameters> </npc> Ai está o Script que deve ser nomeado de BlessDie: 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) 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, 'bless') and getPlayerStorageValue(cid, 21718) < 1 then setPlayerStorageValue(cid, 21718, 1) selfSay("{".. getCreatureName(cid) .."} você está abençoado, e na próxima vez que você morrer, {ninguém além de você poderá tocar no seu corpo}.", cid) end end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) É só isso, agora se você pegar a bless, quando morrer não vão poder pegar seus items, mas podem arrastar o corpo.. >.<, só falta ajeitar esse pequeno problema , Flw
  12. Bom, você deve usar ela quando sentir necessidade, ela serve para você verificar se determinado valor existe em uma tabela, por exemplo: local amigos = {"Tú", "Ele", "Vinícius", "Pedro", "Matheus", "..."} local fulano = "Matheus" if (isInArray(amigos, fulano)) then print(fulano .." é meu amigo") else print(fulano .." nem é meu amigo '-'") end ele vai verificar se na tabela amigos existe a string Matheus, se tiver, vai retornar na tela: Matheus é meu amigo, se não, retornará: Matheus nem é meu amigo '-' Simples, o primeiro parâmetro é a tabela e o segundo o valor que você deseja verificar se há nela.
  13. @Antharaz Ótimo Conteúdo Antharaz, gostei bastante do código, principalmente porque nunca tinha visto o tempo "em relógio" sendo utilizado em algum código .
  14. function onUse(cid, item, fromPosition, itemEx, toPosition) local pos = {x=1226, y=236, z=4} local pos2 = getThingPos(item.uid) local id = getThingFromPos(pos).itemid if item.itemid == 1945 then doCreateItem(1284, pos) doTransformItem(item.uid, 1946) addEvent(doChangeAll, 15*1000, pos, pos2, id) doCreatureSay(cid, "Você tem 15 segundos para atravessar a ponte !", TALKTYPE_ORANGE_1) else doPlayerSendCancel(cid, "The rock did not desapear so far.") end return true end function doChangeAll(posi, posi2, id) for i = 0, 255 do local itemposition = {x=posi.x, y=posi.y, z=posi.z, stackpos=i} local lalaka = getThingFromPos({x=posi.x, y=posi.y, z=posi.z, stackpos=stack}) if isCreature(lalaka.uid) then elseif getThingFromPos(posi).itemid == 1284 then stack = i break end end local posa = {x=posi.x, y=posi.y, z=posi.z, stackpos=stack} if not isPlayer(getThingFromPos({x=posi.x, y=posi.y, z=posi.z, stackpos=253}).uid) then doTransformItem(getThingFromPos(posi2).uid, 1945) doRemoveItem(getThingFromPos(posa).uid, 1) doCreateItem(id, posa) else addEvent(doChangeAll, 15*1000, posi, posi2, id) end return true end
  15. Esqueceu de falar que tabelas e nem váriaveis podem ter " "(espaço) no nome, e nenhum outro carácter além de números, letras e _(underline), e esqueceu de dizer que podemos decclarar indexes de tabelas como tipo: config ={ ["Assassin"] = {life = 500, xp = 250}, ["Dragon"] = {life = 1200, xp = 700}, ["Demon"] = {life = 10000, xp = 4000}, } e para chamar: config[nomedoindex] exemplo: config["Demon"].life retornará: 10000 config["Dragon"].xp retornará 700 Abraços, Maxwell Denisson
  16. Uia, já tô com a ideia aqui, vou tentar participar...
  17. Como faço pra pegar o uid dos itens que estão em um certo container? a função getContainerItem, só pega o do primeiro, e eu preciso fazer uma busca geral, em todos!
  18. Fiu fiu, Mkalo, vai ajudar muitas pessoas com essa função... Muito Obrigado!!
  19. Vallew Manolo, very thanks, tava dando pau aki o script quando eu tava tentando modificar, askoak, mais agora tudo oks REP++
  20. Gente, onde, e como eu edito pra quando o poke morrer trocar o id da ball pra, por exemplo 2160 e a nurse healar com o id 2160? Help Please
  21. MaXwEllDeN

    Distro, Função

    Tipo, simples, alguém sabe qual distro que tem uma função é executada quando o player pega algum item, NÃO EQUIPA, eu disse PEGA, meu amigo me falou que ele já tinha visto um assim, só que não tenho a minima ideia de qual é, se alguém tiver, por favor me passa a função!
  22. não testei, mas tá ai: -- Script by MaXwEllDeN -- function onUse(cid,item,frompos,item2,topos) -- Inicio das Variaveis Configuraveis (: local item = {I_1 = 6132, I_2 = 9933} local Creature = { M_1 = 'Cat', -- Monstro 1, no caso Cat M_2 = 'Antonio Nunes', -- Monstro 2 M_3 = 'Priest', -- Monstro 3 M_4 = 'Bazir'} -- Monstro 4 -- Fim das Variaveis Configuraveis ): local localpos = getCreaturePosition(cid) if item2.itemid == item.I_1 then doTransformItem(item2.uid, item.I_2) doSendMagicEffect(topos, 31) doPlayerSendTextMessage(cid,22,"Você Transformou ".. getItemNameById(item.I_1) .." em ".. getItemNameById(item.I_2) .. ".") elseif item2.itemid == item.I_2 then doTransformItem(item2.uid, item.I_1) doSendMagicEffect(topos, 31) doPlayerSendTextMessage(cid,22,"Você Transformou ".. getItemNameById(item.I_2) .." em ".. getItemNameById(item.I_1) .. ".") elseif isCreature(item2.uid) and getCreatureName(item2.uid) == Creature.M_1 then doRemoveCreature(item2.uid) doSendMagicEffect(topos, 31) doSummonCreature(Creature.M_2, topos) doPlayerSendTextMessage(cid,22,"Você Transformou ".. Creature.M_1 .." em ".. Creature.M_2 .. ".") elseif isCreature(item2.uid) and getCreatureName(item2.uid) == Creature.M_2 then doRemoveCreature(item2.uid) doSendMagicEffect(topos, 31) doSummonCreature(Creature.M_1, topos) doPlayerSendTextMessage(cid,22,"Você Transformou ".. Creature.M_2 .." em ".. Creature.M_1 .. ".") elseif isCreature(item2.uid) and getCreatureName(item2.uid) == Creature.M_3 then doRemoveCreature(item2.uid) doSendMagicEffect(topos, 31) doSummonCreature(Creature.M_4, topos) doPlayerSendTextMessage(cid,22,"Você Transformou ".. Creature.M_3 .." em ".. Creature.M_4 .. ".") elseif isCreature(item2.uid) and getCreatureName(item2.uid) == Creature.M_4 then doRemoveCreature(item2.uid) doSendMagicEffect(topos, 31) doSummonCreature(Creature.M_3, topos) doPlayerSendTextMessage(cid,22,"Você Transformou ".. Creature.M_4 .." em ".. Creature.M_3 .. ".") else doPlayerSendTextMessage(cid,21,"Sua varinha é poderosa mas ñ faz milagres não fi!") doSendMagicEffect(localpos, 2) end end
  23. Boa, só tem um problema, creio eu, que se o player deslogar, o addevent vai sumir e ele pegará prisão perpertua(caso algum não ADM tire ele de lá, xD), estou certo ou não?
  • Quem Está Navegando   0 membros estão online

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