up
info
Grupo: Campones
Registrado: 21/12/15
Posts: 51
Reputação: +8

info
Grupo: Herói
Registrado: 25/10/11
Posts: 2.2k
Reputação: +862
Gênero: Masculino
Char no Tibia: Sociopata

Posta seu login, e o goback da actions
info
Grupo: Campones
Registrado: 21/12/15
Posts: 51
Reputação: +8

Posta seu login, e o goback da actions
Loguin :
local config = {
loginMessage = getConfigValue('loginMessage'),useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))}function onLogin(cid)if getPlayerLevel(cid) >= 1 and getPlayerLevel(cid) <= 10 then --alterado v1.8doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, 0)elsedoPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, (getPlayerLevel(cid) >= 200 and 100 or math.floor(getPlayerLevel(cid)/2)) )enddoCreatureSetDropLoot(cid, false)local accountManager = getPlayerAccountManager(cid)if(accountManager == MANAGER_NONE) thenlocal lastLogin, str = getPlayerLastLoginSaved(cid), config.loginMessageif(lastLogin > 0) thendoPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)str = "Sua ultima visita foi em " .. os.date("%a %b %d %X %Y", lastLogin) .. "."elsestr = strenddoPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)elseif(accountManager == MANAGER_NAMELOCK) thendoPlayerSendTextMessage(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) thendoPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.")elsedoPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.")endif getCreatureName(cid) == "Account Manager" thenlocal outfit = {}if accountManagerRandomPokemonOutfit thenoutfit = {lookType = getPokemonXMLOutfit(oldpokedex[math.random(151)][1])}elseoutfit = accountManagerOutfitenddoSetCreatureOutfit(cid, outfit, -1)return trueendif(not isPlayerGhost(cid)) thendoSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)endlocal outfit = {}if getPlayerVocation(cid) == 0 thendoPlayerSetMaxCapacity(cid, 0)doPlayerSetVocation(cid, 1)setCreatureMaxMana(cid, 6)doPlayerAddSoul(cid, -getPlayerSoul(cid))setPlayerStorageValue(cid, 19898, 0)if getCreatureOutfit(cid).lookType == 128 thenoutfit = {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 thenoutfit = {lookType = 511, lookHead = math.random(0, 132), lookBody = math.random(0, 132), lookLegs = math.random(0, 132), lookFeet = math.random(0, 132)}enddoCreatureChangeOutfit(cid, outfit)endregisterCreatureEvent(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")registerCreatureEvent(cid, "KillAlavanca")registerCreatureEvent(cid, "ExpVip")registerCreatureEvent(cid, "HouseTranslation")registerCreatureEvent(cid, "UpAbsolute")registerCreatureEvent(cid, "CheckVip")registerCreatureEvent(cid, "PlayerInformation")registerCreatureEvent(cid, "OpenChannelDialog")if getPlayerStorageValue(cid, 99284) == 1 thensetPlayerStorageValue(cid, 99284, -1)endif getPlayerStorageValue(cid, 6598754) >= 1 or getPlayerStorageValue(cid, 6598755) >= 1 thensetPlayerStorageValue(cid, 6598754, -1)setPlayerStorageValue(cid, 6598755, -1)doRemoveCondition(cid, CONDITION_OUTFIT) --alterado v1.9 \/doTeleportThing(cid, posBackPVP, false)doCreatureAddHealth(cid, getCreatureMaxHealth(cid))enddoChangeSpeed(cid, -(getCreatureSpeed(cid)))--///////////////////////////////////////////////////////////////////////////--local storages = {17000, 63215, 17001, 13008, 5700}for s = 1, #storages doif not tonumber(getPlayerStorageValue(cid, storages)) thenif s == 3 thensetPlayerStorageValue(cid, storages, 1)elseif s == 4 thensetPlayerStorageValue(cid, storages, -1)elseif isBeingUsed(getPlayerSlotItem(cid, 8).itemid) thensetPlayerStorageValue(cid, storages, 1)elsesetPlayerStorageValue(cid, storages, -1)endenddoPlayerSendTextMessage(cid, 27, "Sorry, but a problem occurred on the server, but now it's alright")endend--/////////////////////////////////////////////////////////////////////////--if getPlayerStorageValue(cid, 17000) >= 1 then -- flylocal 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 = 0if getTileThingByPos(apos).itemid <= 2 thendoCombatAreaHealth(cid, FIREDAMAGE, getFlyingMarkedPos(cid), 0, 0, 0, CONST_ME_NONE)doCreateItem(460, 1, getFlyingMarkedPos(cid))enddoTeleportThing(cid, apos, false)if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 thensendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")]) --alterado v1.8endlocal posicao = getTownTemplePosition(getPlayerTown(cid))markFlyingPos(cid, posicao)elseif getPlayerStorageValue(cid, 63215) >= 1 then -- surflocal item = getPlayerSlotItem(cid, 8)local poke = getItemAttribute(item.uid, "poke")doSetCreatureOutfit(cid, {lookType = surfs[poke].lookType + 351}, -1) --alterado v1.6doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 thensendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")]) --alterado v1.8endelseif getPlayerStorageValue(cid, 17001) >= 1 then -- ridelocal item = getPlayerSlotItem(cid, 8)local poke = getItemAttribute(item.uid, "poke")if rides[poke] thendoChangeSpeed(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 thensendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")]) --alterado v1.8endelsesetPlayerStorageValue(cid, 17001, -1)doRegainSpeed(cid)endlocal posicao2 = getTownTemplePosition(getPlayerTown(cid))markFlyingPos(cid, posicao2)elseif getPlayerStorageValue(cid, 13008) >= 1 then -- diveif not isInArray({5405, 5406, 5407, 5408, 5409, 5410}, getTileInfo(getThingPos(cid)).itemid) thensetPlayerStorageValue(cid, 13008, 0)doRegainSpeed(cid)doRemoveCondition(cid, CONDITION_OUTFIT)return trueendif getPlayerSex(cid) == 1 thendoSetCreatureOutfit(cid, {lookType = 1034, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1)elsedoSetCreatureOutfit(cid, {lookType = 1035, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1)enddoChangeSpeed(cid, 800)elseif getPlayerStorageValue(cid, 5700) > 0 then --bikedoChangeSpeed(cid, -getCreatureSpeed(cid))doChangeSpeed(cid, getPlayerStorageValue(cid, 5700)) --alterado v1.8if getPlayerSex(cid) == 1 thendoSetCreatureOutfit(cid, {lookType = 1394}, -1)elsedoSetCreatureOutfit(cid, {lookType = 1393}, -1)endelseif 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!")elsedoRegainSpeed(cid)endif getPlayerStorageValue(cid, 22545) >= 1 thensetPlayerStorageValue(cid, 22545, -1)doTeleportThing(cid, getClosestFreeTile(cid, posBackGolden), false)setPlayerRecordWaves(cid)endif useKpdoDlls thendoUpdateMoves(cid)doUpdatePokemonsBar(cid)endif getCreatureSpeed(cid) ~= getCreatureBaseSpeed(cid) thenlocal delta = ( (getCreatureBaseSpeed(cid)) - (getCreatureSpeed(cid)) )doChangeSpeed(cid, delta)endreturn trueend
goback:
local EFFECTS = {
--[OutfitID] = {Effect}["Magmar"] = 35,["Jynx"] = 17, --alterado v1.5["Shiny Jynx"] = 17,["Piloswine"] = 205, --alterado v1.8["Swinub"] = 205,}function onUse(cid, item, frompos, item2, topos)if exhaustion.get(cid, 6666) and exhaustion.get(cid, 6666) > 0 then return true endif getPlayerStorageValue(cid, 17000) >= 1 or getPlayerStorageValue(cid, 17001) >= 1 or getPlayerStorageValue(cid, 63215) >= 1or getPlayerStorageValue(cid, 75846) >= 1 or getPlayerStorageValue(cid, 5700) >= 1 then --alterado v1.9 <<return trueendlocal ballName = getItemAttribute(item.uid, "poke")local btype = getPokeballType(item.itemid)local usando = pokeballs[btype].uselocal effect = pokeballs[btype].effectif not effect theneffect = 21endunLock(item.uid) --alterado v1.8if item.itemid == usando thenif getPlayerStorageValue(cid, 990) == 1 then -- GYMdoPlayerSendCancel(cid, "You can't return your pokemon during gym battles.")return trueendif #getCreatureSummons(cid) > 1 and getPlayerStorageValue(cid, 212124) <= 0 then --alterado v1.6if getPlayerStorageValue(cid, 637501) == -2 or getPlayerStorageValue(cid, 637501) >= 1 thenBackTeam(cid)endendif #getCreatureSummons(cid) == 2 and getPlayerStorageValue(cid, 212124) >= 1 thendoPlayerSendCancel(cid, "You can't do that while is controling a mind")return true --alterado v1.5endif #getCreatureSummons(cid) <= 0 thenif isInArray(pokeballs[btype].all, item.itemid) thendoTransformItem(item.uid, pokeballs[btype].off)doItemSetAttribute(item.uid, "hp", 0)doPlayerSendCancel(cid, "This pokemon is fainted.")return trueendendlocal cd = getCD(item.uid, "blink", 30)if cd > 0 thensetCD(item.uid, "blink", 0)endlocal z = getCreatureSummons(cid)[1]if getCreatureCondition(z, CONDITION_INVISIBLE) and not isGhostPokemon(z) thenreturn trueenddoReturnPokemon(cid, z, item, effect)elseif item.itemid == pokeballs[btype].on thenif item.uid ~= getPlayerSlotItem(cid, CONST_SLOT_FEET).uid thendoPlayerSendCancel(cid, "You must put your pokeball in the correct place!")return TRUEendlocal thishp = getItemAttribute(item.uid, "hp")if thishp <= 0 thenif isInArray(pokeballs[btype].all, item.itemid) thendoTransformItem(item.uid, pokeballs[btype].off)doItemSetAttribute(item.uid, "hp", 0)doPlayerSendCancel(cid, "This pokemon is fainted.")return trueendendlocal pokemon = getItemAttribute(item.uid, "poke")if not pokes[pokemon] thenreturn trueend----------------------- Sistema de nao poder carregar mais que 3 pokes lvl baixo e + q 1 poke de lvl medio/alto ---------------------------------if not isInArray({5, 6}, getPlayerGroupId(cid)) thenlocal balls = getPokeballsInContainer(getPlayerSlotItem(cid, 3).uid)local low = {}local lowPokes = {"Rattata", "Caterpie", "Weedle", "Oddish", "Pidgey", "Paras", "Poliwag", "Bellsprout", "Magikarp", "Hoppip", "Sunkern"}if #balls >= 1 thenfor _, uid in ipairs(balls) dolocal nome = getItemAttribute(uid, "poke")if not isInArray(lowPokes, pokemon) and nome == pokemon thenreturn doPlayerSendTextMessage(cid, 27, "Desculpe, mas voce nao pode carregar dois pokemons iguais!")elseif nome == pokemon thentable.insert(low, nome)endendendendif #low >= 3 thenreturn doPlayerSendTextMessage(cid, 27, "Sorry, but you can't carry more than three pokemons equals of low level!")endend---------------------------------------------------------------------------------------------------------------------------------------------------local x = pokes[pokemon]local boost = getItemAttribute(item.uid, "boost") or 0if getPlayerLevel(cid) < (x.level+boost) thendoPlayerSendCancel(cid, "You need level "..(x.level+boost).." to use this pokemon.")return trueend---------------------------- Sistema pokes de clan --------------------------------------local shinysClan = {["Dark Articuno"] = {4, "Wingeon"},["Dark Celebi"] = {1, "Volcanic"},["Reshiram"] = {2, "Seavel"},["Shiny Darkrai"] = {9, "Raibolt"},["Shiny Lucario"] = {7, "Psycraft"},["Shiny Riolu"] = {3, "Orebound"},["Zekrom"] = {8, "Naturia"},["Shiny Regirock"] = {5, "Malefic"},["Shiny Registeel"] = {6, "Gardestrike"}, --alterado v1.4}if shinysClan[pokemon] and (getPlayerGroupId(cid) < 4 or getPlayerGroupId(cid) > 6) then --alterado v1.9 \/if getPlayerClanNum(cid) ~= shinysClan[pokemon][1] thendoPlayerSendCancel(cid, "You need be a member of the clan "..shinysClan[pokemon][2].." to use this pokemon!")return trueelseif getPlayerClanRank(cid) ~= 5 thendoPlayerSendCancel(cid, "You need be atleast rank 5 to use this pokemon!")return trueendend--------------------------------------------------------------------------------------doSummonMonster(cid, pokemon)local pk = getCreatureSummons(cid)[1]if not isCreature(pk) then return true end------------------------passiva hitmonchan------------------------------if isSummon(pk) then --alterado v1.8 \/if pokemon == "Shiny Hitmonchan" or pokemon == "Hitmonchan" thenif not getItemAttribute(item.uid, "hands") thendoSetItemAttribute(item.uid, "hands", 0)endlocal hands = getItemAttribute(item.uid, "hands")doSetCreatureOutfit(pk, {lookType = hitmonchans[pokemon][hands].out}, -1)endend----------------------------------------------------------------------------------movement magmar, jynx-------------if EFFECTS[getCreatureName(pk)] thenmarkPosEff(pk, getThingPos(pk))sendMovementEffect(pk, EFFECTS[getCreatureName(pk)], getThingPos(pk))end--------------------------------------------------------------------------if getCreatureName(pk) == "Ditto" or getCreatureName(pk) == "Shiny Ditto" then --editedlocal left = getItemAttribute(item.uid, "transLeft")local name = getItemAttribute(item.uid, "transName")if left and left > 0 thensetPlayerStorageValue(pk, 1010, name)doSetCreatureOutfit(pk, {lookType = getItemAttribute(item.uid, "transOutfit")}, -1)addEvent(deTransform, left * 1000, pk, getItemAttribute(item.uid, "transTurn"))doItemSetAttribute(item.uid, "transBegin", os.clock())elsesetPlayerStorageValue(pk, 1010, getCreatureName(pk) == "Ditto" and "Ditto" or "Shiny Ditto") --editedendendif isGhostPokemon(pk) then doTeleportThing(pk, getPosByDir(getThingPos(cid), math.random(0, 7)), false) enddoCreatureSetLookDir(pk, 2)adjustStatus(pk, item.uid, true, true, true)doAddPokemonInOwnList(cid, pokemon)doTransformItem(item.uid, item.itemid+1)local pokename = getPokeName(pk) --alterado v1.7local mgo = gobackmsgs[math.random(1, #gobackmsgs)].go:gsub("doka", pokename)doCreatureSay(cid, mgo, TALKTYPE_SAY)doSendMagicEffect(getCreaturePosition(pk), effect)if useOTClient thendoPlayerSendCancel(cid, '12//,show') --alterado v1.7endlocal pk = getCreatureSummons(cid)[1]local pb = getPlayerSlotItem(cid, 8).uidlocal look = getItemAttribute(pb,"addon")if not look thendoSetItemAttribute(pb,"addon",0)return falseendif look > 0 thendoSetCreatureOutfit(pk, {lookType = look}, -1)return trueendelsedoPlayerSendCancel(cid, "Esse pokemon desmaiou.")endif useKpdoDlls thendoUpdateMoves(cid)endreturn trueend
info
Grupo: Herói
Registrado: 25/10/11
Posts: 2.2k
Reputação: +862
Gênero: Masculino
Char no Tibia: Sociopata

Tô pelo cell. Mas abra seu actions em um editor de texto(de preferência o Notepad).
E procure isso;
if getCreatureName(pk) == "Ditto" or getCreatureName(pk) == "Shiny Ditto" then --edited
local left = getItemAttribute(item.uid, "transLeft")
local name = getItemAttribute(item.uid, "transName")
if left and left > 0 then
setPlayerStorageValue(pk, 1010, name)
doSetCreatureOutfit(pk, {lookType = getItemAttribute(item.uid, "transOutfit")}, -1)
addEvent(deTransform, left * 1000, pk, getItemAttribute(item.uid, "transTurn"))
doItemSetAttribute(item.uid, "transBegin", os.clock())
else
setPlayerStorageValue(pk, 1010, getCreatureName(pk) == "Ditto" and "Ditto" or "Shiny Ditto") --edited
end
end
E remova.
[Faça um backup antes]
info
Grupo: Campones
Registrado: 21/12/15
Posts: 51
Reputação: +8

Tô pelo cell. Mas abra seu actions em um editor de texto(de preferência o Notepad).
E procure isso;
if getCreatureName(pk) == "Ditto" or getCreatureName(pk) == "Shiny Ditto" then --edited
local left = getItemAttribute(item.uid, "transLeft")
local name = getItemAttribute(item.uid, "transName")
if left and left > 0 then
setPlayerStorageValue(pk, 1010, name)
doSetCreatureOutfit(pk, {lookType = getItemAttribute(item.uid, "transOutfit")}, -1)
addEvent(deTransform, left * 1000, pk, getItemAttribute(item.uid, "transTurn"))
doItemSetAttribute(item.uid, "transBegin", os.clock())
else
setPlayerStorageValue(pk, 1010, getCreatureName(pk) == "Ditto" and "Ditto" or "Shiny Ditto") --edited
end
end
E remova.
[Faça um backup antes]
não deu certo
info
Grupo: Campones
Registrado: 21/12/15
Posts: 51
Reputação: +8

up


info
Grupo: Campones
Registrado: 21/12/15
Posts: 51
Reputação: +8
Bom o ditto do meu servidor ele volta ao normal quando eu puxo ele pra pokeball ou quando eu saio do jogo, ele n fica transformado; gostaria de saber como eu faço pra ele continuar transformado e só voltar ao normal quando usar o comando !revert