[Encerrado] [DÚVIDA] Pokemon PDA By Slicer

Flavio97 · Dezembro 18, 2012

Voce Quer Npc Diamond Que da Fly Somente Para os VIP ?

Não Ele Quer, Que Fly, Ride Etc.. Seja Para Premiuns, Dai Ele Vai Precisa De Um NPC Que Ja Foi Postador E Edita No Scripts!

Eu tenho Npc Que da A vip Por 10 Diamond ele da 30 dias VIP e Fly Ride Teport Que so usam Comprando VIP no Diamond =) isso que ele quer ?

se voce percebeu eu já diponibilizei o npc que tem esta funçao.

Ele nao Quer Npc Ele Quer O Ordem.lua Com Premium Fly E Ride Postei Ja

DinoAdmin · Dezembro 18, 2012

Para Por Teleport Caso Queira So Coloca assim

Em Data/Talkactions/scrpts/Tele.lua

Tem Uma Parte Assim

local config = {

premium = false,

So Por True em False =)

Para que voce postou oque eu tinha postado acima? nao tinha nescecidade de repetir!!

Flavio97 · Dezembro 18, 2012

Para Por Teleport Caso Queira So Coloca assim

Em Data/Talkactions/scrpts/Tele.lua

Tem Uma Parte Assim

local config = {

premium = false,

So Por True em False =)

Para que voce postou oque eu tinha postado acima? nao tinha nescecidade de repetir!!

Disculpa Nao Vi O seu =(

TraaNe · Dezembro 18, 2012

Bom Obrigados (:

Vou testar Agora

Qlqer Coisa Eu Avisa

Só Uma Coisa Podem Arrumar Bug Do Login?

Tipo Ta com Battle Mas eu posso Logar rs'

Vlw !!

DinoAdmin · Dezembro 18, 2012

Bom Obrigados (:

Vou testar Agora

Qlqer Coisa Eu Avisa

Só Uma Coisa Podem Arrumar Bug Do Login?

Tipo Ta com Battle Mas eu posso Logar rs'

Vlw !!

Como assim o bug do loguin? poderia esplicar melhor?

Flavio97 · Dezembro 18, 2012

Toma ae Meu Login.lua =)

Ele é encontrado Em Data/creaturescrpts/scrpts/Login.lua

Testa ae Pra ver

local config = {

loginMessage = getConfigValue('loginMessage'),

useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))

}

--alterado v1.6 tabelas soh em configuration.lua;

function onLogin(cid)

doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, 100)

doCreatureSetDropLoot(cid, false)

local accountManager = getPlayerAccountManager(cid)

if(accountManager == MANAGER_NONE) then

local lastLogin, str = getPlayerLastLoginSaved(cid), config.loginMessage

if(lastLogin > 0) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)

str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "."

else

str = str

end

doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)

elseif(accountManager == MANAGER_NAMELOCK) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, it appears that your character has been namelocked, what would you like as your new name?")

elseif(accountManager == MANAGER_ACCOUNT) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.")

else

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.")

end

if getCreatureName(cid) == "Account Manager" then

local outfit = {}

if accountManagerRandomPokemonOutfit then

outfit = {lookType = getPokemonXMLOutfit(oldpokedex[math.random(151)][1])}

else

outfit = accountManagerOutfit

end

doSetCreatureOutfit(cid, outfit, -1)

return true

end

if(not isPlayerGhost(cid)) then

doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)

end

local outfit = {}

if getPlayerVocation(cid) == 0 then

doPlayerSetMaxCapacity(cid, 0)

doPlayerSetVocation(cid, 1)

setCreatureMaxMana(cid, 6)

doPlayerAddSoul(cid, -getPlayerSoul(cid))

setPlayerStorageValue(cid, 19898, 0)

if getCreatureOutfit(cid).lookType == 128 then

outfit = {lookType = 510, lookHead = math.random(0, 132), lookBody = math.random(0, 132), lookLegs = math.random(0, 132), lookFeet = math.random(0, 132)}

elseif getCreatureOutfit(cid).lookType == 136 then

outfit = {lookType = 511, lookHead = math.random(0, 132), lookBody = math.random(0, 132), lookLegs = math.random(0, 132), lookFeet = math.random(0, 132)}

end

