Tudo que Danyel Varejao postou
-
(Resolvido)Selar monstro
Editado, só pegar.
-
(Resolvido)Selar monstro
Já tinha feito o script porém esqueci de postar aqui, mas tá aqui caso queira usar. Action do Item que vai usar no monstro local Configs = { Min_Level = 8, -- Minimo de level pra usar o item. Remove_Monster = true, -- Remover o monstro ao selar? true = sim, false = não. No_Sealable_Monsters = {"Trainer"}, -- Lista de monstros que nao pode. ItemID_Seal = 1954, -- ID do papel que irá usar pra sumonar o monstro depois. } function onUse(cid, item, fromPosition, itemEx, toPosition) if getPlayerLevel(cid) < Configs.Min_Level then doPlayerSendCancel(cid, "Sorry, you need level ".. Configs.Min_Level .." more.") return true end if isCreature(itemEx.uid) then if isMonster(itemEx.uid) and not isSummon(itemEx.uid) then local Seal_Monster = getCreatureName(itemEx.uid) if not isInArray(Configs.No_Sealable_Monsters, Seal_Monster) then local Seal_Paper = doCreateItemEx(Configs.ItemID_Seal) doItemSetAttribute(Seal_Paper, "monster", Seal_Monster) doItemSetAttribute(Seal_Paper, "description", "Have ".. string.lower(Seal_Monster) .." sealed in this paper.") if doPlayerAddItemEx(cid, Seal_Paper) then doRemoveItem(item.uid) if Configs.Remove_Monster then doRemoveCreature(itemEx.uid) doSendMagicEffect(toPosition, CONST_ME_POFF) end end else doPlayerSendCancel(cid, "Sorry, not possible seal this monster.") end end end return true end Action do Papel que vai sumonar o monstro, que no caso usei como exemplo o papel 1954. function onUse(cid, item, fromPosition, itemEx, toPosition) if getTilePzInfo(getThingPos(cid)) then doPlayerSendCancel(cid, "Sorry, not summon creature in protect zone.") return true end doCreateMonster(getItemAttribute(item.uid, "monster"), getThingPos(cid), false, true) doRemoveItem(item.uid, 1) return true end
-
(Resolvido)Selar monstro
Invocar o monstro que você fala é torna-lo seu? como um utevo res?
-
Problema no item
Limpe a coluna tile.store da sua database e veja se resolve, caso não resolva tem as posições ai dos devidos items no mapa, só remover.
-
(Resolvido)[SCRIPT] Playe nasce em certa posição ao morrer
Bom cara, quando um player morre ele nasce na posição da TOWNID dele, geralmente isso é configurado no seu OTBM, abra Remeres Map Editor vá em Edit Towns e veja a posição, só mudar.
-
(Resolvido)[Pedido] Comando para evento
Acho que você configurou uma posição que não existe, por favor verifique novamente.
-
(Resolvido)[Pedido] Comando para evento
Veja se é isso que fiz. Lib Pega_Pega = { Storage_Open = 20000, Storage_Player = 20001, Time_Event = 30, -- Tempo em segundos Position_Go = {x = 149, y = 388, z = 7}, Position_Finish = {x = 144, y = 388, z = 7}, Winners = { [1] = {ItemID = 2160, Count = 20}, [2] = {ItemID = 2160, Count = 10}, [3] = {ItemID = 2160, Count = 5} } } function Open_PegaPega(cid, Time) if getGlobalStorageValue(Pega_Pega.Storage_Open) >= os.time() then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "[Pega-Pega] O evento já está ocorrendo.") else setGlobalStorageValue(Pega_Pega.Storage_Open, os.time() + Time) doBroadcastMessage("[Pega-Pega] Foi iniciado, todos os players tem ".. Time .." segundos para utilizar o comando /evento.") end end function Close_PegaPega(WinnersArray) for i, Name in pairs(WinnersArray) do local Player = getCreatureByName(Name) if isPlayer(Player) then doPlayerAddItem(Player, Pega_Pega.Winners[i].ItemID, Pega_Pega.Winners[i].Count) doPlayerSendTextMessage(Player, MESSAGE_STATUS_WARNING, "[Pega-Pega] Você venceu o evento em ".. i .."º lugar e ganhou ".. Pega_Pega.Winners[i].Count .."x ".. getItemNameById(Pega_Pega.Winners[i].ItemID) ..".") end end for i, pid in pairs(getPlayersOnline()) do if getPlayerStorageValue(pid, Pega_Pega.Storage_Player) == 1 then doTeleportThing(pid, Pega_Pega.Position_Finish, true) doSendMagicEffect(getThingPos(pid), CONST_ME_TELEPORT) setPlayerStorageValue(pid, Pega_Pega.Storage_Player, -1) end end doBroadcastMessage("[Pega-Pega] O evento foi encerrado e os ganhadores foram: 1º, 2º e 3º: ".. table.concat(WinnersArray, ', ') ..".") end function Enter_PegaPega(cid) if getGlobalStorageValue(Pega_Pega.Storage_Open) >= os.time() then if getPlayerStorageValue(cid, Pega_Pega.Storage_Player) == -1 then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "[Pega-Pega] Você entrou no evento.") setPlayerStorageValue(cid, Pega_Pega.Storage_Player, 1) doTeleportThing(cid, Pega_Pega.Position_Go, true) doSendMagicEffect(getThingPos(cid), CONST_ME_TELEPORT) else doPlayerSendCancel(cid, "[Pega-Pega] Você já está no evento.") doSendMagicEffect(getThingPos(cid), CONST_ME_POFF) end else doPlayerSendCancel(cid, "[Pega-Pega] O evento não está aberto.") end end Talkaction Enter_PegaPega.lua function onSay(cid, words, param, channel) if not getTilePzInfo(getPlayerPosition(cid)) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "[Pega-Pega] Só pode usar o comando em area protect zone.") return true end if getPlayerAccess(cid) >= 3 then doTeleportThing(cid, Pega_Pega.Position_Go, true) else Enter_PegaPega(cid) end return true end Talkaction Close_PegaPega.lua function onSay(cid, words, param, channel) local CommandParam = string.explode(param, ",") if not CommandParam[1] or CommandParam[1] == "" then doPlayerSendCancel(cid, "Digite o nome do 1º lugar a vencer o evento.") elseif not CommandParam[2] or CommandParam[2] == "" then doPlayerSendCancel(cid, "Digite o nome do 2º lugar a vencer o evento.") elseif not CommandParam[3] or CommandParam[3] == "" then doPlayerSendCancel(cid, "Digite o nome do 3º lugar a vencer o evento.") else Close_PegaPega({CommandParam[1], CommandParam[2], CommandParam[3]}) end return true end Talkaction Open_PegaPega.lua function onSay(cid, words, param, channel) Open_PegaPega(cid, Pega_Pega.Time_Event) return true end Talkactions.xml tags <talkaction log="yes" words="/evento" event="script" value="Enter_PegaPega.lua"/> <talkaction log="yes" access="3" words="/fechareventopega-pega" event="script" value="Close_PegaPega.lua"/> <talkaction log="yes" access="3" words="/abrireventopega-pega" event="script" value="Open_PegaPega.lua"/>
- Premium points Transfer Document
- Premium points Transfer Document
-
summon monster
local Configs = { Stone_AID = 6000, Stone_ID = 1285, Position_Cyclops = {x = 82, y = 122, z = 6}, Time_To_Back = 20, } function onUse(cid, item, fromPosition, itemEx, toPosition) if item.actionid == Configs.Stone_AID then if item.itemid == Configs.Stone_ID then doRemoveItem(item.uid) doCreateMonster("Cyclops", Configs.Position_Cyclops) addEvent(function() local Stone = doCreateItem(Configs.Stone_ID, 1, toPosition) doItemSetAttribute(Stone, "aid", Configs.Stone_AID) end, Configs.Time_To_Back * 1000) end end return true end
-
(Resolvido)(PEDIDO) alguém poderia me ajudar nesse script da anihi
Vê agr
-
(Resolvido)(PEDIDO) alguém poderia me ajudar nesse script da anihi
Posta ele aqui com sua edição, você deve ter errado em colocar as areas.
-
(Resolvido)(PEDIDO) alguém poderia me ajudar nesse script da anihi
Coloca dnv, tinha esquecido de editar essa parte
-
(Resolvido)(PEDIDO) alguém poderia me ajudar nesse script da anihi
Editei lá, da uma olhada e testa, não to testando
-
(Resolvido)(PEDIDO) alguém poderia me ajudar nesse script da anihi
-
(Resolvido)(PEDIDO) alguém poderia me ajudar nesse script da anihi
local config = { money = 1000, daily = "no", level = 5, storage = 30015, areas = { [1] = { topLeftPos = {x = 1736, y = 1855, z = 8}, bottomRightPos = {x = 1736, y = 1855, z = 8}, }, [2] = { topLeftPos = {x = 1736, y = 1855, z = 8}, bottomRightPos = {x = 1736, y = 1855, z = 8}, }, }, entry = { {x = 1736, y = 1855, z = 8}, }, destination = { {x = 1737, y = 1868, z = 8}, }, TOWERPosition = { {x = 1737, y = 1869, z = 8}, } } config.daily = getBooleanFromString(config.daily) local function CheckAnihilationInUse() for i = 1, #config.areas do for x = config.areas[i].topLeftPos.x, config.areas[i].bottomRightPos.x do for y = config.areas[i].topLeftPos.y, config.areas[i].bottomRightPos.y do for z = config.areas[i].topLeftPos.z, config.areas[i].bottomRightPos.z do local creature = getTopCreature({x = x, y = y, z = z}).uid if isPlayer(creature) then return true end end end end end return false end local function RemoveMonsters() local monsters = {} for i = 1, #config.areas do for x = config.areas[i].topLeftPos.x, config.areas[i].bottomRightPos.x do for y = config.areas[i].topLeftPos.y, config.areas[i].bottomRightPos.y do for z = config.areas[i].topLeftPos.z, config.areas[i].bottomRightPos.z do local position = {x = x, y = y, z = z, stackpos = 253} local creature = getThingfromPos(position) if isMonster(creature.uid) then table.insert(monsters, creature.uid) end end end end end for i = 1, #monsters do doRemoveCreature(monsters[i]) end end function onUse(cid, item, fromPosition, itemEx, toPosition) if(item.itemid == 1946) then if(config.daily) then doPlayerSendDefaultCancel(cid, RETURNVALUE_NOTPOSSIBLE) else doTransformItem(item.uid, item.itemid - 1) end return true end if(item.itemid ~= 1945) then return true end if CheckAnihilationInUse() then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, "A arena esta em uso, espere.") return true end local players = {} for _, position in ipairs(config.entry) do local pid = getTopCreature(position).uid if(pid == 0 or not isPlayer(pid) or getCreatureStorage(pid, config.storage) > 0 or getPlayerLevel(pid) < config.level or getPlayerMoney(cid) < config.money) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, "No minimo players de level ".. config.level .." e possuir ".. config.money .." gold coins.") return true end table.insert(players, pid) end RemoveMonsters() for i = 1, #config.TOWERPosition do doSummonCreature("Destroyer TOWER", config.TOWERPosition[i]) end for i, pid in ipairs(players) do doSendMagicEffect(config.entry[i], CONST_ME_POFF) doTeleportThing(pid, config.destination[i], false) doSendMagicEffect(config.destination[i], CONST_ME_ENERGYAREA) end doTransformItem(item.uid, item.itemid + 1) return true end
- Premium points Transfer Document
- Premium points Transfer Document
-
Premium points Transfer Document
Abaixo dessa linha doPlayerAddItemEx(cid, Document) Adicione isso: doPlayerRemovePoints(cid, Count_Points) Lembrando que o sistema é o seguinte, o npc transforma uma quantidade de pontos que você tem em um Papel valendo essa quantidade. Então os pontos vão ser removidos assim que gerar o papel. Me diga como quer a mensagem ao realizar a troca.
-
(Resolvido)(PEDIDO) Script porta que só passa quem matou os monstros da lista
Você configurou só um monstro correto?, você adicionou nesse monstro ai oque eu falei pra adicionar no xml?, adicionou o creaturescripts tudo certinho? faça as coisas com atenção que vai dar certo! Obs: o nome do monstro nas configurações tem que tá totalmente correto, letra maiusculas e minusculas, certifique direitinho!
-
(Resolvido)(PEDIDO) Script porta que só passa quem matou os monstros da lista
Qual seu tfs? Tenta mudar essa linha if item.aid == Configs.Door_AID then por essa if item.actionid == Configs.Door_AID then
-
(Resolvido)(PEDIDO) Script porta que só passa quem matou os monstros da lista
Coloca o print em baixo de if item.aid == Configs.Door_AID then E tenta dnv
-
(Resolvido)(PEDIDO) Script porta que só passa quem matou os monstros da lista
No script do actions procura por isso: function onUse(cid, item, fromPosition, itemEx, toPosition) e adiciona isso aqui em baixo print("Script executado") Quando você der use na porta olha sua distro se aparece algo, caso não apareça é porque o script não está sendo executado, vc deve ter errado em algo na instalação do XML
-
(Resolvido)(PEDIDO) Script porta que só passa quem matou os monstros da lista
Então cara, provavelmente deve tá sendo usado um script com Itemid 5110, vai no seu actions.xml e pesquisa 5110 e ve se tem alguma tag ^^, tenta mudar o item, colocar qualquer item com Actionid 6000 no chão e testa como se fosse uma porta dando use.
-
(Resolvido)(PEDIDO) Script porta que só passa quem matou os monstros da lista
Você colocou a porta com o actionid 6000? e a tag com o script, é impossivel não ter avisado nada nem dado erro rs Coloquei pra se não tiver matado o boss avisar qual o boss não matou por uma mensagem no tibia, verifica direitinho e instala direitinho que vai funcionar sim.