Líderes

Fala TibiaKG's!! Essa é a Atualização V4.0 Do WebSite OTPokemon Espero Que Curtam As Novidades EDIÇÃO *Adicionado Poke Of Day (Editavel Na index.tpl Do Template) *Adicionado Facebook News (Editavel Na index.tpl Do Template) *Shop e Doação ( Disponiveis ) *Nova Template *Atualizado Style.css *Deixei Apenas Um Mundo (BLUE) Disponivel Porque Muitos Estavam Com Dificuldades Para Tirar Os Outros *Sistema De Tradução Dentre Outras... PRINT DOWNLOAD MediaFire ATENÇÃO:senha para descompactar (otpokemon!) Sem Parenteses. SCAN CRÉDITOS Kranzix (Edição Geral) ModenAcc (Base) --------------------------------------------------------------------------------------------------------------------------- REP + SÃO BEM-VINDOS!!

SCREENSHOT http://3.1m.yt/Zwo99Sdx.png http://4.1m.yt/oG_cwli8u.png ______________________________________________ COMANDOS !autoloot add, itemId ou name -- Adicionando um item na lista !autoloot remove, itemId or name -- Remover um item da lista !autoloot show -- Mostrar a lista do autoLoot !autoloot clear -- Limpar a lista do autoLoot ______________________________________________ SCRIPT data/global.lua -- AutoLoot config AUTO_LOOT_MAX_ITEMS = 5 -- Reserved storage AUTOLOOT_STORAGE_START = 10000 AUTOLOOT_STORAGE_END = AUTOLOOT_STORAGE_START + AUTO_LOOT_MAX_ITEMS -- AutoLoot config end talkactions/talkactions.xml <talkaction words="!autoloot" separator=" " script="autoloot.lua"/> talkactions/scripts/autoloot.lua function onSay(player, words, param) local split = param:split(",") local action = split[1] if action == "add" then local item = split[2]:gsub("%s+", "", 1) local itemType = ItemType(item) if itemType:getId() == 0 then itemType = ItemType(tonumber(item)) if itemType:getId() == 0 then player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "There is no item with that id or name.") return false end end local itemName = tonumber(split[2]) and itemType:getName() or item local size = 0 for i = AUTOLOOT_STORAGE_START, AUTOLOOT_STORAGE_END do local storage = player:getStorageValue(i) if size == AUTO_LOOT_MAX_ITEMS then player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "The list is full, please remove from the list to make some room.") break end if storage == itemType:getId() then player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, itemName .." is already in the list.") break end if storage <= 0 then player:setStorageValue(i, itemType:getId()) player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, itemName .." has been added to the list.") break end size = size + 1 end elseif action == "remove" then local item = split[2]:gsub("%s+", "", 1) local itemType = ItemType(item) if itemType:getId() == 0 then itemType = ItemType(tonumber(item)) if itemType:getId() == 0 then player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "There is no item with that id or name.") return false end end local itemName = tonumber(split[2]) and itemType:getName() or item for i = AUTOLOOT_STORAGE_START, AUTOLOOT_STORAGE_END do if player:getStorageValue(i) == itemType:getId() then player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, itemName .." has been removed from the list.") player:setStorageValue(i, 0) return false end end player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, itemName .." was not founded in the list.") elseif action == "show" then local text = "-- Auto Loot List --\n" local count = 1 for i = AUTOLOOT_STORAGE_START, AUTOLOOT_STORAGE_END do local storage = player:getStorageValue(i) if storage > 0 then text = string.format("%s%d. %s\n", text, count, ItemType(storage):getName()) count = count + 1 end end if text == "" then text = "Empty" end player:showTextDialog(1950, text, false) elseif action == "clear" then for i = AUTOLOOT_STORAGE_START, AUTOLOOT_STORAGE_END do player:setStorageValue(i, 0) end player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "The autoloot list has been cleared.") else player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "Use the commands: !autoloot {add, remove, show, clear}") end return false end creaturescripts/creaturescripts.xml <event type="kill" name="AutoLoot" script="autoloot.lua" /> creaturescripts/scripts/autoloot.lua local function scanContainer(cid, position) local player = Player(cid) if not player then return end local corpse = Tile(position):getTopDownItem() if not corpse then return end if corpse:getType():isCorpse() and corpse:getAttribute(ITEM_ATTRIBUTE_CORPSEOWNER) == cid then for i = corpse:getSize() - 1, 0, -1 do local containerItem = corpse:getItem(i) if containerItem then for i = AUTOLOOT_STORAGE_START, AUTOLOOT_STORAGE_END do if player:getStorageValue(i) == containerItem:getId() then containerItem:moveTo(player) end end end end end end function onKill(player, target) if not target:isMonster() then return true end addEvent(scanContainer, 100, player:getId(), target:getPosition()) return true end creaturescripts/scripts/login.lua player:registerEvent("AutoLoot") ______________________________________________ CRÉDITOS Printer