doCreatureChangeOutfit(cid, outfit)

end

--alterado v1.6.1 removido a linha!

registerCreatureEvent(cid, "ShowPokedex") --alterado v1.6

registerCreatureEvent(cid, "ClosePokedex") --alterado v1.6

registerCreatureEvent(cid, "WatchTv")

registerCreatureEvent(cid, "StopWatchingTv")

registerCreatureEvent(cid, "WalkTv")

registerCreatureEvent(cid, "RecordTv")

registerCreatureEvent(cid, "PlayerLogout")

registerCreatureEvent(cid, "WildAttack")

registerCreatureEvent(cid, "Idle")

registerCreatureEvent(cid, "PokemonIdle")

registerCreatureEvent(cid, "EffectOnAdvance")

registerCreatureEvent(cid, "GeneralConfiguration")

registerCreatureEvent(cid, "ReportBug")

registerCreatureEvent(cid, "LookSystem")

registerCreatureEvent(cid, "T1")

registerCreatureEvent(cid, "T2")

registerCreatureEvent(cid, "task_count")

if getPlayerStorageValue(cid, 99284) == 1 then

setPlayerStorageValue(cid, 99284, -1)

end

if getPlayerStorageValue(cid, 6598754) >= 1 or getPlayerStorageValue(cid, 6598755) >= 1 then

setPlayerStorageValue(cid, 6598754, -1)

setPlayerStorageValue(cid, 6598755, -1)

end

doChangeSpeed(cid, -(getCreatureSpeed(cid)))

--///////////////////////////////////////////////////////////////////////////--

local storages = {17000, 63215, 17001, 13008, 5700}

for s = 1, #storages do

if not tonumber(getPlayerStorageValue(cid, storages)) then

if s == 3 then

setPlayerStorageValue(cid, storages, 1)

elseif s == 4 then

setPlayerStorageValue(cid, storages, -1)

else

if isBeingUsed(getPlayerSlotItem(cid, 8).itemid) then

setPlayerStorageValue(cid, storages, 1) --alterado v1.6

else

setPlayerStorageValue(cid, storages, -1)

end

doPlayerSendTextMessage(cid, 27, "Sorry, but a problem occurred on the server, but now it's alright")

end

--/////////////////////////////////////////////////////////////////////////--

if getPlayerStorageValue(cid, 17000) >= 1 then -- fly

local item = getPlayerSlotItem(cid, 8)

local poke = getItemAttribute(item.uid, "poke")

doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))

doRemoveCondition(cid, CONDITION_OUTFIT)

doSetCreatureOutfit(cid, {lookType = flys[poke][1] + 351}, -1)

local apos = getFlyingMarkedPos(cid)

apos.stackpos = 0

if getTileThingByPos(apos).itemid <= 2 then

doCombatAreaHealth(cid, FIREDAMAGE, getFlyingMarkedPos(cid), 0, 0, 0, CONST_ME_NONE)

doCreateItem(460, 1, getFlyingMarkedPos(cid))

end

doTeleportThing(cid, apos, false)

local posicao = getTownTemplePosition(getPlayerTown(cid))

markFlyingPos(cid, posicao)

elseif getPlayerStorageValue(cid, 63215) >= 1 then -- surf

local item = getPlayerSlotItem(cid, 8)

local poke = getItemAttribute(item.uid, "poke")

doSetCreatureOutfit(cid, {lookType = surfs[poke].lookType + 351}, -1) --alterado v1.6

doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))

elseif getPlayerStorageValue(cid, 17001) >= 1 then -- ride

local item = getPlayerSlotItem(cid, 8)

local poke = getItemAttribute(item.uid, "poke")

if rides[poke] then

doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))

doRemoveCondition(cid, CONDITION_OUTFIT)

doSetCreatureOutfit(cid, {lookType = rides[poke][1] + 351}, -1)

else

setPlayerStorageValue(cid, 17001, -1)

doRegainSpeed(cid) --alterado v1.6

end

local posicao2 = getTownTemplePosition(getPlayerTown(cid))

markFlyingPos(cid, posicao2)

elseif getPlayerStorageValue(cid, 13008) >= 1 then -- dive

if not isInArray({5405, 5406, 5407, 5408, 5409, 5410}, getTileInfo(getThingPos(cid)).itemid) then

