TR

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

Por TraaNe, 18 de dez. de 2012 em Tópicos Sem Resposta

pda
duvida
vip
pokemon
system
68
13.3k
Flavio97F
18 de dezembro de 2012 às 12:36

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

DinoAdminD
18 de dezembro de 2012 às 12:37

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!!

Flavio97F
18 de dezembro de 2012 às 12:39

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 =(

TraaNeT
18 de dezembro de 2012 às 12:41

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 !!

DinoAdminD
18 de dezembro de 2012 às 12:44

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?

Flavio97F
18 de dezembro de 2012 às 12:45

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

end

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

end

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

 

RoksasR
18 de dezembro de 2012 às 12:46

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")

TraaNeT
18 de dezembro de 2012 às 12:49

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

RoksasR
18 de dezembro de 2012 às 12:53

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

DinoAdminD
18 de dezembro de 2012 às 12:55

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

end

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

end

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

 

 

TraaNeT
18 de dezembro de 2012 às 12:57

é rs

Roksas

Funfo Certinho *--

Vlw (:

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

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

Flavio97F
18 de dezembro de 2012 às 13:03

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

RoksasR
18 de dezembro de 2012 às 13:06

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é..

Flavio97F
18 de dezembro de 2012 às 13:09

Mais esses Numeros Estao Causando Erros ? Traane ?

TraaNeT
18 de dezembro de 2012 às 13:12

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 por TraaNe