Global 11/12x [v32] - New Falcons - New Asuras - Warzone 4,5,6 - Exercise Training - Raids 100% - Monstros 100% - Trainer Offline 100% - Trainer Online 100% - Taming system funcionando 100%; - Database completa - War System 100% - Global MAP Full - Store 100% - Imbuement - Prey System - Entre outros sistemas. Projeto no: GITHUB Scan Vírus Total IMAGES Créditos:

Fala, galera! Beleza? Sou novo aqui no TK e queria trazer algo para vocês. Dei uma procurada e não achei nada do tipo, então creio que esse tutorial possa ajudar algumas pessoas! O que vou ensinar a vocês é como criar uma skill direto na source, o que permite que você utilize comandos como "getPlayerSkill", "doPlayerAddSkillTry" etc em seus scripts em Lua. Esse tutorial NÃO serve para criar skills de "combate", como sword, axe etc. Esse tipo de skill envolve vários outros parâmetros além do que mostrarei aqui. Quem sabe eu faça um tutorial sobre isso daqui um tempo. Preview de uma skill que criei para meu projeto: Para este tutorial, eu usei: Sources do The Forgotten Server 0.3.7: Aqui serão feitas várias edições, criando a nova skill e tudo que é necessário para a skill funcionar corretamente. Microsoft Visual Studio 2010 Professional: Utilizei para compilar o TFS com as novas edições. Se não souber compilar, procure em outros tópicos aqui do fórum. Não é meu objetivo aqui ensinar como compilar. É necessário compilar com o MVS? Não. Se você preferir, pode fazer com outros programas. Notepad++: Usei porque acho um editor de texto simples, prático e funcional. Não gosto de editar os códigos no MVS. Porém sinta-se à vontade para usar o editor que quiser. haha SQLiteStudio 2.1.4: Será necessário para fazer pequenas alterações para que seu banco de dados funcione corretamente. Se você utiliza MySQL, terá que fazer essas edições por outro programa. Sources do OTClient: Como utilizo o OTClient em meu servidor, usarei ele para demonstrar como adicionar a barrinha à janela de Skill. Se você utiliza outro client, infelizmente, não poderei dar suporte, já que nunca editei outros clients. Codeblocks: Usei para compilar o OTClient. Mas pode ser feito com o MVS também. A escolha é sua! Passo 1 - Editar a source do TFS: Passo 2 - Editar o OTClient: Passo 3 - Editar o TFS: Passo 4 - Editar a database: Pronto! Seu servidor já está configurado com a nova skill! Agora você poderá usar Lua para configurá-la! Vou dar um exemplo MUITO simples de como isso poderia ser feito em Lua: Claro que essa action acima é algo muito simples, mas, tendo o servidor já configurado, acredito que essas modificações abram uma gama de possibilidades imensas a todos que querem desenvolver uma nova skill. Espero que tenham gostado e que o tutorial seja útil para alguém! haha Qualquer erro ou bug, me avisem! Atenciosamente, Auro Mota.

