PDA PWO v1

[higorbuyu 3]

nao mexi no lvl system nao, e no pokedex.lua ta assim nao sei se ta certo. e eu to com dificuldade no npc de vende stone ele so vende nao compra eu lembro de algumas coisa pra faze ele compra mais nao ta indo no script dele ta assim stoner>

<?xml version="1.0" encoding="UTF-8"?>

<npc name="Stoner" script="default.lua" walkinterval="350000" floorchange="0" speed="0">

<health now="150" max="150"/>

<look type="606" head="91" body="114" legs="86" feet="0"/>

<parameters>

<parameter key="message_greet" value="Hello dear customer! Are you here to see my offers? Come on, lets {trade}!"/>

<parameter key="message_farewell" value="Good bye!"/>

<parameter key="message_idletimeout" value="Good bye!"/>

<parameter key="message_walkaway" value="Good bye!"/>

<parameter key="module_shop" value="1"/>

<parameter key="shop_buyable" value=""/>

"Heart Stone,11453,5000;
Water Stone,11442,9000;
Leaf Stone,11441,2500;
Venon Stone,11443,1000;
Thunder Stone,11444,1000;
Fire Stone,11447,12000;
Cocoon Stone,11448,1000;
Rock Stone,11445,1300;
Earth Stone,11451,1000;
Enigma Stone,11452,1000;
Ice Stone,11454,1000;
Darkness Stone,11450,1300;
Punch Stone,11449,1000;
Crystal Stone,11446,50000;;"/>
<parameter key="shop_sellable" value=
"Heart Stone,11453,5000;
Water Stone,11442,9000;
Leaf Stone,11441,2500;
Venon Stone,11443,1000;
Thunder Stone,11444,1000;
Fire Stone,11447,12000;
Cocoon Stone,11448,1000;
Rock Stone,11445,1300;
Earth Stone,11451,1000;
Enigma Stone,11452,1000;
Ice Stone,11454,1000;
Darkness Stone,11450,1300;
Punch Stone,11449,1000;
Crystal Stone,11446,50000;;"/>
</parameters>

</npc>

pokedex >

local function checkDex(cid)

local unlock = 0
for i = 1, #oldpokedex do
if getPlayerInfoAboutPokemon(cid, oldpokedex[1]).dex then
unlock = unlock + 1
end
end
return unlock
end

local rate = 20
local rewards = {
[10] = {{2152, 15}, {2391, 10}, {2392, 5}},
[20] = {{2152, 25}, {2391, 25}, {2392, 15}},
[30] = {{2152, 35}, {2391, 35}, {2392, 30}},
[40] = {{2152, 45}, {2391, 45}, {2392, 35}},
[50] = {{2152, 55}, {2391, 55}, {2392, 45}},
[60] = {{2152, 65}, {2391, 65}, {2392, 55}},
[70] = {{2152, 75}, {2391, 75}, {2392, 65}},
[80] = {{2152, 85}, {2391, 85}, {2392, 75}},
[90] = {{2152, 95}, {2391, 95}, {2392, 85}},
[100] = {{2160, 1}, {2391, 105}, {2392, 95}},
[110] = {{2160, 1}, {2391, 115}, {2392, 105}},
}
local sto = 63999

function onUse(cid, item, fromPos, item2, toPos)

if not isCreature(item2.uid) then
return true
end

local poke = getCreatureName(item2.uid)

if isMonster(item2.uid) then
local this = newpokedex[getCreatureName(item2.uid)]
local myball = 0
if isSummon(item2.uid) then
myball = getPlayerSlotItem(getCreatureMaster(item2.uid), 8)
end
if not getPlayerInfoAboutPokemon(cid, poke).dex then
local exp = this.level * rate
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have unlocked ".. getCreatureName(item2.uid).." in your pokedex!")
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have gained "..exp.." experience points.")
doSendMagicEffect(getThingPos(cid), 210)
doPlayerAddExperience(cid, exp)
doAddPokemonInDexList(cid, poke)
else
doShowPokedexRegistration(cid, item2, myball)
end
local list = checkDex(cid)
local r = rewards

