Líderes

Distro 100% Estável Créditos: Mattyx14! Novas Mount e Addon Junto Na Pasta! Vírus Scan Na Imagem Abaixo Download: http://www.4shared.com/rar/xthwgTL3ce/Uniwar.html Aceito Like

function onThink(interval, lastExecution, thinkInterval) local pos = {x=3145,y=3485,z=7} -- Local onde aparece o npc local npc = doCreateNpc("varkhal", pos ) -- Altere o (dalk) pelo nome do seu npc. local nMin = 60 -- tempo em minuto para o npc sumir. addEvent(doRemoveCreature, nMin*60*1000, npc) doBroadcastMessage('Varkhal apareceu na cidade, aproveite pois ele irá sumir em '.. nMin ..' minutos.') return true end

Procurei um tutorial aqui no fórum que utiliza-se o Microsoft Visual Studio 2013 para complilar o OTC porem não achei então fui pra outro fórum e vim trazer para o TK 1.Download MSVC 2013 Libs - Aqui Source - Aqui 2.Agora que temos as source e libs está na hora de colocá-los nos lugares corretos. Coloque as "otclient-master" e "otclient-msvc13-libs" na "C:\" .Isto vai poupar muito tempo, porque você não tem que ligar manualmente todas as inclui e libs. 3.Abrindo o MSVC 2013 (Imagem de outro forum - dominique120) 4. Agora vamos configurar as propriedades 5. Agora selecione a configuração correta: 6. Agora, aqui ele pode ficar um pouco confuso, então preste atenção. 6.1 Se você extraiu as libs para o ? / drive você só precisa adicionar isso ao seu includes: E isso para as suas libs 6.2 Mas, se você extraiu os libs em outros lugares que você deve adicionar esses diretórios também. Isto é para o includes: Isto é para as libs: 6. Agora clique em Aplicar e deixar os arquivos analisar, isso é automático. 7. Uma vez que é você pode reconstruir os arquivos. 8. Construindo seu .exe . 9. Agora é só esperar termina e você vai ter seu .exe. 10. Caso precise das DLL basta baixar aqui. Créditos: @dominique120 - pelo tutorial @edubart - pelo desenvolvimento do OTC @Dalkon - por adicionar arquivos de compilação MSVC @conde2- por fixar-se a fonte de modo que seja compatível com o compilador do MSVC

Fala galera, tava navegando aqui no meu PC e encontrei um Arquivo .txt, com links para downloads de alguns servidores. E no mesmo achei o DarkXPoke. A DxP(DarkXPoke) era um Projeto que o Smix e sua Equipe vinha desenvolvendo. O Servidor contem sistemas variados da PxG. Um Cliente excepcional e muitas outras coisas. (Não sei se já possui esse servidor no TK, mas..) Bom, sobre o servidor, contem esses sistemas que eu saiba. TV Cam System Duel System Icon System igual a PxG. Sistema de Shinys (se não me engano, possui level system, não lembro). AutoLoot Igual PxG Poke Flutes Nick System Addon System Novos Remakes Shiny Ditto Smeagle System Clan System Golden Arena Cla's Cyber Wolrd Quest Rocket and Police Atualizações postadas por Smix: Por enquanto, só me lembro disso, qualquer coisa, se eu me lembrar, edito o tópico. UHEUEH Como qualquer outro Servidor, o DxP também tem seus "bug's". Eu baixei ele aqui pra ver como tava e tal, dai o Servidor tava todo lagado, até o cliente passava em media 7 segundos para executar meu comando. Vídeo demonstrando o servidor feito por Smix e Team. https://www.youtube.com/watch?v=LRZFUFCwIMA Download: DarkXPoke Serve. Créditos: Todos ao Smix e Team. OBG: vá em data/wolrd tem uma parta la com o nome, mapa antigo, ou backup, basta copiar e jogar na world, e mudar no config.lua.

Olá pessoas! Eu estou disponibilizando para você uma versão do OTServer PokeStorm 3.20. Antes de baixarem eu gostaria de enfatizar alguns pontos: - A compilação do servidor está em linux, não há possibilidades de rodar em Windows. - Incluem-se neste download: servidor, cliente e site. - Esta versão e bem antiga, não a atual do PokeStorm. - Este servidor requer um nível superior de conhecimento para deixar-lo online. O servidor requer configurar um S.O de linux antes, é necessário aplicada uma senha própria no mysql - Eu acredito que a password é: pKe_StoRM_21 (mysql ≠ phpmyadmin). - O servidor só abre com este cliente, não abri-rá com o outro. - Este servidor é altamente protegido, deve haver mais problemas para deixá-lo online. Então podemos dizer que ele é base de estudos dos scripts atuais do PokeStorm. Sugestões para deixar online ou fazer um teste: - Como o servidor só roda em LINUX, você pode simular uma maquina virtual em seu computador. Existem diversos programas que fazem isto, como VMWare ou VirtualBOX. - Utilize as versões do Debian ou Ubuntu recentes, você terá que instalar diversas libs para rodar o "executável" do servidor. - Lembre-se: Maquinas Virtuais consomem muito de um computador, computadores com baixo hardware ou básicos dificilmente vão rodar o servidor online, é possível ligar a VM, mas o servidor vai causar uma "lag" em sua maquina. Imagens & Conteúdos do servidor: - http://www.tibiaking.com/forum/topic/33356-pokesilver/ - http://www.tibiaking.com/forum/topic/36312-pokemon-silver/ Baixar servidor, cliente e Website: - Mega: Download - Scan: VírusTotal Nota: Não dou suporte sobre a instalação do servidor, funções e outras dúvidas! Então não ligue se eu ignorar mensagens privadas. Infelizmente começaram a usar esta cópia do PokeStorm 3.20 como fonte de vendas/lucro (estavam revendendo o servidor) que é sacanagem já que Open Tibia foi aberto a todos Então, Divirta-se! Por favor, poste um comentário sobre o servidor!

