Loouis
-
Total de itens
151 -
Registro em
-
Última visita
-
Dias Ganhos
1
Posts postados por Loouis
-
-
Oi, eu tava tentando entrar no meu poketibia(pokexcyan) e quando eu criei uma conta e abri o bau de um pokemon. apareceu a seguinte mensagem no log do servidor, e o jogador nao foi teletransportado para o centro pokemon(templo)... erro:
[18/03/2017 14:13:29] [Error - CreatureScript Interface]
[18/03/2017 14:13:29] data/creaturescripts/scripts/login.lua:onLogin
[18/03/2017 14:13:29] Description:
[18/03/2017 14:13:29] (luaGetItemAttribute) Item not found -
Eu adicionei o swampert e o mega swampert no meu servidor, para um jogador obter o mega swampert ele precisa matar o mega, mais eu não queria por respawn fixo, então queria um sistema igual ao de shiny... Quando eu estivesse matando swamperts e ele morresse quando ele fosse spawnar novamente, ele tivesse uma chance de nascer/transformar em um mega swampert.
-
Agora, Frenvius disse:
Cara, de acordo com o erro que deu ali, o provável erro é o nome do seu usuário no windows.
tenta colocar o mapa numa pasta dentro do c:/
cria lá c:/PokexCyan/ e coloca o mapa dentro e tenta importar de novo.
eta..
Obrigado seu lindo
faz tempo viu que tento arrumar isso, obrigado mesmo s2222222222222222
-
Spawn.lua:
Citarlocal shinys = {
"Venusaur", "Blastoise", "Butterfree", "Beedrill", "Pidgeot", "Rattata", "Raticate", "Raichu", "Golbat", "Paras", "Parasect", "Magmar", "Typhlosion", "Xatu", "Growlithe", "Arcanine", "Tentacruel", "Farfetch'd", "Gengar", "Krabby", "Tauros",
"Kingler", "Cubone", "Horsea", "Seadra", "Weezing", "Scyther", "Pinsir", "Crobat", "Zubat", "Tentacool", "Feraligatr", "Machamp", "Meganium", "Alakazam", "Tangela", "Ampharos", "Electabuzz", "Jynx", "Charizard", "Voltorb", "Electrode"}local raros = {"Dragonair", "Dratini", "Giant Magikarp", "Gyarados", "Magmortar", "Electivire", "Salamence", "Mantine"}
local function ShinyName(cid)
if isCreature(cid) then
if string.find(tostring(getCreatureName(cid)), "Shiny") then
local newName = tostring(getCreatureName(cid)):match("Shiny (.*)")
doCreatureSetNick(cid, newName)
if isMonster(cid) then
doSetCreatureDropLoot(cid, false)
end
end
end
endlocal function doSetRandomGender(cid)
if not isCreature(cid) then return true end
if isSummon(cid) then return true end
local gender = 0
local name = getCreatureName(cid)
if not newpokedex[name] then return true end
local rate = newpokedex[name].gender
if rate == 0 then
gender = 3
elseif rate == 500 then
gender = 4
elseif rate == -1 then
gender = 0
elseif math.random(1, 500) <= rate then
gender = 4
else
gender = 3
end
doCreatureSetSkullType(cid, gender)
endlocal function doShiny(cid)
if isCreature(cid) then
if isSummon(cid) then return true end
if getPlayerStorageValue(cid, 74469) >= 1 then return true end
if getPlayerStorageValue(cid, 22546) >= 1 then return true end
if isNpcSummon(cid) then return true end
if getPlayerStorageValue(cid, 637500) >= 1 then return true end --alterado v1.9
if isInArray(shinys, getCreatureName(cid)) then --alterado v1.9 \/
chance = 3.3 --1% chance
elseif isInArray(raros, getCreatureName(cid)) then --n coloquem valores menores que 0.1 !!
chance = 1 --1% chance
else
return true
end
if math.random(1, 500) <= chance*10 then
doSendMagicEffect(getThingPos(cid), 18)
local name, pos = "Shiny ".. getCreatureName(cid), getThingPos(cid)
doRemoveCreature(cid)
local shi = doCreateMonster(name, pos, false)
setPlayerStorageValue(shi, 74469, 1)
else
setPlayerStorageValue(cid, 74469, 1)
end --/\
else
return true
end
end
function onSpawn(cid)registerCreatureEvent(cid, "Experience")
registerCreatureEvent(cid, "GeneralConfiguration")
registerCreatureEvent(cid, "DirectionSystem")
registerCreatureEvent(cid, "CastSystem")
if isSummon(cid) then
registerCreatureEvent(cid, "SummonDeath")
return true
end
addEvent(doShiny, 10, cid)
addEvent(ShinyName, 15, cid)
addEvent(adjustWildPoke, 5, cid)return true
endSpoilerlocal shinys = {
"Venusaur", "Blastoise", "Butterfree", "Beedrill", "Pidgeot", "Rattata", "Raticate", "Raichu", "Golbat", "Paras", "Parasect", "Magmar", "Typhlosion", "Xatu", "Growlithe", "Arcanine", "Tentacruel", "Farfetch'd", "Gengar", "Krabby", "Tauros",
"Kingler", "Cubone", "Horsea", "Seadra", "Weezing", "Scyther", "Pinsir", "Crobat", "Zubat", "Tentacool", "Feraligatr", "Machamp", "Meganium", "Alakazam", "Tangela", "Ampharos", "Electabuzz", "Jynx", "Charizard", "Voltorb", "Electrode"}local raros = {"Dragonair", "Dratini", "Giant Magikarp", "Gyarados", "Magmortar", "Electivire", "Salamence", "Mantine"}
local function ShinyName(cid)
if isCreature(cid) then
if string.find(tostring(getCreatureName(cid)), "Shiny") then
local newName = tostring(getCreatureName(cid)):match("Shiny (.*)")
doCreatureSetNick(cid, newName)
if isMonster(cid) then
doSetCreatureDropLoot(cid, false)
end
end
end
endlocal function doSetRandomGender(cid)
if not isCreature(cid) then return true end
if isSummon(cid) then return true end
local gender = 0
local name = getCreatureName(cid)
if not newpokedex[name] then return true end
local rate = newpokedex[name].gender
if rate == 0 then
gender = 3
elseif rate == 500 then
gender = 4
elseif rate == -1 then
gender = 0
elseif math.random(1, 500) <= rate then
gender = 4
else
gender = 3
end
doCreatureSetSkullType(cid, gender)
endlocal function doShiny(cid)
if isCreature(cid) then
if isSummon(cid) then return true end
if getPlayerStorageValue(cid, 74469) >= 1 then return true end
if getPlayerStorageValue(cid, 22546) >= 1 then return true end
if isNpcSummon(cid) then return true end
if getPlayerStorageValue(cid, 637500) >= 1 then return true end --alterado v1.9
if isInArray(shinys, getCreatureName(cid)) then --alterado v1.9 \/
chance = 3.3 --1% chance
elseif isInArray(raros, getCreatureName(cid)) then --n coloquem valores menores que 0.1 !!
chance = 1 --1% chance
else
return true
end
if math.random(1, 500) <= chance*10 then
doSendMagicEffect(getThingPos(cid), 18)
local name, pos = "Shiny ".. getCreatureName(cid), getThingPos(cid)
doRemoveCreature(cid)
local shi = doCreateMonster(name, pos, false)
setPlayerStorageValue(shi, 74469, 1)
else
setPlayerStorageValue(cid, 74469, 1)
end --/\
else
return true
end
end
function onSpawn(cid)registerCreatureEvent(cid, "Experience")
registerCreatureEvent(cid, "GeneralConfiguration")
registerCreatureEvent(cid, "DirectionSystem")
registerCreatureEvent(cid, "CastSystem")
if isSummon(cid) then
registerCreatureEvent(cid, "SummonDeath")
return true
end
addEvent(doShiny, 10, cid)
addEvent(ShinyName, 15, cid)
addEvent(adjustWildPoke, 5, cid)return true
end -
Gente eu to tentando importar o mapa do meu servidor (pokexcyan) mais nao estou conseguindo, aparece uma mensagem igual a essa:
itens.xml: invalid rootheader
pokexCyan-house.xml: invalid rootheader
pokexCyan-spawn.xml: invalid rootheader
Então estou tentando importar o mapa, la pelo File/Import.... mas quando eu tento importar aparece esse erro:
Meu mapa ta cheio de bugs e ate então nao estou conseguindo nada :cccccccc
Rep+ pra quem me ajudar s22222
-
Agora, Poccnn disse:
Tem algum script que faça dar respawns nesse servidor? Eu não entendo nada de pokelixo.
tem o spawn.lua que faz com que quando eu player mata um pokemon selvagem, exemplo: blastoise, tenha uma chance de SPAWNAR um shiny BLASTOISE (nao podendo ser outro diferente do normal)
-
10 horas atrás, Poccnn disse:
Script lua? Sei não, acho que isso é sources.
Mais não funciona o spawn de shinys no pokexcyan?pois também uso o pokexcyan e é quase a mesma coisa a única diferença é que um spawna shinys e o que eu estou pedindo spawna megas
-
Hoje estava testando meu server e comprei uma house aleatória, guardei alguns itens dentro, até o momento tudo normal, só que quando eu dei teleport para a house com o comando (h"house) ele teleportou para cima da porta que estava fechada e aí bugou tudo porque não consegui abrir e tals, aí queria saber se alguém poderia me ajudar, pra que quando o player use o teleport para a house ele seja telespectadores 1sqm antes da porta para o lado de fora da house.
Uso base cyan, agradeço desde já.
-
-
Queria um script pra dar um sumon no respawn de outros pokemons exemplo. ...
Eu estou caçando Swampert e quando eles morre e vão dar respawn novamente tem a chance de nascer um tropius (como o spawn de shinys)
Já vi esse script antes, mais não estou conseguindo achar. ... agradeço a quem me ajudar
-
Seria bem melhor para mim, o que eu puder fazer estou a disposição.
-
7 horas atrás, Pedro disse:
Sim esta pra site, baixa a database e o site incluido junto com a base e assiste video de como ligar server com site no youtube. La tem ensinando
Não teria como adaptar de site para account manager?
-
1 hora atrás, Pedro disse:
Me manda seu config.lua! Ta configurado pra site ou account menager?
Não sei amigo, creio que esteja adaptado para site, mais com account manager teria mais facilidade.
Config.lua:
accountManager = false
namelockManager = false
newPlayerChooseVoc = false
newPlayerSpawnPosX = 1021
newPlayerSpawnPosY = 1019
newPlayerSpawnPosZ = 7
newPlayerTownId = 1
newPlayerLevel = 10
newPlayerMagicLevel = 0
generateAccountNumber = false
lightInterval = 7500
lightChange = 1
startupTime = 351
startupLight = 40
limitPokeballs = 7
minHappinessEffectDelay = 25
maxHappinessEffectDelay = 40
PokemonStageVeryHappy = 0
maximumHunger = -1
stateHunger = -1
useTeleportWithFly = false
dropHappyDuringBattles = false
--adicionadas
ghostPokemonNames = "Gastly, Haunter, Gengar"
allowBlockSpawn = false
rateGymSpellInterval = 0.10
redSkullLength = 30000 * 24 * 60 * 60
blackSkullLength = 45000 * 24 * 60 * 60
dailyFragsToRedSkull = 3
weeklyFragsToRedSkull = 5
monthlyFragsToRedSkull = 10
dailyFragsToBlackSkull = dailyFragsToRedSkull
weeklyFragsToBlackSkull = weeklyFragsToRedSkull
monthlyFragsToBlackSkull = monthlyFragsToRedSkull
dailyFragsToBanishment = dailyFragsToRedSkull
weeklyFragsToBanishment = weeklyFragsToRedSkull
monthlyFragsToBanishment = monthlyFragsToRedSkull
blackSkulledDeathHealth = 40
blackSkulledDeathMana = 0
useBlackSkull = true
useFragHandler = true
advancedFragList = false
notationsToBan = 3
warningsToFinalBan = 4
warningsToDeletion = 5
banLength = 7 * 24 * 60 * 60
killsBanLength = 7 * 24 * 60 * 60
finalBanLength = 30 * 24 * 60 * 60
ipBanishmentLength = 1 * 24 * 60 * 60
broadcastBanishments = true
maxViolationCommentSize = 200
violationNameReportActionType = 2
autoBanishUnknownBytes = false
worldType = "pvp"
protectionLevel = 1000
pvpTileIgnoreLevelAndVocationProtection = true
pzLocked = 5 * 1000
huntingDuration = 60 * 1000
criticalHitChance = 7
criticalHitMultiplier = 1
displayCriticalHitNotify = false
removeWeaponAmmunition = true
removeWeaponCharges = true
removeRuneCharges = true
whiteSkullTime = 150000 * 60 * 1000
noDamageToSameLookfeet = false
showHealingDamage = false
showHealingDamageForMonsters = false
fieldOwnershipDuration = 5 * 1000
stopAttackingAtExit = false
oldConditionAccuracy = false
loginProtectionPeriod = 10 * 1000
deathLostPercent = 1
stairhopDelay = 0 * 1000
pushCreatureDelay = 1 * 1000
deathContainerId = 0
gainExperienceColor = 215
addManaSpentInPvPZone = true
squareColor = 0
allowFightback = true
worldId = 0
ip = "127.0.0.1" -- "25.68.80.168"
bindOnlyConfiguredIpAddress = false
loginPort = 7171
gamePort = 7172
adminPort = 7171
statusPort = 7171
loginTries = 10
retryTimeout = 5 * 1000
loginTimeout = 60 * 1000
maxPlayers = 90 -- codificado e limitado para 7
motd = "Bem Vindo ao DarkXPoke!"
displayOnOrOffAtCharlist = false
onePlayerOnlinePerAccount = false
allowClones = true
serverName = "DarkXPoke"
loginMessage = "Bem Vindo Ao DarkXPoke!"
statusTimeout = 5 * 60 * 1000
replaceKickOnLogin = true
forceSlowConnectionsToDisconnect = false
loginOnlyWithLoginServer = false
premiumPlayerSkipWaitList = true
sqlType = "mysql"
sqlHost = "localhost"
sqlPort = 3306
sqlUser = "root"
sqlPass = "SENHA MYSQL AQUI"
sqlDatabase = "dxp"
sqlFile = "DarkXPoke.s3db"
sqlKeepAlive = 0
mysqlReadTimeout = 10
mysqlWriteTimeout = 10
encryptionType = "sha1"
deathListEnabled = true
deathListRequiredTime = 1 * 60 * 1000
deathAssistCount = 19
maxDeathRecords = 10
ingameGuildManagement = true
levelToFormGuild = 40
premiumDaysToFormGuild = 0
guildNameMinLength = 2
guildNameMaxLength = 25
highscoreDisplayPlayers = 15
updateHighscoresAfterMinutes = 60
buyableAndSellableHouses = true
houseNeedPremium = true
bedsRequirePremium = true
levelToBuyHouse = 1
housesPerAccount = 0
houseRentAsPrice = true --
housePriceAsRent = false
housePriceEachSquare = 2975
houseRentPeriod = "never"
houseCleanOld = 0 -- tava 0
guildHalls = false
timeBetweenActions = 500
timeBetweenExActions = 500
hotkeyAimbotEnabled = true
mapName = "DarkXPoke"
mapAuthor = "Three"
randomizeTiles = true
storeTrash = false
cleanProtectedZones = true
mailboxDisabledTowns = "1"
defaultPriority = "high"
niceLevel = 5
coresUsed = "-1"
optimizeDatabaseAtStartup = true
removePremiumOnInit = true
confirmOutdatedVersion = false
formulaLevel = 5.0
formulaMagic = 1.0
bufferMutedOnSpellFailure = false
spellNameInsteadOfWords = false
emoteSpells = false
allowChangeOutfit = true
allowChangeColors = true
allowChangeAddons = true
disableOutfitsForPrivilegedPlayers = false
addonsOnlyPremium = false
dataDirectory = "data/"
bankSystem = true
displaySkillLevelOnAdvance = false
promptExceptionTracerErrorBox = true
separateViplistPerCharacter = false
maximumDoorLevel = 500
maxMessageBuffer = 10000000
saveGlobalStorage = false
useHouseDataStorage = false
storePlayerDirection = false
checkCorpseOwner = true
monsterLootMessage = 3
monsterLootMessageType = 22
ghostModeInvisibleEffect = false
ghostModeSpellEffects = false
idleWarningTime = 14 * 60 * 1000
idleKickTime = 15 * 60 * 1000
expireReportsAfterReads = 1
playerQueryDeepness = 2
maxItemsPerPZTile = 0
maxItemsPerHouseTile = 0
freePremium = true
premiumForPromotion = true
blessingOnlyPremium = true
blessingReductionBase = 30
blessingReductionDecreament = 5
eachBlessReduction = 8
experienceStages = true
rateExperience = 1000
premiumrateExperience = 2000
ratePremiumExperience = 2000
rateExperienceFromPlayers = 200
rateSkill = 1
rateMagic = 1.0
rateLoot = 15
rateSpawn = 1
rateMonsterHealth = 1.0
rateMonsterMana = 1.0
rateMonsterAttack = 1.0
rateMonsterDefense = 1.0
minLevelThresholdForKilledPlayer = 0.9
maxLevelThresholdForKilledPlayer = 1.1
rateStaminaLoss = 1
rateStaminaGain = 3
rateStaminaThresholdGain = 12
staminaRatingLimitTop = 41 * 60
staminaRatingLimitBottom = 14 * 60
rateStaminaAboveNormal = 1.0
rateStaminaUnderNormal = 1.0
staminaThresholdOnlyPremium = true
experienceShareRadiusX = 30
experienceShareRadiusY = 30
experienceShareRadiusZ = 1
experienceShareLevelDifference = 20
extraPartyExperienceLimit = 30
extraPartyExperiencePercent = 20
experienceShareActivity = 2 * 60 * 1000
globalSaveEnabled = false
globalSaveHour = 8
shutdownAtGlobalSave = true
cleanMapAtGlobalSave = false
deSpawnRange = 2
deSpawnRadius = 25
maxPlayerSummons = 1
teleportAllSummons = true
teleportPlayerSummons = true
ownerName = "Taiger"
ownerEmail = ""
url = ""
location = "Brazil"
displayGamemastersWithOnlineCommand = false
adminLogsEnabled = false
displayPlayersLogging = false
prefixChannelLogs = ""
runFile = ""
outLogName = ""
errorLogName = ""
truncateLogsOnStartup = false
-
5 horas atrás, Pedro disse:
Bom as source não precisa colocar em nada, No momento ta pra perceber que não sabe sobre Programar, mas posso te ajudar, Manda o print que esta sem foto
me desculpe, não consegui enviar a imagem direto no post...
print: http://imgur.com/a/07BKc
-
Oi, a uns dias atrás eu baixei um servidor de poketibia "DxP"
Fiz download dos itens:
- Server
- Client
- Site
- Source
Só que ate agora,não sei onde coloco as sources, se posso colocar solta na pasta do server e etc...
ai quando fui tentar abrir apareceu uma mensagem, segue a print:
e agora quero saber como faço pra criar esse site e poder jogar... queria jogar offline no meu pc mesmo, sozinho.
mais não estou conseguindo...Alguem me ajuda? dou REP+.
-
Em 05/07/2016 at 13:47, Poccnn disse:
Existem os comandos de house como alana res, aleta som, aleta sio e etc. Da um pesquisada em talkaction.xml
Não achei nenhum comando de um invite citados aí
-
Oi gente, queria pedir um script que é o !invite na house...
tipo:Existem dois jogadores Laura e João.
- se Laura disser: !invite João
ele poderá entrar na house dela(caso ela tenha uma house)
- e se ela disser: !removeinvite João
ele não poderá mais entrar na house dela(caso ela tenha uma house)
- se ela disser: !invitelist
vai aparecer a lista de players invitados na house de Laura.
- [-]e se ela não tiver house e tentar usar um dos comandos acima, apareceça a mensagem: Você não tem house
OBS:Uso base cyan,CYAN.
DOU REP+ PRA QUEM AJUDAR.
-
2 horas atrás, Arbams02 disse:
Poderia mandar o "Id", que quer usar ?
48000
-
-
55 minutos atrás, Poccnn disse:
Em actions.xml, você pôs essa tag:
Esse itemid tem que está declarado na tabela config do script:
O 662 é o index que deveria ter o número do item (itemid).
Sim eu errei... pensei que ali era o id da outfit no object builder, Obrigado Rep+ aos dois que ajudaram <3
-
32 minutos atrás, Poccnn disse:
Modifique isso:
Deixe assim:
E isso:
Deixe assim:
Error:
[08/06/2016 14:51:00] [Error - Action Interface]
[08/06/2016 14:51:00] data/actions/scripts/outft.lua:onUse
[08/06/2016 14:51:00] Description:
[08/06/2016 14:51:00] data/actions/scripts/outft.lua:8: attempt to index local 'cfg' (a nil value)
[08/06/2016 14:51:00] stack traceback:
[08/06/2016 14:51:00] data/actions/scripts/outft.lua:8: in function <data/actions/scripts/outft.lua:1>
-
14 horas atrás, kttallan disse:
Olha aqui amigo, eu ainda não testei ela.
function onUse(cid, item, frompos, item2, topos) local config = {[1212] = {storage = 12313, nomedaroupa = "Dragon Outfit"}}local cfg = config[item.itemid]setPlayerStorageValue(cid, cfg.stora, 1)doPlayerSendTextMessage(cid, 14, "Parabens voce acaba de ganhar uma "..cfg.nomedaroupa..".")doRemoveItem(cfg, 1)return trueendLembre de por no xml também
Configurando:
[item] = {storage = storagedaroupa, nomedaroupa = "nome da roupa"}
É possivel adicionar mais de um item no script que dá outfit, a outfit é coloca de acordo com a storage que você pode encontrar em data/xml/outfits.xml
Eu adicionei tudo certinho
Script:
function onUse(cid, item, frompos, item2, topos)
local config = {
[662] = {storage = 181639, nomedaroupa = "Chisrtimas outfit"}
}
local cfg = config[item.itemid]
setPlayerStorageValue(cid, cfg.stora, 1)
doPlayerSendTextMessage(cid, 14, "Parabens voce acaba de ganhar uma "..cfg.nomedaroupa..".")
doRemoveItem(cfg, 1)
return true
end
TAG NO ACTIONS.XML:
<action itemid="14453" event="script" value="outft.lua"/>
Erro encontrado na distro ao usar o item:
[08/06/2016 12:22:57] [Error - Action Interface]
[08/06/2016 12:22:57] data/actions/scripts/outft.lua:onUse
[08/06/2016 12:22:57] Description:
[08/06/2016 12:22:57] data/actions/scripts/outft.lua:9: attempt to index local 'cfg' (a nil value)
[08/06/2016 12:22:57] stack traceback:
[08/06/2016 12:22:57] data/actions/scripts/outft.lua:9: in function <data/actions/scripts/outft.lua:1>
-
7 minutos atrás, thiago2oliveir1 disse:
Ele Esta em uma das pasta do sever
Procurei em todas as pastas do server e não encontrei o script, encontrei o sistema no cliente em modules/game_memory.... Alguém me dá suporte pls?
-
6 minutos atrás, Pokemonultimatetwo disse:
Não é nas sources, é só server-client
é no client do server?n entendei ae
-
Quem Está Navegando 0 membros estão online
- Nenhum usuário registrado visualizando esta página.
[Encerrado] [ERRO]login.lua
em Tópicos Sem Resposta
Postado
Login.lua:
local config = {
loginMessage = getConfigValue('loginMessage'),
useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))
}
function onLogin(cid)
local accountManager = getPlayerAccountManager(cid)
if getPlayerLevel(cid) >= 1 and getPlayerLevel(cid) <= 80 then
doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, 90)
doCreatureSetDropLoot(cid, false)
end
if getPlayerLevel(cid) >= 81 and getPlayerLevel(cid) <= 149 then
doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, 80)
doCreatureSetDropLoot(cid, false)
end
if getPlayerLevel(cid) >= 150 then
doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, 75)
doCreatureSetDropLoot(cid, false)
end
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, "dropStone")
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")
registerCreatureEvent(cid, "pokemons")
addEvent(doSendAnimatedText, 500, getThingPosWithDebug(cid), "Bem Vindo!!", COLOR_BURN)
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)
doRemoveCondition(cid, CONDITION_OUTFIT) --alterado v1.9 \/
doTeleportThing(cid, posBackPVP, false)
doCreatureAddHealth(cid, getCreatureMaxHealth(cid))
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)
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,
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)
if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then
sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")]) --alterado v1.8
end
local posicao = getTownTemplePosition(getPlayerTown(cid))
markFlyingPos(cid, posicao)
elseif getPlayerStorageValue(cid, 63215) >= 1 then -- surf
local item = getPlayerSlotItem(cid,
local poke = getItemAttribute(item.uid, "poke")
doSetCreatureOutfit(cid, {lookType = surfs[poke].lookType + 351}, -1) --alterado v1.6
doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then
sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")]) --alterado v1.8
end
elseif getPlayerStorageValue(cid, 17001) >= 1 then -- ride
local item = getPlayerSlotItem(cid,
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)
if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then
sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")]) --alterado v1.8
end
else
setPlayerStorageValue(cid, 17001, -1)
doRegainSpeed(cid)
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)
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, -getCreatureSpeed(cid))
doChangeSpeed(cid, getPlayerStorageValue(cid, 5700)) --alterado v1.8
if getPlayerSex(cid) == 1 then
doSetCreatureOutfit(cid, {lookType = 1394}, -1)
else
doSetCreatureOutfit(cid, {lookType = 1393}, -1)
end
elseif getPlayerStorageValue(cid, 75846) >= 1 then --alterado v1.9 \/
doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)), false)
setPlayerStorageValue(cid, 75846, -1)
sendMsgToPlayer(cid, 20, "You have been moved to your town!")
else
doRegainSpeed(cid)
end
if getPlayerStorageValue(cid, 22545) >= 1 then
setPlayerStorageValue(cid, 22545, -1)
doTeleportThing(cid, getClosestFreeTile(cid, posBackGolden), false)
setPlayerRecordWaves(cid)
end
if useKpdoDlls then
doUpdateMoves(cid)
doUpdatePokemonsBar(cid)
onPokeHealthChange(cid)
end
doPlayerChangeModeIcon(cid)
return true
end