Líderes

Bom pessoal, vi alguns tópicos pedindo esse script, e como precisei dele agora, resolvi faze-lo. Em actions.xml: <action itemid="22726" script="descongelando_ursagrodon.lua" /> Agora em actions/scripts/ crie um arquivo lua com o nome de: descongelando_ursagrodon.lua local itemId = {22729, 22730, 22731, 22732} local porcentagem = 50 local function revertIce(toPosition) local tile = toPosition:getTile() if tile then local sprite = tile:getItemById(itemId[4]) if sprite then sprite:transform(itemId[1]) end end end function onUse(player, item, fromPosition, target, toPosition, isHotkey) if target.itemid == itemId[1] or target.itemid == itemId[2] or target.itemid == itemId[3] then if player:hasMount(38) then return player:sendTextMessage(MESSAGE_EVENT_ADVANCE, 'You already have the obedience of ursagrodon.') end local rand = math.random(1, 100) if rand <= porcentagem then player:sendTextMessage(MESSAGE_EVENT_ADVANCE, 'The ice cracked and the frozen creature with it - be more careful next time!') item:remove(1) target:transform(itemId[4]) addEvent(revertIce, 600000, toPosition) else if target.itemid == itemId[1] then player:sendTextMessage(MESSAGE_EVENT_ADVANCE, 'You managed to melt about half of the ice blook. Quickly now, it\'s ice cold here and the ice block could freeze over again.') target:transform(itemId[2]) elseif target.itemid == itemId[2] then player:sendTextMessage(MESSAGE_EVENT_ADVANCE, 'You managed to melt almost the whole block, only the feet of the creature are still stuck in the ice. Finish the job!') target:transform(itemId[3]) elseif target.itemid == itemId[3] then player:sendTextMessage(MESSAGE_EVENT_ADVANCE, 'The freed ursagrodon look at you with glowing, obedient eyes.') target:transform(itemId[4]) player:addMount(38) item:remove(1) addEvent(revertIce, 600 * 1000, toPosition) end end end return true end Lembrando que precisa editar as fases do congelamento pelo id: local itemId = {22729, 22730, 22731, 22732} local porcentagem = 50 Espero ter ajudado.

Um método diferente de agir. Escolhas diferentes, um projeto surpreendente, e o melhor é opensource. Sim, você pode ter acesso a este servidor que estou desenvolvendo em parceria com a Serversoft para você. Um servidor com uma mega estrutura para suportar seus jogadores online sem nenhum problema como: debug, bug de clonagem, instabilidade entre diversos outros dos servidores free's disponíveis para download nessa vasta internet tibiana. Uma inovação no ramo de OTservers, distribuindo não só a datapack como as sourcers e os sistemas, absolutamente tudo que você procura. Basta baixar, compilar... Mas eu não sei compilar. Não há problema nisso, o OTPanel da Serversoft faz tudo isso para você. Basta clicar num botão de "play" e ver a mágica acontecer. O projeto Vanaheim, foi criado com o intuito de ser inteiramente grátis para toda a comunidade. Um servidor no qual a diversão é o fator principal, um projeto com viabilidade absoluta por todos os tibianos. O projeto conta com uma área exclusiva no GitHub para que todos possam acompanhar a evolução do mesmo, dia a dia, diversas atualizações estarão disponíveis a todos. Desde uma action até uma modificação na source vocês terão acesso. O servidor conta com um mapa Global Full, quando eu digo full, quero dizer que está 99.99% do mapa completo, sem bugs entre outros. Um servidor que você escolhe a rate experience/skill que desejar, ele vai se adaptar! Você pode escolher se quer ou não que as quests tenham as missões originais 100%! E o melhor? Além do servidor estar disponível para download ele está online para quem quiser conhecer o projeto, ajudar de alguma forma e o melhor de tudo, se divertir. Venha se divertir: http://www.vanaheimglobal.com RATES Level 8 - 50: 300x Level 51 - 80: 200x Level 81 - 100: 150x Level 101 - 140: 90x Level 141 - 160: 70x Level 161 - 180: 60x Level 181 - 200: 50x Level 201 - 230: 40x Level 231 - 260: 30x Level 261 - 290: 20x Level 291 - 310: 15x Level 311 - 340: 10x Level 341 - 350: 8x Level 351 - 380: 6x Level 381 - 430: 4x Level 431 - 450: 2x Level 451+: 1x Skill: 40x Magic: 8x Loot: 3x EVENTOS Em Breve. IMAGENS Em Breve. GITHUB Para acompanhar e baixar o servidor atualizado, segue o link do nosso projeto no GitHub: DOWNLOADS Servidor Mapa Yasir Scan CRÉDITOS TFS Team Orts Project Bruno Minervino

Gostei do script luan, parabéns! Ali em : local function revertIce(toPosition) local tile = toPosition:getTile() if tile then local thing = tile:getItemById(item4) if thing then thing:transform(item1) end end end Não deveria ter o config.item4 e config.item1? Creio que assim vai dar erro.

Atualizado para a versão 1.2 do projeto oficial!