Video de Demonstração ________________________________________________ data/firestorm_event.lua -- firestorm Variables fsJoinedCountGlobalStorage = 18900 --Player joined event count / recuento de players. fsJoinStorage = 18901 --player join storage / storage del jugador a unirse. fsMinPlayers = 2 --min players needed when time runout / minimo de players necesarios para comenzar el evento. fsMaxPlayers = 5 --max players to join / maximo de players. fsTrophy = 7369 --trophy itemid / itemid del premio(que no sea stackable). fsEventCountGlobalStorage = 18902 --firestorm Count (no move/no moverle). fsWaitMinutes = 1 --when event has opened, how long until it starts? / cuantos minutos tarde el evento en empezar. fsWaitingRoomPos = Position(1016, 940, 7) --middle of waiting room / punto medio de el cuarto de espera. fsArena = Position(991, 930, 7) --when even start where should player be teleported in the arena? / punto donde seran transportados los players. fsArenaFromPosition = Position(984, 925, 7) --pos of top left corner / posicion de esquina superior izquierda. fsArenaToPosition = Position(998, 935, 7) --pos of bottom right corner /posicion de esquina inferior derecha. fsMiddleEventArena = Position(991, 930, 7) --Middle pos of the arena / punto medio de la arena fsWaitingRoomRadiusX = 8 --depends how big the waiting room is 20sqm to x / depende de lo grande la sala de espera en x fsWaitingRoomRadiusY = 8 --depends how big the waiting room is 20sqm to y / depende de lo grande la sala de espera en y fsEventArenaRadiusX = 15 --Depends how big the firestorm arena is 50sqm to x / depende de lo grande de la arena en x fsEventArenaRadiusY = 15 --Depends how big the firestorm arena is 50sqm to y / depende de lo grande de la arena en y fsStartedGlobalStorage = 18903 -- Value: 0 == false, 1 == true, 2 == started --State of the event fsCreateTeleportPosition = Position(1000, 1000, 7) --Where should the teleport be created? / posicion donde sera creado el teleport? function startfirestorm() local specs = Game.getSpectators(fsWaitingRoomPos, false, true, 0, fsWaitingRoomRadiusX, 0, fsWaitingRoomRadiusY) if Game.getStorageValue(fsJoinedCountGlobalStorage) <= fsMinPlayers then for i = 1, #specs do specs[i]:teleportTo(specs[i]:getTown():getTemplePosition(), false) specs[i]:setStorageValue(fsJoinStorage, 0) end resetfsVariables() Game.broadcastMessage('firestorm Event failed to start, because of to little players joined the event!', MESSAGE_STATUS_WARNING) return true end for i = 1, #specs do local rX, rY, rZ rX = math.random(fsArenaFromPosition.x, fsArenaToPosition.x) rY = math.random(fsArenaFromPosition.y, fsArenaToPosition.y) rZ = math.random(fsArenaFromPosition.z, fsArenaToPosition.z) specs[i]:teleportTo(Position(rX, rY, rZ)) end Game.broadcastMessage("firestorm Event has started, good luck to all participant.", MESSAGE_STATUS_WARNING) Game.setStorageValue(fsStartedGlobalStorage, 2) doStartfirestorm() end function doStartfirestorm() if Game.getStorageValue(fsJoinedCountGlobalStorage) > fsMaxPlayers then return false end if Game.getStorageValue(fsStartedGlobalStorage) == 2 then local specs = Game.getSpectators(fsArena, false, true, 0, 10, 0, 10) for i = 1, #specs do local randX, randY, randZ randX = math.random(fsArenaFromPosition.x, fsArenaToPosition.x) randY = math.random(fsArenaFromPosition.y, fsArenaToPosition.y) randZ = math.random(fsArenaFromPosition.z, fsArenaToPosition.z) local randfire = Position(randX, randY, randZ) local randX1, randY1, randZ1 randX1 = math.random(fsArenaFromPosition.x, fsArenaToPosition.x) randY1 = math.random(fsArenaFromPosition.y, fsArenaToPosition.y) randZ1 = math.random(fsArenaFromPosition.z, fsArenaToPosition.z) local randfire1 = Position(randX1, randY1, randZ1) local creature, players = nil, Game.getPlayers() for i = 1, #players do creature = players[i] doSendDistanceShoot(fsArenaFromPosition, randfire, 4) doSendDistanceShoot(fsArenaToPosition, randfire, 4) doSendDistanceShoot(Position(998, 925, 7), randfire, 4) doSendDistanceShoot(Position(984, 935, 7), randfire, 4) doAreaCombatHealth(creature.uid, COMBAT_HOLYDAMAGE, randfire,randfire, -9999, -1000000,7) end end addEvent(doStartfirestorm, 500) end end function resetfsVariables() Game.setStorageValue(fsEventCountGlobalStorage, 0) Game.setStorageValue(fsJoinedCountGlobalStorage, 0) Game.setStorageValue(fsStartedGlobalStorage, 0) end creaturescripts/scriptsdofile('data/firestorm_event.lua') function onPrepareDeath(player, killer) local winner = 0 if player:getStorageValue(fsJoinStorage) >= 1 then Game.setStorageValue(fsJoinedCountGlobalStorage, Game.getStorageValue(fsJoinedCountGlobalStorage)-1) player:teleportTo(player:getTown():getTemplePosition()) player:setStorageValue(fsJoinStorage, 0) player:addHealth(player:getMaxHealth()) if Game.getStorageValue(fsJoinedCountGlobalStorage) <= 1 then --Event ended, someone won! local pla, play = nil, Game.getPlayers() for i = 1, #play do pla = play[i] if pla:getStorageValue(fsJoinStorage) == 1 then winner = pla:getId() break end end winner = Player(winner) if winner then winner:teleportTo(winner:getTown():getTemplePosition()) winner:addHealth(winner:getMaxHealth()) local trophy = winner:addItem(fsTrophy, 1) if trophy then trophy:setAttribute(ITEM_ATTRIBUTE_DESCRIPTION, '['.. winner:getName() ..'] has won the firestorm Event.') end Game.broadcastMessage(string.format('%s is the winner of firestorm Event', winner:getName()), MESSAGE_STATUS_WARNING) end resetfsVariables() end return false end return true end Creaturescripts/scripts dofile('data/firestorm_event.lua') function onPrepareDeath(player, killer) local winner = 0 if player:getStorageValue(fsJoinStorage) >= 1 then Game.setStorageValue(fsJoinedCountGlobalStorage, Game.getStorageValue(fsJoinedCountGlobalStorage)-1) player:teleportTo(player:getTown():getTemplePosition()) player:setStorageValue(fsJoinStorage, 0) player:addHealth(player:getMaxHealth()) if Game.getStorageValue(fsJoinedCountGlobalStorage) <= 1 then --Event ended, someone won! local pla, play = nil, Game.getPlayers() for i = 1, #play do pla = play if pla:getStorageValue(fsJoinStorage) == 1 then winner = pla:getId() break end end winner = Player(winner) if winner then winner:teleportTo(winner:getTown():getTemplePosition()) winner:addHealth(winner:getMaxHealth()) local trophy = winner:addItem(fsTrophy, 1) if trophy then trophy:setAttribute(ITEM_ATTRIBUTE_DESCRIPTION, '['.. winner:getName() ..'] has won the firestorm Event.') end Game.broadcastMessage(string.format('%s is the winner of firestorm Event', winner:getName()), MESSAGE_STATUS_WARNING) end resetfsVariables() end return false end return true end creaturescripts.xml <!-- firestorm --> <event type="prepareDeath" name="fire_event" script="xxxx.lua"/> login player:registerEvent("fire_event") globalevents/scripts dofile('data/firestorm_event.lua') function onThink(interval, lastExecution, thinkInterval) resetfsVariables() if Game.getStorageValue(fsStartedGlobalStorage) < 1 then local teleport = doCreateItem(11796,1,fsCreateTeleportPosition) if teleport then doSetItemActionId(teleport, 5499) doSendMagicEffect(fsCreateTeleportPosition, CONST_ME_TELEPORT) end local r_tp = Tile(fsCreateTeleportPosition):getItemById(11796) addEvent(function() r_tp:remove() getTileItemById(fsCreateTeleportPosition, 11796) end, 60 * 1000) addEvent(function() doSendMagicEffect(fsCreateTeleportPosition, CONST_ME_TELEPORT) end, 60 * 1000) end Game.setStorageValue(fsStartedGlobalStorage,1) print('firestorm Event has started & waiting for players to join! Min: '.. fsMinPlayers ..'/'.. fsMaxPlayers ..'.') Game.broadcastMessage('The firestorm Event has started! You have '.. fsWaitMinutes ..' minutes to join!', MESSAGE_STATUS_WARNING) addEvent(startfirestorm, fsWaitMinutes * 60 * 1000) return true end globalevents.xml <!-- FireStorm--> <globalevent name="firestorm_event" interval="72000000" script="xxxx.lua"/> movements/scripts dofile('data/firestorm_event.lua') function onStepIn(creature, item, position, fromPosition) local player = creature:getPlayer() if Game.getStorageValue(fsStartedGlobalStorage) == 2 then player:sendTextMessage(MESSAGE_INFO_DESCR, 'The Firestorm Event has already started.') player:teleportTo(fromPosition, true) return false end if Game.getStorageValue(fsStartedGlobalStorage) == 0 then player:sendTextMessage(MESSAGE_INFO_DESCR, 'The Firestorm Event has not started yet.') player:teleportTo(fromPosition, true) return false end if Game.getStorageValue(fsJoinedCountGlobalStorage) >= fsMaxPlayers then player:teleportTo(fromPosition, true) player:sendTextMessage(MESSAGE_INFO_DESCR, 'The Firestorm Event is already full! ['.. Game.getStorageValue(fsJoinedCountGlobalStorage) ..'/'.. fsMaxPlayers ..']') return false end player:teleportTo(fsWaitingRoomPos) Game.setStorageValue(fsJoinedCountGlobalStorage, Game.getStorageValue(fsJoinedCountGlobalStorage) + 1) Game.broadcastMessage(string.format('%s has joined the Firestorm Event! [%s/'.. fsMaxPlayers ..'].', player:getName(), Game.getStorageValue(fsJoinedCountGlobalStorage)), MESSAGE_STATUS_WARNING) player:setStorageValue(fsJoinStorage, 1) return true end Movements.xml <!-- firestorm --> <movevent event="StepIn" actionid="5499" script="xxxx.lua"/> ________________________________________________ Créditos: Scrappy Coco

