[Encerrado] [Pokemon] Dúvidas? - Pda

[zerefshirou 112]

@StyloMaldoso

Um script simples para isso de só tal clan usar aquele poke:

 

procure isso no goback.lua (actions)

if not pokes[pokemon] then
return true
end

 

Depois disso coloque \/ e depois se quiser colocar mais, arrume ao seu gosto

Explicando:

se o nome do poke for "Shiny Vaporeon" e a vocation for diferente de 7 não vai poder soltar ele e vai mandar ali "Only Seavell use this pokemon."

 

if pokemon == "Shiny Vaporeon" and getPlayerVocation(cid) ~= 7 then
return doPlayerSendCancel(cid, "Only Seavell use this pokemon.")
elseif pokemon == "Shiny Flareon" and getPlayerVocation(cid) ~= 6 then
return doPlayerSendCancel(cid, "Only Volcanic use this pokemon.")
end

[didogunner 2]

@ZerefShirou

 

 

Deu erro ;X

 

Erro!

 

[02/06/2012 12:38:57] [Error - Action Interface]

[02/06/2012 12:38:57] data/actions/scripts/bike.lua:onUse

[02/06/2012 12:38:57] Description:

[02/06/2012 12:38:57] data/lib/100-compat.lua:133: attempt to call global 'type' (a number value)

[02/06/2012 12:38:57] stack traceback:

[02/06/2012 12:38:57] data/lib/100-compat.lua:133: in function 'setPlayerStorageValue'

[02/06/2012 12:38:57] data/actions/scripts/bike.lua:28: in function <data/actions/scripts/bike.lua:1>

 

 

Segue o 100-compat tb ;X

 

--[[

 

* File containing deprecated functions and constants used by alot of scripts and other engines

]]--

TRUE = true

FALSE = false

LUA_ERROR = false

LUA_NO_ERROR = true

LUA_NULL = nil

 

TALKTYPE_CHANNEL_R1 = TALKTYPE_CHANNEL_RN

TALKTYPE_CHANNEL_R2 = TALKTYPE_CHANNEL_RA

TALKTYPE_ORANGE_1 = TALKTYPE_MONSTER

TALKTYPE_ORANGE_2 = TALKTYPE_MONSTER_YELL

 

TEXTCOLOR_BLACK = 0

TEXTCOLOR_BLUE = 5

TEXTCOLOR_GREEN = 18

TEXTCOLOR_TEAL = 35

TEXTCOLOR_LIGHTGREEN = 66

TEXTCOLOR_DARKBROWN = 78

TEXTCOLOR_LIGHTBLUE = 89

TEXTCOLOR_DARKPURPLE = 112

TEXTCOLOR_BROWN = 120

TEXTCOLOR_GREY = 129

TEXTCOLOR_DARKRED = 144

TEXTCOLOR_DARKPINK = 152

TEXTCOLOR_PURPLE = 154

TEXTCOLOR_DARKORANGE = 156

TEXTCOLOR_RED = 180

TEXTCOLOR_PINK = 190

TEXTCOLOR_ORANGE = 192

TEXTCOLOR_DARKYELLOW = 205

TEXTCOLOR_YELLOW = 210

TEXTCOLOR_WHITE = 215

TEXTCOLOR_NONE = 255

 

CONDITION_PARAM_STAT_MAXHITPOINTS = CONDITION_PARAM_STAT_MAXHEALTH

CONDITION_PARAM_STAT_MAXMANAPOINTS = CONDITION_PARAM_STAT_MAXMANA

CONDITION_PARAM_STAT_SOULPOINTS = CONDITION_PARAM_STAT_SOUL

CONDITION_PARAM_STAT_MAGICPOINTS = CONDITION_PARAM_STAT_MAGICLEVEL

CONDITION_PARAM_STAT_MAXHITPOINTSPERCENT = CONDITION_PARAM_STAT_MAXHEALTHPERCENT

CONDITION_PARAM_STAT_MAXMANAPOINTSPERCENT = CONDITION_PARAM_STAT_MAXMANAPERCENT

CONDITION_PARAM_STAT_SOULPOINTSPERCENT = CONDITION_PARAM_STAT_SOULPERCENT

CONDITION_PARAM_STAT_MAGICPOINTSPERCENT = CONDITION_PARAM_STAT_MAGICLEVELPERCENT

 

