gabrielbsales

Isso, ajeitei, obrigado.

No boost.lua(data/actions/scripts) procure isso: if (boost + boosts) >= 10 then if pbs[myball.itemid] then --alterado v1.9 doTransformItem(myball.uid, pbs[myball.itemid]) end end E em baixo bote isso: if (boost + boosts) == 50 or boost == 50 then if pbs[myball.itemid] then --alterado v1.9 doItemSetAttribute(myball.uid, "aura", "red aura") end end Onde ta Red Aura bote a aura que quiser: red aura, blue aura, green aura, yellow aura, white aura, gray aura, cyan aura, purple aura, orange aura.

Pda By Slicer 1.9.1, Desculpem os erros. Ja consertei.

No look.lua(data/creaturescripts/scripts), antes do ultimo return true adicione isso: if isSummon(thing.uid) and not isPlayer(thing.uid) then --summons local boostlevel = getItemAttribute(getPlayerSlotItem(getCreatureMaster(thing.uid), 8).uid, "boost") or 0 if getCreatureMaster(thing.uid) == cid then local myball = getPlayerSlotItem(cid, 8).uid table.insert(str, "You see your "..string.lower(getCreatureName(thing.uid))..".") if boostlevel > 0 then table.insert(str, "\nBoost level: +"..boostlevel..".") end table.insert(str, "\nHit points: "..getCreatureHealth(thing.uid).."/"..getCreatureMaxHealth(thing.uid)..".") table.insert(str, "\n"..getPokemonHappinessDescription(thing.uid)) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, table.concat(str)) else doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You see a "..string.lower(getCreatureName(thing.uid))..".\nIt belongs to "..getCreatureName(getCreatureMaster(thing.uid))..".") end return false end

^^

ops, esqueci de dizer pra registrar a function, kk. Faz assim, vai em data/lib e abre some functions.lua, lá depois do ultimo end bota isso: function getPlayerInArea(fromPos, toPos) -- by jhon992 local online = getPlayersOnline() local players = {} for i=1, #online do if isInArea(getPlayerPosition(online[i]), fromPos, toPos) then players[#players+1] = online[i] end end return players end

Zipter, obrigado. É que meu server está completamente modificado(os sistemas) ai tive que botar em um PDA 1.9.1 e esqueci de muita coisa.

