Líderes

Aqui, veja se é isso mesmo que você quer: 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 certificado = 6088 local cfg = { ["hidan amulet"] = 11396, ["semana premium"] = 8981, } if msgcontains(msg, "Certificado") then if getPlayerStorageValue(cid, 98815) >= 1 then selfSay("Desculpe, você já pegou seu item.", cid) talkState[talkUser] = 0 return true else selfSay("Oh, posso lhe dar em troca de um certificado um {hidan amulet} ou {semana premium}. Qual você prefere?", cid) talkState[talkUser] = 1 return true end elseif talkState[talkUser] == 1 then if cfg[msg:lower()] then if getPlayerItemCount(cid, certificado) >= 1 then selfSay("Obrigado, aqui está seu "..msg..".", cid) setPlayerStorageValue(cid, 98815, 1) doPlayerRemoveItem(cid, certificado, 1) doPlayerAddItem(cid, cfg[msg:lower()], 1) talkState[talkUser] = 0 return true else selfSay("Desculpe, você não tem um certificado.", cid) talkState[talkUser] = 0 return true end else selfSay("Desculpe, eu não troco esse item.", cid) talkState[talkUser] = 0 return true end end return true end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new())

Alissow OTS 5.0!!!!! [17/03/ 2013] Provavelmente vocês estão pensando "mas que diabo de OTS é esse?", afinal, já faz 2 anos desde que a ultima versão foi lançada (http://www.xtibia.co...10-86-completo/) e desde lá prometemos algo que não foi cumprido - até agora -, uma versão nova. ENFIM, TEMOS AGORA A MAIS NOVA VERSÃO DE UM DOS SERVIDORES MAIS AVACALHADOS JOGADOS DOS ULTIMOS TEMPOS. Mas eu tenho uma má noticia, está incompleto. Sim, o mapa está inacabado. Muitas coisas que eu planejei fazer nele eu não completei. Boa parte o Comedinha ajudou a terminar, adicionando o resto dos caminhos básicos e os monstros. mas mapa inacabado não quer dizer que não está jogável, quer dizer que faltou detalhar (Ex: x:55 y: 137 z: 9, x: 104 y: 140 z: 7, etc). A ultima versão foi baixada mais de 50 mil vezes e esperamos que essa versão faça o mesmo sucesso. VAMOS BAIXAR E JOGAR, SEUS LINDOS Créditos Gerais: Sobre o OT/Mapa: Principais quests: -Annihilator -Inquisition Quest -Pits of inferno -Demon Oak -Solar axe quest -HOTA -MPA quest -The Challenger Monstros: -Total monstros: 10292 -Total spawn: 5587+ Cidades: -12 Cidades -200 Houses+- Raids/Invasões: -Rat -Orshabaal -Ghazbaran -Giant spider/The old window -Ferumbras -Morgaroth Spells: -Magias editadas para balanceamento das vocações Changelog Atualização [3.4 BETA]: Atualização nº 2 [3.4]: Atualização 3.5 [06/08/2009]: Atualização Patch 3.5.1 [07/08/2009]: Atualização 3.6 [10/08/2009]: Atualização 3.7! Beta [18/12/2009]: Atualização 3.7 Patch 1 [27/12/2009]: Atualização 3.8 [17/01/2010]: Atualização 3.8 Minor Patch 1 [17/01/2010]: Atualização 3.9 [15/02/2010]: Atualização 4.0 [15/02/2010]: Atualização 4.11! [11/07/2010]: Atualização 5.0!!!!! [17/03/2013] - Atualizado para a versão 9.83 (Comedinhasss, Tfs Team) - Sistemas novos para a nova versão, montaria, war system, etc. (Comedinhasss, Tfs Team) - Rep System e Antbot Removido. (Comedinhasss) - 64 Quests reformuladas. (Comedinhasss/Alissow) - Novo sistema de dicas a cada 15 min. - (Comedinhasss) - Novo sistema de map marks ao entrar no servidor. (Comedinhasss) - Organização geral em Actions e Moveevents. (Comedinhasss) - Nova organização nos monstros agora usando os que não tem no tibia original na pasta monsters em mods. (Comedinhasss) - Npcs sem utilidade removidos (Comedinhasss) - Alavanca de runas e potions reformuladas (Comedinhasss, Alissow) - Bug PZ nas Hydras arrumado (Alissow) - Cidade principal parcialmente reformulada (Alissow) - Cidade de Flam totalmente reformulada (Alissow) - As lojas agora não são mais areas PZ (Alissow) - Corrigido erros em portas que não deveriam abrir, e portas que não deveriam fechar (Alissow) - Continente de Zao removido? (Alissow) - Arrumado bugs onde podia-se pegar items na ferumbras tower e vários outros lugares (Alissow) - Arrumado caminho da "inquisition" (Alissow) - Respawns recolocados em algumas áreas de yalahar, dragons, elfs Hydras, Dark magicians e apprentices (Alissow) - Nova entrada para arena (Svargrond) na cidade principal e funcionando! (Alissow) - Elevado nível de dificuldade da Arena (Svargrond) (Alissow) - Nova localização da Ferumbras Tower (Alissow) - Cidade de Mistyc removida (Alissow) - Novo sistema premium igual ao global. (Comedinhasss) - Sistema de bless reformulado e agora por items. (Comedinhasss) - Sistema de portais/teleports (Comedinhasss, Alissow) - Sistema offline training (Comedinhasss, TFS) - Sistema de casamento trocado (Comedinhasss, Outros) - Spells (OTX) Screenshots: Mais screenshots: Clique Aqui Download: Windows: http://www.mediafire...cap2yi5jee5e7an (Tam: 16MB) Linux (Debian): http://www.mediafire...5lu3476fd8jcnc8 (Tam: 7MB) Link Protegido Windows: http://lix.in/-d3c97c Link Protegido Linux (Debian): http://lix.in/-d5501d Scan Virus Total: https://www.virustot...sis/1363492837/ IP Changer: http://www.mediafire...6stsdskhljaa0c1 -Atenção- - Acc do God: admin/admin - LEIA o tópico antes de postar qualquer coisa ou duvida - Reportem se houver algum bug - Offline Train Level configurado no config.lua em levelToOfflineInBed - As estatuas de offline que ficam no templo não funcionam por serem enfeites - Para tirar o , previewer do nome, no config.lua em serverPreview mude para false - Todos os addons são vendidos menos o demon que o comedinha acabou esquecendo de coloca - Comandos personalizados: /ta - itens pro sv inteiro, /tp - locais do mapa, /p - tem na assinatura do comedinha ensinando, /e - abrir e fechar portal(open, close). - Para usar os portais você primeiro deve explorar a área indo até ela - Tem alguns segredinhos e lugares escondidos muito legais para vocês descobrirem - Favor, não usar o nosso distro sem o nosso consenso, obrigado. - Se você gostou, clique no ali embaixo ó

Olá pessoal do Xtibia. Vim aqui trazer um servidor editado um pouco por min. Creditos : allangfb1 e Eu (Miinerva) que editei. (Que eu vi apenas ele : allangfb) Peguei esse servidor e editei algumas coisas do meu Gosto. Espero que gostem. A foto que está logo a baixo é com o Client Tibia Starbr! É mesma coisa do Client Tibia 8.60. ( O Client Tibia Starbr tem alguns itens tem a aparencia diferente. ) Então, Vamos ao que enteresa. Radbr-Fenix Adicionado Armas : Donate Fenix Staff. Donate Fenix Crossbow. Donate Fenix Livro Nivel 8. Donate Fenix Axe. Donate Fenix Sword. Donate Fenix Club. Adicionado Equipamentos : Donate Fenix Helmet. Donate Fenix Armor. Donate Fenix Legs. Donate Fenix Boots. Adicionado Equipamentos para Mages: Mage Fenix Helmet. Mage Fenix Armor. Mage Fenix Legs. Mage Fenix Boots. Modificado lugar do NPC : Golden Angel. Wisland modificada. Adicionado algumas coisas a mais na cidade de Wisland. Tem algumas Hunts. Mas isso depende da pessoa se quiser deichar deicha. Se a pessoa gostar sem teletransport de hunts, só tirar. O sistema que eu fiz é VIP que a pessoa por VIP Gold. Essencial para pessoas que ganham dinheiro atraz do (Exemplo : Radbr) Ou de qual quer outra forma. Adicionado algumas Raids : /raid Dragon. /raid Tartaruga Mutante Suprema. /raid Abominavell. /raid Ethershreck. (Muitos bichos em Wisland. /raid (Exemplo : /raid coelho1, ''2, ''3....) Varias Cidades. Adicionado alguns Monstros : Draken. Medusa. Triple Medusa. Ethershreck. Squirrel (Um esquilo do Noel) Adicionado sistema de Stages. O servidor não está 100% Sem bugs. Adicionado uma parte para evento backpack. Para pessoas que gostam desse evento. Estou sem tempo para editar, eu estava trabalhando para começar a fazer quests. Eu tentei resetar a Styller própria do mapa. Mas não consegui. Criei um tópico pedindo ajuda a alguém, mas não consegui resolver esse meu poblema. Então o servidor não está resetado como eu gostaria que ele estivese para trazer ele. Peço desculpa a todos por isso. Não tenho muito tempo, e não sei se vou continuar com meu Nootbook, então resolvi trazer para vocês que gostem de um Radbr. Espero que gostem, por favor comentem. Aceito criticas, esse é meu primeiro Post de mapa. Não sei se está na área certa se não estiver por favor, alguém mude se possível. Então por favor me falem. Aprovado ? Ou Reprovado ? Espero que gostem. Por favor se possível alguém faz um Scan para min. (Dou REP + como agradecimento.) Agradeço des de já. Atenciosamente : Miinerva Link do Download do Starbr : http://www.4shared.com/file/mb1b2tR_/StaBR.html Link do Download Radbr-Fenix : http://www.megafileupload.com/en/file/481978/Mapa-Miinerva-Radbr-Fenix-v8-60-rar.html Fotos : Templo Rua : Cidade Wisland : Evento backpack : Itens Donate : ( Essa aparência só com o client StarBR ) Evento Invasão : Ethershreck : NPC Golden Angel : ( Desculpem pelo erro na foto : Golden Angerl. Estava com presa.) " Mas estou em outro pc já não da para mudar :"( "

Créditos: 100% Draky Lucas O que é? Cada level que você upa, você ganha uma quantidade de pontos configuráveis, que pode ser trocados por skills, vida e mana, porem sendo controlado o que pode ser trocado por vocação (assim. um knight, por exemplo, nao compraria ML) PS: configurem vcs mesmos tudo na LIB Funcionamento: Só colocar e ver oO Video: comandos: /atributos /atributos add, club /atributos add, axe /atributos add, sword /atributos add, fist /atributos add, shielding /atributos add, distance /atributos add, mana /atributos add, vitality /atributos reset /atributos build instalação: em data/lib crie um arquivo chamado atributos.lua e nele adicione isso: agora em data/talkactions/scripts crie uma pasta chamada drakylucas e nela crie um arquivo chamado atributos.lua , colocando isso nele: agora em data/creaturescripts/scripts crie uma pasta chamada drakylucas e nela crie um arquivo chamado atributos.lua (sim, todos arquivos tem o mesmo nome.. cuidado nas pastas) e coloque isso: agora em data/creaturescripts/scripts, abre o login.lua e coloque isso ANTES do último return true: agora em data/talkactions/talkactions.xml coloque isso: <talkaction words="/atributos" event="script" value="drakylucas/atributos.lua"/> agora em data/creaturescripts/creaturescripts.xml coloque isso: <event type="advance" name="avancarGanharPontos" event="script" value="drakylucas/atributos.lua"/> reinicie o servidor e divirta-se. PS: não sei se funciona com sqlite.. eu uso MYSQL como banco de dados. Testado com TFS 0.4 Rev 3887 8.60 Por favor, nao deixem de comentar, desanima criar coisas e a cada 100 visitas, apenas um comentario. EDIT: Arrumado bug do magiclevel!

Este concurso acontecerá de 2 em 2 semanas, tendo como intuito avaliar de uma forma diferente os jogadores. Por ser um concurso voltado aos mappers mais experientes não haverá neste postagem de tutorial ou de imagens de inspiração, caso algum membro o faça, este poderá ser punido. »Como inovação este concurso traz a seus competidores algumas novas regras: Seguir o tema proposto; Em cada edição haverá ao menos 3 itens obrigatórios a se ter em seu mapa, caso não haja os itens obrigatórios em seu mapa, pontos serão descontados! Ao termino do prazo de entrega, todos os mapas enviados ao juiz serão postados neste tópico de forma anônima (ou seja, os mapas não virão acompanhados do nome do criador). Estes serão votados em forma de enquete, e para que não haja erros será aplicado 'proporção'. Vale lembrar que houve uma mudança nos critérios avaliativos, para adequar a esta nova regra. Prêmios: 1º lugar (5reps) + Medals 2º lugar (3reps) 3º lugar (2rep) Tema: [Hunt] Desert Jurado: vital900 Itens Obrigatórios da edição: Rock (3325 ou/até 3340) Campfire (1421) Skull (2320) O mapa deve ser enviado por Mensagem Privada [MP] ao jurado fixo. Com o título da edição (CAM#08- [Hunt] Desert ) e o seu nick. Exemplo: (CAM#08- [Hunt] Desert ) - vital900 Data de entrega: 25/12/2013 (23:59) Votos Públicos: 26/12/2013 Resultado: 26/12/2013 (23:59) Obs: A regra 3, onde o vencedor poderia escolher o próximo tema fora retirada. Este concurso terá medalhas!

Zipter eu não tenho idéia do pq de isso não ter funcionado, mas eu testei assim e funcionou certinho: function onStatsChange(cid, attacker, type, combat, value) local artigo = getPlayerSex(cid) == 0 and "comida" or "comido" if isPlayer(cid) and getCreatureName(attacker) == "Event Zombie" and isInArea(getCreaturePosition(cid), amoebaZombie.fromPosition, amoebaZombie.toPosition) then if getPlayerStorageValue(cid, 28193) < 3 then doPlayerSetStorageValue(cid, 28193, getPlayerStorageValue(cid, 28193)+1) else if getGlobalStorageValue(amoebaZombie.playerStorage) > 2 then doPlayerSetStorageValue(cid, 28913, 0) setGlobalStorageValue(amoebaZombie.playerStorage, getGlobalStorageValue(amoebaZombie.playerStorage)-1) local corpse = doCreateItem(3058, 1, getPlayerPosition(cid)) doItemSetAttribute(corpse, "description", "You recognize " .. getCreatureName(cid) .. ". He was killed by "..(isMonster(attacker) and "a "..string.lower(getCreatureName(attacker)) or isCreature(attacker) and getCreatureName(attacker) or "a field item")..".") doBroadcastMessage(getPlayerName(cid) .." foi " .. artigo .. " pelos zombies!") doPlayerAddItem(cid, amoebaZombie.consolo[1], amoebaZombie.consolo[2]) doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) elseif getGlobalStorageValue(amoebaZombie.playerStorage) == 2 then setGlobalStorageValue(amoebaZombie.playerStorage, getGlobalStorageValue(amoebaZombie.playerStorage)-1) doPlayerSetStorageValue(cid, 28913, 0) local corpse = doCreateItem(3058, 1, getPlayerPosition(cid)) doItemSetAttribute(corpse, "description", "You recognize " .. getCreatureName(cid) .. ". He was killed by "..(isMonster(attacker) and "a "..string.lower(getCreatureName(attacker)) or isCreature(attacker) and getCreatureName(attacker) or "a field item")..".") doBroadcastMessage(getPlayerName(cid) .." foi " .. artigo .. " pelos zombies!") doPlayerAddItem(cid, amoebaZombie.consolo[1], amoebaZombie.consolo[2]) doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) addEvent(winZombieEvent, 1000) addEvent(removeZombies, 1000) end end end return true end Obrigado pela ajuda

Respondendo sua PM: Abraço

Primeiramente, em 050-function.lua, adicione a seguinte função: function getPlayersInArea(pos1,pos2) local players = {} if pos1.x and pos1.y and pos2.x and pos2.y and pos1.z == pos2.z then for a = pos1.x, pos2.x do for b = pos1.y,pos2.y do local pos = {x=a,y=b,z=pos1.z} if isPlayer(getTopCreature(pos).uid) then table.insert(players,getTopCreature(pos).uid) end end end return players else return false end end Agora, em data/talkactions, abra o arquivo .xml e adicione a seguinte tag: <talkaction words="!abrirevento;!irevento;!fecharevento" script="evento.lua"/> Depois, crie um arquivo com extensão .lua (em data/talkactions/scripts), nomeie-o evento, e coloque o seguinte conteúdo: local cfg = { event_area = {x = x, y = y, z = z}, --Para onde os jogadores serão teleportados ao usar o comando !irevento. inicial_pos = {x = x, y = y, z = z}, --Coordenadas da posição superior esquerda da área. final_pos = {x = x, y = y, z = z}, --Coordenadas da posição inferior direita da área. id = xxx, --Group ID necessário para abrir/fechar o evento. } function onSay(cid, words) if words == "!abrirevento" then if getPlayerGroupId(cid) <= (cfg.id - 1) then return doPlayerSendCancel(cid, "Sorry, not possible.") elseif getGlobalStorageValue(98762) >= 1 then return doPlayerSendCancel(cid, "O evento já está aberto!") end broadcastMessage("O evento foi aberto! Para participar, basta digitar !irevento.", 25) doPlayerSendTextMessage(cid, 27, "Você abriu o evento. Para fechá-lo, digite !fecharevento.") setGlobalStorageValue(98762, 1) elseif words == "!irevento" then if getGlobalStorageValue(98762) <= 0 then return doPlayerSendCancel(cid, "Desculpe, o evento está fechado.") elseif isInArea(getThingPos(cid), cfg.inicial_pos, cfg.final_pos) then return doPlayerSendCancel(cid, "Você já está participando do evento!") end doPlayerSendTextMessage(cid, 27, "Bem vindo, e boa sorte!") doTeleportThing(cid, cfg.event_area) elseif words == "!fecharevento" then if getPlayerGroupId(cid) <= (cfg.id - 1) then return doPlayerSendCancel(cid, "Sorry, not possible.") elseif getGlobalStorageValue(98762) <= 0 then return doPlayerSendCancel(cid, "O evento já está fechado!") end broadcastMessage("O evento foi fechado! Todos os jogadores que estavam na área foram teleportados para o Centro Pokémon!") doPlayerSendTextMessage(cid, 27, "Você fechou o evento. Para abrí-lo, digite !abrirevento.") setGlobalStorageValue(98762, 0) local jogadores = getPlayersInArea(cfg.inicial_pos, cfg.final_pos) if #jogadores >= 1 then for _, b in pairs(jogadores) do doTeleportThing(b, getTownTemplePosition(getPlayerTown(b))) end end end return true end

Estranho, testei aqui e tá funcionando direitinho (claro, tive que editar algumas coisas pra funcionar: criar as funções e a tabela) Seu servidor tá fechando em ambas as ocasiões (storage global maior que 2 e igual a 2)?

function onStatsChange(cid, attacker, type, combat, value) local artigo = getPlayerSex(cid) == 0 and "comida" or "comido" local max_hits = 3 --Quantos hits o jogador irá levar, no máximo. 3 = 3 hits do Zombie. if getCreatureName(attacker) == "Event Zombie" and isInArea(getCreaturePosition(cid), amoebaZombie.fromPosition, amoebaZombie.toPosition) then if type == STATSCHANGE_HEALTHLOSS then if getPlayerStorageValue(cid, 834412) <= (max_hits - 2) then setPlayerStorageValue(cid, 834412, getPlayerStorageValue(cid, 834412) + 1) else if getGlobalStorageValue(amoebaZombie.playerStorage) > 2 then setGlobalStorageValue(amoebaZombie.playerStorage, getGlobalStorageValue(amoebaZombie.playerStorage)-1) local corpse = doCreateItem(3058, 1, getPlayerPosition(cid)) doItemSetAttribute(corpse, "description", "You recognize " .. getCreatureName(cid) .. ". He was killed by "..(isMonster(attacker) and "a "..string.lower(getCreatureName(attacker)) or isCreature(attacker) and getCreatureName(attacker) or "a field item")..".") doBroadcastMessage(getPlayerName(cid) .." foi " .. artigo .. " pelos zombies!") doPlayerAddItem(cid, amoebaZombie.consolo[1], amoebaZombie.consolo[2]) doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) setPlayerStorageValue(cid, 834412, 0) elseif getGlobalStorageValue(amoebaZombie.playerStorage) == 2 then setGlobalStorageValue(amoebaZombie.playerStorage, getGlobalStorageValue(amoebaZombie.playerStorage)-1) local corpse = doCreateItem(3058, 1, getPlayerPosition(cid)) doItemSetAttribute(corpse, "description", "You recognize " .. getCreatureName(cid) .. ". He was killed by "..(isMonster(attacker) and "a "..string.lower(getCreatureName(attacker)) or isCreature(attacker) and getCreatureName(attacker) or "a field item")..".") doBroadcastMessage(getPlayerName(cid) .." foi " .. artigo .. " pelos zombies!") doPlayerAddItem(cid, amoebaZombie.consolo[1], amoebaZombie.consolo[2]) doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) setPlayerStorageValue(cid, 834412, 0) addEvent(winZombieEvent, 1000) addEvent(removeZombies, 1000) end end end end return true end

#Edit, resolvido.

Ok, vou testar e já Posto e Resultado. Obrigado. EDIT# Não Funcionou pois, na verdade não tentei.. o seu script, é pra quem usa "site" eu não uso.

Muito Booommmm o melhor servidor de todos u.U Trabalhamos 1 ano no servidor pessoal, espero que gostem =D

Olha cara isso naum é nenhum bicho de 7 cabeças, mais me passa o do seu server q eu fasso o client pra vc. E eu prometo estar fazendo um video aula pra vc. Ok