Fiz esse script a bastante tempo a pedido de um membro e resolvi postar para vocês . Versão testada: 8.60 TFS: 0.4 / 0.3.6 Função: Ao sair de uma zona de proteção, caso o player esteja sem bless, ele manda uma mensagem na tela avisando que está sem bless. Em "Data/creaturescripts/scripts", copie e cole um arquivo.LUA e renomeie para checkBless.lua, apague tudo e cole: function onThink(cid, lastExecution, thinkInterval) if(getTilePzInfo(getCreaturePosition(cid))) == false and getPlayerStorageValue(cid, 23333) <= 0 then for b = 1,5 do if getPlayerBlessing(cid, b) == false then setPlayerStorageValue(cid, 23333, 1) return doPlayerSendTextMessage(cid, 22, "Você não tem todas as bless, tome cuidado.") end end elseif (getTilePzInfo(getCreaturePosition(cid))) == true and getPlayerStorageValue(cid, 23333) == 1 then setPlayerStorageValue(cid, 23333, -1) end return true end Em "Data/creaturescripts", abra o creaturescripts.xml e adicione: <event type="think" name="checkBless" event="script" value="checkBless.lua"/> Novamente em "Data/creaturescripts/scripts", abra o arquivo login.lua e adicione: registerCreatureEvent(cid, "checkBless") Espero que gostem , caso dê algum erro, me avise! Créditos: Wakon - Script ScythePanthom -- Pela idéia.