Galera é um script muito simples, porém pra mim é muito ÚTIL. Abra a pasta data/globalevents/scripts crie um arquivo .lua com o nome GlobalSave.lua, em seguida adicone o code: function prepareShutdown(minutes) if(minutes <= 0) then doSetGameState(GAMESTATE_SHUTDOWN) return false end if(minutes == 1) then doBroadcastMessage("Server is going down in " .. minutes .. " minute for global save, please log out now!") elseif(minutes <= 3) then doBroadcastMessage("Server is going down in " .. minutes .. " minutes for global save, please log out.") else doBroadcastMessage("Server is going down in " .. minutes .. " minutes for global save.") end shutdownEvent = addEvent(prepareShutdown, 60000, minutes - 1) return true end function onTime() return prepareShutdown(5) -- Quantos minutos pra executar o ServeSave. end Ajustes: Quando quiser modificar os minutos altere: -return prepareShutdown(5) - (5) = 5 minutos, eu recomendo no mínimo 5 minutos, em outras palavras não mexa. Em globalevents.xml adicione a tag seguinte: <globalevent name="GlobalSave" time="05:30" event="script" value="GlobalSave.lua"/> No meu ServeSave é feito as 05:30 da manhã, modifique pro horário desejado! Em config.lua verifique essa regra: Se tiver TRUE deixa, assim ele fecha o .exe se não tiver no seu config.lua não tem problema closeInstanceOnShutdown = true - - - Esse tutorial é só isso, clique em GOSTEI, e comente no tópico, muito obrigado! -------------------------------------------------------------------------------------------------------------------------------------------------------- AUTO RESTART -------------------------------------------------------------------------------------------------------------------------------------------------------- Pra você que utiliza Windows esse é perfeito: Dezon OT Admin [restarter] Pra você que utiliza Linux: Baixe esse arquivo, TFS.SH, bote dentro da pasta do seu OT. Esse arquivo está configurado pra abrir outro arquivo chamado tfs caso o seu seja outro nome mude pra esse, tfs. Sempre que for abrir seu OT execute esse comando ./tfs.sh& e assim toda vez que o OT cair ele renicia automaticamente.

Eae Galera do TibiaKing bom venho trazer ai o novo crack do xenobot... para a versão 10.82 depois de alguns dias fora do ar está de volta o novo crack totalmente seguro. é necessário criar conta no fórum pandoriumX, caso ainda não tenha clique aqui para registrar-se. feito isso 1° Execute o XenoSuite.exe (Como Administrador) 2° Logue-se na sua conta PandoriumX 3° Seja Feliz !!! Update : 02/12/2015 Download : MediaFire Download : MEGA E Galera se possivel visitem meu site, todos os bots atualizados... e muito mais TibiaEasy

Posta o movements.xml no pastebin.com e mande o link.

Lukz, obrigado por compartilhar com a galera essa alternativa. Funcionando 100% Rep+

Substitui por isso: local speed = 300, -- Speed Base local qntlvl = 2, -- Quando de Speed ganha por level local lvlspeed = getPlayerLevel(cid)*qntlvl doChangeSpeed(cid, -getCreatureSpeed(cid)) doChangeSpeed(cid, speed+lvlspeed)

Se for TFS 0.4 compila com Dev C++, se for 1.x compila com MSVC

Estou curtindo bastante as idéias, vamo lá..sugiram mais!! @vankk A vontade.

Pronto manin ver ae agr :)) layout.php

então se sua intenção é resetar faz o seguinte, copia seu htdocs pra outro lugar pra vc n precisar mecher nele novamente depois exclui compretamente o seu xampp, en seguida joga o xampp d volta e reinstala o site igual vc fez da primeira vez depois q tudo tiver ok pega seu atdocs e volta pro lugar