setPlayerStorageValue(cid, 13008, 0)

doRegainSpeed(cid) --alterado v1.6

doRemoveCondition(cid, CONDITION_OUTFIT)

return true

end

if getPlayerSex(cid) == 1 then

doSetCreatureOutfit(cid, {lookType = 1034, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1)

else

doSetCreatureOutfit(cid, {lookType = 1035, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1)

end

doChangeSpeed(cid, 800)

elseif getPlayerStorageValue(cid, 5700) > 0 then --bike

doChangeSpeed(cid, getPlayerStorageValue(cid, 5700))

if getPlayerSex(cid) == 1 then

doSetCreatureOutfit(cid, {lookType = 1394}, -1)

else

doSetCreatureOutfit(cid, {lookType = 1393}, -1)

end

else

doRegainSpeed(cid) --alterado v1.6

end

if getPlayerStorageValue(cid, 22545) >= 1 then

setPlayerStorageValue(cid, 22545, -1) --alterado v1.4

doTeleportThing(cid, getClosestFreeTile(cid, posBackGolden), false)

end

if useKpdoDlls then

doUpdateMoves(cid)

doUpdatePokemonsBar(cid)

end

return true

end

Roksas · Dezembro 18, 2012

Tente assim: (Script feito por LuckOake)

creaturescript.xml:

<event type="login" name="LogSkull" script="logskull.lua"/>

logskull.lua:

function onLogout(cid)
if isInArray({3,4,5}, getCreatureSkullType(cid)) then
doPlayerSendCancel(cid, "Aguarde seu battle para poder logar.")
return false
end
return true
end

login.lua:

registerCreatureEvent(cid, "LogSkull")

TraaNe · Dezembro 18, 2012

Tentei Aqi Mas Não deu rs'

Tipo Quando Aparece Battle No Caso Pokebola Piquena No Icon De Battle

Eu Clico Em Logout

Ai Sai Msm com pz ;(

E Tipo Agora ta aparecendo isso ;x

[18/12/2012 12:47:07] [Error - LuaScriptInterface::loadFile] cannot open data/talkactions/scripts/partyexp.lua: No such file or directory

[18/12/2012 12:47:07] [Warning - Event::loadScript] Cannot load script (data/talkactions/scripts/partyexp.lua)

[18/12/2012 12:47:07] cannot open data/talkactions/scripts/partyexp.lua: No such file or directory

[18/12/2012 12:47:07] [Warning - Event::loadScript] Event onRemoveItem not found (data/movements/scripts/UniqueItem.lua)

[18/12/2012 12:47:07] >> Loading chat channels

[18/12/2012 12:47:07] >> Loading outfits

[18/12/2012 12:47:07] >> Loading experience stages

[18/12/2012 12:47:07] >> Loading monsters

[18/12/2012 12:47:07] [Error - Monsters::deserializeSpell] Shiny Charizard - Unknown spell name: Fire Spin

[18/12/2012 12:47:07] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Charizard.xml)

[18/12/2012 12:47:07] [Error - Monsters::deserializeSpell] Shiny Charizard - Unknown spell name: Burning Skin

[18/12/2012 12:47:07] [Warning - Monsters::loadMonster] Cant load spell. (data/monster/pokes/Shiny/Shiny Charizard.xml)

[18/12/2012 12:47:07] [Error - Monsters::deserializeSpell] Shiny Charizard - Unknown spell name: Ranging Blast

O Da Party Eu Não Sei

Esses Shynis Eu Acho Quando Baixei 151 Shinys rs

Roksas · Dezembro 18, 2012

Você tentou utilizar o login.lua dele não? Devia ter feito backup do seu!

DinoAdmin · Dezembro 18, 2012

Usuario, Tente usar este loguin.lua

local config = {

loginMessage = getConfigValue('loginMessage'),

useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))

}

--alterado v2.6 tabelas soh em lib/configuration.lua;

function onLogin(cid)

doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, 15)

doCreatureSetDropLoot(cid, false)

local accountManager = getPlayerAccountManager(cid)

if(accountManager == MANAGER_NONE) then

local lastLogin, str = getPlayerLastLoginSaved(cid), config.loginMessage

if(lastLogin > 0) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)

str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "."

else

str = str

end

doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)