Se for pda, mude seu pokeexp.lua(data/creaturescripts/scripts) para isso: local function playerAddExp(cid, exp) doPlayerAddExp(cid, exp) doSendAnimatedText(getThingPos(cid), exp, 215) end local Exps = { {minL = 1, maxL = 150, multipler = 64}, {minL = 151, maxL = 200, multipler = 6}, {minL = 201, maxL = 250, multipler = 5}, {minL = 250, maxL = 300, multipler = 3}, {minL = 301, maxL = 400, multipler = 3}, {minL = 401, maxL = 500, multipler = 3}, } local function calculaExp(cid, expTotal) if not isPlayer(cid) then return 0 end local expFinal = expTotal local flag = false for _, TABLE in pairs(Exps) do if getPlayerLevel(cid) >= TABLE.minL and getPlayerLevel(cid) <= TABLE.maxL then flag = true expFinal = (expFinal * TABLE.multipler) break end end if not flag then expFinal = expFinal * 0.1 end --lvl 300+ return math.floor(expFinal) end function onDeath(cid, corpse, deathList) if isSummon(cid) or not deathList or getCreatureName(cid) == "Evolution" then return true end --alterado v1.8 -------------Edited Golden Arena------------------------- if getPlayerStorageValue(cid, 22546) == 1 then setGlobalStorageValue(22548, getGlobalStorageValue(22548)-1) if corpse.itemid ~= 0 then doItemSetAttribute(corpse.uid, "golden", 1) end --alterado v1.8 end if getPlayerStorageValue(cid, 22546) == 1 and getGlobalStorageValue(22548) == 0 then local wave = getGlobalStorageValue(22547) for _, sid in ipairs(getPlayersOnline()) do if isPlayer(sid) and getPlayerStorageValue(sid, 22545) == 1 then if getGlobalStorageValue(22547) < #wavesGolden+1 then doPlayerSendTextMessage(sid, 20, "Wave "..wave.." will begin in "..timeToWaves.."seconds!") doPlayerSendTextMessage(sid, 28, "Wave "..wave.." will begin in "..timeToWaves.."seconds!") addEvent(creaturesInGolden, 100, GoldenUpper, GoldenLower, false, true, true) addEvent(doWave, timeToWaves*1000) elseif getGlobalStorageValue(22547) == #wavesGolden+1 then doPlayerSendTextMessage(sid, 20, "You have win the golden arena! Take your reward!") doPlayerAddItem(sid, 2160, getPlayerStorageValue(sid, 22551)*1) --premio setPlayerStorageValue(sid, 22545, -1) doTeleportThing(sid, getClosestFreeTile(sid, posBackGolden), false) setPlayerRecordWaves(sid) end end end if getGlobalStorageValue(22547) == #wavesGolden+1 then endGoldenArena() end end --------------------------------------------------- /\/\ local givenexp = getWildPokemonExp(cid) if givenexp > 0 then for a = 1, #deathList do local pk = deathList[a] local list = getSpectators(getThingPosWithDebug(pk), 30, 30, false) if isCreature(pk) then local expTotal = math.floor(playerExperienceRate * givenexp * getDamageMapPercent(pk, cid)) expTotal = calculaExp(pk, expTotal) local party = getPartyMembers(pk) if isInParty(pk) and getPlayerStorageValue(pk, 4875498) <= -1 then expTotal = math.floor(expTotal/#party) for i = 1, #party do if isInArray(list, party[i]) then playerAddExp(party[i], expTotal) end end else playerAddExp(pk, expTotal) end end end end if isNpcSummon(cid) then local master = getCreatureMaster(cid) doSendMagicEffect(getThingPos(cid), getPlayerStorageValue(cid, 10000)) doCreatureSay(master, getPlayerStorageValue(cid, 10001), 1) doRemoveCreature(cid) return false end if corpse.itemid ~= 0 then --alterado v1.8 doItemSetAttribute(corpse.uid, "level", getPokemonLevel(cid)) doItemSetAttribute(corpse.uid, "gender", getPokemonGender(cid)) end return true end

Você substituiu todos os scripts corretamente? Aqui funciona normalmente. Quanto ao look, ajeitei, copie novamente.

Tem sim, puxe e bote de novo.

Copie o codigo novamente, esqueci do end hehe.

Cria um arquivo.lua chamado: Alavancaleague e bota isso nele: function onUse(cid, item, fromPosition, itemEx, toPosition) local area1 = {x = daquix, y = daquiy, z = daquiz} local area2 = {x = ateaquix, y = ateaquiy, z = ateaquiz} local posquest = {x = questx, y = questy, z = questz} if #getPlayerInArea(area1, area2) > 0 then doTeleportThing(cid, fromPosition) doPlayerSendTextMessage(cid, 20, "Tem um player na quest!") return true else doTeleportThing(cid, posquest) doPlayerSendTextMessage(cid, 20, "Nao ha ninguem, voce pode entrar!") return false end end Certo, agora é só você configurar. Daquix = Extremo esquerdo da quest. Daquiy = Extremo de cima da quest. Daquiz = Altura da quest. Ateaquix = Extremo direito da quest. Ateaquiy = Extremo de baixo da quest. Ateaquiz = Altura da quest. Questx = Posição onde o player vai parar. Questy = Posição onde o player vai parar. Questz = Posição onde o player vai parar. No Actions.xml(data/actions) adiciona isso: <action actionid="51999" event="script" value="Alavancaleague.lua"/> PS: 51999 é o action id, tem que tá disponivel.