Eae Galera do TibiaKing É o seguinte Hoje trago a vocês o Baiak Rox Editado por Min Espero que Gostem Oque eu Fiz ? | Novo Visual do Templo Totalmente ICE | Critical System | Task System | Dodge System | Run Event (CORRIDA MALUCA) | Reset System (ÁREA EXCLUSIVA COM CASTELO E HUNTS) para resetar fale !reset | Guild Frags System ( ACESSO AO PROMOTE E ITENS EXCLUSIVOS ) | War System (100% RODANDO EM SQLITE) | Cast System (100% Roda em Mysql ) ( Para Ativar vai em Config.lua e ache | enableCast = false | mude para true ) Duvidas entrem em http://www.tibiaking...os-na-distro/ | PvP Balanceado Agora com mais RPG | Armas Arrumadas Para Melhor PvP | Varios Eventos Automaticos | Battle Field Event | Capture The Flag Event | City War | Adicionado CASTLE 24HORAS (COM CASTELO) e AVISOS DE INVASORES | Itens DONATES | Área DONATE ~~ (Só Entra Quem Usar o Itens de Premium Days) | Vários Novos Script | Fast Atk Arrumado | Distro 0.4 Rodando 100% ( Se For 64x Bits) | Refinamento ( Aprimora seus Equipamentos ) | Frags no Look | Npc Hero Seller (Vende Itens Exclusivos para quem tiver honor points) Obs:Consegue no GFS) | Entre Outras Coisas | SENHA DO GOD: rox/styller | Aqui Vai Umas Prints | Castelo Reset System | Nova Imagem do Templo | Área Donate | Mostra de Itens Donate + Eventos | Download | Scan | Créditos | Gostou ? Então dei um REP

Boa Noite , Boa Tarde ou Bom Dia TK's não sei a hora que vocês vão ver o Tópico Estava com meu Projeto do "Pokemon H" Fiz várias Ediçoes no Servidor Que Baixei aqui no Tibia King Mesmo e vim disponibilizá-los para vocês. Então bora ao que interessa né? • Menu: ├ Informações; ├ Edições; ├ Erros; ├ Prints; ├ Mapa ├ Download; ├ Atualização; ├ Utilitários; └ Créditos. • Informações Básicas • • Edições / Ajustes • • Erros do Servidor • • Prints• • MAPA • • Downloads • Cliente * MediaFire e Scan Servidor * MediaFire e Scan • Download Atualização 2.0 • Download: https://www.mediafire.com/?ik211gku2hdqz2t Scan : • Download Atualização 3.0 • 2016 OBS: NÃO TERÁ MAIS EDIÇÕES. • Utilitários • Remeres que usei pra editar: AQUI • Créditos • Brun Por Criar o Servidor Slicer Por Editar o Servidor Mulurka (pelas out) Stylo pelo tuto do ícone system noninhu por ajudar em alguns spells tem 2 caras tbm eu eskeci o nome deles agora que ajudaram 1 com as insignias na barra de skill e o outrio pelas scripts da liga pokemon dandanrvb pelas scripts do icone system erondino por algumas caves ih é só bjundão a all Vudi (Eu) Por editar o resto do servidor e trazer as novidades Tioj Pelas edições e Por fazer eu copiar a organização do tópico dele kk obg Kuuhaku pela cave dos geot . Held Itens By Gabriel Sales Gabriel Sales AnnaFeeh pelo script do ditto system pxg Obs: Se Está faltando algum crédito me avise pra mim colocar ( Não sei se está faltando algum) Obs: Qualquer Outra Duvida Estarei de Suporte no Tópico Obs: SENHA GOD/GOD OBS : Se Pegar o Servidor e Postar em Outro Fórum sem as minhas permissão vou pedir para o dono do forum ou site retirar o conteúdo . (Esse Conteúdo é exclusivo do TibiaKing obrigado) Se ajudei Já sabe né

OK, isto não é exatamente um sistema, visto que é composto por um único arquivo com um único callback, mas enfim. Antes de começar a desenvolver o tópico, digo-lhes: o código é para poketibia, não outros derivados ou Tibia comum. Introdução: A pedidos de um amigo, resolvi escrever este script. Por não programar em OTClient, optei por escrevê-lo em uma talkaction. Para aqueles que não conhecem o sistema, consiste em praticidade para as transformações do Ditto: ao invés de repetir o cansativo processo de procurar o pokémon que deseja-se copiar, você pode simplesmente salvá-lo na memória do Ditto para, sempre que quiser, transformá-lo em um único comando. Você pode configurar quantos slots de "memória" quiser. Para usar os comandos, você deve colocar uma pokebola com um Ditto no slot 8/feet (a.k.a "pokeball slot"). Alguns, no entanto, necessitam também que o pokémon esteja "solto". Comandos: /memory check Use este comando para verificar os atuais slots de seu Ditto. /memory forget [slot] Use este comando para deletar uma memória salva, respectiva ao slot indicado. Ex.: /memory forget 1 /memory save [slot] Use este comando para salvar uma memória, respectiva ao slot indicado. A memória salva será do pokémon que seu Ditto estará transformado no momento. Ex.: /memory save 3 /memory [slot] Use este comando para transformar seu Ditto no pokémon que estiver armazenado no slot indicado. Ex.: /memory 2 PS: Você também pode usar !memory. Instalação: Em data/talkactions/scripts, crie um arquivo com extensão .lua, nomeie-o dittomemory e coloque o seguinte conteúdo: Em data/talkactions, abra o arquivo talkactions.xml e coloque a seguinte tag: <talkaction words="/memory;!memory" event="script" value="dittomemory.lua"/> Versão testada: 8.54 Servidor testado: PDA by Slicer, versão 1.9 É um código bem simples, escrito em poucos minutos. Resolvi postá-lo pois gostei do resultado apresentado. Para alguns, pode não ser tão útil; para outros, espero que sim. É isso aí, até mais.

Bom a pedidos vim postar a sprite do digicerb... "mais a spr e dat dele já é publica mimimi" Somente até a versão 1.1 (Estou trazendo a Versão Oficial, que diga-se de passagem tirei do cliente dele hoje) Não faço ideia de que versão está o servidor dele... mais me pedirão as spr e dat... Vamos Lá xD (*OBS: Não funciona Object Builder, pelo menos aqui só funcionou no Dat Editor) Download SCAN Creditos Insaed Digiwo kbpaulo Digicerb Imagem