Tenho um Ideia e o Seguinte: Um Sorcerer Invoca Fire Elemental So que pra ele Invoca vai tirar 15% de HP e esses 15% de HP Vão Pro Fire Elemental que terá tempo de vida Essa Spell Vai Poder ser aprimorada assim Tirando mais HP do Player e o Fire Elemental tendo mais HP e Mais Tempo de Vide! Segunda ideia: Druid e muito conhecido por ser o Elfo Dos Animais Em tão que tal colocar transformações de animais nele? e fácil fazer a script so editar um buff de narutibia! e Assim Transformando em 4 Animais Crow Form(Aguia): Vai Poder Voar e vai ter pouco HP Tipo 2 Hit Morre Então ela fica So pra voar!. Tiger Form(Tigre): Vai Ter 10% Mais Dano e 40% Mais Speed assim sendo eficiente nas perseguições!. Bear Form(Urso): Vai Ter 25% Mais HP e 10% Mais Defesa assim não tendo nenhuma spell nem mele ele so terá mais HP e Defesa Sendo Bom Para Fugir Water Lion(Leão Marinho): Bom Para escapar de Players podendo nadar pela agua vai ser bom se o player tiver de skull e vai poder fugir pela agua!. Mais o Druid So vai poder se transformar em um desses assim Podendo Escolher em um NPC Que Você Escolhe o nome! Colabora com 1 REP+ se Gostar '-

Logo Após: function onLogin(cid) Adiciona isto: local configspeed = { speed = 300, -- Speed Base qntlvl = 2, -- Quando de Speed ganha por level lvlspeed = getPlayerLevel(cid)*qntlvl } doChangeSpeed(cid, -getCreatureSpeed(cid)) doChangeSpeed(cid, configspeed.speed+configspeed.lvlspeed) Ficando Assim: function onLogin(cid) local configspeed = { speed = 300, -- Speed Base qntlvl = 2, -- Quando de Speed ganha por level lvlspeed = getPlayerLevel(cid)*qntlvl } doChangeSpeed(cid, -getCreatureSpeed(cid)) doChangeSpeed(cid, configspeed.speed+configspeed.lvlspeed)

Eu pensei nesse sistema: Se o player tiver "X" level em Skill de Sword, ele tera 10% de proteção referente ao level da skill em "X" Spell? Exemplo: Meu skill de Sword tem level 150. Calculo: 150 x 10 ÷ 100 = 15 de proteção de Dano a Spell (Bafo do Dragão) Suponho que a spell (Bafo de Dragão) bata 140 de Dano, então logo com esse level de skill (150), será retirado do dano da spell (10% = 15 de dano). Dando assim no total 125, que é: (140 - 15 = 125). Bem.. é isso kk' Obs: Esse 10% de proteção é referente a minha defesa contra a spell (Bafo de Dragão) do oponente, logo a spell só ira bater 125 de dano em mim em vez de 140 por causa do meu level 150 de skill Sword Server: 8.54 (TFS: 0.3.6)

vai abrir um portal tal hora ai vai ser levado para uma area depois o tp vai fechar e elis vao ser levador para arena ai la vai ter um boss que vai matar elis kk , o ultimo que ficar ganha

o post ta atualizado na ultima versão do xeno. "xb.0022.15.11.16.1169.dll"

Obrigado REP Pode me ajudar com esse ? http://www.tibiaking.com/forum/topic/64766-ajuda-coins/

Pode adicionar depois dessa linha function onUse(cid, item, itemEx, fromPosition, toPosition)

mano eu tenho uma base com system lvl akeles q mostra na frente do pokemon ne ? so vc add os mega o servidor e 93 % sem bugs otimo server vem chat se enteressa

Não tem como compilar no dev c++ mais, agora é apenas com MSVC.