Bom, galerinha, este é um creature event com callback onLogin no qual chama uma função em loop/laço infinito. checkHunger(cid) O que faz essa função? Ela checa os ticks de uma condição de regeneração, na qual o creatureid player adquire ao se alimentar com um food no game. Se o valor desses ticks indicar que o player não se alimentou, será feita uma contagem de segundos via storage. Se essa contagem passar do tempo máximo que se pode ficar sem se alimentar (alterável), o player começa a perder determinada porcentagem (alterável) de sua saúde (Health/Life/Vida), de certo em certo tempo (também alterável), até que o mesmo se alimente novamente ou simplesmente morra. Caso o player morra, quando entrar, ele vai continuar perdendo a porcentagem de HP, até que enfim se alimente. Acredito que seja bom para servidores sérios. Sem mais delongas.. checkhunger.lua (data\creaturescripts\scripts): -- Developed by Wise ~ TibiaKing.com local t = { hp = 2, -- % maxTime = 25 * 60, -- minutes * 60 lossInterval = 5, -- seconds hstor = 98765 -- hunger storage } function checkHunger(cid) local h = getPlayerStorageValue(cid, t.hstor) local loss = t.lossInterval > 1 and t.lossInterval or 2 if getPlayerFlagValue(cid, PLAYERFLAG_CANNOTBEATTACKED) then return true elseif getPlayerFood(cid) < 1 then if h <= t.maxTime then if h < 0 then setPlayerStorageValue(cid, t.hstor, 0) end setPlayerStorageValue(cid, t.hstor, getPlayerStorageValue(cid, t.hstor) + 1) else addEvent(function() if isPlayer(cid) then doCreatureAddHealth(cid, -(t.hp * (getCreatureMaxHealth(cid) / 100))) end end, (loss - 1) * 1000) end else if h > 0 then setPlayerStorageValue(cid, t.hstor, 0) end end addEvent(function() if isPlayer(cid) then checkHunger(cid) end end, 1000) return true end function onLogin(cid) return checkHunger(cid) and true end Tag - creaturescripts.xml (data\creaturescripts): <event type="login" name="checkHunger" event="script" value="checkhunger.lua"/> Configuração simples: local t = { hp = 2, -- porcentagem de HP que o player perderá maxTime = 25 * 60, -- tempo máximo para ficar sem se alimentar em minutos * 60 (no caso, seriam 25 minutos, ou seja, 1500 segundos) lossInterval = 5, -- tempo do intervalo de perda da porcentagem do HP, em segundos (no caso, perderia a porcentagem estipulada a cada 5 segundos) hstor = 98765 -- storage que faz a contagem do tempo máximo } PS: com esse callback, não se registra creature event.