Criando seu tibia bot com TibiaAPI Aprenda do 0, com nada de experiência e saia programando seu Bot! Criando seu tibia bot com TibiaAPI - Parte 1 "Conhecendo o Visual Basic e o TibiaAPI" Aprenda o princípio do Visual Basic e do TibiaAPI, como funcionam e para que servem. É a intro do Tutorial. Parte 1 [*]Criando seu tibia bot com TibiaAPI - Parte 2 "Visual Basic Interface" Conheça um pouco mais da Interface do Visual Basic, e aprenda a adicionar a referencia da DLL TibiaAPI no seu programa. Parte 2 [*]Criando seu tibia bot com TibiaAPI - Parte 3 "Desenvolvendo com TibiaAPI.dll" Aprenda o básico dos códigos do VBnet. Importar o TibiaAPI aos códigos, declarar variávies e criar o Loader. Parte 3 [*]Criando seu tibia bot com TibiaAPI - Parte 4 "Form2 e Funções Básicas" Aprenda a criar outras forms e criar funções básicas de um bot. Como por exemplo, Outfits e Light Hack. Parte 4 [*]Criando seu tibia bot com TibiaAPI - Parte 5 "Configurando e Compilando" Aprenda a configurar a Assembly e a Compilar seu bot pronto. Parte 5

Fala galera, Vejo muita gente com dúvida de como fazer custom clients. Neste tutorial vou ensinar para vocês criar custom clients de todas as versões e com qualquer ip. 1º Passo: • Baixe o programa NotePad http://notepad-plus-plus.org/repository/6.x/6.7.5/npp.6.7.5.Installer.exe 2º Passo: • Vá no diretório onde está instalado o client que deseja editar, clique com o direito em Tibia.exe e selecione "Edit with Notepad++" 3º Passo: • Pressione ctrl + f e busque por login01.tibia.com e substitua pelo seu ip, (exemplo.com.br). Perceba que login01.tibia.com + os 3 NUL que aparecem, somam 20 caracteres (NUL conta como 1). O seu IP deverá conter 20 caracteres ou menos. Exemplo: exemplo.com.br possui 14 caracteres Como o meu exemplo possui 14 caracteres e login01.tibia.comNULNULNUL possui 20, vou ter que preencher esses 6 caracteres que faltam com 6 NUL. Para isso, você deverá deixar o cursos de texto na frente do seu ip (exemplo.com.br"AQUI") e ir para Plugins>Converter>Conversion. Digite 0 em decimal e clique em (ASCII: Insert) 6 vezes, devendo ficar assim: exemplo.com.brNULNULNULNULNULNUL (Lembrando que acrescenta 6 NUL no caso do exemplo, o seu IP deverá completar os 20 caracteres podendo haver mais ou menos NULs). Procure por esses ips e faça os passos acima em todos: login01.tibia.com login02.tibia.com login03.tibia.com login04.tibia.com login05.tibia.com tibia01.cipsoft.com tibia02.cipsoft.com tibia03.cipsoft.com tibia04.cipsoft.com tibia05.cipsoft.com Feito isso, procure por: 132127743205872284062295099082293384952776326496165507967876361843343953435544496682053323833394351797728954155097012103928360786959821132214473291575712138800495033169914814069637740318278150290733684032524174782740134357629699062987023311132821016569775488792221429527047321331896351555606801473202394175817 Substitue por: 109120132967399429278860960508995541528237502902798129123468757937266291492576446330739696001110603907230888610072655818825358503429057592827629436413108566029093628212635953836686562675849720620786279431090218017681061521755056710823876476444260558147179707119674283982419152118103759076030616683978566631413 Créditos: Gesior

Boa Tarde Tk's . Bom como já vi varios reclamando que não consegue abrir o remeres map editor para Clientes versão extended , estarei postando para ajudar vocês. Customized Remere's Map Editor Suporta Versão: 7.6 - 10.37 Features: * Suporte para extended clients. * Support for transparency (Menu File > Preferences > Client Version) Visual C++ Redistributable Packages (Required installation) GitHub Instalando: 1º Basta baixar a versão normal do Remere's Map Editor no Site do Remeres e instalar em seu computador. 2º Depois Baixa a versão que postei pra download. 3º Terceiro Extraia a versão que postei pra download na pasta aonde o Remere's Map Editor foi instalado. ​4º Substitui todos os arquivos quando pedir , sempre clicando em subistituir , Sim , Ok. 5º Abre o Remere's Map Editor e vai em Menu File > Preferences > Cliente Version , Clique em Extended e Selecione a pasta do cliente do pokemon ou que você deseja. 6º Basta Fechar o Remere's Map Editor e abrir novamente e selecionar o mapa que deseja editar. Obs: Os clientes regulares não apoiará dados com transparência e / ou opção Extended. Obs: Já esta configurado para versão do Servidor e do cliente que postei do Cyan By Senhor Extended Download : http://www.4shared.com/rar/YPgAc2hAce/Remeres_Map_Editor.html Scan : Clique Aqui Extended Download By Senhor : https://www.mediafire.com/?fyklwfdwcawxepv Scan : Clique aqui OBS: Coloquei Dois Download , Um que ta configurado para versão do meu Servidor e do Meu cliente estendido e o Outro está configurado para versão normal dos clientes estendidos. Créditos : Hjnilsson (RME) MartyX - Ajudou a compilar Comedinha (Bruno Carvalho) EdMignari Pessoal do TPForums Vudi por postar. Outros

