Ir para conteúdo

[Encerrado] QUANDO MORRE PERDE MUITA XP. PDA SEM LVL


helberthfilho

Posts Recomendados

Ja tentei arrumar e ainda nao conseguiii, Alguem me ajuda , quando morre perde muita xp... vou mandar meu longin.lua:

 

 

 

local config = {

loginMessage = getConfigValue('loginMessage'),

useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))

}

 

function onLogin(cid)

= getConfigValue('deathLostPercent')

 

if getPlayerLevel(cid) >= 1 and getPlayerLevel(cid) <= 10 then --alterado v1.8

doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, *1)

else

doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, (getPlayerLevel(cid) >= 200 and 100 or math.floor(getPlayerLevel(cid)/2)) )

end

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

registerCreatureEvent(cid, "ShowPokedex")

registerCreatureEvent(cid, "ClosePokedex")

registerCreatureEvent(cid, "WatchTv")

registerCreatureEvent(cid, "StopWatchingTv")

registerCreatureEvent(cid, "WalkTv")

registerCreatureEvent(cid, "RecordTv")

registerCreatureEvent(cid, "PlayerLogout")

registerCreatureEvent(cid, "WildAttack")

registerCreatureEvent(cid, "Idle")

registerCreatureEvent(cid, "EffectOnAdvance")

registerCreatureEvent(cid, "GeneralConfiguration")

registerCreatureEvent(cid, "SaveReportBug")

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)

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

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, 8)

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

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)

end

return true

end

Link para o comentário
Compartilhar em outros sites

doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, 50)

Quanto mais alto mais xp ele perde

@edit

Eu acho que voce deveria colocar 50 ;s

 

se ainda nao resolveu porfavor me mande pm !

 

 

Ajudei ?

 

doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, 0)

e so deixar ele assim para nao perder xp!

ajudei rep+

 

Att Dark Lucas

Editado por darknessott
Link para o comentário
Compartilhar em outros sites

Nãao :/ vou mandar meu conf.lua e meu login.lua..

 

Conf. LUA

_____________________________________________________________

 

-- The Forgotten Server Config

-- Account manager

accountManager = true

namelockManager = true

newPlayerChooseVoc = false

newPlayerSpawnPosX = 49

newPlayerSpawnPosY = 73

newPlayerSpawnPosZ = 7

newPlayerTownId = 1

newPlayerLevel = 5

newPlayerMagicLevel = 0

generateAccountNumber = false

 

lightInterval = 7500

-- a cada "lightInterval" ms vai passar 1 minuto

lightChange = 1

-- quanto de light ira alterar durante passagem de dia/noite

startupTime = 351

-- quantas horas serão ao ligar o server (360 = 6:00 a.m, 1080 = 6:00 p.m, varia de 0 a 1440)

startupLight = 40

-- quanto de light vai estar ao ligar o server

 

limitPokeballs = 6 -- deprecated

happyDropTime = 60 -- a cada "happyDropTime" segundos o pokemon vai perder HAPPINESS

minHappinessEffectDelay = 25 -- a cada min de "happinessEffectDelay" segundos o pokemon vai mostrar a felicidade

maxHappinessEffectDelay = 40 -- a cada min de "happinessEffectDelay" segundos o pokemon vai mostrar a felicidade

PokemonStageVeryHappy = 215 -- com quanto de happy o poke precisa pra estar muito feliz

PokemonStageHappy = 160 -- ... pra estar feliz

PokemonStageOK = 110 -- ... pra estar normal

PokemonStageSad = 50 -- ... pra estar triste

PokemonStageMad = 0 -- ... pra estar bravo

maximumHunger = 120 -- maior fome possivel

stateHunger = 100 -- 19estagio que precisa estar pra ficar com fome

increaseHunger = 7 -- a cada X segundos (xml do monstro) aumenta o hunger em "increaseHunger"

decreaseHappy = 1 -- HAPPINESS que o pokemon vai perder a cada "happyDropTime"

decreaseHungryHappy = 4 -- 3HAPPINESS a mais que o pokemon vai perder se estiver com fome