Olá amigos da Comunidade Tibiaking venho trazer a vocês este tutorial de como compilar o TFS v1.0 em windows 32 or 64 bits com Microsoft Visual Studio 2013 (Obs: Eu uso a 2013 Ultimater Recomendo). Vamos ao tutorial >> 1) Primeito baixe os programas abaixo se não tiver claro: MSVS 2013 >> Click Here http://www.visualstudio.com/downloads/download-visual-studio-vs Agora baixar os Programas do TFS v1.0: TFS Sdk >> Click Here - Link 2: (Mirror) Source Do TFS v1.0 >> Click Here Atenção Baixe apenas a Boost da versão do Pc 32 or 64 Bits. Boost MSVS 2013 32Bits >> Click Here Boost MSVS 2013 64Bits >> Click Here 2) Agora vamos começar a instalar os Programs do TFS v1.0 >> Primeiro instale o Boost 32 or 64Bits No diretorio raiz do seu HD: Print >> Agora coloque o SDK Extraido na raiz do Seu HD: Print >> Faça a mesma coisa com a source do TFS v1.0: Print>> Depois de ter feito tudo isso abra a pasta da source e abra a pasta vc12 e siga a print: ( Obs: Você vera Boost32 isso acontece porque na instalação eu coloquei no diretório como Boost32 (Primeira foto) mas basta você deixar como C:\Boost ( A letra C:\ Refere-se a letrado do seu HD ela pode ser D - H - F e Etc... Varia de Pc a Pc.) ) Print >> Com o Visual Studio (2013 Recomendado) aberto Siga as Prints abaixo: Click com botão direito no projeto e vá em propriedades: Print >> Depois Click em Cofiguration manager: Print >> Vamos as explicações: 1 >> Click la Primeiro Quando abrir a caixa com os passos 2-3 and 4 siga-os abaixo >> 2>> Coloque release e só nada mais. 3>> escolha para qual sistema de 32 or 64Bits. (Lembrado que ali e de acordo com a Boost oks. ) 4>> Só Click lá quando terminar de fazer os passos acima. Rsrs.] ------------------------------------|||||------------------------------- 3) Terceira parte Passos 1 do tutorial vamos lá >> Primeiro agora depois de fazer os passos anteriores faça os seguintes passos Click em C/C++ >>> General e siga a Print: Print>> Caso você não entendeu siga as explicações: Vamos as explicações: 1>> Onde você Deve clicar C/C++ >> General. 2>> Click onde a seta esta apontado e click em edit ou de dois clicks. 3>> Quando abrir a caixa de dialogo deixe os diretórios iguais ao da foto e de um Ok. ( Obs: Você vera Boost32 isso acontece porque na instalação eu coloquei no diretório como Boost32 (Primeira foto) mas basta você deixar como C:\Boost ) Terceira parte passo 2 Click em Linker >> General e siga as Prints >> Prints >> Vamos as explicações: 1>> Onde você deve Clicar depois de fazer os passos anteriores da terceira parte passos 1. Oks. 2>> igual ao passo 2 da parte 1 da terceira parte só que mais explicativo. 3>> Click em Edit e espere abrir a caixa de Dialogo siga a Print 2. Print 2>> Deixe igual a caixa de dialogo onde esta marcado com o 1 Grande Oks. Depois basta da um OK e um Apply e Ok e esperar aparecer Ready >> Print>> Explicações: 1>> Esperar o Ready. 2>> Click com o botão direito no projeto e depois em BuilD. Basta Esperar terminar a compilação e Pronto. Caso o tutorial não tenha sido bem explicativo Posso melhorá-lo a sugestão e depois posto a foto final da compilação Oks. Se quiser me agradecer eu serei grato pois deu trabalho fazer esse tutorial pois bugo algumas vezes. Um grande abraço e fiquem com Deus! Nota: Eu Tenho permissão do autor do tutorial Original em Inglês para criar o post em PT-Br Não e permitido copiar ou reproduzir sem a devida autorização de Dominique120. Não e permitido postar o Faq do mesmo aqui neste tutorial para ver mais informações siga o LINK ou Veja os #créditos. #Creditos: -------------------///------------------ Dominique120 >> Click aqui para ver o tutorial original -------------------///-------------------- ZORAN >> Click aqui para ver o meu perfil

Esse script é para aquele OTserver que pode bugar o NPC para comprar itens, um deles é o de potion. Então eu resolvi criar esse script, mais ele nao é novidade, você ja deve ter visto. - Para que serve? Hora, para vender itens, e nao se preocupar se alguem vai bugar o seu OT, pode ser tanto runas, potions e etc... - Como eu faço para ter em meu servidor? Basta adicionar o actionID 7004 numa alavanca, e depois adicionar os script em data\actions\scripts e actions.xml alavancasell.lua local config = { money = 1000, -- Dinheiro que vai custar item = 7618, -- ID do item que vai vender count = 20, -- Quantidade } function onUse(cid, item, fromPosition, itemEx, toPosition) pos = getCreaturePosition(cid) if item.itemid == 1945 then if doPlayerRemoveMoney(cid, config.money) == TRUE then doPlayerAddItem(cid, config.item, config.count) doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, "Você acaba de comprar "..config.count.." "..getItemNameById(config.item)..".") doSendMagicEffect(pos, CONST_ME_MAGIC_BLUE) else doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, "Desculpe, mais você nao tem dinheiro suficiente.") doSendMagicEffect(pos, CONST_ME_POFF) end end end actions.xml <action actionid="7004" event="script" value="alavancasell.lua"/> É isso galera, esse script simples que salva vidas Abraços...