Como funciona? A cada monstro que vc mata, seus itens equipados ganham 1 de exp. Quando seus itens chegarem às quantidades de exp definidas, eles upam e ficam com o nome assim: Demon Helmet + 1. Helmets, armors, legs, e boots recebem 1 de arm a cada vez que upam. Armas recebem 1 de ataque e escudos 1 de defesa. Para o monstro contar, ele deve dar um mínimo de exp (definido no script). O número de exp a que me refiro é aquele um presente no arquivo .xml. Para instalar, crie Killua Items Upgrade.lua em data/creaturescripts/scripts e coloque: Em data/creaturescripts/creaturescripts.xml coloque essas duas tags: <event type="kill" name="Item level" event="script" value="Killua Items Upgrade.lua"/> <event type="login" name="Item levell" event="script" value="Killua Items Upgrade.lua"/> Configurando: Na tabela table_of_slots, coloque em quais slots os itens upam. min_exp é a experiência mínima que o monstro deve ter para contar exp para o item. Se vc colocar 500, somente os monstros que tem exp igual ou superior a 500 no arquivo.xml vão valer. exp_levels são os valores de exp que os itens devem atingir para upar. No meu caso, quando o item alcançar 50 de exp, ele upa para o level 1. Quando alcançar 50 de exp, upa para o level 2 e assim por diante.