useTeleportWithFly = false

dropHappyDuringBattles = true -- HAPPINESS vai cair enquanto estiver batalhando ? true / false

 

allowBlockSpawn = true

 

rateGymSpellInterval = 0.68

 

-- Unjustified kills

-- NOTE: *Banishment and *BlackSkull variables are >summed up<

-- (dailyFragsToRedSkull + dailyFragsToBanishment) with their

-- *RedSkull equivalents.

-- Auto banishing works only if useBlackSkull set to negative.

-- advancedFragList is not advised if you use huge frags

-- requirements.

redSkullLength = 30 * 24 * 60 * 60

blackSkullLength = 45 * 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

 

-- Banishments

-- violationNameReportActionType 1 = just a report, 2 = name lock, 3 = player banishment

-- killsBanLength works only if useBlackSkull option is disabled.

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

 

-- Battle

-- NOTE: showHealingDamageForMonsters inheritates from showHealingDamage.

-- loginProtectionPeriod is the famous Tibia anti-magebomb system.

-- deathLostPercent set to nil enables manual mode.

worldType = "pvp"

protectionLevel = 1000

pvpTileIgnoreLevelAndVocationProtection = true

pzLocked = 18 * 1000

huntingDuration = 60 * 1000

criticalHitChance = 7

criticalHitMultiplier = 1

displayCriticalHitNotify = false

removeWeaponAmmunition = true

removeWeaponCharges = true

removeRuneCharges = true

whiteSkullTime = 15 * 60 * 1000

noDamageToSameLookfeet = false

showHealingDamage = false

showHealingDamageForMonsters = false

fieldOwnershipDuration = 5 * 1000

stopAttackingAtExit = false

oldConditionAccuracy = false

loginProtectionPeriod = 10 * 1000

deathLostPercent = 0

stairhopDelay = 0 * 1000

pushCreatureDelay = 1 * 1000

deathContainerId = 0

gainExperienceColor = 215

addManaSpentInPvPZone = true

squareColor = 0

allowFightback = true

 

-- Connection config

worldId = 0

ip = "pouni.zapto.org"

bindOnlyConfiguredIpAddress = false

loginPort = 7171

gamePort = 7172

adminPort = 7171

statusPort = 7171

loginTries = 10

retryTimeout = 5 * 1000

loginTimeout = 60 * 1000

maxPlayers = 50 -- codificado e limitado para 7

motd = "Welcome to pokemon dash!"

displayOnOrOffAtCharlist = false

onePlayerOnlinePerAccount = false

allowClones = true

serverName = "Pokemon Dash"

loginMessage = "Welcome to pokemon dash server!"

statusTimeout = 5 * 60 * 1000

replaceKickOnLogin = true

forceSlowConnectionsToDisconnect = false

loginOnlyWithLoginServer = false

premiumPlayerSkipWaitList = true

 

-- Database

-- NOTE: sqlFile is used only by sqlite database, and sqlKeepAlive by mysql database.

-- To disable sqlKeepAlive such as mysqlReadTimeout use 0 value.

sqlType = "sqlite"

sqlHost = "localhost"

sqlPort = 3306

sqlUser = "root"

sqlPass = ""

sqlDatabase = "theforgottenserver"

sqlFile = "forgottenserver.s3db"

sqlKeepAlive = 0

mysqlReadTimeout = 10

mysqlWriteTimeout = 10

encryptionType = "plain"

 

-- Deathlist

deathListEnabled = true

deathListRequiredTime = 1 * 60 * 1000

deathAssistCount = 19

maxDeathRecords = 10

 

-- Guilds

ingameGuildManagement = true

levelToFormGuild = 40

premiumDaysToFormGuild = 0

guildNameMinLength = 2

guildNameMaxLength = 25

 

-- Highscores

highscoreDisplayPlayers = 15

updateHighscoresAfterMinutes = 60

 

-- Houses

buyableAndSellableHouses = true

houseNeedPremium = true

bedsRequirePremium = true

levelToBuyHouse = 1

housesPerAccount = 0