STACKPOS_FIRST_ITEM_ABOVE_GROUNDTILE = 1

STACKPOS_SECOND_ITEM_ABOVE_GROUNDTILE = 2

STACKPOS_THIRD_ITEM_ABOVE_GROUNDTILE = 3

STACKPOS_FOURTH_ITEM_ABOVE_GROUNDTILE = 4

STACKPOS_FIFTH_ITEM_ABOVE_GROUNDTILE = 5

 

WORLD_TYPE_NO_PVP = 1

WORLD_TYPE_PVP = 2

WORLD_TYPE_PVP_ENFORCED = 3

 

CHANNEL_STAFF = 2

CHANNEL_COUNSELOR = 4

CHANNEL_GAMECHAT = 5

CHANNEL_TRADE = 6

CHANNEL_TRADEROOK = 7

CHANNEL_RLCHAT = 8

 

BANTYPE_IP_BANISHMENT = 1

BANTYPE_NAMELOCK = 2

BANTYPE_BANISHMENT = 3

BANTYPE_NOTATION = 4

BANTYPE_DELETION = 3

 

SKILLS = SKILL_NAMES

 

table.getPos = table.find

doSetCreatureDropLoot = doCreatureSetDropLoot

doPlayerSay = doCreatureSay

doPlayerAddMana = doCreatureAddMana

playerLearnInstantSpell = doPlayerLearnInstantSpell

doPlayerRemOutfit = doPlayerRemoveOutfit

pay = doPlayerRemoveMoney

broadcastMessage = doBroadcastMessage

getPlayerName = getCreatureName

getCreaturePosition = getThingPosition

getPlayerPosition = getCreaturePosition

getCreaturePos = getCreaturePosition

creatureGetPosition = getCreaturePosition

getPlayerMana = getCreatureMana

getPlayerMaxMana = getCreatureMaxMana

hasCondition = getCreatureCondition

isMoveable = isMovable

isItemMoveable = isItemMovable

saveData = saveServer

savePlayers = saveServer

getPlayerSkill = getPlayerSkillLevel

getPlayerSkullType = getCreatureSkullType

getCreatureSkull = getCreatureSkullType

getAccountNumberByName = getAccountIdByName

getIPByName = getIpByName

getPlayersByIP = getPlayersByIp

getThingfromPos = getThingFromPos

getPlayersByAccountNumber = getPlayersByAccountId

getIPByPlayerName = getIpByName

getPlayersByIPNumber = getPlayersByIp

getAccountNumberByPlayerName = getAccountIdByName

convertIntToIP = doConvertIntegerToIp

convertIPToInt = doConvertIpToInteger

queryTileAddThing = doTileQueryAdd

getTileHouseInfo = getHouseFromPos

executeRaid = doExecuteRaid

saveServer = doSaveServer

cleanHouse = doCleanHouse

cleanMap = doCleanMap

shutdown = doShutdown

mayNotMove = doCreatureSetNoMove

doPlayerSetNoMove = doCreatureSetNoMove

getPlayerNoMove = getCreatureNoMove

getConfigInfo = getConfigValue

doPlayerAddExp = doPlayerAddExperience

isInArea = isInRange

doPlayerSetSkillRate = doPlayerSetRate

getCreatureLookDir = getCreatureLookDirection

getPlayerLookDir = getCreatureLookDirection

getPlayerLookDirection = getCreatureLookDirection

doCreatureSetLookDir = doCreatureSetLookDirection

getPlayerLookPos = getCreatureLookPosition

setPlayerStamina = doPlayerSetStamina

setPlayerPromotionLevel = doPlayerSetPromotionLevel

setPlayerGroupId = doPlayerSetGroupId

setPlayerPartner = doPlayerSetPartner

doPlayerSetStorageValue = doCreatureSetStorage

function setPlayerStorageValue(cid, key, value)

if not isCreature(cid) or getCreatureHealth(cid) <= 0 then return false end

if key == 990 and isPlayer(cid) and isGhostPokemon(getCreatureSummons(cid)[1]) then

addEvent(updateGhostWalk, 10, getCreatureSummons(cid)[1])

end

if type(value) == "number" and value == -1 then

--doCreatureEraseStorage(cid, key)

doCreatureSetStorage(cid, key, nil)

return true

elseif type(value) == "string" then

doCreatureSetStorage(cid, key, "")

end

