zipter98

Parece estar muito bom, parabéns

Qual seu NewStatusSyst.lua? [data/lib] E qual seu script do revive?

O do piso: data/movements/scripts, crie um arquivo com extensão .lua com o nome eventtile, e coloque o seguinte conteúdo: function onStepIn(cid, item, position, fromPosition) doBroadcastMessage("O jogador "..getCreatureName(cid).." passou pelo piso do evento!") return true end data/movements, movements.xml, coloque a seguinte tag: <movevent type="StepIn" actionid="actionid do(s) tile(s)" event="script" value="eventtile.lua"/> No map editor, configure o(s) tile(s) do evento (?) com o action id que você colocou na tag.

Qual a tag de sua spell no spells.xml? (a tag inteira)

function onSay(cid, words, param) if param ~= "" then return false end if string.len(words) ~= 5 then return false end if #getCreatureSummons(cid) <= 0 then doPlayerSendCancel(cid, "You need a pokemon to use this command.") return true end doSendMagicEffect(getThingPos(cid), 180) local function doLovePokemon(cid) if not isCreature(cid) then return true end if #getCreatureSummons(cid) <= 0 then return true end if exhaustion.get(cid, 88727) and exhaustion.get(cid, 88727) > 3 then return true end local a = getCreatureSummons(cid)[1] local b = getPlayerStorageValue(a, 1008) if b > 250 then doPlayerSendCancel(cid, "Your pokemon is already so happy.") return true end doSendMagicEffect(getThingPos(a), 180) setPlayerStorageValue(a, 1008, b + 45) end exhaustion.set(cid, 88727, 3) addEvent(doLovePokemon, 1150, cid) return true end

1º Isso é algo que eu gostaria de saber. Eu não tenho muito contato com o ADM do jogo, já que sempre que ele loga, estou offline ._. Um amigo meu é que tem mais contato com ele, vou ver se este consegue perguntar sobre o caso do dedicado. 2º Sobre o level, pelo que eu saiba, pode-se fazer em qualquer level (Embora eu recomenda tentar completá-la a partir do level 150). A localização, Champions Island. 3º Cray. 4º Em média, 7:00. 5º Isso é algo meio difícil de responder, já que qualquer servidor pode falir a qualquer hora. Mas, a julgar pelo tempo que este já se encontra online, a chance de falir é mínima. (Contando test server e server oficial, está online há cerca de 1 ano). 6º Não costumo muito entrar em meu Skype, mas, se mesmo assim quiser, lhe envio por PM.

Poderia postar seu love.lua? [data/talkactions/scripts]