elseif(accountManager == MANAGER_NAMELOCK) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, it appears that your character has been namelocked, what would you like as your new name?")

elseif(accountManager == MANAGER_ACCOUNT) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.")

else

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.")

end

if getCreatureName(cid) == "Account Manager" then

local outfit = {}

if accountManagerRandomPokemonOutfit then

outfit = {lookType = getPokemonXMLOutfit(oldpokedex[math.random(151)][1])}

else

outfit = accountManagerOutfit

end

doSetCreatureOutfit(cid, outfit, -1)

return true

end

if(not isPlayerGhost(cid)) then

doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)

end

local outfit = {}

if getPlayerVocation(cid) == 0 then

doPlayerSetMaxCapacity(cid, 0)

doPlayerSetVocation(cid, 1)

setCreatureMaxMana(cid, 6)

doPlayerAddSoul(cid, -getPlayerSoul(cid))

setPlayerStorageValue(cid, 19898, 0)

if getCreatureOutfit(cid).lookType == 128 then

outfit = {lookType = 510, lookHead = math.random(0, 132), lookBody = math.random(0, 132), lookLegs = math.random(0, 132), lookFeet = math.random(0, 132)}

elseif getCreatureOutfit(cid).lookType == 136 then

outfit = {lookType = 511, lookHead = math.random(0, 132), lookBody = math.random(0, 132), lookLegs = math.random(0, 132), lookFeet = math.random(0, 132)}

end

doCreatureChangeOutfit(cid, outfit)

end

registerCreatureEvent(cid, "Duel") --alterado v2.6 duel system

registerCreatureEvent(cid, "ShowPokedex") --alterado v2.6

registerCreatureEvent(cid, "ClosePokedex") --alterado v2.6

registerCreatureEvent(cid, "WatchTv")

registerCreatureEvent(cid, "StopWatchingTv")

registerCreatureEvent(cid, "WalkTv")

registerCreatureEvent(cid, "RecordTv")

--registerCreatureEvent(cid, "Death")

registerCreatureEvent(cid, "PlayerLogout")

registerCreatureEvent(cid, "WildAttack")

registerCreatureEvent(cid, "Idle")

registerCreatureEvent(cid, "PokemonIdle")

registerCreatureEvent(cid, "EffectOnAdvance")

registerCreatureEvent(cid, "GeneralConfiguration")

registerCreatureEvent(cid, "ReportBug")

registerCreatureEvent(cid, "LookSystem")

registerCreatureEvent(cid, "T1")

registerCreatureEvent(cid, "T2")

registerCreatureEvent(cid, "task_count")

if getPlayerStorageValue(cid, 99284) == 1 then

setPlayerStorageValue(cid, 99284, -1)

end

if getPlayerStorageValue(cid, 6598754) >= 1 or getPlayerStorageValue(cid, 6598755) >= 1 then

setPlayerStorageValue(cid, 6598754, -1)

setPlayerStorageValue(cid, 6598755, -1)

end

doChangeSpeed(cid, -(getCreatureSpeed(cid)))

--///////////////////////////////////////////////////////////////////////////--

local storages = {17000, 63215, 17001, 13008, 5700}

for s = 1, #storages do

if not tonumber(getPlayerStorageValue(cid, storages)) then

if s == 3 then

setPlayerStorageValue(cid, storages, 1)

elseif s == 4 then

setPlayerStorageValue(cid, storages, -1)

else

if isBeingUsed(getPlayerSlotItem(cid, 8).itemid) then

setPlayerStorageValue(cid, storages, 1) --alterado v2.6

else

setPlayerStorageValue(cid, storages, -1)

end

doPlayerSendTextMessage(cid, 27, "Sorry, but a problem occurred on the server, but now it's alright")

end

--/////////////////////////////////////////////////////////////////////////--

if getPlayerStorageValue(cid, 17000) >= 1 then -- fly

local item = getPlayerSlotItem(cid, 8)

local poke = getItemAttribute(item.uid, "poke")

doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))

doRemoveCondition(cid, CONDITION_OUTFIT)

doSetCreatureOutfit(cid, {lookType = flys[poke][1] + 351}, -1)

local apos = getFlyingMarkedPos(cid)

apos.stackpos = 0

if getTileThingByPos(apos).itemid <= 2 then