Talvez seja melhor compilar esta versão no Visual Studio. Tente o guia (em inglês): https://github.com/otland/forgottenserver/wiki/Compiling-on-Windows

local config = { ['citizen'] = { male = 128, female = 136 }, ['hunter'] = { male = 129, female = 137 }, ['mage'] = { male = 130, female = 141 }, ['knight'] = { male = 131, female = 139 }, ['noble'] = { male = 132, female = 140 }, ['summoner'] = { male = 133, female = 138 }, ['warrior'] = { male = 134, female = 142 }, ['barbarian'] = { male = 147, female = 143 }, ['druid'] = { male = 148, female = 144 }, ['wizard'] = { male = 149, female = 145 }, ['oriental'] = { male = 150, female = 146 }, ['pirate'] = { male = 151, female = 155 }, ['assassin'] = { male = 152, female = 156 }, ['beggar'] = { male = 153, female = 157 }, ['shaman'] = { male = 154, female = 158 }, ['norseman'] = { male = 251, female = 252 }, ['nightmare'] = { male = 268, female = 269 }, ['jester'] = { male = 273, female = 270 }, ['brotherhood'] = { male = 278, female = 279 }, ['demonhunter'] = { male = 289, female = 288 }, ['yalaharian'] = { male = 325, female = 324 }, ['wedding'] = { male = 328, female = 329 }, ['warmaster'] = { male = 335, female = 336 }, ['wayfarer'] = { male = 367, female = 366 }, ['afflicted'] = { male = 430, female = 431 }, ['elementalist'] = { male = 432, female = 433 }, ['deepling'] = { male = 463, female = 464 }, ['insectoid'] = { male = 465, female = 466 }, ['entrepreneur'] = { male = 472, female = 471 }, ['crystal warlord'] = { male = 512, female = 513 }, ['soil guardian'] = { male = 516, female = 514 }, ['demon'] = { male = 541, female = 542 }, ['cave explorer'] = { male = 574, female = 575 }, ['dream warden'] = { male = 577, female = 578 }, ['glooth engineer'] = { male =610, female =618 }, ['jersey'] = { male = 619, female = 620 }, ['champion'] = { male =633 , female = 632 }, ['conjurer'] = { male = 634, female = 578 }, ['beastmaster'] = { male = 637, female =636 }, ['chaos acolyte'] = { male = 664, female = 665 }, ['death herald'] = { male = 667, female = 578 }, ['ranger'] = { male = 684, female = 683 }, ['ceremonial grab'] = { male = 695, female = 694 }, ['puppeteer'] = { male = 697, female = 696 }, ['spirt caller'] = { male = 699, female = 698 }, } function onSay(cid, words, param) local targetOutfit = config[param:lower()] if not targetOutfit then return false end local player = Player(cid) if player:getSex() == 0 then if param == 'mage' then targetOutfit.female, targetOutfit.male = 138, 133 elseif param == 'summoner' then targetOutfit.female, targetOutfit.male = 141, 130 end end if player:hasOutfit(player:getSex() == 0 and targetOutfit.female or targetOutfit.male, 3) then player:sendTextMessage(MESSAGE_EVENT_ADVANCE, 'You have already obtained the ' .. param .. ' addons.') return false end if not player:removeItem(8982, 1) then player:sendTextMessage(MESSAGE_EVENT_ADVANCE, 'You need an addon doll.') return false end player:addOutfitAddon(targetOutfit.female, 3) player:addOutfitAddon(targetOutfit.male, 3) player:sendTextMessage(MESSAGE_EVENT_ADVANCE, 'You have received the ' .. param .. ' addons!') player:getPosition():sendMagicEffect(CONST_ME_FIREWORK_YELLOW) return false end function onSay(cid, words, param) local mounts = { ["widow"] = {id = 1}, ["bird"] = {id = 2}, ["bear"] = {id = 3}, ["sheep"] = {id = 4}, ["panther"] = {id = 5}, ["draptor"] = {id = 6}, ["titanica"] = {id = 7}, ["lizzard"] = {id = 8}, ["blazebringer"] = {id = 9}, ["rapidboar"] = {id = 10}, ["stampor"] = {id = 11}, ["undeadcavebear"] = {id = 12}, ["donkey"] = {id = 13}, ["slug"] = {id = 14}, ["uniwheel"] = {id = 15}, ["crystalwolf"] = {id = 16}, ["panda"] = {id = 19}, ["dromedary"] = {id = 20}, ["kingscorpion"] = {id = 21} } local p = Player(cid) if(p:getItemCount(9019) > 0) then local t = mounts[string.lower(param)] if(param ~= "" and t) then if(t and not p:hasMount(t.id)) then p:removeItem(9019, 1) p:sendTextMessage(MESSAGE_INFO_DESCR, "Sua mount foi adicionada!") p:getPosition():sendMagicEffect(CONST_ME_GIFT_WRAPS) p:addMount(t.id) else p:sendTextMessage(MESSAGE_INFO_DESCR, "Voce ja tem esta mount.") end else p:sendTextMessage(MESSAGE_INFO_DESCR, "Digite novamente, algo está errado!") end else p:sendTextMessage(MESSAGE_INFO_DESCR, "Voce não tem um mount doll!") end return true end Edite os addons/mounts que voce queira..