Olá pessoal, criei um quest maker e quero compartilhar com vocês, para opiniões e avaliações. O programa está em versão beta, não fiz para ficar bonitinho, fiz para praticar, e depois, fazer um bonitinho. previsão da versão 1.0: [bETA] Quest Maker - By Caronte Como funciona? Ele pede 3 coisas, que precisam ser respondidas de acordo com suas funções. ao terminar de fazer as 3 perguntas, ele gera um arquivo.lua na pasta onde se encontra, prontinho para colocar como uma quest. Exemplo: Exemplo com storage: function onUse(cid, item, frompos, itemex, topos) if getPlayerStorageValue(cid,1234) == -1 then doPlayerAddItem(cid, 2160, 10) doPlayerSetStorageValue(cid, 1234, 1) else doSendMagicEffect(frompos, CONST_ME_POFF) doPlayerSendCancel(cid, 'The chest is empty.') end return true end Exemplo sem storage: function onUse(cid, item, frompos, itemex, topos) doPlayerAddItem(cid, 2160, 10) return true end Código fonte: Bom pessoal, é um código super simples, mas para mim, já ajuda um pouco...

Fala galerinha do TK, já vi gente pedindo aqui e por PM para mim o script de dar uma porcentagem a mais de exp para jogadores VIP. Então venho trabalhando com o lindo do xWhiteWolf para disponibilizar esse sisteminha simples e 100% funcional. Como funciona: Quando qualquer player logar irá aparecer a mensagem: Adquira sua VIP ACCOUNT "seusite" e obtenha X% a mais de EXP para facilitar sua hunt. Quando qualquer player logar e possuir VIP ACCOUNT irá aparecer: Você é um jogador vip, possui X% a mais de exp do que os jogadores free's. Diferente de muitos scripts já visto, a mensagem aparecerá em POP-UP quando o player logar (POP-UP é aquela janelinha que aparece para fechar, caixa de notificações ) Vamos ao script/instalação: Em data/creaturescritps/scripts crie um arquivo com o nome tkexp.lua e adicione dentro: function onLogin(cid) local rate = 1.5 -- 50% local config = { welvip = "Você é um jogador vip, possui "..((rate - 1)*100).."% a mais de exp do que os jogadores free's", not_vip = "Adquira sua vip em nosso site www.tibiaking.com e obtenha "..((rate - 1)*100).."% a mais de EXP para facilitar sua hunt!", s = 13540, -- storage vip } if getPlayerStorageValue(cid, config.s) - os.time() >= 1 then doPlayerSetExperienceRate(cid, rate) doPlayerPopupFYI(cid, config.welvip) else doPlayerPopupFYI(cid, config.not_vip) end return TRUE end Em data/creaturescripts/creaturescripts.xml adicione a seguinte linha: <event type="login" name="tkexp" script="tkexp.lua"/> Em data/creaturescripts/scritps abra o login.lua e embaixo de registerCreatureEvent(cid, "Frags") ou qualquer registerCreture... adicione a seguinte linha: registerCreatureEvent(cid, "tkexp") Pronto! Importante: Configurando: local rate = 1.5 -- 50% - Rate está 1.5 ou seja 1.0 = padrão, 1.5 = padrão + 0.5 = 50%, por exemplo: caso queira adicionar 30% a mais de exp para os vips use 1.3% (padrão de 1.0 mais 0.3 = 1.3) welvip = mensagem que aparecerá quando o player logar avisando que está vip e possui a porcentagem a mais de EXP not_vip = verifica que o player não é vip e mostra a mensagem fazendo um "Marketing" para comprarem mostrando o benefício s = 13540, = Aqui a storage da sua VIP Account, você poderá ver em suas libs, cada servidor tem um número, a maioria usa 13540 mas é importante verificar Tudo ok galera Caso não entendeu ou tenha alguma dúvida não tenha vergonha de perguntar, afinal ninguém nasceu sabendo não é? Espero que gostem e usem Até o próximo. Absolute.

Está usando Modern AAC? Se sim, precisa editar /system/application/views/create.php e adicionar as novas vocações.

Parabéns, além do site estar muito bom, você tá fazendo um ótimo trabalho. desejo mais sucesso.