Sobre o erro do baú, faça o seguinte: (testei aqui, e tá funcionando perfeitamente.) Em some functions.lua, adicione a seguinte função: function addPokeToPlayer(cid, pokemon, boost, gender, ball, unique) local genders = { ["male"] = 4, ["female"] = 3, [1] = 4, [0] = 3, [4] = 4, [3] = 3, } if not isCreature(cid) then return false end local pokemon = doCorrectString(pokemon) if not pokes[pokemon] then return false end local GENDER = (gender and genders[gender]) and genders[gender] or getRandomGenderByName(pokemon) local btype = (ball and pokeballs[ball]) and ball or isShinyName(pokemon) and "shinynormal" or "normal" local happy = 250 if (getPlayerFreeCap(cid) >= 6 and not isInArray({5, 6}, getPlayerGroupId(cid))) or not hasSpaceInContainer(getPlayerSlotItem(cid, 3).uid) then item = doCreateItemEx(11826) else item = addItemInFreeBag(getPlayerSlotItem(cid, 3).uid, 11826, 1) end if not item then return false end doItemSetAttribute(item, "poke", pokemon) doItemSetAttribute(item, "hp", 1) doItemSetAttribute(item, "happy", happy) doItemSetAttribute(item, "gender", GENDER) doSetItemAttribute(item, "hands", 0) doItemSetAttribute(item, "description", "Contains a "..pokemon..".") doItemSetAttribute(item, "fakedesc", "Contains a "..pokemon..".") if boost and tonumber(boost) and tonumber(boost) > 0 and tonumber(boost) <= 50 then doItemSetAttribute(item, "boost", boost) end if unique then doItemSetAttribute(item, "unique", getCreatureName(cid)) end if (getPlayerFreeCap(cid) >= 6 and not isInArray({5, 6}, getPlayerGroupId(cid))) or not hasSpaceInContainer(getPlayerSlotItem(cid, 3).uid) then doPlayerSendMailByName(getCreatureName(cid), item, 1) sendMsgToPlayer(cid, 27, "Você já está carregando seis pokémon, seu novo pokémon será teleportado para o Centro Pokémon.") end if (isShinyName(pokemon) or (boost and tonumber(boost) and tonumber(boost) >= 10)) and pokeballs["shiny"..btype] then doTransformItem(item, pokeballs["shiny"..btype].on) else doTransformItem(item, pokeballs[btype].on) end return true end Depois, substitua seu código do baú por este: local starterpokes = { ["Squirtle"] = {x = 51, y = 70, z = 7}, ["Charmander"] = {x = 47, y = 70, z = 7}, --Alterado por min, stylo para meu MAPA' ["Bulbasaur"] = {x = 49, y = 70, z = 7}, } local btype = "ultra" function onUse(cid, item, frompos, item2, topos) if getPlayerLevel(cid) > 5 then --alterado v1.3 return true end local pokemon = "" for a, b in pairs (starterpokes) do if isPosEqualPos(topos, b) then pokemon = a end end if pokemon == "" then return true end if getPlayerStorageValue(cid, 9658754) ~= 1 then --alterado v1.7 -opicional- sendMsgToPlayer(cid, 27, "Talk to the Prof. Robert to choose your beginner {city first}/Falê com o Prof. Robert para escolher sua {cidade primeiro}!") return true end doPlayerSendTextMessage(cid, 27, "You got your first pokemon! You also received some pokeballs to help you in your way.") doPlayerSendTextMessage(cid, 27, "Don\'t forget to use your pokedex on every undiscovered pokemon!") doPlayerAddItem(cid, 2392, 30) doPlayerAddItem(cid, 2393, 50) doPlayerAddItem(cid, 12343, 5) --Alterado por min, Stylo ' "KIT INICIAL"~~ doPlayerAddItem(cid, 12346, 20) doPlayerAddItem(cid, 12348, 30) doPlayerAddItem(cid, 12222, 100) addPokeToPlayer(cid, pokemon, 0, nil, btype, true) doSendMagicEffect(getThingPos(cid), 28) doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) doSendMagicEffect(getThingPos(cid), 27) doSendMagicEffect(getThingPos(cid), 28) return TRUE end Spoiler tá bugando comigo, nice ._.

/\ data/lib/StatusPokeOld.lua.

Não é 24h, como disse no post principal. Antes o servidor caia as 20:00, porém agora, às 22:00 +-. (devido ao ADM ser polonês, ou seja, diferença de horário). Sobre o problema de cair, suponho que isso não seja muito comum, pois, pelo que eu reparo, o servidor fica mais é com lag. (mas não aquele tremendo lag, porque dá pra jogar, pelo menos comigo, com um rendimento de 90%)

Só vai poder usar o item quando estiver fora de protection zone, ou só quando estiver em battle? Não entendi direito ._. De qualquer maneira, se não estiver em battle, não vai teleportar. function onUse(cid, item, frompos, item2, topos) local pos = {x = xxx, y = yyy, z = zzz} --Para onde será teleportado. if getCreatureCondition(cid, CONDITION_INFIGHT) == false then return doPlayerSendCancel(cid, "Você só pode usar esse item quando está em battle.") end doTeleportThing(cid, pos) return true end Se estiver em PZ, não vai teleportar: function onUse(cid, item, frompos, item2, topos) local pos = {x = xxx, y = yyy, z = zzz} --Para onde será teleportado. if getTilePzInfo(getPlayerPosition(cid)) == true then return doPlayerSendCancel(cid, "Você só pode usar esse item quando não estiver em PZ.") end doTeleportThing(cid, pos) return true end

Atualização: • Double EXP por tempo limitado! • Adicionado Shiny/Big Porygon quest. • Adicionado 2 novas outfits de Halloween. • Remake gráfico: Nidoking/Shiny Nidoking. Chegando futuramente: • Unown quest! • Nova Boost stone. • Novo client. • Outras atualizações que ainda não foram divulgadas para os jogadores.