doCreatureSetStorage(cid, key, value)

return true

end getPlayerStorageValue = getCreatureStorage

getGlobalStorageValue = getStorage

setGlobalStorageValue = doSetStorage

setPlayerBalance = doPlayerSetBalance

doAddMapMark = doPlayerAddMapMark

doSendTutorial = doPlayerSendTutorial

getWaypointsList = getWaypointList

getPlayerLastLoginSaved = getPlayerLastLogin

function getThingPos(uid)

if not uid then return {x = 0, y = 0, z = 10} end

return getThingPosition(uid)

end

doAreaCombatHealth = doCombatAreaHealth

doAreaCombatMana = doCombatAreaMana

doAreaCombatCondition = doCombatAreaCondition

doAreaCombatDispel = doCombatAreaDispel

getItemDescriptionsById = getItemInfo

hasProperty = hasItemProperty

hasClient = hasPlayerClient

print = std.cout

getPosByDir = getPositionByDirection

db.updateQueryLimitOperator = db.updateLimiter

db.stringComparisonOperator = db.stringComparison

 

PlayerFlag_CannotUseCombat = 0

PlayerFlag_CannotAttackPlayer = 1

PlayerFlag_CannotAttackMonster = 2

PlayerFlag_CannotBeAttacked = 3

PlayerFlag_CanConvinceAll = 4

PlayerFlag_CanSummonAll = 5

PlayerFlag_CanIllusionAll = 6

PlayerFlag_CanSenseInvisibility = 7

PlayerFlag_IgnoredByMonsters = 8

PlayerFlag_NotGainInFight = 9

PlayerFlag_HasInfiniteMana = 10

PlayerFlag_HasInfiniteSoul = 11

PlayerFlag_HasNoExhaustion = 12

PlayerFlag_CannotUseSpells = 13

PlayerFlag_CannotPickupItem = 14

PlayerFlag_CanAlwaysLogin = 15

PlayerFlag_CanBroadcast = 16

PlayerFlag_CanEditHouses = 17

PlayerFlag_CannotBeBanned = 18

PlayerFlag_CannotBePushed = 19

PlayerFlag_HasInfiniteCapacity = 20

PlayerFlag_CanPushAllCreatures = 21

PlayerFlag_CanTalkRedPrivate = 22

PlayerFlag_CanTalkRedChannel = 23

PlayerFlag_TalkOrangeHelpChannel = 24

PlayerFlag_NotGainExperience = 25

PlayerFlag_NotGainMana = 26

PlayerFlag_NotGainHealth = 27

PlayerFlag_NotGainSkill = 28

PlayerFlag_SetMaxSpeed = 29

PlayerFlag_SpecialVIP = 30

PlayerFlag_NotGenerateLoot = 31

PlayerFlag_CanTalkRedChannelAnonymous = 32

PlayerFlag_IgnoreProtectionZone = 33

PlayerFlag_IgnoreSpellCheck = 34

PlayerFlag_IgnoreWeaponCheck = 35

PlayerFlag_CannotBeMuted = 36

PlayerFlag_IsAlwaysPremium = 37

PlayerFlag_CanAnswerRuleViolations = 38

PlayerFlag_39 = 39 -- ignore

PlayerFlag_ShowGroupNameInsteadOfVocation = 40

PlayerFlag_HasInfiniteStamina = 41

PlayerFlag_CannotMoveItems = 42

PlayerFlag_CannotMoveCreatures = 43

PlayerFlag_CanReportBugs = 44

PlayerFlag_45 = 45 -- ignore

PlayerFlag_CannotBeSeen = 46

 

PlayerCustomFlag_AllowIdle = 0

PlayerCustomFlag_CanSeePosition = 1

PlayerCustomFlag_CanSeeItemDetails = 2

PlayerCustomFlag_CanSeeCreatureDetails = 3

PlayerCustomFlag_NotSearchable = 4

PlayerCustomFlag_GamemasterPrivileges = 5

PlayerCustomFlag_CanThrowAnywhere = 6

PlayerCustomFlag_CanPushAllItems = 7

PlayerCustomFlag_CanMoveAnywhere = 8

PlayerCustomFlag_CanMoveFromFar = 9

PlayerCustomFlag_CanLoginMultipleCharacters = 10

PlayerCustomFlag_HasFullLight = 11

PlayerCustomFlag_CanLogoutAnytime = 12