houseRentAsPrice = false

housePriceAsRent = false

housePriceEachSquare = 2975

houseRentPeriod = "never"

houseCleanOld = 0

guildHalls = false

 

-- Item usage

timeBetweenActions = 500

timeBetweenExActions = 500

hotkeyAimbotEnabled = true

 

-- Map

-- NOTE: storeTrash costs more memory, but will perform alot faster cleaning.

mapName = "mastermap"

mapAuthor = "brun123"

randomizeTiles = true

storeTrash = false

cleanProtectedZones = true

mailboxDisabledTowns = "1"

 

-- Process

-- NOTE: defaultPriority works only on Windows and niceLevel on *nix

-- coresUsed are seperated by comma cores ids used by server process,

-- default is -1, so it stays untouched (automaticaly assigned by OS).

defaultPriority = "high"

niceLevel = 5

coresUsed = "-1"

 

-- Startup

optimizeDatabaseAtStartup = true

removePremiumOnInit = true

confirmOutdatedVersion = false

 

-- Spells

formulaLevel = 5.0

formulaMagic = 1.0

bufferMutedOnSpellFailure = false

spellNameInsteadOfWords = false

emoteSpells = false

 

-- Outfits

allowChangeOutfit = true

allowChangeColors = true

allowChangeAddons = true

disableOutfitsForPrivilegedPlayers = false

addonsOnlyPremium = false

 

-- Miscellaneous

-- NOTE: promptExceptionTracerErrorBox works only with precompiled support feature,

-- called "exception tracer" (__EXCEPTION_TRACER__ flag).

dataDirectory = "data/"

bankSystem = true

displaySkillLevelOnAdvance = false

promptExceptionTracerErrorBox = true

separateViplistPerCharacter = false

maximumDoorLevel = 500

maxMessageBuffer = 4

 

-- Saving-related

-- useHouseDataStorage usage may be found at README.

saveGlobalStorage = false

useHouseDataStorage = false

storePlayerDirection = false

 

-- Loot