• 
  -- print("List: "..list)
  --sendMsgToPlayer(cid, 27, "Parabéns, você tem "..list.." pokeDex!")
  if r and getPlayerStorageValue(cid, sto) < list then
  for _, TABLE in ipairs® do
  doPlayerAddItem(cid, TABLE[1], TABLE[2])
  sendMsgToPlayer(cid, 27, "Voce ganhou "..TABLE[2].." ".. getItemNameById(TABLE[1]).."!")
  end
  setPlayerStorageValue(cid, sto, list)
  
  end
  return true
  end
  
  if not isPlayer(item2.uid) then return true end
  
  local kanto = 0
  local johto = 0
  --alterado v1.7 \/\/
  for i = 1, #oldpokedex do
  if getPlayerInfoAboutPokemon(item2.uid, oldpokedex[1]).dex then
  if i <= 151 then
  kanto = kanto+1
  elseif i >= 209 then
  johto = johto+1
  end
  end
  end --alterado v1.6
  
  local player = getRecorderPlayer(toPos, cid)
  
  if cid == player then
  doPlayerSendTextMessage(cid, 27, "You has unlocked "..kanto.." kanto's and "..johto.." johto's pokémons until now.")
  doPlayerSetVocation(cid, 9) --alterado v1.6
  openChannelDialog(cid)
  end
  
  return true
  end

Editado Dezembro 13, 2013 por buyu2

[caotic 393]

Oi eu gostaria de saber algumas coisas do servidor

 

• Me explica por que os pokemon não evolui quando chega nos leveis necessários e eles tao felizes mais mesmo assim não evoluem

• Gostaria de sabe como deixa o ícone da ball com a "imagem" do pokemon do tipo que tem na bag do Adm

• Por que os players ganha recompensa por dex,meu Adm deu dex num snorlax ganhei 25 great ball 10hundred dollar e 5 ultra ball por que isso

• por que as vezes aparece stone nas bags dos players do nada eles mata pokemon de agua e vem leaf stone(um exemplo)

gostaria das respostas o mais breve possível

 

A questão dos pokemons não evoluirem pode ser que eles so evoluem com stones.

Como o gloom para vipuleme ou belossoum(apenas para stones)

O lukas666 ja respondeu o resto a questão dos icones e so ativar.

As stones por kill e so retirar em creaturescripts

A pokedex e so retirar o gain items dela.

[higorbuyu 3]

vlw

[BrunooMaciell 83]

eu queria saber como tiro aquela barra ds pokemons do otclient ??

[Aberos 71]

@Brunnoo

pra tirar a barra de pokes é so vc ir na pasta modules do otc e apagar a pasta barpoke

[BrunooMaciell 83]

vlw ^^

[484539 9]

nao mexi no lvl system nao, e no pokedex.lua ta assim nao sei se ta certo. e eu to com dificuldade no npc de vende stone ele so vende nao compra eu lembro de algumas coisa pra faze ele compra mais nao ta indo no script dele ta assim stoner>

 

 

<?xml version="1.0" encoding="UTF-8"?>

<npc name="Stoner" script="default.lua" walkinterval="350000" floorchange="0" speed="0">

<health now="150" max="150"/>

<look type="606" head="91" body="114" legs="86" feet="0"/>

<parameters>

<parameter key="message_greet" value="Hello dear customer! Are you here to see my offers? Come on, lets {trade}!"/>

<parameter key="message_farewell" value="Good bye!"/>

<parameter key="message_idletimeout" value="Good bye!"/>

<parameter key="message_walkaway" value="Good bye!"/>

<parameter key="module_shop" value="1"/>

<parameter key="shop_buyable" value=""/>

"Heart Stone,11453,5000;

Water Stone,11442,9000;

Leaf Stone,11441,2500;

Venon Stone,11443,1000;

Thunder Stone,11444,1000;

Fire Stone,11447,12000;

Cocoon Stone,11448,1000;

Rock Stone,11445,1300;

Earth Stone,11451,1000;

Enigma Stone,11452,1000;

Ice Stone,11454,1000;

Darkness Stone,11450,1300;

Punch Stone,11449,1000;

Crystal Stone,11446,50000;;"/>

<parameter key="shop_sellable" value=

"Heart Stone,11453,5000;

Water Stone,11442,9000;

Leaf Stone,11441,2500;