25% da vida total, ou da vida atual? De qualquer maneira: Retirando 25% da sua vida atual local c = getCreatureHealth(cid) * 25 / 100 doCreatureAddHealth(cid, -c) Retirando 25% da sua vida total local c = getCreatureMaxHealth(cid) * 25 / 100 doCreatureAddHealth(cid, -c)

function onUse(cid, item, frompos, item2, topos) local storage = 192 --Coloque a storage aqui local remove_item = true --Se for false, não irá retirar o item. True, irá. setPlayerStorageValue(cid, storage, 1) doPlayerSendTextMessage(cid, 27, "Você ganhou uma storage!") if remove_item == true then doRemoveItem(item.uid, 1) end return true end

Actions. function onUse(cid, item, frompos, item2, topos) setPlayerStorageValue(cid,Storage,1) doPlayerSendTextMessage(cid, 27, "Você ganhou uma storage.") end

Só mudar a mensagem '-'

Tenta:

O primeiro: function onSay(cid, words, param, channel) local stt = "" for i = 1, #getPlayersOnline() do local staff = getPlayersOnline()[i] if getPlayerGroupId(staff) >= 4 then if stt == "" then stt = getPlayerName(staff) else stt = stt..", "..getPlayerName(staff) end end end if stt ~= "" then doPlayerSendTextMessage(cid, 27, "Staff online: "..stt..".") else doPlayerSendCancel(cid, "Ninguém da staff on, no momento.") end return true end

registerCreatureEvent(cid, "poketele") não precisa da outra tag.

Registrou no login.lua? Ah, a tag deve ser assim: <event type="think" name="Tele" event="script" value="poketele.lua"/>

local name = getCreatureName(cid) local a = name:gsub("_", "") local newMonster = doCreateMonster(a, pos) Com isso, vai retirar o símbolo desejado do nome (no caso, _). Se funcionar, e você pretender dar rep+, dê ao Akumah, e não a mim.

Veja se dá o mesmo erro. Se der, avise. Eu mudei o que, ao meu ver, estava dando erro. Como estou de saída, na volta dou uma olhada melhor.

Pra configurar a distância máxima entre pokémon e treinador, basta configurar no arquivo poketele.lua. [data/creaturescripts/scripts]. (caso seu servidor não tenha este arquivo, basta procurá-lo aqui no fórum) E pra deixar os shinies selvagens mais fortes, basta ir em data/lib/configuration.lua, e procurar pela configuração de status do pokémon. Por exemplo, do shiny marowak: ["Shiny Marowak"] = {offense = 8.8, defense = 10.2, specialattack = 9, vitality = 9.1, agility = 387, exp = 2136.4, level = 100, wildLvl = 370, type = "ground", type2 = "no type"}, Em wildLvl, você configura o lv desejado que o shiny selvagem tenha.

Testado, funcionando perfeitamente. function onUse(cid, item, topos, item2, frompos) local pos = {x = 696, y = 829, z = 7} --Coordenadas para onde o player será teleportado. local efeito = 12 function teleport_thing(cid, toPos, time, storage, cd) if isCreature(cid) then doPlayerSetNoMove(cid, true) addEvent(doTeleportThing, time*1000, cid, toPos) addEvent(setPlayerStorageValue, time*1000, cid, storage, os.time () + cd) end return true end if getCreatureSkull(cid) >= 3 then return doPlayerSendCancel(cid, "Você não pode usar este item enquanto está PK.") end if not isPremium(cid) then return doPlayerSendCancel(cid, "Você não é premium.") end if getPlayerStorageValue(cid, 141029) > os.time () then return doPlayerSendCancel(cid, "Aguarde "..getPlayerStorageValue(cid, 141029) - os.time ().." para se teleportar novamente.") end local a = 10 for i = 1, 9 do a = a - 1 addEvent(doCreatureSay, i*1000, cid, "" ..a.."", TALKTYPE_ORANGE_1) addEvent(doSendMagicEffect, i*1000, getThingPos(cid), efeito) addEvent(doPlayerSetNoMove, 10*1000, cid, false) end teleport_thing(cid, pos, 10, 141029, 30) return true end