-- monsterLootMessage 0 to disable, 1 - only party, 2 - only player, 3 - party or player (like Tibia's)

checkCorpseOwner = true

monsterLootMessage = 3

monsterLootMessageType = 22

 

-- Ghost mode

ghostModeInvisibleEffect = false

ghostModeSpellEffects = false

 

-- Limits

idleWarningTime = 14 * 60 * 1000

idleKickTime = 15 * 60 * 1000

expireReportsAfterReads = 1

playerQueryDeepness = 2

maxItemsPerPZTile = 0

maxItemsPerHouseTile = 0

 

-- Premium-related

freePremium = false

premiumForPromotion = true

 

-- Blessings

-- NOTE: blessingReduction* regards items/containers loss.

-- eachBlessReduction is how much each bless reduces the experience/magic/skills loss.

blessingOnlyPremium = true

blessingReductionBase = 30

blessingReductionDecreament = 5

eachBlessReduction = 8

 

-- Rates

-- NOTE: experienceStages configuration is located in data/XML/stages.xml.

-- rateExperienceFromPlayers 0 to disable.

experienceStages = true

rateExperience = 10

rateExperienceFromPlayers = 10

rateSkill = 1

rateMagic = 1.0

rateLoot = 10

rateSpawn = 1

 

-- Monster rates

rateMonsterHealth = 1.0

rateMonsterMana = 1.0

rateMonsterAttack = 1.0

rateMonsterDefense = 1.0

 

-- Experience from players

-- NOTE: min~Threshold* set to 0 will disable the minimum threshold:

-- player will gain experience from every lower leveled player.

-- max~Threshold* set to 0 will disable the maximum threshold:

-- player will gain experience from every higher leveled player.

minLevelThresholdForKilledPlayer = 0.9

maxLevelThresholdForKilledPlayer = 1.1

 

-- Stamina

-- NOTE: Stamina is stored in miliseconds, so seconds are multiplied by 1000.

-- rateStaminaHits multiplies every hit done a creature, which are later

-- multiplied by player attack speed.

-- rateStaminaGain is divider of every logged out second, eg:

-- 60000 / 3 = 20000 milliseconds, what gives 20 stamina seconds for 1 minute being logged off.

-- rateStaminaThresholdGain is divider for the premium stamina.

-- staminaRatingLimit* is in minutes.

rateStaminaLoss = 1

rateStaminaGain = 3

rateStaminaThresholdGain = 12

staminaRatingLimitTop = 41 * 60

staminaRatingLimitBottom = 14 * 60

rateStaminaAboveNormal = 1.0

rateStaminaUnderNormal = 1.0

staminaThresholdOnlyPremium = true

 

-- Party

-- NOTE: experienceShareLevelDifference is float number.

-- experienceShareLevelDifference is highestLevel * value

experienceShareRadiusX = 30

experienceShareRadiusY = 30

experienceShareRadiusZ = 1

experienceShareLevelDifference = 200 * 200

extraPartyExperienceLimit = 20

extraPartyExperiencePercent = 20

experienceShareActivity = 2 * 60 * 1000

 

-- Global save

-- NOTE: globalSaveHour means like 03:00, not that it will save every 3 hours,

-- if you want such a system please check out data/globalevents/globalevents.xml.

globalSaveEnabled = false

globalSaveHour = 8

shutdownAtGlobalSave = true

cleanMapAtGlobalSave = false

 

-- Spawns

deSpawnRange = 2

deSpawnRadius = 25

 

-- Summons

maxPlayerSummons = 1

teleportAllSummons = true

teleportPlayerSummons = true

 

-- Status

ownerName = "Pokemon Dash Online [Advanced]"

ownerEmail = ""

url = ""

location = "Brazil"

displayGamemastersWithOnlineCommand = false

 

-- Logs

-- NOTE: This kind of logging does not work in GUI version.

-- For such, please compile the software with __GUI_LOGS__ flag.

adminLogsEnabled = false

displayPlayersLogging = true

prefixChannelLogs = ""

runFile = ""

outLogName = ""

errorLogName = ""

truncateLogsOnStartup = false

 

__________________________________________________

LOGIN.LUA

________________________________________________________

 

 

local config = {

loginMessage = getConfigValue('loginMessage'),

useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))

}

 

function onLogin(cid)

= getConfigValue('deathLostPercent')

 

if getPlayerLevel(cid) > 1 then

doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, *0)

else

doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, (getPlayerLevel(cid) >= 200 and 100 or math.floor(getPlayerLevel(cid)/2)) )

end

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

registerCreatureEvent(cid, "ShowPokedex")

registerCreatureEvent(cid, "ClosePokedex")

registerCreatureEvent(cid, "WatchTv")

registerCreatureEvent(cid, "StopWatchingTv")

registerCreatureEvent(cid, "WalkTv")

registerCreatureEvent(cid, "RecordTv")

registerCreatureEvent(cid, "PlayerLogout")

registerCreatureEvent(cid, "WildAttack")

registerCreatureEvent(cid, "Idle")

registerCreatureEvent(cid, "EffectOnAdvance")

registerCreatureEvent(cid, "GeneralConfiguration")

registerCreatureEvent(cid, "SaveReportBug")

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)

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

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, 8)

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

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)

end

return true

end

Editado por helberthfilho
Link para o comentário
Compartilhar em outros sites

oPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, *1)

else

doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, (getPlayerLevel(cid) >= 20 and 10 or math.floor(getPlayerLevel(cid)/2)) )

end

doCreatureSetDropLoot(cid, false)

 

 

/\ Editado tenta deixar assim ... do maior pro menor.

Link para o comentário
Compartilhar em outros sites

Axai essa parte na sua primeira quote ... \/

oPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, *1)

else

doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, (getPlayerLevel(cid) >= 200 and 100 or math.floor(getPlayerLevel(cid)/2)) )

end

doCreatureSetDropLoot(cid, false)

 

Editado @ : #

 

oPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, *1)

else

doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, (getPlayerLevel(cid) >= 20 and 10 or math.floor(getPlayerLevel(cid)/2)) )

end