Venon Stone,11443,1000;

Thunder Stone,11444,1000;

Fire Stone,11447,12000;

Cocoon Stone,11448,1000;

Rock Stone,11445,1300;

Earth Stone,11451,1000;

Enigma Stone,11452,1000;

Ice Stone,11454,1000;

Darkness Stone,11450,1300;

Punch Stone,11449,1000;

Crystal Stone,11446,50000;;"/>

</parameters>

</npc>

 

 

pokedex >

local function checkDex(cid)

local unlock = 0

for i = 1, #oldpokedex do

if getPlayerInfoAboutPokemon(cid, oldpokedex[1]).dex then

unlock = unlock + 1

end

end

return unlock

end

 

local rate = 20

local rewards = {

[10] = {{2152, 15}, {2391, 10}, {2392, 5}},

[20] = {{2152, 25}, {2391, 25}, {2392, 15}},

[30] = {{2152, 35}, {2391, 35}, {2392, 30}},

[40] = {{2152, 45}, {2391, 45}, {2392, 35}},

[50] = {{2152, 55}, {2391, 55}, {2392, 45}},

[60] = {{2152, 65}, {2391, 65}, {2392, 55}},

[70] = {{2152, 75}, {2391, 75}, {2392, 65}},

[80] = {{2152, 85}, {2391, 85}, {2392, 75}},

[90] = {{2152, 95}, {2391, 95}, {2392, 85}},

[100] = {{2160, 1}, {2391, 105}, {2392, 95}},

[110] = {{2160, 1}, {2391, 115}, {2392, 105}},

}

local sto = 63999

 

function onUse(cid, item, fromPos, item2, toPos)

 

if not isCreature(item2.uid) then

return true

end

 

local poke = getCreatureName(item2.uid)

 

if isMonster(item2.uid) then

local this = newpokedex[getCreatureName(item2.uid)]

local myball = 0

if isSummon(item2.uid) then

myball = getPlayerSlotItem(getCreatureMaster(item2.uid), 8)

end

if not getPlayerInfoAboutPokemon(cid, poke).dex then

local exp = this.level * rate

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have unlocked ".. getCreatureName(item2.uid).." in your pokedex!")

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have gained "..exp.." experience points.")

doSendMagicEffect(getThingPos(cid), 210)

doPlayerAddExperience(cid, exp)

doAddPokemonInDexList(cid, poke)

else

doShowPokedexRegistration(cid, item2, myball)

end

local list = checkDex(cid)

local r = rewards

-- print("List: "..list)

--sendMsgToPlayer(cid, 27, "Parabéns, você tem "..list.." pokeDex!")

if r and getPlayerStorageValue(cid, sto) < list then

for _, TABLE in ipairs® do

doPlayerAddItem(cid, TABLE[1], TABLE[2])

sendMsgToPlayer(cid, 27, "Voce ganhou "..TABLE[2].." ".. getItemNameById(TABLE[1]).."!")

end

setPlayerStorageValue(cid, sto, list)

 

end

return true

end

 

if not isPlayer(item2.uid) then return true end

 

local kanto = 0

local johto = 0

--alterado v1.7 \/\/

for i = 1, #oldpokedex do

if getPlayerInfoAboutPokemon(item2.uid, oldpokedex[1]).dex then

if i <= 151 then

kanto = kanto+1

elseif i >= 209 then

johto = johto+1

end

end

end --alterado v1.6

 

local player = getRecorderPlayer(toPos, cid)

 

if cid == player then

doPlayerSendTextMessage(cid, 27, "You has unlocked "..kanto.." kanto's and "..johto.." johto's pokémons until now.")

doPlayerSetVocation(cid, 9) --alterado v1.6

openChannelDialog(cid)

end

 

return true

end

 

 

 

entao no caso se vc quiser que a pokedex parede de dar itens ao player apague todo o conteúdo do seu pokedex.lua e cole isso dentro :

 

 

local rate = 20

 

function onUse(cid, item, fromPos, item2, toPos)

 

if not isCreature(item2.uid) then

return true

end

 

local poke = getCreatureName(item2.uid)

 

if isMonster(item2.uid) then

local this = newpokedex[getCreatureName(item2.uid)]

local myball = 0

