Marcadores
About Me
domingo, 27 de novembro de 2011
Pedidos/Sugestões
Pessoal agora voces podem fazer pedidos/Sugestões ao lado do site .que tentarei postar oque voces pedirem
siga-nós twitter: @OtservMania
e David o criador do Otserv Mania: @DavidSantoOFC
siga-nós twitter: @OtservMania
e David o criador do Otserv Mania: @DavidSantoOFC
sábado, 26 de novembro de 2011
Agora Voce pode conversa com os admin ou com os moderadores usando nosso Chat ,ta esperando oque? va agora mesmo e troque ideias com nossos admins e mod.
sexta-feira, 25 de novembro de 2011
Em Breve Pokemon Supreme
Informações:
bixos novos como:
Totodile-------Croconaw--------Feraligator
Chikorita------Bayleaf---------Meganium
Cyndaquil------Quilava---------Typhlosion>>>>>>>>>Supreme Typhlosion
Dialga>>>>>>>>>>Supreme Dialga<<<<<<<<<<<<--------somente em evento-------- Palkia--------somente em evento-------- Kyogre--------somente em evento-------- Entei Raikou Suicune--------somente em evento-------- Lugia--------somente em evento-------- Ampharos Shiny Torterra------exclusivo-------- Lucario Blissey Shiny Venusaur Shiny Charizard Shiny Raichu Shiny Electrode Shiny Electabuzz Shiny Electrive Shiny Magmortar Crystal Steelix Crystal Mew Shiny Scizor Shiny Abra Shiny Jynx Torterra Shiny Torterra Wailord Darkrai Shiny Golem Shiny Vileplume Shiny Fearow Shiny Magikarp Shiny Arcanine Shiny Lapras Shiny Cloyster Shiny Magnemite Elite Hitmonlee Elite Hitmonchan Dark Gengar Tyranitar Unown>>>>>>>>>>TODOS OS 23<<<<<<<<< Tyrogue--------somente em evento-------- Porigon Z Supreme Elite Hitmonlee Supreme Shiny Scyther Supreme Shiny Charizard Supreme Shiny Blastoise Sleepy Charmander--------somente em evento-------- Shiny Rhydon esses bixos são so pra começa no total mais de 200 novos xP ====TODOS==== com catch & portrait --------------------------------------------------------------------------- ==========Stones=========== --------Todas as Stones do jogo são "Empilhaveis" --------Nossas Stones são diferentes de outros servers alem de termos a Shiny Stone Que transforma qualquer pokemon em shiny temos a Supreme Box como se fosse uma stone que torna qualquer pokemon supreme, para saber quais pokes viram "Supreme" digite no server !supreme e descubra.--------- ===========Novos sistemas========== --------Addon System(você compra um item no npc que que ao usar em seu pokemon adiciona uma roupa para ele)------- --------Os monstros Wilds(que não são dos players)lançam as magias do m1 sozinhos, tornando-os mais dificil de mata-los e deichando o jogo mais verdadeiro-------- --------Sistema de Flags(bandeiras)------- --------Boost System(não é igual a uns ots por ai que é somente 1 stone que voce usa no pokemon nosso Boost System é feito por 1 maquina!Isso mesmo 1 maquina entre e confira!----------- ---------Boat System(voce sobe em 1 barco e ele sai andando com voce encima muito show)---------- ---------Aura System-------- ---------Sistema de promotion unico e com novos outfits--------- ---------Pokedex para TODOS OS POKES SHINYS--------- ---------Alem dos teleports com alguns shinys existe respaw de shinys aleatorios no mapa então n se limite a somente ir aos teleports explore!-------- ---------Quanto maior for seu level maior o ataque de seu Pokemon---------- ---------Gender System para saber se seu Pokemon é macho ou femea!--------- ---------Pvp Sytem igual ao svke entre e confira-------- ---------Com o comando /dittocolor se você tiver um shiny ditto ele muda sua cor! São 132 cores diferentes!---------- ---------Único & Exclusivo: Rain System!(EXCLUSIVIDADE para o Pokemon Supreme®)----------- ---------Love System---------- ---------Sistema de Revive--------- ---------Único e exclusivo DIVE SYSTEM---------- ---------Order e todas suas funções funcionando, ou seja: Light, Blink, Control Mind etc...--------- ----------Portrait funcionando 100% inclusive pros pokes novos---------- ----------Npc que compra seus pokemons------------ ----------Nurse Joye healando todos os pokes de uma só vez--------- ----------Sistema de m1 completo para todos os pokes (INCLUSIVE PARA OS NOVOS)-------- ----------Ditto System vc pega o Ditto e fala m1 ele se transforma no poke que ta atacando ele(tambem pega os ataques do outro pokemon)-------- ----------Gastly Haunter e Gengar Atravessando paredes arvores etc---------- ----------Os pokemons entram na protection zone---------- ----------Supreme Box: Voce compra ela no npc Box Seller e da use em seu pokemon ele se torna supremo, para lista completa dos pokes que viram supreme fale !supreme no server------------ ----------Quests complicadas na qual voce tem que resolver enigmas e matar bixos pra abrir teleports isso é oque voce vai encontrar aki----------- -----------Quando voce sobe uma escada ou desce o seu poke vem junto------------ ----------Você pode pescar Totodile com qualquer fishing, pescar Shiny Magikarp com fishing 40, e pescar Lapras & Wailord com fishing 100!Treinem seu fishing =)---------- ----------Shiny Stone que você compra por 500HD e pode transformar qualquer pokemon em Shiny, ou Elite, quase TODOS se não todos os pokemons que viram shinys podem ser transformador com Stone---------- -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- ==========Teleports========== ----------Nossos teleports proporcionam uma nova geração de hunts para o poketibia nosso mapper é meticuloso com os detalhes e nao deixa passar 1 erro então com os teleports voce pode ir nas ilhas:Ilha de Grama, Ilha de Fogo, Ilha de Gelo, Castelo Fantasma,Ilha de Pedra,Ilha Elétrica, Ilha de Agua & Ilha Psiquica e voce pode capturar pokes como: Shiny Venusaur, Shiny Charizar,Shiny Jynx, Shiny Abra, etc...--------------- -------------------------------------------------------------------------------------------------------------------------------------------------------- ==========NPCS========== Box Seller: ele vende o Supreme Box que torna o poke supremo(exclusividade do nosso servdor) Novo Npc: Safari Zone no qual voce pode ir para nossa Safari e pegar muitos pokes que so existem nesse respaw voce so precisa ter 15HD e ter lv 300 e falar com o npc----------------- Stone Seller: Ele vende TODAS as stones do server alem de compra-las. -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- ==========Hotel========== As houses do servidor so podem ser compradas apartir do lv 300 para ter mais houses livres Nos temos um exclusivo sistema de hotel no qual voce vai para o hotel e tem que pagar para uma "Secretária" para ter acesso ao hotel que custa 50HD mas voce tem acesso a 189 novas Houses alem da parte da cobertura que tem casas para os ricões do server =) ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- ==========Houses=========== Quero avizar que TODAS as Houses do ot estão DESBUGADAS então podem comprar sem medo de perder nada e também para quem gosta de números exatos existe um total de 387 Houses espalhadas pelo map sendo que como ja foi dito antes 189 estão no Hotel. ---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- =========Eventos========== Os Eventos são realizados TODOS os dias por mebros da Staff na nossa Ilha De Evento eventos como: evento de bag naqual voce joga uma pokeball encima de um presente e ganha o que estiver no presente e evento invasão um pouco diferente, de tempos em tempos um boss super poderoso invadirá o server caso os players conseguirem mata-lo em menos de 3 minutos TODOS os players online ganham uma quantidade de dinheiro ou um item.
Totodile-------Croconaw--------Feraligator
Chikorita------Bayleaf---------Meganium
Cyndaquil------Quilava---------Typhlosion>>>>>>>>>Supreme Typhlosion
Dialga>>>>>>>>>>Supreme Dialga<<<<<<<<<<<<--------somente em evento-------- Palkia--------somente em evento-------- Kyogre--------somente em evento-------- Entei Raikou Suicune--------somente em evento-------- Lugia--------somente em evento-------- Ampharos Shiny Torterra------exclusivo-------- Lucario Blissey Shiny Venusaur Shiny Charizard Shiny Raichu Shiny Electrode Shiny Electabuzz Shiny Electrive Shiny Magmortar Crystal Steelix Crystal Mew Shiny Scizor Shiny Abra Shiny Jynx Torterra Shiny Torterra Wailord Darkrai Shiny Golem Shiny Vileplume Shiny Fearow Shiny Magikarp Shiny Arcanine Shiny Lapras Shiny Cloyster Shiny Magnemite Elite Hitmonlee Elite Hitmonchan Dark Gengar Tyranitar Unown>>>>>>>>>>TODOS OS 23<<<<<<<<< Tyrogue--------somente em evento-------- Porigon Z Supreme Elite Hitmonlee Supreme Shiny Scyther Supreme Shiny Charizard Supreme Shiny Blastoise Sleepy Charmander--------somente em evento-------- Shiny Rhydon esses bixos são so pra começa no total mais de 200 novos xP ====TODOS==== com catch & portrait --------------------------------------------------------------------------- ==========Stones=========== --------Todas as Stones do jogo são "Empilhaveis" --------Nossas Stones são diferentes de outros servers alem de termos a Shiny Stone Que transforma qualquer pokemon em shiny temos a Supreme Box como se fosse uma stone que torna qualquer pokemon supreme, para saber quais pokes viram "Supreme" digite no server !supreme e descubra.--------- ===========Novos sistemas========== --------Addon System(você compra um item no npc que que ao usar em seu pokemon adiciona uma roupa para ele)------- --------Os monstros Wilds(que não são dos players)lançam as magias do m1 sozinhos, tornando-os mais dificil de mata-los e deichando o jogo mais verdadeiro-------- --------Sistema de Flags(bandeiras)------- --------Boost System(não é igual a uns ots por ai que é somente 1 stone que voce usa no pokemon nosso Boost System é feito por 1 maquina!Isso mesmo 1 maquina entre e confira!----------- ---------Boat System(voce sobe em 1 barco e ele sai andando com voce encima muito show)---------- ---------Aura System-------- ---------Sistema de promotion unico e com novos outfits--------- ---------Pokedex para TODOS OS POKES SHINYS--------- ---------Alem dos teleports com alguns shinys existe respaw de shinys aleatorios no mapa então n se limite a somente ir aos teleports explore!-------- ---------Quanto maior for seu level maior o ataque de seu Pokemon---------- ---------Gender System para saber se seu Pokemon é macho ou femea!--------- ---------Pvp Sytem igual ao svke entre e confira-------- ---------Com o comando /dittocolor se você tiver um shiny ditto ele muda sua cor! São 132 cores diferentes!---------- ---------Único & Exclusivo: Rain System!(EXCLUSIVIDADE para o Pokemon Supreme®)----------- ---------Love System---------- ---------Sistema de Revive--------- ---------Único e exclusivo DIVE SYSTEM---------- ---------Order e todas suas funções funcionando, ou seja: Light, Blink, Control Mind etc...--------- ----------Portrait funcionando 100% inclusive pros pokes novos---------- ----------Npc que compra seus pokemons------------ ----------Nurse Joye healando todos os pokes de uma só vez--------- ----------Sistema de m1 completo para todos os pokes (INCLUSIVE PARA OS NOVOS)-------- ----------Ditto System vc pega o Ditto e fala m1 ele se transforma no poke que ta atacando ele(tambem pega os ataques do outro pokemon)-------- ----------Gastly Haunter e Gengar Atravessando paredes arvores etc---------- ----------Os pokemons entram na protection zone---------- ----------Supreme Box: Voce compra ela no npc Box Seller e da use em seu pokemon ele se torna supremo, para lista completa dos pokes que viram supreme fale !supreme no server------------ ----------Quests complicadas na qual voce tem que resolver enigmas e matar bixos pra abrir teleports isso é oque voce vai encontrar aki----------- -----------Quando voce sobe uma escada ou desce o seu poke vem junto------------ ----------Você pode pescar Totodile com qualquer fishing, pescar Shiny Magikarp com fishing 40, e pescar Lapras & Wailord com fishing 100!Treinem seu fishing =)---------- ----------Shiny Stone que você compra por 500HD e pode transformar qualquer pokemon em Shiny, ou Elite, quase TODOS se não todos os pokemons que viram shinys podem ser transformador com Stone---------- -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- ==========Teleports========== ----------Nossos teleports proporcionam uma nova geração de hunts para o poketibia nosso mapper é meticuloso com os detalhes e nao deixa passar 1 erro então com os teleports voce pode ir nas ilhas:Ilha de Grama, Ilha de Fogo, Ilha de Gelo, Castelo Fantasma,Ilha de Pedra,Ilha Elétrica, Ilha de Agua & Ilha Psiquica e voce pode capturar pokes como: Shiny Venusaur, Shiny Charizar,Shiny Jynx, Shiny Abra, etc...--------------- -------------------------------------------------------------------------------------------------------------------------------------------------------- ==========NPCS========== Box Seller: ele vende o Supreme Box que torna o poke supremo(exclusividade do nosso servdor) Novo Npc: Safari Zone no qual voce pode ir para nossa Safari e pegar muitos pokes que so existem nesse respaw voce so precisa ter 15HD e ter lv 300 e falar com o npc----------------- Stone Seller: Ele vende TODAS as stones do server alem de compra-las. -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- ==========Hotel========== As houses do servidor so podem ser compradas apartir do lv 300 para ter mais houses livres Nos temos um exclusivo sistema de hotel no qual voce vai para o hotel e tem que pagar para uma "Secretária" para ter acesso ao hotel que custa 50HD mas voce tem acesso a 189 novas Houses alem da parte da cobertura que tem casas para os ricões do server =) ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- ==========Houses=========== Quero avizar que TODAS as Houses do ot estão DESBUGADAS então podem comprar sem medo de perder nada e também para quem gosta de números exatos existe um total de 387 Houses espalhadas pelo map sendo que como ja foi dito antes 189 estão no Hotel. ---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- =========Eventos========== Os Eventos são realizados TODOS os dias por mebros da Staff na nossa Ilha De Evento eventos como: evento de bag naqual voce joga uma pokeball encima de um presente e ganha o que estiver no presente e evento invasão um pouco diferente, de tempos em tempos um boss super poderoso invadirá o server caso os players conseguirem mata-lo em menos de 3 minutos TODOS os players online ganham uma quantidade de dinheiro ou um item.
Npc que troca Hitmonlee por Elite Hitmonlee
Esse Npc serve para fazer a troca de 1 Hitmonlee + 200k por 1 Elite hitmonlee, igualmente para o hitmonchan so que por Elite Hitmonchan.
Abra a pasta Data\Npc\Script crie 1 arquivo .LUA chamado elitenpc e coloquei isso dentro:
Depois vá em Data/Npc crie 1 arquivo xml e adicione isso dentro:
<?xml version="1.0" encoding="UTF-8"?>
<npc name="Raviel" script="elitenpc.lua" walkinterval="350000" floorchange="0" speed="0">
<health now="150" max="150"/>
<look type="313"/>
<parameters>
<parameter key="message_greet" value="Welcome! I train pokemons fighters, you have a fighter pokemon?"/>
<parameter key="message_farewell" value="Bye."/>
<parameter key="message_idletimeout" value="Bye."/>
<parameter key="message_walkaway" value="Bye."/>
</parameters>
</npc>
Para trocar o preço ,basta voce abrir preucurar no script por (doPlayerRemoveMoney(cid, 20000000)) e mudar o 20000000 , para o seu preço.
E não esqueça de colocar o nome do arquivo .LUA que voce criou no Data\Npc\Script de elitenpc , se não ,não vai funcionar.
Ex: O npc ira perguntar se vc tem algum pokemon do tipo lutador.
Se falar Hitmonlee ow Hitmonchan ele dará uma breve descrição deles , e fala que sempre teve vontade de treinar 1 desses.
Ai eh só o player fala Yes com 1 desses 2 pokes na bag + 200k e pronto.
Com os outros pokes , ele soh irar falar sobre eles
Abra a pasta Data\Npc\Script crie 1 arquivo .LUA chamado elitenpc e coloquei isso dentro:
local focus = 0
local talk_start = 0
local target = 0
local following = false
local attacking = false
local talkState = {}
function onThingMove(creature, thing, oldpos, oldstackpos)
end
function onCreatureAppear(creature)
end
function onCreatureDisappear(cid, pos)
if focus == cid then
selfSay('Good bye sir!')
focus = 0
talk_start = 0
end
end
function onCreatureTurn(creature)
end
function msgcontains(txt, str)
return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)'))
end
function sellPokemon(cid, name, price)
local pokename = name
local bp = getPlayerSlotItem(cid, CONST_SLOT_BACKPACK)
local itemsball = getItemsInContainerById(bp.uid, 2222)
local itemsultra = getItemsInContainerById(bp.uid, 2220)
for _, pok in pairs(itemsball) do
if string.lower(getItemAttribute(pok, "poke"):sub(9, findLetter(getItemAttribute(pok, "poke"), "'")-1)) == pokename then
if(doPlayerRemoveMoney(cid, 20000000)) then
doRemoveItem(pok, 1)
local health = 7800 -- Health do poke
local maxhealth = 7800 -- Maximo de health do poke
local description = "Contains a Elite Hitmonlee."
local poke1 = "This is Elite Hitmonlee's pokeball. HP = ["..health.."/"..maxhealth.."]"
item = doCreateItemEx(2219)
doItemSetAttribute(item, "poke", poke1)
doItemSetAttribute(item, "nome", "Elite Hitmonlee")
doItemSetAttribute(item, "description", description)
doPlayerAddItemEx(cid, item, true)
doTransformItem(item, 2222)
selfSay('Thank You for letting me train him.')
return true
end
end
end
for _, pok in pairs(itemsultra) do
if string.lower(getItemAttribute(pok, "poke"):sub(9, findLetter(getItemAttribute(pok, "poke"), "'")-1)) == pokename then
if(doPlayerRemoveMoney(cid, 20000000)) then
doRemoveItem(pok, 1)
local health = 7800 -- Health do poke
local maxhealth = 7800 -- Maximo de health do poke
local description = "Contains a Elite Hitmonlee."
local poke1 = "This is Elite Hitmonlee's pokeball. HP = ["..health.."/"..maxhealth.."]"
item = doCreateItemEx(2219)
doItemSetAttribute(item, "poke", poke1)
doItemSetAttribute(item, "nome", "Elite Hitmonlee")
doItemSetAttribute(item, "description", description)
doPlayerAddItemEx(cid, item, true)
doTransformItem(item, 2220)
selfSay('Thank You for letting me train him.')
return true
end
end
end
selfSay('Hey, you do not have that pokemon or the amount of money we agreed!')
end
function sellPokemonn(cid, name, price)
local pokename = name
local bp = getPlayerSlotItem(cid, CONST_SLOT_BACKPACK)
local itemsball = getItemsInContainerById(bp.uid, 2222)
local itemsultra = getItemsInContainerById(bp.uid, 2220)
for _, pok in pairs(itemsball) do
if string.lower(getItemAttribute(pok, "poke"):sub(9, findLetter(getItemAttribute(pok, "poke"), "'")-1)) == pokename then
if(doPlayerRemoveMoney(cid, 20000000)) then
doRemoveItem(pok, 1)
local health = 7800 -- Health do poke
local maxhealth = 7800 -- Maximo de health do poke
local description = "Contains a Elite Hitmonchan."
local poke1 = "This is Elite Hitmonchan's pokeball. HP = ["..health.."/"..maxhealth.."]"
item = doCreateItemEx(2219)
doItemSetAttribute(item, "poke", poke1)
doItemSetAttribute(item, "nome", "Elite Hitmonchan")
doItemSetAttribute(item, "description", description)
doPlayerAddItemEx(cid, item, true)
doTransformItem(item, 2222)
selfSay('Thank You for letting me train him.')
return true
end
end
end
for _, pok in pairs(itemsultra) do
if string.lower(getItemAttribute(pok, "poke"):sub(9, findLetter(getItemAttribute(pok, "poke"), "'")-1)) == pokename then
if(doPlayerRemoveMoney(cid, 20000000)) then
doRemoveItem(pok, 1)
local health = 7800 -- Health do poke
local maxhealth = 7800 -- Maximo de health do poke
local description = "Contains a Elite Hitmonchan."
local poke1 = "This is Elite Hitmonchan's pokeball. HP = ["..health.."/"..maxhealth.."]"
item = doCreateItemEx(2219)
doItemSetAttribute(item, "poke", poke1)
doItemSetAttribute(item, "nome", "Elite Hitmonchan")
doItemSetAttribute(item, "description", description)
doPlayerAddItemEx(cid, item, true)
doTransformItem(item, 2220)
selfSay('Thank You for letting me train him.')
return true
end
end
end
selfSay('Hey, you do not have that pokemon or the amount of money we agreed!')
end
function onCreatureSay(cid, type, msg)
local msg = string.lower(msg)
local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid
if (msgcontains(msg, 'bye') and focus == cid) then
selfSay('See you around then!')
focus = 0
elseif (msgcontains(msg, 'hi') and (focus == 0) and (focus ~= cid) and (getDistanceToCreature(cid) <= 4)) then selfSay('Welcome! I train pokemons fighters, you have a fighter pokemon?.') focus = cid talkState[talkUser] = 1 talk_start = os.clock() elseif (msgcontains(msg, 'machamp') and talkState[talkUser] == 1 and focus == cid) then selfSay('It is impossible to defend against punches and chops distributed by his four arms. It has a great fighting spirit.') elseif (msgcontains(msg, 'thx') and talkState[talkUser] == 1 and focus == cid) then selfSay('Its nothing, tell me if you need something more.') talkState[talkUser] = 1 ---------------------------------------------------------------- elseif (msgcontains(msg, 'machoke') and talkState[talkUser] == 1 and focus == cid) then selfSay('It has a powerful body, uses a belt to power savings to regulate their movements.') elseif (msgcontains(msg, 'thx') and talkState[talkUser] == 1 and focus == cid) then selfSay('Its nothing, tell me if you need something more.') talkState[talkUser] = 1 ---------------------------------------------------------------- elseif (msgcontains(msg, 'machop') and talkState[talkUser] == 1 and focus == cid) then selfSay('A very good pokemon for intense workouts, has a great facility to master all forms of martial arts.') elseif (msgcontains(msg, 'thx') and talkState[talkUser] ~= 1 and focus == cid) then selfSay('Its nothing, tell me if you need something more.') talkState[talkUser] = 1 ---------------------------------------------------------------- elseif (msgcontains(msg, 'poliwrath') and talkState[talkUser] == 1 and focus == cid) then selfSay('Has developed muscles, the muscles used for quick attacks despite being in the water.') elseif (msgcontains(msg, 'thx') and talkState[talkUser] == 1 and focus == cid) then selfSay('Its nothing, tell me if you need something more.') talkState[talkUser] = 1 ---------------------------------------------------------------- elseif (msgcontains(msg, 'primeape') and talkState[talkUser] == 1 and focus == cid) then selfSay('An angry pokemon. gets even more furious when he lost a fight.') elseif (msgcontains(msg, 'thx') and talkState[talkUser] == 1 and focus == cid) then selfSay('Its nothing, tell me if you need something more.') talkState[talkUser] = 1 ---------------------------------------------------------------- elseif (msgcontains(msg, 'hitmonlee') and talkState[talkUser] == 1 and focus == cid) then selfSay('Interesting! Is a pokemon with legs fast and hard, has devastating kicks. Always wanted to train one of these, if you want I can train him for a sum of 200k. Accepted?') talkState[talkUser] = "hitmonlee" elseif (msgcontains(msg, 'yes') and talkState[talkUser] == "hitmonlee" and focus == cid) then sellPokemon(cid, "hitmonlee", 1) talkState[talkUser] = 1 ---------------------------------------------------------------- elseif (msgcontains(msg, 'hitmonchan') and talkState[talkUser] == 1 and focus == cid) then selfSay('Is a great boxer, a man who never gives up. I always wanted to train one of these. For an amount of 200k I can transform it into a great boxer. Accepted?') talkState[talkUser] = "hitmonchan" elseif (msgcontains(msg, 'yes') and talkState[talkUser] == "hitmonchan" and focus == cid) then sellPokemonn(cid, "hitmonchan", 1) talkState[talkUser] = 1 end end function onThink() if focus == 0 then selfTurn(1) else argx, argy, argz = selfGetPosition() dir = getDirectionTo({x=argx,y=argy,z=argz}, getThingPos(focus)) if dir == 7 then dir = 0 elseif dir == 6 then dir = 3 elseif dir == 5 then dir = 1 elseif dir == 4 then dir = 3 end selfTurn(dir) end if (os.clock() - talk_start) > 59 then
if focus ~= 0 then
selfSay('We have been talking for too much time!')
focus = 0
end
end
if focus ~= 0 then
a, b, c = selfGetPosition()
if c ~= getThingPos(focus).z then
focus = 0
end
end
if focus ~= 0 then
if getDistanceToCreature(focus) > 4 then
selfSay('Come back to sell me pokemons!')
focus = 0
end
end
return true
end
local talk_start = 0
local target = 0
local following = false
local attacking = false
local talkState = {}
function onThingMove(creature, thing, oldpos, oldstackpos)
end
function onCreatureAppear(creature)
end
function onCreatureDisappear(cid, pos)
if focus == cid then
selfSay('Good bye sir!')
focus = 0
talk_start = 0
end
end
function onCreatureTurn(creature)
end
function msgcontains(txt, str)
return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)'))
end
function sellPokemon(cid, name, price)
local pokename = name
local bp = getPlayerSlotItem(cid, CONST_SLOT_BACKPACK)
local itemsball = getItemsInContainerById(bp.uid, 2222)
local itemsultra = getItemsInContainerById(bp.uid, 2220)
for _, pok in pairs(itemsball) do
if string.lower(getItemAttribute(pok, "poke"):sub(9, findLetter(getItemAttribute(pok, "poke"), "'")-1)) == pokename then
if(doPlayerRemoveMoney(cid, 20000000)) then
doRemoveItem(pok, 1)
local health = 7800 -- Health do poke
local maxhealth = 7800 -- Maximo de health do poke
local description = "Contains a Elite Hitmonlee."
local poke1 = "This is Elite Hitmonlee's pokeball. HP = ["..health.."/"..maxhealth.."]"
item = doCreateItemEx(2219)
doItemSetAttribute(item, "poke", poke1)
doItemSetAttribute(item, "nome", "Elite Hitmonlee")
doItemSetAttribute(item, "description", description)
doPlayerAddItemEx(cid, item, true)
doTransformItem(item, 2222)
selfSay('Thank You for letting me train him.')
return true
end
end
end
for _, pok in pairs(itemsultra) do
if string.lower(getItemAttribute(pok, "poke"):sub(9, findLetter(getItemAttribute(pok, "poke"), "'")-1)) == pokename then
if(doPlayerRemoveMoney(cid, 20000000)) then
doRemoveItem(pok, 1)
local health = 7800 -- Health do poke
local maxhealth = 7800 -- Maximo de health do poke
local description = "Contains a Elite Hitmonlee."
local poke1 = "This is Elite Hitmonlee's pokeball. HP = ["..health.."/"..maxhealth.."]"
item = doCreateItemEx(2219)
doItemSetAttribute(item, "poke", poke1)
doItemSetAttribute(item, "nome", "Elite Hitmonlee")
doItemSetAttribute(item, "description", description)
doPlayerAddItemEx(cid, item, true)
doTransformItem(item, 2220)
selfSay('Thank You for letting me train him.')
return true
end
end
end
selfSay('Hey, you do not have that pokemon or the amount of money we agreed!')
end
function sellPokemonn(cid, name, price)
local pokename = name
local bp = getPlayerSlotItem(cid, CONST_SLOT_BACKPACK)
local itemsball = getItemsInContainerById(bp.uid, 2222)
local itemsultra = getItemsInContainerById(bp.uid, 2220)
for _, pok in pairs(itemsball) do
if string.lower(getItemAttribute(pok, "poke"):sub(9, findLetter(getItemAttribute(pok, "poke"), "'")-1)) == pokename then
if(doPlayerRemoveMoney(cid, 20000000)) then
doRemoveItem(pok, 1)
local health = 7800 -- Health do poke
local maxhealth = 7800 -- Maximo de health do poke
local description = "Contains a Elite Hitmonchan."
local poke1 = "This is Elite Hitmonchan's pokeball. HP = ["..health.."/"..maxhealth.."]"
item = doCreateItemEx(2219)
doItemSetAttribute(item, "poke", poke1)
doItemSetAttribute(item, "nome", "Elite Hitmonchan")
doItemSetAttribute(item, "description", description)
doPlayerAddItemEx(cid, item, true)
doTransformItem(item, 2222)
selfSay('Thank You for letting me train him.')
return true
end
end
end
for _, pok in pairs(itemsultra) do
if string.lower(getItemAttribute(pok, "poke"):sub(9, findLetter(getItemAttribute(pok, "poke"), "'")-1)) == pokename then
if(doPlayerRemoveMoney(cid, 20000000)) then
doRemoveItem(pok, 1)
local health = 7800 -- Health do poke
local maxhealth = 7800 -- Maximo de health do poke
local description = "Contains a Elite Hitmonchan."
local poke1 = "This is Elite Hitmonchan's pokeball. HP = ["..health.."/"..maxhealth.."]"
item = doCreateItemEx(2219)
doItemSetAttribute(item, "poke", poke1)
doItemSetAttribute(item, "nome", "Elite Hitmonchan")
doItemSetAttribute(item, "description", description)
doPlayerAddItemEx(cid, item, true)
doTransformItem(item, 2220)
selfSay('Thank You for letting me train him.')
return true
end
end
end
selfSay('Hey, you do not have that pokemon or the amount of money we agreed!')
end
function onCreatureSay(cid, type, msg)
local msg = string.lower(msg)
local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid
if (msgcontains(msg, 'bye') and focus == cid) then
selfSay('See you around then!')
focus = 0
elseif (msgcontains(msg, 'hi') and (focus == 0) and (focus ~= cid) and (getDistanceToCreature(cid) <= 4)) then selfSay('Welcome! I train pokemons fighters, you have a fighter pokemon?.') focus = cid talkState[talkUser] = 1 talk_start = os.clock() elseif (msgcontains(msg, 'machamp') and talkState[talkUser] == 1 and focus == cid) then selfSay('It is impossible to defend against punches and chops distributed by his four arms. It has a great fighting spirit.') elseif (msgcontains(msg, 'thx') and talkState[talkUser] == 1 and focus == cid) then selfSay('Its nothing, tell me if you need something more.') talkState[talkUser] = 1 ---------------------------------------------------------------- elseif (msgcontains(msg, 'machoke') and talkState[talkUser] == 1 and focus == cid) then selfSay('It has a powerful body, uses a belt to power savings to regulate their movements.') elseif (msgcontains(msg, 'thx') and talkState[talkUser] == 1 and focus == cid) then selfSay('Its nothing, tell me if you need something more.') talkState[talkUser] = 1 ---------------------------------------------------------------- elseif (msgcontains(msg, 'machop') and talkState[talkUser] == 1 and focus == cid) then selfSay('A very good pokemon for intense workouts, has a great facility to master all forms of martial arts.') elseif (msgcontains(msg, 'thx') and talkState[talkUser] ~= 1 and focus == cid) then selfSay('Its nothing, tell me if you need something more.') talkState[talkUser] = 1 ---------------------------------------------------------------- elseif (msgcontains(msg, 'poliwrath') and talkState[talkUser] == 1 and focus == cid) then selfSay('Has developed muscles, the muscles used for quick attacks despite being in the water.') elseif (msgcontains(msg, 'thx') and talkState[talkUser] == 1 and focus == cid) then selfSay('Its nothing, tell me if you need something more.') talkState[talkUser] = 1 ---------------------------------------------------------------- elseif (msgcontains(msg, 'primeape') and talkState[talkUser] == 1 and focus == cid) then selfSay('An angry pokemon. gets even more furious when he lost a fight.') elseif (msgcontains(msg, 'thx') and talkState[talkUser] == 1 and focus == cid) then selfSay('Its nothing, tell me if you need something more.') talkState[talkUser] = 1 ---------------------------------------------------------------- elseif (msgcontains(msg, 'hitmonlee') and talkState[talkUser] == 1 and focus == cid) then selfSay('Interesting! Is a pokemon with legs fast and hard, has devastating kicks. Always wanted to train one of these, if you want I can train him for a sum of 200k. Accepted?') talkState[talkUser] = "hitmonlee" elseif (msgcontains(msg, 'yes') and talkState[talkUser] == "hitmonlee" and focus == cid) then sellPokemon(cid, "hitmonlee", 1) talkState[talkUser] = 1 ---------------------------------------------------------------- elseif (msgcontains(msg, 'hitmonchan') and talkState[talkUser] == 1 and focus == cid) then selfSay('Is a great boxer, a man who never gives up. I always wanted to train one of these. For an amount of 200k I can transform it into a great boxer. Accepted?') talkState[talkUser] = "hitmonchan" elseif (msgcontains(msg, 'yes') and talkState[talkUser] == "hitmonchan" and focus == cid) then sellPokemonn(cid, "hitmonchan", 1) talkState[talkUser] = 1 end end function onThink() if focus == 0 then selfTurn(1) else argx, argy, argz = selfGetPosition() dir = getDirectionTo({x=argx,y=argy,z=argz}, getThingPos(focus)) if dir == 7 then dir = 0 elseif dir == 6 then dir = 3 elseif dir == 5 then dir = 1 elseif dir == 4 then dir = 3 end selfTurn(dir) end if (os.clock() - talk_start) > 59 then
if focus ~= 0 then
selfSay('We have been talking for too much time!')
focus = 0
end
end
if focus ~= 0 then
a, b, c = selfGetPosition()
if c ~= getThingPos(focus).z then
focus = 0
end
end
if focus ~= 0 then
if getDistanceToCreature(focus) > 4 then
selfSay('Come back to sell me pokemons!')
focus = 0
end
end
return true
end
Depois vá em Data/Npc crie 1 arquivo xml e adicione isso dentro:
<?xml version="1.0" encoding="UTF-8"?>
<npc name="Raviel" script="elitenpc.lua" walkinterval="350000" floorchange="0" speed="0">
<health now="150" max="150"/>
<look type="313"/>
<parameters>
<parameter key="message_greet" value="Welcome! I train pokemons fighters, you have a fighter pokemon?"/>
<parameter key="message_farewell" value="Bye."/>
<parameter key="message_idletimeout" value="Bye."/>
<parameter key="message_walkaway" value="Bye."/>
</parameters>
</npc>
Para trocar o preço ,basta voce abrir preucurar no script por (doPlayerRemoveMoney(cid, 20000000)) e mudar o 20000000 , para o seu preço.
E não esqueça de colocar o nome do arquivo .LUA que voce criou no Data\Npc\Script de elitenpc , se não ,não vai funcionar.
Ex: O npc ira perguntar se vc tem algum pokemon do tipo lutador.
Se falar Hitmonlee ow Hitmonchan ele dará uma breve descrição deles , e fala que sempre teve vontade de treinar 1 desses.
Ai eh só o player fala Yes com 1 desses 2 pokes na bag + 200k e pronto.
Com os outros pokes , ele soh irar falar sobre eles
quinta-feira, 24 de novembro de 2011
1° passo (Criando um Otserv) - Liberando porta 7171 e 7172
bom, para começar a criar um Otserver, primeiro voce deverá liberar as portas 7171 e 7172, vamos começar.
vá em Iniciar, depois em Painel de Controle, e abra Firewall do Windows, logo após desative o firewall para que não de problemas.
depois clique em cima em Execuções, e clique em Adicionar Porta, em Nome coloque Open Tibia Server, no numero da porta coloque 7171, e marque a opção TCP e clique em OK. ficará assim
Nome: Open Tibia Server
Numero da Porta: 7171
(X)TCP ( )UDP
Fassa a mesma coisa para abrir a porta 7172 , a unica coisa que vai mudar é o numero da porta que vai ser 7172 , e ficara assim.
vá em Iniciar, depois em Painel de Controle, e abra Firewall do Windows, logo após desative o firewall para que não de problemas.
depois clique em cima em Execuções, e clique em Adicionar Porta, em Nome coloque Open Tibia Server, no numero da porta coloque 7171, e marque a opção TCP e clique em OK. ficará assim
Nome: Open Tibia Server
Numero da Porta: 7171
(X)TCP ( )UDP
Fassa a mesma coisa para abrir a porta 7172 , a unica coisa que vai mudar é o numero da porta que vai ser 7172 , e ficara assim.
Nome: Open Tibia Server
Numero da Porta: 7172
(X)TCP ( )UDP
Assinar:
Postagens (Atom)