doCreatureSetDropLoot(cid, false)

 

/\tenta deixar assim

---------------------------------------------------------------------------------------\/-------------------------------------------

7 ou 8 linha la em cima do seu primeiro post \/

oPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, *1)

else

doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, (getPlayerLevel(cid) >= 200 and 100 or math.floor(getPlayerLevel(cid)/2)) )

end

doCreatureSetDropLoot(cid, false)

Editado por Mykez
Link para o comentário
Compartilhar em outros sites

Tentei mas nao funfou ..

 

 

 

 

local config = {

loginMessage = getConfigValue('loginMessage'),

useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))

}

 

function onLogin(cid)

= getConfigValue('deathLostPercent')

 

if getPlayerLevel(cid) > 1 then

oPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, *1)

else

doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, (getPlayerLevel(cid) >= 20 and 10 or math.floor(getPlayerLevel(cid)/2)) )

end

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

registerCreatureEvent(cid, "ShowPokedex")

registerCreatureEvent(cid, "ClosePokedex")

registerCreatureEvent(cid, "WatchTv")

registerCreatureEvent(cid, "StopWatchingTv")

registerCreatureEvent(cid, "WalkTv")

registerCreatureEvent(cid, "RecordTv")

registerCreatureEvent(cid, "PlayerLogout")

registerCreatureEvent(cid, "WildAttack")

registerCreatureEvent(cid, "Idle")

registerCreatureEvent(cid, "EffectOnAdvance")

registerCreatureEvent(cid, "GeneralConfiguration")

registerCreatureEvent(cid, "SaveReportBug")

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)

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

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, 8)

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

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)

end

return true

end

Link para o comentário
Compartilhar em outros sites

oPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, *4)

else

doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, (getPlayerLevel(cid) >= 10 and 20 or math.floor(getPlayerLevel(cid)/1)) )

end

doCreatureSetDropLoot(cid, false) tenta assim /\ se num der vo fuçar pra ver

Link para o comentário
Compartilhar em outros sites

e tenso mano so mapper e sei pokissimo de scripter :x 5 Minutos eu fuçando eu descubro so que agora to ocupado amigo :x tenta fase um double exp pra compensar ou algo do genero ate os especialistas te ajudarem .

Link para o comentário
Compartilhar em outros sites

local config = {
loginMessage = getConfigValue('loginMessage'),
useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))
}

function onLogin(cid)
local loss = getConfigValue('deathLostPercent')

if loss ~= nil then
if getPlayerLevel(cid) > 0 and getPlayerLevel(cid) < 11 then -- alterado v1.8
doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, loss * 1)
else
doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, (getPlayerLevel(cid) >= 200 and 100 or math.floor(getPlayerLevel(cid) / 2)))
end
end
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, "dropStone")
registerCreatureEvent(cid, "ShowPokedex")
registerCreatureEvent(cid, "ClosePokedex")
registerCreatureEvent(cid, "WatchTv")
registerCreatureEvent(cid, "StopWatchingTv")
registerCreatureEvent(cid, "WalkTv")
registerCreatureEvent(cid, "RecordTv")
registerCreatureEvent(cid, "PlayerLogout")
registerCreatureEvent(cid, "WildAttack")
registerCreatureEvent(cid, "Idle")
registerCreatureEvent(cid, "EffectOnAdvance")
registerCreatureEvent(cid, "GeneralConfiguration")
registerCreatureEvent(cid, "SaveReportBug")
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)
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[s])) then
if s == 3 then
setPlayerStorageValue(cid, storages[s], 1)
elseif s == 4 then
setPlayerStorageValue(cid, storages[s], -1)
else
if isBeingUsed(getPlayerSlotItem(cid, 8).itemid) then
setPlayerStorageValue(cid, storages[s], 1)
else
setPlayerStorageValue(cid, storages[s], -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)
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, 8)
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, 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)
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)
end
return true
end 

Editado por Skymagnum
Link para o comentário
Compartilhar em outros sites

Visitante
Este tópico está impedido de receber novos posts.
×
×
  • Criar Novo...