if isSummon(item2.uid) then

myball = getPlayerSlotItem(getCreatureMaster(item2.uid), 8)

end

if not getPlayerInfoAboutPokemon(cid, poke).dex then

local exp = this.level * rate

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have unlocked "..getCreatureName(item2.uid).." in your pokedex!")

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have gained "..exp.." experience points.")

doSendMagicEffect(getThingPos(cid), 210)

doPlayerAddExperience(cid, exp)

doAddPokemonInDexList(cid, poke)

else

doShowPokedexRegistration(cid, item2, myball)

end

return true

end

 

if not isPlayer(item2.uid) then return true end

 

local kanto = 0

local johto = 0

--alterado v1.7 \/\/

for i = 1, #oldpokedex do

if getPlayerInfoAboutPokemon(item2.uid, oldpokedex[1]).dex then

if i <= 151 then

kanto = kanto+1

elseif i >= 209 then

johto = johto+1

end

end

end --alterado v1.6

 

local player = getRecorderPlayer(toPos, cid)

 

if cid == player then

doPlayerSendTextMessage(cid, 27, "You has unlocked "..kanto.." kanto's and "..johto.." johto's pokémons until now.")

doPlayerSetVocation(cid, 9) --alterado v1.6

openChannelDialog(cid)

end

 

return true

end

 

 

assim o player ira parar de receber os itens.

 

no seu npc de stone apaga o conteúdo dele e coloca :

 

<?xml version="1.0" encoding="UTF-8"?>

<npc name="Mark" script="default.lua" walkinterval="350000" floorchange="0" speed="0">

<health now="150" max="150"/>

<look type="606" head="91" body="114" legs="86" feet="0"/>

<parameters>

<parameter key="message_greet" value="Hello dear customer! Are you here to see my offers? Come on, lets {trade}!"/>

<parameter key="message_farewell" value="Good bye!"/>

<parameter key="message_idletimeout" value="Good bye!"/>

<parameter key="message_walkaway" value="Good bye!"/>

<parameter key="module_shop" value="1"/>

<parameter key="shop_buyable" value="Heart Stone,11453,5000;Water Stone,11442,9000;

Leaf Stone,11441,2500;

Venon Stone,11443,1000;

Thunder Stone,11444,1000;

Fire Stone,11447,12000;

Cocoon Stone,11448,1000;"/>

<parameter key="shop_sellable" value=

"Heart Stone,11453,5000;

Water Stone,11442,9000;

Leaf Stone,11441,2500;

Venon Stone,11443,1000;

Thunder Stone,11444,1000;

Fire Stone,11447,12000;

Cocoon Stone,11448,1000;;"/>

</parameters>

</npc>

 

 

Editado Dezembro 13, 2013 por Lukkas666

[murluka 122]

Nossa, nem tinha visto a Hamlin desse mapa. Perfeita !!

Rep+

[GabrielBiscegli 1]

Se alguem poder me enviar os arquivos com o icon system ficarei grato e vo da 3rep+

[Jefessonabc 7]

Gente é uma pergunta meio boba mais vamos lá, é quais são os comando para fazer os itens, gerar pokes dentro da ball, e uns eu sei mais não ta dando certo aqui, tipo o "/i nome do item,/cb nome do poke" testei isso e não deu certo sabe me dizer quais os comandos?

[Aberos 71]

/mkitem e /mkpoke

[Jefessonabc 7]

/mkitem e /mkpoke

/\ é o /m eo nome do poke da certo, mais sumonar o poke dentro da ball ou item da certo não *-*

[Aberos 71]

é /mkpoke Charizard ow /mkitem 2145

[jojoca20 2]

muito bom rep+

--------------------

mais da para colocar systema de moto ja tem sistema de bike ????

da para colocar pokemon tem espaco ?????

[Farplay 2]

Server mt TOP , estou utilizando , mais será que alguem poderia me ajudar ?

Quando eu envio a client , meus amgs tentam entrar e da erro de conexão , e eu ja configurei td , e q eu n manjo mt dessa client. Fiz ate um topico \/.

http://www.xtibia.com/forum/topic/226014-erro-de-conexao-client-pda-pwo-v1/

Editado Dezembro 23, 2013 por Farplay