PlayerCustomFlag_HideLevel = 13

PlayerCustomFlag_IsProtected = 14

PlayerCustomFlag_IsImmune = 15

PlayerCustomFlag_NotGainSkull = 16

PlayerCustomFlag_NotGainUnjustified = 17

PlayerCustomFlag_HideLevel = 18

PlayerCustomFlag_IgnorePacification = 19

PlayerCustomFlag_CanStairhop = 20

PlayerCustomFlag_CanTurnhop = 21

PlayerCustomFlag_IgnoreHouseRent = 22

 

[StyloMaldoso 330]

Zeref#

 

Aquela Bike Sua não está dando Certo porque? não tem como passa uma e vé se ta sem bug ? vlw '-'

 

Zere$

 

voce poderia edita meu dalk?

Pra poder trocar de vocaçao por 10 diamond? obg ^^

Editado Junho 2, 2012 por StyloMaldoso

[IrvingAzaelSG 0]

ZerefShirou

 

[02/06/2012 17:09:13] [Error - Npc interface]

[02/06/2012 17:09:13] data/npc/scripts/brock.lua:onThink

[02/06/2012 17:09:14] Description:

[02/06/2012 17:09:14] data/lib/some functions.lua:280: bad argument #1 to 'pairs' (table expected, got nil)

[02/06/2012 17:09:14] stack traceback:

[02/06/2012 17:09:14] [C]: in function 'pairs'

[02/06/2012 17:09:15] data/lib/some functions.lua:280: in function 'hasPokemon'

[02/06/2012 17:09:15] data/npc/scripts/brock.lua:184: in function <data/npc/scripts/brock.lua:119>

 

Você pode me ajudar com isso, por favor?

[zerefshirou 112]

@StyloMaldoso

 

bike.lua

 

function onUse(cid, item, frompos, item2, topos)

BikeStorage = getPlayerStorageValue(cid, 5701)

SurfStorage = getPlayerStorageValue(cid, 63215)

FlyStorage = getPlayerStorageValue(cid, 17000)

RideStorage = getPlayerStorageValue(cid, 17001)

outfit = getCreatureOutfit(cid)

if #getCreatureSummons(cid) > 0 then

return true

end

if SurfStorage > 0 or FlyStorage > 0 or RideStorage > 0 then

if SurfStorage > 0 then

system = "surf"

elseif FlyStorage > 0 then

system = "fly"

elseif RideStorage > 0 then

system = "ride"

end

return doPlayerSendCancel(cid, "You can\'t use bike while "..system..".")

end

if getPlayerSex(cid) == 0 then

out = 1393

else

out = 1394

end

if BikeStorage <= 0 then

doSendMagicEffect(getThingPos(cid), 177)

setPlayerStorageValue(cid, 5701, 1)

doChangeSpeed(cid, PlayerSpeed * 2)

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

return true

elseif BikeStorage > 0 then

doSendMagicEffect(getThingPos(cid), 177)

setPlayerStorageValue(cid, 5701, 0)

doChangeSpeed(cid, PlayerSpeed)

doRemoveCondition(cid, CONDITION_OUTFIT)

return true

end

return true

end

 

 

login.lua procura por

 

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

 

Apaga tudo depois disso e coloca isso:

 

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)

 

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

 

if not isInArray({4820, 4821, 4822, 4823, 4824, 4825}, getTileInfo(getThingPos(cid)).itemid) then

setPlayerStorageValue(cid, 63215, -1)

doChangeSpeed(cid, PlayerSpeed)

doRemoveCondition(cid, CONDITION_OUTFIT)

return true

end

 

local item = getPlayerSlotItem(cid, 8)

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

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

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)

doChangeSpeed(cid, PlayerSpeed)

end

elseif getPlayerStorageValue(cid, 5701) > 0 then

doSendMagicEffect(getThingPos(cid), 177)

setPlayerStorageValue(cid, 5701, 1)

doChangeSpeed(cid, PlayerSpeed * 2)

doRemoveCondition(cid, CONDITION_OUTFIT)

local outfit = getCreatureOutfit(cid)

if getPlayerSex(cid) == 0 then

out = 1393

else

out = 1394

end

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

return true

elseif getPlayerGroupId(cid) >= 4 and getPlayerGroupId(cid) <= 7 then

doChangeSpeed(cid, 140*getPlayerGroupId(cid))