doCombatAreaHealth(cid, FIREDAMAGE, getFlyingMarkedPos(cid), 0, 0, 0, CONST_ME_NONE)

doCreateItem(460, 1, getFlyingMarkedPos(cid))

end

doTeleportThing(cid, apos, false)

local posicao = getTownTemplePosition(getPlayerTown(cid))

markFlyingPos(cid, posicao)

elseif getPlayerStorageValue(cid, 63215) >= 1 then -- surf

local item = getPlayerSlotItem(cid, 8)

local poke = getItemAttribute(item.uid, "poke")

doSetCreatureOutfit(cid, {lookType = surfs[poke].lookType + 351}, -1) --alterado v2.6

doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))

elseif getPlayerStorageValue(cid, 17001) >= 1 then -- ride

local item = getPlayerSlotItem(cid, 8)

local poke = getItemAttribute(item.uid, "poke")

if rides[poke] then

doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))

doRemoveCondition(cid, CONDITION_OUTFIT)

doSetCreatureOutfit(cid, {lookType = rides[poke][1] + 351}, -1)

else

setPlayerStorageValue(cid, 17001, -1)

doRegainSpeed(cid) --alterado v2.6

end

local posicao2 = getTownTemplePosition(getPlayerTown(cid))

markFlyingPos(cid, posicao2)

elseif getPlayerStorageValue(cid, 13008) >= 1 then -- dive

if not isInArray({5405, 5406, 5407, 5408, 5409, 5410}, getTileInfo(getThingPos(cid)).itemid) then

setPlayerStorageValue(cid, 13008, 0)

doRegainSpeed(cid) --alterado v2.6

doRemoveCondition(cid, CONDITION_OUTFIT)

return true

end

if getPlayerSex(cid) == 1 then

doSetCreatureOutfit(cid, {lookType = 1034, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1)

else

doSetCreatureOutfit(cid, {lookType = 1035, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1)

end

doChangeSpeed(cid, 800)

elseif getPlayerStorageValue(cid, 5700) > 0 then --bike

doChangeSpeed(cid, getPlayerStorageValue(cid, 5700))

if getPlayerSex(cid) == 1 then

doSetCreatureOutfit(cid, {lookType = 1394}, -1)

else

doSetCreatureOutfit(cid, {lookType = 1393}, -1)

end

else

doRegainSpeed(cid) --alterado v2.6

end

if getPlayerStorageValue(cid, 22545) >= 1 then --golden arena

setPlayerStorageValue(cid, 22545, -1) --alterado v2.4

doTeleportThing(cid, getClosestFreeTile(cid, posBackGolden), false)

end

if useKpdoDlls then

doUpdateMoves(cid) --alterado v2.4 soh pra quem quiser... ;p

doUpdatePokemonsBar(cid)

end

return true

end

TraaNe · Dezembro 18, 2012

é rs

Roksas

Funfo Certinho *--

Vlw (:

E Tipo Não Sei Se Acontece Ai mas Quando Loga Aparece Isso

http://postimage.org/image/6ct5v1269/

Flavio97 · Dezembro 18, 2012

Isso é da Barra coldown bar Ou Pokemon Bar isso é de Boa =)

Roksas · Dezembro 18, 2012

Provavelmente deve ser o login.lua do Flavio. Baixe novamente seu server, pegue o login.lua e substitua pelo seu de agora! Fazer oque né..

Flavio97 · Dezembro 18, 2012

Mais esses Numeros Estao Causando Erros ? Traane ?

TraaNe · Dezembro 18, 2012

Não,Isso Estava Antes rs

Mas Não Está Atrapalhando Em Nada Msm

Po Mto obrigado PessoaL

Rep+ Acabou limite

Mas Amanhã Eu Ja Do Um +

Só uma Ultima Coisa

Os Erros La Do Shiny Pokemon

Teria q excluir certo

Mas eu no caso se eu fosse coloca-los?

Editado Dezembro 18, 2012 por TraaNe

Entrar

[Encerrado] [DÚVIDA] Pokemon PDA By Slicer

Posts Recomendados

Link para o comentário

Compartilhar em outros sites

Top Posters In This Topic

Popular Days

Top Posters In This Topic

Popular Days

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Quem Está Navegando 0 membros estão online

Conteúdo Similar

Anúncios