Ir para conteúdo

Kimoszin

Héroi
  • Registro em

  • Última visita

Tudo que Kimoszin postou

  1. Kimoszin postou uma resposta no tópico em Playground (Off-topic)
    Oque impede o nome ali no meio?
  2. Kimoszin postou uma resposta no tópico em Playground (Off-topic)
    Paresce que alguem só descobriu o facebook agora. hoho
  3. Para baixar, acesse direto http://www.tibiaredbot.com.br/download.html
  4. Bem pessoal, pensei que uma action dessa ia deixar o servidor de vocês com mais RPG, então resolvi botar a ideia para funcionar. - Para que serve? Para o seu servidor ficar com mais RPG, serve para quest mais elaboradas - Como funciona? Você instala a quest e a action no seu servidor, depois para passar na porta, o player ira precisar da chave, quando ele der use, a porta vai se abrir e ficar aberta, quando ele der use denovo a porta irá se fechar e ficar trancada. - Qual a vantagem disso? Na verdade, quase nenhuma, pois só vai trazer mais RPG para o seu servidor se você tiver criatividade para usa-la, alguns players valorizam isso. - Como "instalo" no meu servidor ? Simples, vamos adicionar dois scripts em \data\actions\script e adicionar duas linhas em \data\actions\actions.xml Vamos lá Instalação data\actions\scripts\portas.lua function onUse(cid, item, fromPosition, itemEx, toPosition) local doors = {[5098]={id=5100}, [5099]={id=5100}, [5101]={id=5102}, [5107]={id=5109}, [5108]={id=5109}, [5110]={id=5111}} local config = { actionid = 1221, -- Uma action normal, só para a portar nao abrir. keyaid = 1222 -- A action que deve ter na key } for i, x in pairs(doors) do if ((itemEx.itemid == i) and (itemEx.actionid == config.actionid) and (item.actionid == config.keyaid)) then doTransformItem(itemEx.uid, x.id) doItemSetAttribute(itemEx.uid, "aid", 0) elseif (itemEx.itemid == x.id) and (itemEx.actionid == 0) and (item.actionid == config.keyaid) then doTransformItem(itemEx.uid, i) doItemSetAttribute(itemEx.uid, "aid", config.actionid) elseif (itemEx.itemid == i) and (itemEx.actionid == 0) and (item.actionid == config.keyaid) then doTransformItem(itemEx.uid, i) doItemSetAttribute(itemEx.uid, "aid", config.actionid) end end return TRUE end data\actions\actions.xml <action itemid="IDdeUmaChave" event="script" value="portas.lua" /> Agora uma quest para ganhar a chave que abre a porta. data\actions\scripts\darkey.lua function onUse(cid, item, fromPosition, itemEx, toPosition) local config = { storage = 3235, -- Uma storage, se quiser nao precisa modificar keyID = 2088, -- ID de uma chave, você pode trocar. aid = 1222, -- ActionID, tem que ser o mesmo do script acima. } if getPlayerStorageValue(cid, config.storage) == -1 then local item = doPlayerAddItem(cid, config.keyID,1) if item then doItemSetAttribute(item, "aid", config.aid) setPlayerStorageValue(cid, config.storage, 1) doPlayerSendCancel(cid, "Você recebeu uma key") end else doPlayerSendCancel(cid, "Desculpe, mais você ja fez essa quest") end end data\actions\actions.xml <action actionid="7777" event="script" value="darkey.lua" /> " Lembrando que o bau, ou qualquer outra coisa, deve conter o action id = 7777 " Se você preferir, aqui tem um NPC que vende a mesma key que é pega na quest. data/npc/Diog.xml <?xml version="1.0"?> <npc name="Diog" script="data/npc/scripts/diog.lua" walkinterval="7000" floorchange="0"> <health now="100" max="100"/> <look type="128" head="76" body="96" legs="114" feet="0" addons="2"/> <parameters> <parameter key="message_greet" value="Olá |PLAYERNAME|! Eu vendo keys, Diga {keys} para saber quais eu vendo e o valor delas." /> <parameter key="module_keywords" value="1" /> <parameter key="keywords" value="keys" /> <parameter key="keyword_reply1" value="Eu vendo {Key Quest Editada} por 1000 gps." /> </parameters> </npc> data/npc/scripts/diog.lua 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 local talkUser = NPCHANDLER_CONVbehavior == CONVERSATION_DEFAULT and 0 or cid local keys = { ["Key Quest Editada"] = {id_key = 2088, price = 1000, action_id = 1222}, } local m = keys[msg] if (not m) then selfSay("Eu não vendo esta key ", cid) return FALSE end if doPlayerRemoveMoney(cid, m.price) == TRUE then a = doPlayerAddItem(cid, m.id_key, 1) doItemSetAttribute(a, "aid", m.action_id) selfSay("Obrigado, aqui esta sua key", cid) talkState[talkUser] = 0 else selfSay(" Você não tem ".. m.price.." gps para comprar ", cid) talkState[talkUser] = 0 end return TRUE end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) Configuração Como você viu, eu nao adicionei todas as portas no script portas.lua, então só iram funcionar em um tipo. Nao adicionei porque sou preguiçoso, então para você adicionar é simples. Só seguir esses parametros [iDPortaFechada]={id=IDPortaAberta}, e adicionar em local doors = {} Agora para adicionar mais keys para o npc vender, é muito simples tambem, Só você adicionar mais linhas em local keys, Siga os parametros ["NomeQueOPlayerTemQueFalar"] = {id_key = IDDaKey, price = PreçoDaKey, action_id = 1222}, E mudar para quando o player falar com o npc: <parameter key="keyword_reply1" value="Eu vendo {Key Quest Editada} por 1000 gps e {NomeQueOPlayerTemQueFalar} por 122 gps." /> Script bem facil que eu fiz, qualquer duvida só falar comigo, Até mais.
  5. Kimoszin postou uma resposta no tópico em Suporte Tibia OTServer
    Esse erro acontece, pq o distro nao é compativel com os items.xml. Tente usar esse que anexei. items.rar
  6. Kimoszin postou uma resposta no tópico em Suporte Bots
    Você usa qual sistema operacional? Tem quanto de memoria ram? Quando acontece isso, só o Tibia e o BBot estão abertos?
  7. Nao existe bot indectavel, pois nada é indectavel, ASLR é facilemente burlado, fazendo o bot funcionar em qualquer computador que tenha windows 7 e vista. Enviar o uso de packets nao quer dizer que o seu char irá ser banido, pois se você programar eles bem, fazer tudo certo, iram funcionar que é uma beleza, mais claro sempre tem chances.
  8. Gostei do script, bem util, da para fazer varias coisas mesmo. Reputado.
  9. Kimoszin postou uma resposta no tópico em Suporte Tibia OTServer
    Olá amigo, vejo que postou na area errada, Estarei movendo para area certa, tome mais cuidado na hora de postar.
  10. Duvida resolvido, Tag Adicionada.
  11. Ali no script tem uma variavel, então está certo. local gid = getPlayerGuildId(cid)
  12. local config = { creature = "Demon", -- Nome do monstre entre aspas maxsummon = 2, -- Numero maximo de summons time = 1 -- Segundos } function onEquip(cid, item) if #getCreatureSummons(cid) >= config.maxsummon then doPlayerSendCancel(cid, "Desculpe, mais você ja atingiu o limite de summons") doSendMagicEffect(getCreaturePosition(cid), 2) else doSummonMonster(cid, config.creature) doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 10) doSendMagicEffect(getThingPos(getCreatureSummons(cid)[2]), 10) end return TRUE end function onDeEquip(cid, item) doRemoveSummon(cid, config.creature, 1) doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 2) doSendMagicEffect(getThingPos(getCreatureSummons(cid)[2]), 2) return TRUE end
  13. Kimoszin postou uma resposta no tópico em Suporte Bots
    Tem sim, é só você fazer: um macro para contar as worms, caminho até o banco, um macro para pegar o dinheiro, caminho até a loja, um macro para comprar as worms e o caminho para o local da pesca.
  14. Cara, acho que tem que mecher no distro, pois nao tem uma função que junte os itens, Ou você fazer para remover os potions ao usar, ou fazer que quando usar remover e adicionar gps. Para remover ao usar, abra o data\actions\liquids\potions.lua e modifique o removeOnUse para "yes" removeOnUse = "yes", Para remover ao usar e adicionar o dinheiro, procure por if(not potion.empty or config.removeOnUse) then doRemoveItem(item.uid, 1) return true end E troque para if(not potion.empty or config.removeOnUse) then doRemoveItem(item.uid, 1) doPlayerAddMoney(cid, 5) return true end
  15. Foi exatamente oque eu fiz, se você testasse antes nao falaria.
  16. Kimoszin postou uma resposta no tópico em Playground (Off-topic)
    Seja bem vindo, espero que goste do forum Mais antes, leia as regras do forum, para entender melhor.
  17. Adicione isso em data\libs\050-function.lua function doRemoveSummon(cid, name, time) if isMonster(getCreatureByName(name)) then if (type(time) == "number" and time) > 0 then for _, monsters in ipairs(getCreatureSummons(cid)) do addEvent(doRemoveCreature, time*100, monsters) end return TRUE end return error("Time must be a number higher than 0!") end return error("Creature not found!") end Creditos: Demonbholder, só editei a função. Crie um arquivo lua em data\movements\scripts e cole isso ring.lua local config = { creature = "Demon", -- Nome do monstre entre aspas; maxsummon = 2, -- Numero maximo de summons; time = 1 -- Tempo para remover os summons em segundos. } function onEquip(cid, item) if #getCreatureSummons(cid) >= config.maxsummon then doPlayerSendCancel(cid, "Desculpe, mais você ja atingiu o limite de summons") doSendMagicEffect(getCreaturePosition(cid), 2) else doSummonMonster(cid, config.creature) end return TRUE end function onDeEquip(cid, item) doRemoveSummon(cid, config.creature, 1) return TRUE end movements.xml <movevent type="Equip" itemid="RingID" slot="ring" event="script" value="ring.lua"/> <movevent type="DeEquip" itemid="RingID" slot="ring" event="script" value="ring.lua"/>
  18. Kimoszin postou uma resposta no tópico em Playground (Off-topic)
    é mesmo? que bom hein.
  19. Kimoszin postou uma resposta no tópico em Suporte Bots
    Basic Functions > Fishing Se você marca o need worm, elas tem que estar na mesma bp que o fishing rod.
  20. Riscos todo mundo tem, quanto menos funções você usar, menos chance. Se o fishing e o mana trainer usar teclado e mouse, tem menos chance. Nada é indectavel.
  21. Kimoszin postou uma resposta no tópico em Suporte Tibia OTServer
    Arrumei meu primeiro post, ali tem tudo oque você precisa.
  22. Kimoszin postou uma resposta no tópico em Playground (Off-topic)
    De cara da pra ver galera, bota o cerebro pra funcionar,
  23. Kimoszin postou uma resposta no tópico em Suporte Tibia OTServer
    upgrades.lua function onUse(cid, item, fromPosition, itemEx, toPosition) local items = { ["spear"] = {id=2389, toid=7367, level=124}, ["arrow"] = {id=2544, toid=2545, level=130}, ["axe"] = {id=2386, toid=2378, level=15}, } for i, x in pairs(items) do if (itemEx.itemid == x.id) then if getPlayerLevel(cid) >= x.level then if doPlayerRemoveItem(cid, x.id, 1) == TRUE then doPlayerSendTextMessage(cid, 22, "Você acaba de dar upgrade em: "..i..", para "..getItemNameById(x.toid)..".") doPlayerAddItem(cid, x.toid) else doPlayerSendTextMessage(cid, 22, "Desculpe, mais você nao possui o item necessario") end else doPlayerSendTextMessage(cid, 22, "Desculpe, mais você nao o level "..x.level.." para fazer o upgrade.") end end end return TRUE end [id] = ID do item que vai sofrer o upgrade, [toid] = ID do item que vai ser o upgrade, actions.xml <action itemid="IDdoItem" event="script" value="upgrades.lua" /> Crie um arquivo aonde fica o distro do seu OTServer, com o nome upgrades.txt, coloque isso dentro: [Enchanted Spear] Spear + Item [Poison Arrow] Arrow + Item [Battle Axe] Axe + Item Agora em a talkactions, upgradestalk.lua function onSay(cid, words, param) file = io.open('upgrades.txt','r') notice = file:read(-1) doShowTextDialog(cid,IdDeUmItem,notice) file:close() end talkactions.xml <talkaction words="!upgrade" script="upgradestalk.lua"/> Feito por mim.
  24. Kimoszin postou uma resposta no tópico em Suporte Tibia OTServer
    Eduardo Dantas, Cuidado ao copiar os topicos, esse que você copiou veio com um link pro tibiaking, tome mais cuidado. Arrumei o seu post adicionando os pra ficar mais organizado.
  25. Kimoszin postou uma resposta no tópico em Recursos Avançados
    NathanB Creio que Java nao se comunica com o windows Mmmmm I only did so to avoid bugs, more thanks for the tips. Sorry, I use translate.

Informação Importante

Confirmação de Termo