Bom, esse ditto system: -Copia o pokemon e o balanceia sem necessidade de puxa-lo. -Copias Habilidades... Primeiramente, vá no some functions.lua - Localizado na pasta lib. E adicione isto no final(depois do ultimo end): Bom, essas são as funções de transformar e destransformar. Agora, vá no order.lua - Localizado no actions/scripts. E procure por: -------- TRANSFORM ---------- Apague tudo aqui dentro, até o: -------- LIGHT -------------- Ali dentro, bote: Pronto, ditto ja está tranformando, agora falta o !revert, para isso vá em talkactions/scripts e crie um arquivo(.lua) com nome de dittorevert, e dentro coloque: Agora, no talkactions.xml adicione esta linha: <talkaction words = "!revert;/revert" hide="yes" event = "script" value = "dittorevert.lua"/> Se fizer tudo corretamente, funcionará normalmente. Gif: Créditos: Gabrielbsales(sou op faço tudo solo)

Manda seu look.lua

Resolvido.

Resolvido, rep+ aos dois. Se puderem, como faço para checar a quantidade de players em uma área?

Entendi. No caso eu faria assim(depois de botar a function). EX: local area1 = {x = 1, y = 2} local area2 = (x = 4,y = 6} if getmonsterinarea(area1, area2) == "Mewtwo" then {script} end Edit: Quais modificaçõs devo fazer?

Bom, não sei o que é feito que acontece esse bug na distro: [26/03/2014 17:34:20] [Error - CreatureScript Interface] [26/03/2014 17:34:20] data/creaturescripts/scripts/exp2.0.lua:onStatsChange [26/03/2014 17:34:20] Description: [26/03/2014 17:34:20] data/creaturescripts/scripts/exp2.0.lua:471: attempt to index field '?' (a nil value) [26/03/2014 17:34:20] stack traceback: [26/03/2014 17:34:20] data/creaturescripts/scripts/exp2.0.lua:471: in function <data/creaturescripts/scripts/exp2.0.lua:63> Linha 470 ate 475: if combat ~= COMBAT_PHYSICALDAMAGE then doCreatureAddHealth(cid, -math.abs(valor), 3, combats[damageCombat].cor) else doCreatureAddHealth(cid, -math.abs(valor), 3, races[getMonsterInfo(getCreatureName(cid)).race].cor) addEvent(doDoubleHit, 1000, attacker, cid, valor, races) --alterado v1.6 end O que é isso?

Cordenadas. Posições do mapa, não é relativo a nada.

Quero assim, ao der use em uma alavanca no chão, quero que cheque se de 11, 10 até 20, 22 tem um Mewtwo Vivo.

Bom, o duel do meu pda está com um bug, quando em duel, qualquer ataque causa lag ao servidor. Segue informações: Bug Distro: [Error - CreatureScript Interface] [25/03/2014 23:06:53] In a timer event called from: [25/03/2014 23:06:53] data/creaturescripts/scripts/exp2.0.lua:onStatsChange [25/03/2014 23:06:53] Description: [25/03/2014 23:06:53] (luaGetPlayerSlotItem) Player not found Exp2.lua(local do bug ta assim): local item = getPlayerSlotItem(getCreatureMaster(cid), 8) or getPlayerSlotItem(cid, 8) Tentei assim(mas não deu): local item = getPlayerSlotItem(getCreatureMaster(cid), 8) or getPlayerSlotItem(cid, 8) Como resolve isso?

#edit: tinha botado merda kk Vai em data/lib e abre o some functions.lua Procura por: function ehMonstro(cid) Apaga o que tive até o primeiro "end" e bota assim: function ehMonstro(cid) local eh = false if not isSummon(cid) and not ehNPC(cid) and not isPlayer(cid) then eh = true end return eh end

Como faço para checar se em um area há um pokemon com tal nome vivo?

Esse servidor ainda tá online?

Obrigado aos 2, zeref, obrigado pela idéia, fiz assim no x-defense, com recomendação sua já, rep+ aos 2.