Eu editei uma base lá deixei ingual o pokepro quase mas tem b1 até b15 e recanto de regigigas etc pvp na rua etc fico massa se quiser eu passo so falar Eu peguei uma base lá deixei ingual o pokepro quase mas tem b1 até b15 super box etc Famoso pvp na rua se quiser que eu passo só falar

tenho umas aki

Mude: Game.setGameState(GAMESTATE_SHUTDOWN) Para: Game.setGameState(GAME_STATE_SHUTDOWN) ACHO que é isso!

Amigo segue Esse Tutorial ae : 1° Baixe o dat editor 8.54 http://www.4shared.c..._editor_854.htm 2°Clicke em Open No canto Superior esquerdo e procure pelo arquivo Dat e o Spr Do cliente que quer copiar a sprite 3° Procure a sprite desejada Clicke ctr+e e salveem algum lugar do seu pc 4° Depois de ter feito isso abra do mesmo geito o seu cliente e aperte ctr+i i vai aparecer uma janela para procurar um arquivo vá ate o arquivo que vc salvo no seu pc 5°Depois de abrir vai aparecer uma janelinha para apertar em yes ou no se vc quiser substituir uma sprite existente por essa vc aperte em yes se vc nao quiser substituir e criar uma nova aperte em no. Obs-Para substituir por uma sprite existente vá ate ela clique nela aperte ctrl+I e aperte em yes (No seu Caso A Sprite Tem Que Ser Do Mesmo Tamanho) Se voce Quiser Saber Qual é sua newtype e só ir la em baixo na barra itemtype 6° agora é so vc salvar vai em file clique em save e aperte em compile Se Ajudei Da Um Rep+ Aee Abraço

Em action/script crie um arquivo com o nome "mount1": function onUse(cid, item, fromPosition, itemEx, toPosition) local effect = 30 -- efeito ao clicar no baú local storage = 34530 if(getPlayerStorageValue(cid, 34530) > 0) then doPlayerSendTextMessage(cid, 25, "Você já recebeu sua mount.") return TRUE end doPlayerAddMount(cid, ID) -- Aqui é o ID da montaria, você pode encontrar em DATA/XML/mounts.xml. doPlayerSendTextMessage(cid, 25, "Você ganhou uma nova mount.") doSendMagicEffect(getPlayerPosition(cid), effect) return TRUE end Agora em action.xml cole a tag: <action actionid="12131" event="script" value="mount1.lua"/> actionid="12131" -> adicione no baú pelo map editor (em propriedades - actionid) créditos: jhon992