Bom, postarei como colocar para gm, adm, cm falar em red nos channels e tutores e senior tutores em orange. testado em: tfs 0.3.6 |854| pl Em chat.cpp procure por: bool ChatChannel::talk(Player* player, SpeakClasses type, const std::string& text, uint32_t _time/* = 0 e vai ter uma linha assim: if(it == m_users.end()) return false; de 2 quebra de linhas e adicione em baixo: SpeakClasses ntype = type; uint16_t channelId = getId(); if (channelId == 5) { if (player->getGroupId() == 6) { ntype = SPEAK_CHANNEL_RN; } else if (player->getGroupId() == 5) { ntype = SPEAK_CHANNEL_RN; } else if (player->getGroupId() == 4) { ntype = SPEAK_CHANNEL_RN; } else if(player->getGroupId() >= 2) { ntype = SPEAK_CHANNEL_O; } } Agora, um pouco em baixo disso que você adicionou, tem essa função: it->second->sendToChannel(player, type, text, m_id, _time); troque por essa: it->second->sendToChannel(player, ntype, text, m_id, _time); ou, é só adiciona um "n", no type da primeira linha rs Como Editar os Groups ? (player->getGroupId() == 5) "5" -> Grupo do player, no caso aqui seria CM

Esta maneira funciona apenas com o client estilo tibia do OTPokémon, não funciona na versão nova deles. 1 - Baixe o ElfBot 8.54 e o elfcrack by evolution e crackeie ele normalmente com o Tibia 8.54, agora deixe parado e baixe um programa chamado Process Hacker. ~ Cuidado na hora de baixar o Process Hacker, ele tem a versão 32 e 64 bits, baixe a compatível com seu computador. 2 - Abra o OTPokémon ( Old ) e abra o Process Hacker como administrador. 3 - Procure pelo processo "OTP.exe" no Process Hacker e clique com o botão direito em cima dele. 4 - Selecione a opção Miscellaneous e depois clique em Inject DLL, irá abrir uma janela. 5 - Procure pela pasta do ElfBot 8.54 e selecione a elfload.dll. Pronto, elfbot funcionando no OTPokémon, recomendo que não use o comando ALT + F12 que geralmente esconde o elfbot, pois pode bugar e ele não voltar mais. ~~ Não coloquei imagens por que fica gigante aqui no post, se tiver alguma maneira de deixar a imagem pequena manda ai que eu adiciono !

Bom para quem não sabe como funciona o script,é uma marcação que fica no minimap(in-game) que ao deixar o ponteiro do mouse em cima aparece uma descrição,pode ser mudado tanto a descrição quanto o icone que aparece no minimap. • Adicionando o script • Em "data/creaturescripts/creaturescripts.xml" adicione está tag : <event type="think" name="IconMap" event="script" value="iconmap.lua"/> Em "data/creaturescripts/scripts" crie um arquivo lua chamado "iconmap" e cole isso dentro : local config = { storage = 030220122041, version = 1, marks = { {mark = 5, pos = {x = 1095, y = 1062, z = 7}, desc = "Temple."}, {mark = 4, pos = {x = 895, y = 996, z = 7}, desc = "Depot."} } } local f_addMark = doPlayerAddMapMark if(not f_addMark) then f_addMark = doAddMapMark end function onThink(cid, interval) if(isPlayer(cid) ~= TRUE or getPlayerStorageValue(cid, config.storage) == config.version) then return end for _, m in pairs(config.marks) do f_addMark(cid, m.pos, m.mark, m.desc ~= nil and m.desc or "") end setPlayerStorageValue(cid, config.storage, config.version) return TRUE end Em "data/creaturescripts/scripts/login.lua" adicione está tag no fim do script : registerCreatureEvent(cid, "IconMap") Caso use TFS 1.0 use este register no login.lua : player:registerEvent(cid, "IconMap") Creditos : Comedinhas. - ViitinG pelo tutorial. • Configurando • • Icones •

Tibia Classic Bot Versões 7.4 , 7.6 e 7.72 Esse é um dos poucos bots e o mais completo para estas versões mais antigas... Eu tenho acompanhado desde a versão 1.6.4 dele (atual 1.6.8). Segue abaixo algumas das hotkeys que podem ser usadas nele: Para que a hotkey fique "automática" ela deve ser adicionada na parte persistent , caso contrário a hotkey só será ativada uma vez. Download: https://mega.co.nz/#!x41jxAqa!sqL7cfy3_p-4wjfOrPB1qpUq_UrHuUd46G1wBJVn9nI Scan: https://www.virustotal.com/pt/file/b86169815eeddbaef3808be3d60e523b8a73a18113056ee516f10efd61105207/analysis/1400633901/ Créditos: Xavious O BOT também pode ser encontrado no seguinte link: http://tpforums.org/forum/threads/3889-7-4-7-6-7-72-ClassicBotter-1-6-8

Opa galerinha do Tk, resolvi trazer um evento para vocês. O script foi testado. Atenção, Funciona da seguinte maneira o admistrador ira falar "/eventoarena" 5 apenas 5 player poderão participar do evento, depois de entrar passara uns minutos, e começara 1 wave, e assim por diante, Para ganhar o evento você tem que ficar vivo ate a ultima wave. Vamos ao que interessa. Vá na pasta do seu servidor crie um .xml em mods chamado eventoarena.xml Configuração do evento. delay = 1, -- e onde o minuto que cada invasão ira aparecer. posicaoPlayer = {x = 2426,y = 2499,z = 8}, -- posição que o player ira cair quando teleport for aberto. posicaoArena = {{x = 2418,y = 2491,z = 8},{x = 2434,y = 2507,z = 8}}, -- Ponta a ponta da arena. posicaoTp = {x = 2501, y = 2499, z = 7}, -- posição que o teleport aparecera, leveis = { -- você ira colocar os monstro da wave. Bom e isso caso você precisar de ajuda em algo poste aqui no comentário. Creditos: 50% Vodkart 50% Septy

local shinys = { "Venusaur", "Charizard", "Blastoise", "Butterfree", "Beedrill", "Pidgeot", "Rattata", "Raticate", "Raichu", "Zubat", "Golbat", "Paras", "Parasect", "Venonat", "Venomoth", "Growlithe", "Arcanine", "Abra", "Alakazam", "Tentacool", "Tentacruel", "Farfetch'd", "Grimer", "Muk", "Gengar", "Onix", "Krabby", "Kingler", "Voltorb", "Electrode", "Cubone", "Marowak", "Hitmonlee", "Hitmonchan", "Tangela", "Horsea", "Seadra", "Scyther", "Jynx", "Electabuzz", "Pinsir", "Magikarp", "Gyarados", "Snorlax", "Dragonair", "Dratini"} local raros = {"Dragonite"} local mName = "name" --Nome do monstro que será anunciado ao nascer. local function ShinyName(cid) if isCreature(cid) then if string.find(tostring(getCreatureName(cid)), "Shiny") then local newName = tostring(getCreatureName(cid)):match("Shiny (.*)") doCreatureSetNick(cid, newName) if isMonster(cid) then doSetCreatureDropLoot(cid, false) end end end end local function doSetRandomGender(cid) if not isCreature(cid) then return true end if isSummon(cid) then return true end local gender = 0 local name = getCreatureName(cid) if not newpokedex[name] then return true end local rate = newpokedex[name].gender if rate == 0 then gender = 3 elseif rate == 1000 then gender = 4 elseif rate == -1 then gender = 0 elseif math.random(1, 1000) <= rate then gender = 4 else gender = 3 end doCreatureSetSkullType(cid, gender) end local function doShiny(cid) if isCreature(cid) then if isSummon(cid) then return true end if getPlayerStorageValue(cid, 74469) >= 1 then return true end if getPlayerStorageValue(cid, 22546) >= 1 then return true end if isNpcSummon(cid) then return true end if getPlayerStorageValue(cid, 637500) >= 1 then return true end --alterado v1.9 if isInArray(shinys, getCreatureName(cid)) then --alterado v1.9 \/ chance = 6 --1% chance elseif isInArray(raros, getCreatureName(cid)) then --n coloquem valores menores que 0.1 !! chance = 6 --1% chance else return true end if math.random(1, 1000) <= chance*10 then doSendMagicEffect(getThingPos(cid), 18) local name, pos = "Shiny ".. getCreatureName(cid), getThingPos(cid) doRemoveCreature(cid) local shi = doCreateMonster(name, pos, false) setPlayerStorageValue(shi, 74469, 1) else setPlayerStorageValue(cid, 74469, 1) end --/\ else return true end end function onSpawn(cid) registerCreatureEvent(cid, "Experience") registerCreatureEvent(cid, "GeneralConfiguration") registerCreatureEvent(cid, "DirectionSystem") registerCreatureEvent(cid, "CastSystem") if isSummon(cid) then registerCreatureEvent(cid, "SummonDeath") return true end if getCreatureName(cid) == mName then broadcastMessage(mName.." spawned!") end addEvent(doSetRandomGender, 5, cid) addEvent(doShiny, 10, cid) addEvent(ShinyName, 15, cid) addEvent(adjustWildPoke, 5, cid) return true end

Olha fantomdruid, acho que funcionou: local lvldodge = 48902 local percent = 0.5 function onHealthChange(creature, attacker, primaryDamage, primaryType, secondaryDamage, secondaryType, origin) if not isPlayer(creature) then return false end if isInArray({ORIGIN_SPELL, ORIGIN_MELEE, ORIGIN_RANGED}, origin) and isCreature(attacker) then if (creature:getStorage(lvldodge) * 3) >= math.random (0, 1000) then primaryDamage = primaryDamage - math.ceil(primaryDamage * percent) secondaryDamage = secondaryDamage - math.ceil(secondaryDamage * percent) creature:say("DODGE!", TALKTYPE_MONSTER_SAY) creature:getPosition():sendMagicEffect(CONST_ME_BLOCKHIT) return primaryDamage, primaryType, secondaryDamage, secondaryType end end return primaryDamage, primaryType, secondaryDamage, secondaryType end

@Vinicius Xxgamexx, a forma dele congelado são sprites, quando clica com o item, a sprite muda.

local ar1 = createCombatArea{ {0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0}, {0, 0, 1, 1, 1, 0, 0}, {0, 0, 1, 3, 1, 0, 0}, {0, 0, 1, 1, 1, 0, 0}, {0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0} } local ar2 = createCombatArea{ {0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0}, {0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0}, {1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1}, {0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0}, {0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0} } local ar3 = createCombatArea{ {0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 0, 0, 0}, {0, 0, 1, 1, 1, 1, 1, 0, 0}, {0, 0, 1, 1, 3, 1, 1, 0, 0}, {0, 0, 1, 1, 1, 1, 1, 0, 0}, {0, 0, 0, 1, 1, 1, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0} } function doPlayerShootBazooka(cid, target, times, delay, area, min, max, effect, dist_effect, exhaust, rounds) if rounds == nil then rounds = 1 end exhaustion.set(cid, 57193, exhaust) doSendDistanceShoot(getCreaturePosition(cid), getThingPos(target), dist_effect) doAreaCombatHealth(cid, COMBAT_FIREDAMAGE, getThingPos(target), area, -min, -max, effect) if rounds == times then return true end addEvent(doPlayerShootBazooka, shots_delay, cid, target, times, delay, area, min, max, effect, dist_effect, exhaust, rounds+1) end function onUse(cid, item, fromPosition, itemEx, toPosition) local weapons = { -- [ID da arma] = {tiros, delay_dos_tiros, ammo, area, dano_min, dano_max, efeito, distance_effect, exhaustion}, [2449] = { shots = 1, shots_delay = 50, area = ar1, exha = 5, ammo = { --Configure aqui as munições da arma. [11399] = {min = 25600, max = 35720, effect = 23, dist_effect = 35}, [itemid] = {min = minDamage, max = maxDamage, effect = effect, dist_effect = distanceEffect}, [itemid] = {min = minDamage, max = maxDamage, effect = effect, dist_effect = distanceEffect}, [itemid] = {min = minDamage, max = maxDamage, effect = effect, dist_effect = distanceEffect}, }, }, } local gun = weapons[item.itemid] if gun then if getPlayerSlotItem(cid, CONST_SLOT_LEFT).itemid ~= item.itemid then doPlayerSendCancel(cid, "O lançador deve estar equipado no slot da arma.") return true elseif getPlayerStorageValue(cid, 18391) == 1 then doPlayerSendCancel(cid, "Você não pode atirar enquanto dirige.") return true elseif getPlayerStorageValue(cid, 18393) == 1 then doPlayerSendCancel(cid, "Você não pode atirar com o capacete.") return true elseif exhaustion.check(cid, 57193) then doPlayerSendCancel(cid, "Você está exausto.") return true elseif getPlayerSlotItem(cid, CONST_SLOT_AMMO).uid < 1 then return doPlayerSendCancel(cid, "A munição deve estar equipada no slot da munição.") elseif not gun.ammo[getPlayerSlotItem(cid, CONST_SLOT_AMMO).itemid] then return doPlayerSendCancel(cid, "Wrong ammo for this gun.") elseif getPlayerItemCount(cid, getPlayerSlotItem(cid, CONST_SLOT_AMMO).itemid) < gun.shots then doPlayerSendCancel(cid, "Você não possui munição.") return true end local ammo = gun.ammo[getPlayerSlotItem(cid, CONST_SLOT_AMMO).itemid] doPlayerRemoveItem(cid, getPlayerSlotItem(cid, CONST_SLOT_AMMO).itemid, gun.shots) doPlayerShootBazooka(cid, itemEx.uid, gun.shots, gun.shots_delay, gun.area, ammo.min, ammo.max, ammo.effect, ammo.dist_effect, gun.exha) end return true end

Olá, desculpe pela demora, só fui me lembrar do Tibia King hoje rsrs... Eu não testei, vê se deu certo: function mudarVis(uid) look = getCreatureLookDirection(uid) look = look < 3 and look + 1 or 0 doCreatureSetLookDirection(uid, look) addEvent(mudarVis, 2000, uid) end local events1 = {} local trainerst = 456488 function onStepIn(cid) events1[getPlayerGUID(cid)] = addEvent(mudarVis, 1000, cid) doPlayerSendTextMessage(cid, 27, "Bem-vindo a sua sala de treinamento, você será movimentado automaticamente para que continue treinando!") setPlayerStorageValue(cid,trainerst,1) return true end function onStepOut(cid) stopEvent(events1[getPlayerGUID(cid)]) setPlayerStorageValue(cid,trainerst,-1) return true end Isso você coloca em movements/scripts e as tags abaixo em movements.xml <!--Trainer--> <movevent type="StepIn" actionid="13549" event="script" value="train.lua" /> <movevent type="StepOut" actionid="13549" event="script" value="train.lua" /> Em creaturescripts/idle.lua vai ter essa linha (se não for exatamente igual me manda): if(getTileInfo(getCreaturePosition(cid)).noLogout or getCreatureNoMove(cid) or getPlayerCustomFlagValue(cid, PLAYERCUSTOMFLAG_ALLOWIDLE) then return true end Você deve alterar para: if(getTileInfo(getCreaturePosition(cid)).noLogout or getCreatureNoMove(cid) or getPlayerCustomFlagValue(cid, PLAYERCUSTOMFLAG_ALLOWIDLE) or getPlayerStorageValue(cid,456488) == 1) then return true end

Qual a base do seu servidor? Possui as sources? É possível fazer isto usando onSpawn.

Funcionou, valeu! Teria como quando player comprasse o ticket a outfit dele mudasse de cor? e ele só pudesse tirar a cor da outfit quando perder a storage?

se colocar um movement em um sqm sera que funcionaria? ai pisar no sqm e ficar parado por 1min, o char seria empurrado para o sqm ao lado, e o script do sqm ao lado, ao jogador ficar 1 minuto parado, jogaria o jogador para o lado anterior, ficando assim sempre o player se movento a cada 1 min

é só fazer no script de magic e wild tbm faz assim para ficar mais fácil de editar: na sua lib vc coloca essa função: function BlockRunesInArea(cid) local block_area = { -- defina as areas {{x=135,y=53,z=7}, {x=140,y=56,z=7}}, -- com a pos começo e final da area {{x=135,y=46,z=7}, {x=141,y=49,z=7}}, {{x=200,y=1019,z=7}, {x=300,y=1019,z=7}} } for _, var in ipairs(block_area) do if isInRange(getCreaturePosition(cid), var[1], var[2]) then return true end end return false end Data > Spells > script > support magic wall rune.lua local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_ENERGY) setCombatParam(combat, COMBAT_PARAM_CREATEITEM, 1497) function onCastSpell(cid, var) if BlockRunesInArea(cid) then doPlayerSendCancel(cid, "você não pode jogar runas nesta area.") return false end return doCombat(cid, combat, var) end wild growth rune.lua local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_EARTH) setCombatParam(combat, COMBAT_PARAM_CREATEITEM, 1499) function onCastSpell(cid, var) if BlockRunesInArea(cid) then doPlayerSendCancel(cid, "você não pode jogar runas nesta area.") return false end return doCombat(cid, combat, var) end pronto, e quando quiser bloquear uma spells ou runa na area só usar if BlockRunesInArea(cid) then doPlayerSendCancel(cid, "você não pode jogar runas nesta area.") return false end

Procure o ID correto do depot chest e veja se a sprite não está alterada no cliente, ou o apenas o ID alterado no items.otb. Você pode utilizar Object Builder para verificar a sprite e OTItem editor para verificar o ID correto e a sprite. No items.xml deve ser assim a configuração: Abaixo do ID do seu depot: <attribute key="type" value="depot" /> <attribute key="containerSize" value="50" /> Abaixo do depot chest ( o que fica dentro ): <attribute key="containerSize" value="30" />

E para wild growth rune?

n tinha pensado nisso, vlw. já editei de novo @ -- editei de novo pq tinha faltando um "and" usa o que eu editei lá agr que é esse: 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 msg, price = string.lower(msg), 200000 local team = {["blue"] = {storage = 34789}, ["green"] = {storage = 34790}} if isInArray({'bilhete', 'ticket', 'tickets'}, msg) then npcHandler:say('Você quer participar de que time por '..price..'? se sim escolha um time: {blue} ou {green}', cid) talkState[talkUser] = 1 elseif talkState[talkUser] == 1 then if team[msg] then if getGlobalStorageValue(34789) < 20 and getGlobalStorageValue(34790) < 20 then if getPlayerStorageValue(cid, 34789) <= 0 and getPlayerStorageValue(cid, 34790) <= 0 then if doPlayerRemoveMoney(cid, price) then setPlayerStorageValue(cid, team[msg].storage, 1) setGlobalStorageValue(team[msg].storage,getGlobalStorageValue(team[msg].storage) < 0 and 1 or getGlobalStorageValue(team[msg].storage)+1) npcHandler:say('aqui está seu bilhete.', cid) else npcHandler:say('you do not have enough money!', cid) talkState[talkUser] = 0 end else npcHandler:say('you already have ticket!', cid) talkState[talkUser] = 0 end else npcHandler:say('ticket esgotado!', cid) talkState[talkUser] = 0 end end elseif msg == "no" then selfSay("Then not", cid) talkState[talkUser] = 0 npcHandler:releaseFocus(cid) end return true end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new())

Data > Spells > scripts > attack > energy wall.lua local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_ENERGYDAMAGE) setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_ENERGYHIT) setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_ENERGYBALL) setCombatParam(combat, COMBAT_PARAM_CREATEITEM, 1495) local area = createCombatArea(AREA_WALLFIELD, AREADIAGONAL_WALLFIELD) setCombatArea(combat, area) function onCastSpell(cid, var) local block_area = { {{x=909,y=1019,z=7}, {x=1000,y=1019,z=7}}, -- pos começo e final da area {{x=156,y=1019,z=7}, {x=200,y=1019,z=7}}, {{x=200,y=1019,z=7}, {x=300,y=1019,z=9}} } for _, var in ipairs(block_area) do if isInRange(getCreaturePosition(cid), var[1], var[2]) then doPlayerSendCancel(cid, "você não pode jogar magic wall nesta area.") return false end end return doCombat(cid, combat, var) end

Progress....

function onStepIn(cid, item, position, fromPosition) timenow = os.time() quantity = math.floor((getPlayerStorageValue(cid,13500) - timenow)/(3600*24)) if isPlayer(cid) then if quantity > 0 then doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "Você ainda tem ".. quantity .." dia(s) restante(s) de VIP.") else dir = getPlayerLookDir(cid) pos = getCreaturePosition(cid) if dir == 0 then newpos = {x=pos.x, y=pos.y+1, z=pos.z} elseif dir == 2 then newpos = {x=pos.x, y=pos.y-1, z=pos.z} elseif dir == 1 then newpos = {x=pos.x-1, y=pos.y, z=pos.z} elseif dir == 3 then newpos = {x=pos.x+1, y=pos.y, z=pos.z} end doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) doSendMagicEffect(position, CONST_ME_MAGIC_BLUE) doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "Somente jogadores VIPs podem entrar nesta área.") end end end

Vai em cada arquivo e procura por : $conn = mysql_pconnect('localhost', 'root', 'senha') or die(); ai coloca assim : $conn = mysql_pconnect('localhost', 'LOGINPHPMYADMIN', 'SENHAPHPMYADMIN') or die(); Lembrando que no localhost, pode colocar 127.0.0.1, ou deixa como está tanto faz ...

Eu gostei bastante desse:http://www.tibiaking.com/forum/topic/44734-pokemon-dash-v9-o-melhor-open/ Eu achei muito bom.

thanks Update:

local dodge = 48902 function onSay(cid) if getPlayerStorageValue(cid, dodge) >= 1 then doShowTextDialog(cid, 2175, "Voce possui "..getPlayerStorageValue(cid, dodge).." dodges.") else doPlayerSendCancel(cid,"Voce nao possui dodges.") end return 1 end

@Junior Nonato segue o tópico: http://www.tibiaking.com/forum/topic/51448-wodbo-80-by-hiper/

Bom dia galera, Pra quem quer tirar aquele bug que acontece no distro quando checka a versão, vai aí uma sugestão: em otserver.cpp delete: std::clog << ">> Checking software version..."; if(xmlDocPtr doc = xmlParseFile(VERSION_CHECK)) { xmlNodePtr p, root = xmlDocGetRootElement(doc); if(!xmlStrcmp(root->name, (const xmlChar*)"versions")) { p = root->children->next; if(!xmlStrcmp(p->name, (const xmlChar*)"entry")) { std::string version; int32_t patch, build, timestamp; bool tmp = false; if(readXMLString(p, "version", version) && version != SOFTWARE_VERSION) tmp = true; if(readXMLInteger(p, "patch", patch) && patch > VERSION_PATCH) tmp = true; if(readXMLInteger(p, "build", build) && build > VERSION_BUILD) tmp = true; if(readXMLInteger(p, "timestamp", timestamp) && timestamp > VERSION_TIMESTAMP) tmp = true; if(tmp) { std::clog << " "; if(version.find("_SVN") == std::string::npos) std::clog << "running sub version, please mind it's unstable and only for testing purposes!"; else std::clog << "outdated, please consider upgrading!"; std::clog << std::endl << "> Current version information - version: " << SOFTWARE_VERSION << ", patch: " << VERSION_PATCH << ", build: " << VERSION_BUILD << ", timestamp: " << VERSION_TIMESTAMP << "." << std::endl << "> Latest version information - version: " << version << ", patch: " << patch << ", build: " << build << ", timestamp: " << timestamp << "." << std::endl; if(g_config.getBool(ConfigManager::CONFIRM_OUTDATED_VERSION) && asLowerCaseString(version).find("_svn") == std::string::npos) { std::clog << "Continue? (y/N)" << std::endl; char buffer = getch(); if(buffer != 121 && buffer != 89) startupErrorMessage("Aborted."); } } else std::clog << "up to date!" << std::endl; } else std::clog << "failed checking - malformed entry." << std::endl; } else std::clog << "failed checking - malformed file." << std::endl; xmlFreeDoc(doc); } else std::clog << "failed - could not parse remote file (are you connected to any network?)" << std::endl; bjus

|- Menu |- Novidades |- Bugs |- Prints |- Downloads |- Creditos |- Atualizaçoes de System Novidades: Bom galera eu estou aqui para postar um servidor de bleach que eu tenho aque no meu pc Smile ele nao tem virus como os outros :X ele tem varias system dahora abaixo umas informaçoes Smile vocaçoes nao sei o certo quantas tem dao uma olhada ae por que estoou sem tempo Mad Algumas informaçoes: Magias e ataques para todas as vocações; Transforms; Novos Monstros; Novos Items; Mapa 100% Editado; VIP System; Monstros VIP; Trainers; NPC's; Quests; Servidor 100% estável; E mais! Bugs Nenhum que eu saiba se tiver algum porvfavor postem Prints : Download via 4shared: 4shared.com /rar/ZIPrpYhW/Bleach_Server__Client_by_Junio.html? Download via MediaFire: mediafire.com/?9pedni2sgp4ieda Galera você escolhe o 4shared ou mediafire tanto faz os dois vem com cliente. Gente 4Shared ele ja tem scan mais o media fire não mais não esta com virus quem quiser fazer um Scan posta ai CREDITOS: °Junior001 °Junior Silva por tirar virus e alguns bugs do Servidor ! °SmoOkeR, que dis ele que peguei o server dele mais nao estou lembrado msm assim ta ae Smile °E todos que contribuiram com o server '-' °tutuzinhomelo por postar Atualizaçoes de System: Nenhum Por enquanto

Brother a sua intenção é boa mas pra tu ter uma ideia um servidor sério com site e com um bom mapa tu vai precisar no mínimo um dedicado com 4 gigas de memória ram pra começar, conforme for crescendo vai aumentando a capacidade da memória física . E com 2 gigas com site vai aguentar no maximo uns 50 players ..

Eu ainda não entendi oque eu fiz de errado neles, mais eu vou tentar arrumar;, na versão 90% vai sair o resto da quests box 6,box 7 box 8 e box 9. Box 6 = Genesect Box 7 = Azelf/Mesprit/Uxie Box 8 = Phione Box 9 = Solosis Obrigado

Comigo está dando o seguinte erro tem como me ajudar? T.T

Fikou mt legal pow mano queria um server com pokes da 5 geraçao eu sei faser mais quando faço da erro pf faz um server com pokes da 5 geraçao

levelprotection.lua function onPrepareDeath(cid, lastHitKiller, mostDamageKiller) local level = 50 if isPlayer(cid) and getPlayerLevel(cid) < level then doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) doCreatureAddHealth(cid, getCreatureMaxHealth(cid), 65535, 256, true) doCreatureAddMana(cid, getCreatureMaxMana(cid)) doRemoveConditions(cid, false) return false end return true end TAG <event type="preparedeath" name="ProtectLevel" event="script" value="levelprotection.lua"/> caso não tenha registrado no login.lua adc registerCreatureEvent(cid, "ProtectLevel")