Substitui o teu creaturescripts\scripts\critical.lua por esse: --[[Critical System ------------------------- By Night Wolf]] local lvlcrit = 48913 local multiplier = 1.5 function onStatsChange(cid, attacker, type, combat, value) if isPlayer(attacker) and (not (attacker == cid)) and (type == STATSCHANGE_HEALTHLOSS or type == STATSCHANGE_MANALOSS) then if getPlayerStorageValue(cid, 48914) > 0 then return true end if (getPlayerStorageValue(attacker, lvlcrit)*3) >= math.random (0,1000) then dano = math.ceil(value*(multiplier)) setPlayerStorageValue(cid, 48914, 1) doTargetCombatHealth(attacker, cid, combat, -dano, -dano, 255) setPlayerStorageValue(cid, 48914, -1) doSendAnimatedText(getCreaturePos(attacker), "CRITICAL!!", 144) return false end end return true end Opa, erro meu. Tenta esse

Creio que o conteúdo que o Wanko editou esteja certo! só vou dar uma melhorada para deixar mais fácil ok? function onThink(interval, lastExecution, thinkInterval) local Npcname = "Varkhal" -- Nome do Npc local pos = {x=3145, y=3485, z=7} -- Local onde aparece o npc local nMin = 60 -- tempo em minuto para o npc sumir. addEvent(doRemoveCreature, nMin*60*1000, doCreateNpc(Npcname, pos)) doBroadcastMessage('O '.. Npcname ..' apareceu na cidade, aproveite pois ele irá sumir em '.. nMin ..' minutos.') return true endA função do código é a mesma só deixei mais facil para configurar

Primeiro vocÊ tem que ver se não é o script da recompensa, vamos lá; -Logue no seu OT com admin, botão direito + esquerdo sobre o baú que está a recompensa e logo vai aparecer o seguinte: ActionID:XXXX No lugar do XXXX vai está o id da action do baú, em seguida vamos procurar onde localiza-se o script com a ID do Action (XXXX) -Entre na sua pasta do OT, data/actions/actions.xml -Abrindo o arquivo, digite ctrl + f e coloque o número da ID que você achou no baú. Quando você achar o ID no actions.xml ele vai te dizer onde se localiza o script com o mesmo, por exemplo; <action actionid="35872" event="script" value="questsnovas1.lua"/> No meu caso, o ID é 35872 e ele se localiza data/actions/scripts/questsnovas1.lua Agora é só verificar o script, manda pra gente e analiso direitinho.