else

doChangeSpeed(cid, PlayerSpeed)

end

 

return true

end

 

 

Se bugar algo posta teu login e deixa aquele treco on nem joguei ainda e.e

 

EDIT: EEE PEGA DE NOVOS OS ARQUIVOS TINHA ESQUECIDO DE 1 COISA

Editado Junho 2, 2012 por ZerefShirou

[StyloMaldoso 330]

Ok zeref#

vlw pelo os shiny somente tal vocation usar jaja ta on.kk'

agr só falta o bonus mesmo mais ta foda okASKASKO'

[Kurobisu 73]

@Foxkbt

 

O link de download ta quebrado, e também tentei utilizar um que achei aqui so que o Xampp quando instalo ta dando Erro, Se for para fazer pelo o menos me disponibiliza um [Tutorial] sobre isso. Gostaria muito de ter um site de contas, mais sempre que tento fazer não consigo, da tipo um erro.

 

Se alguem poder me ajudar

ta aqui meu Msn: cloviscavalcante.net@hotmail.com

 

Ajuda por favor!

[Fabio11br 3]

Desculpe Perguntar , Mas Alguem ai tem os Scripts que fazem a barra de pokemons atualizar sozinha?

eu testei os 4 scripts do Otal (que está algumas paginas antes) mas não funcionou .

Alguem ai tem o script de quando o Wild Pokemon Hitar a Life do pokemon atualizar sozinha?

 

REP

Pra quem ajuda =x

ps: ja tentei procurando no tópico , mas não achei '-'

[sabrina45 3]

@StyloMaldoso

tem como passar o site do teu game ai jow, vou jogar um pouco nada pra fazer '-'

[StyloMaldoso 330]

oia na minha assinatura e em cima da minha foto que está o Site.

 

Zewre#

Loga no ot lá '-'

tira umas duvida uhASHUSA Sobre os % das vocation

[theu1995 12]

alguem poderia me passar os seguintes loocktyes: Shiny Alakazam (PxG), Shiny Vaporeon, Shiny Flareon e Shiny Jolteon (PxG), Dark Abra, Elite Lee e Elite Chan (PxG) ???

quem passar dou REP+.

PS: dat editor n ta abrindo no meu pc :s

[Henriquepxc 3]

To quase láah...xd

@Zeref,@Slicer...depois me ajuda a faze o look parecido PxG...Ou me fala oq eu adiciono,,,fllws.Vllws

Editado Junho 2, 2012 por Henriquepxc

[Kurobisu 73]

Alguém ai pode me explicar a pergunta lá em cima! Please Help-me!

@Foxkbt

 

O link de download ta quebrado, e também tentei utilizar um que achei aqui so que o Xampp quando instalo ta dando Erro, Se for para fazer pelo o menos me disponibiliza um [Tutorial] sobre isso. Gostaria muito de ter um site de contas, mais sempre que tento fazer não consigo, da tipo um erro.

 

Se alguem poder me ajudar

ta aqui meu Msn: cloviscavalcante.net@hotmail.com

 

Ajuda por favor! REP+Todo Dia, Para quem me ajudar a fazer esse site!

[Wiisht 3]

Alguem ae ja descobriu como concertar o bug do "m1"

e Bubble Blast, Bullet Seed, Sand Attack no pda by slicer ?

>.<

[Foxkbt 21]

@zeref

 

n creio q seja isso...

entenda...

eu exportei todos os idcs que precisava do pxg

abro o meu client pelo dat editor e importo os idcs "tipo uns 10 idcs de vez q n substitui..."

mas os sprites são substituidos, não os itens mas os sprites saca?

 

@Bizao

se eu olhar em processos no gerenciador de tarefas so vai estar usando 20~30 k de memoria saco?

 

sua teoria tem até logica mais infelizmente n creio q seja isso

eu tenho mais 2 sistemas que abrem o cannal de dialogos "tv system e battle system"

e esses systemas tem o mesmo problema...

=(

lembrando q só certos players tem esse problema

e sempre q esses players tentam usar um desses systemas acontece a mesma coisa

então exclui a possibilidade de ser mistura de dois bugs

 

e diferente da travada q da quando mata um poke

essa travada n volta!

jha deixei o server travado por 1 hr pa v se voltava e ele continuava travado

=(

Editado Junho 2, 2012 por Foxkbt