Fala @wevertonvrb de tanto mecher aqui consegui e vou te ajudar.. Abra Pastadoserver\data\npc\lib\npcsystem e abra o arquivo mudules.lua procrure por esta linha -- > totalCost = totalCost + (math.max(1, math.floor(amount / getContainerCapById(backpack))) * 20 ali onde esta 20 coloque 9999999999999999999999999999999999 Ai quando o player marcar a opçao buy with backpack vai aparecer vai transforma o item em 20 gold só que quando ele clicar comprar vai falar que ele não tem dinheiro. porque esses 20 gold ficou 99999999999999999999999999 Teste ai e me fale, Aqui deu certo ! espero ter ajudado.

Olá pessoal, a algun tempo não venho aqui e estava sem tempo para trabalhar com tibia, porém essa semana um topico meu foi fechado e eu vim conferir, o topico tfs black box edition que era uma compilação minhas, os links foram quebrados e o topico fechado, mais enfim eu atualizei mudei o nome e voltei pra postar aqui essa nova release minha. TFS TIBIADEVEN V1.0A, TIBIA 10.81 PROTOCOLO. bom não é nada demais, só a TFS compilada por min com algumas correções, e funcionando na versão 10.81, suporta qualquer datapack, global, etc, você pode usar em qualquer otserver que é provavel que funcione, até mesmo no evolution server. download em: https://github.com/mario0582/tibiadeven_server/blob/master/README.md scan em: https://github.com/mario0582/tibiadeven_server/blob/master/README.md download da data em: Clique Aqui essa data é a do revolution, corrigida e trabalhada, ela roda no procotolo 10.81 mais não possui as features, outfts, montarias etc, apenas até 10.78, mais pode ser trabalhada e atualizada suporta as novas features. GITHub do servidor para colaboração em: https://github.com/mario0582/devenserver scan da data:https://www.virustotal.com/pt/file/949c9dd3ee855a4d97fb646e7ec5fe2bd309b432eed8748cb2fb5e23290a8ba0/analysis/1443010333/ o distro suporta as seguintes datas: # Vanaheim global # GLOBAL FULL tibiaking # Evolution (testado) # Evolution black box (testado) # Neptune Server # Outras ... (deve suportar qualquer uma). Problemas? Relate aqui, eu não tive muito tempo pra testar, mais qualquer problema eu resolvo.

alguma boa alma joga esse ótimo script para tfs 1.2

Parabéns pela iniciativa! Porém já existem diversos downloads relacionados a esse no fórum amigo! Reputado pela intenção de ajudar, é disso que nosso TK precisa! Abraços!

Otimo Mapa Rep+

Nome: Kill Boss System Função: Ao desferir o último golpe no "BOSS" configurado na script ganha uma spell "storage" x3 de cargas, alem de mandar uma mensagem para todo o servidor anunciando quem desferiu o último golpe no "BOSS" Autor: Nokia Versão Testada: 8.60 ~ Em data/creaturescripts/scripts Crie 1 arquivo chamado storageBoss.lua e copie e cole isso lá dentro function onDeath(cid, corpse, killer) local monstName = "NOME" -- nome do monstro local target = getCreatureTarget(cid) if isMonster(cid) then setPlayerStorageValue(killer[1], 111310, getPlayerStorageValue(killer[1], 111310) +3) doPlayerSendTextMessage(killer[1], MESSAGE_STATUS_WARNING, "Você absorveu a técnica NOME DA SPELL(3x).") doBroadcastMessage("O jogador "..getPlayerName(killer[1]).." absorveu a técnica NOME DA SPELL ao desferir o último golpe no NOME DO BOSS.") doSendMagicEffect(getPlayerPosition(target), 65) end return TRUE end Em creaturescripts.xml adicione a seguinte TAG <event type="death" name="storageBoss" script="storageBoss.lua"/> Agora vá no monstro configurado na script e abaixo de </loot> adicione <script> <event name="storageBoss"/> </script> Agora implantando na spell, vá até na spell.lua desejada e adicione local chargeCount = getPlayerStorageValue(cid, 111310) if chargeCount < 1 then doPlayerSendCancel(cid, "You do not have enough charges to cast this spell.") return TRUE end setPlayerStorageValue(cid, 111310, chargeCount -1) beijo na bunda <3

Ola Galerinha do tibiaking Estou querendo um Systema de Castle war guilds. Ex : O Systema não e igual os outros de puxar as alavancas e a guild fica dono do Castelo e tal o que eu quero e que Tenha Um Boss no castelo Tipo Um monster Que quando Uma guild matar Esse boss Ela ficar dono Do Castelo. ex2 : quando uma guild ja Conquistou esse Castelo Ai Vem outra guild Tenta Pegar o Castelo Deles Ai Summona Guardas automaticos para proteger. ex3 : MAs o Objetivo Não e Puxar as alavancas E mata o boss dentro do Castelo Mas seria a mesma Função ai a Guild Atual Devera Proteger Seu Castelo Progetendo O Guardiao Do Castelo healando ele e etc.. Ex4 : devera ter 2 Castelos Para Guild Ficarem Batalhando e Se uma guild possui Um castelo Ela podera ter 2 castelo. Ex5 : O Castelo Ele não precisa De comandos para ser aberto Ele fica Aberto se não como As guild Iriam Batalhar. Ex6 : o Objetivo Do event e que o Castelo Fique Sempre Aberto COmo O castelo 24hrs MAs esse e Diferente. ex7 : Que Todas guild Possam Tenta Dominar os Castelo Matando o boss. Ex8 : Quando uma Guild Matar o boss Os player que estão dentro são teleportados Para o templo E uma mensagem Aparece. Ex : guild Os Cavaleiros Da mort São donos do Castelo Atualmente Ai Chega a guild chamada Mensageiros Da lux E tentam Dominar o castelo Ai eles consegue Mata o boss ai os player Da guild Os cavaleiros Da mort São Teleportados Para o templo E uma Mensagem Aparece a Guild Cavaleiros Da Mort Perdeu O castelo Para Os Mensageiros Da lux. Ex9 : Só Podera Entra no maximo Uma guild Para tenta Conquistar o Castelo Tendo 2 Castelo Para conquistalo. Ex : Mas so Quando O castelo Ja tiver dono que So podera 1 guild Tenta coquistar o castelo os cavaleiros da mort estão dono do Castelo Grão Seco A guild Mensageiros da lux Esta invadindo o castelo Grão Seco. Outra guild tenta Entrar no Castelo atual da Cavaleiros Da guild Mas Cavaleiro da mort Esta Em guerra dentro do castelo contra Mensageiros da lux Ai Aparece uma Mensagem Na Porta Limites De guild em Batalha 2. Tendo 2 Castelos Para conquistar. Se não conseguirem Esse tipo De Castelo War system Pode Ser Esse Aqui. >>>>>> Obg +rep Pra quem ajuda. Se não Fui claro Suficiente So Posta. Olha Um Systema De castelo War Que Achei Mas não e esse tipo que quero Site : --- http://www.tibiaking.com/forum/topic/138001-castle-war-20/

OTScript Live! v0.4.1.13 Tamanho do arquivo: 1001.47 KB Criador: Colex Minha Opinião: Excelente Tem de Tudo! Ferramentas: > LUA Syntax Highlighter > Various Types of Highlight > Functions' Window with Easy-To-Use Search System > Items' Window with Easy-To-Use Search System > LUA Syntax Helper Window > Auto-Complete with LUA and OTServer functions (F1 to activate it) > Search, Replace and Go to Line > Magic Area Editor v0.2 > Spells Maker v0.1 > Quests Maker v0.1 > Hotkeys (Ctrl + Shift + [0..9]) > Debugger (F5 - Shortcut) > Data Editor > OTScriptLIB Installer (v0.2 included) > Tabs System > Macro Recorder > LUA Compiler (F9 - Hotkey) Scan: VirusTotal: http://www.virustota...7a44cbbdd5a1f31 OTScript Live! v0.4.1.13: http://rapidshare.co...cript_Live_.rar (rapidshare) http://www.box.net/s.../h26f5wz0ow.rar (box) OTScript.Live - Version 0.4.1.12.rar