Ir para conteúdo

FlamesAdmin

Infante
  • Total de itens

    1550
  • Registro em

  • Última visita

  • Dias Ganhos

    19

Tudo que FlamesAdmin postou

  1. @WhiteZiiinposta o código ai dessas traps
  2. Cara eu tive um problema parecido com esse recentemente, só que não obtive muitas "respostas" de como ele fazia isso, só me disseram que o tal fazia uma "modificação" no client e mais umas coisas que derrubava o servidor, e a informação que me passaram foi que o problema era no game.cpp, enviava tantos pacotes que derrubava o servidor
  3. Ué, server sem mapa?
  4. Creio que o erro pode estar no account_id dos samples, qual o account_id 1?
  5. @SirDubstepputs é vdd @rafaelzeraúnico link que ta funcionando é esse
  6. Isso dai é bem complicado de fazer e nunca vi em sites disponibilizados com essa parada de escolher poke no site, faz uma ilhazinha inicial com os pokes que podem escolher
  7. Estranho, da esse erro em todas balls?
  8. local btype = "normal" ----Tipo de Pokeball local pokemon = "Gengar" ----Pokémon que virá no bau local storage = 90024 -- storage para nao pegar o premio + de 1 vez function onUse(cid, item, frompos, item2, topos) if pokemon == "" then return true end if getPlayerStorageValue(cid, storage) <= 0 then addPokeToPlayer(cid, pokemon, 0, nil, btype) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Voce pegou seu "..pokemon.."!!") ----Mensagem que o player receberá doSendMagicEffect(getThingPos(cid), 29) doSendMagicEffect(getThingPos(cid), 27) doSendMagicEffect(getThingPos(cid), 29) --doPlayerAddItem(cid, 2160, 100) -----CASO QUEIRA ADICIONAR ALGUMA RECOMPENSA A MAIS setPlayerStorageValue(cid, storage, 1) else doPlayerSendCancel(cid, "Você já pegou seu Pokémon") ---Mensagem q sera enviada quando o player tentar fazer a quest + de 1 vez end return TRUE end <action actionid="11376" event="script" value="bau_Teste.lua"/> Funcionando perfeitamente
  9. Precisa de level pra ganhar esse pokemon?
  10. Não vem nada ou não acontece nada?
  11. 100 pra mais é 100% 100 pra menos não é 100%
  12. local starterpokes = { ["Gengar"] = {x = 900, y = 1472, z = 6}, } local btype = "normal" function onUse(cid, item, frompos, item2, topos) if getPlayerLevel(cid) > 5 then 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 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!") addPokeToPlayer(cid, pokemon, 0, nil, btype, true) doSendMagicEffect(getThingPos(cid), 29) doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) doSendMagicEffect(getThingPos(cid), 27) doSendMagicEffect(getThingPos(cid), 29) return TRUE end Tenta ai
  13. local btype = "cherish" local pokemon = "Gengar" local storage = 31526 --storage function onUse(cid, item, frompos, item2, topos) if pokemon == "" then return true end if getPlayerStorageValue(cid, storage) <= 0 then addPokeToPlayer(cid, pokemon, 0, nil, btype) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Parabéns! Você ganhou um "..pokemon.."!!") doSendMagicEffect(getThingPos(cid), 29) doSendMagicEffect(getThingPos(cid), 27) doSendMagicEffect(getThingPos(cid), 29) setPlayerStorageValue(cid, storage, 1) else doPlayerSendCancel(cid, "Você já pegou seu Pokémon") end return TRUE end Tenta assim
  14. local starterpokes = { ["Gengar"] = {x = XXX, y = YYY, z = ZZZ}, } local btype = "cherish" function onUse(cid, item, frompos, item2, topos) if getPlayerLevel(cid) > 30 then 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 doPlayerSendTextMessage(cid, 27, "Parabéns! Você ganhou um pokémon") addPokeToPlayer(cid, pokemon, 0, nil, btype, true) doSendMagicEffect(getThingPos(cid), 29) return TRUE end Testa ai, não esquece de configurar a posição do baú
  15. Aaaah vdd, confundi com uma da Mega Gardevoir elseif spell == "Healing Wish" then local min = (getCreatureMaxHealth(cid) * 50) / 100 local max = (getCreatureMaxHealth(cid) * 60) / 100 local function doHealArea(cid, min, max) local amount = math.random(min, max) if (getCreatureHealth(cid) + amount) >= getCreatureMaxHealth(cid) then amount = -(getCreatureHealth(cid)-getCreatureMaxHealth(cid)) end if getCreatureHealth(cid) ~= getCreatureMaxHealth(cid) then doCreatureAddHealth(cid, amount) doSendAnimatedText(getThingPosWithDebug(cid), "+"..amount.."", 65) end end local pos = getPosfromArea(cid, selfArea1) local n = 0 doHealArea(cid, min, max) while n < #pos do n = n+1 thing = {x=pos[n].x,y=pos[n].y,z=pos[n].z,stackpos=253} local pid = getThingFromPosWithProtect(thing) doSendMagicEffect(pos[n], 13) if isCreature(pid) then if isSummon(cid) and (isSummon(pid) or isPlayer(pid)) then if canAttackOther(cid, pid) == "Cant" then doHealArea(pid, min, max) end elseif ehMonstro(cid) and ehMonstro(pid) then doHealArea(pid, min, max) end end end if isSummon(cid) then doCureBallStatus(getPlayerSlotItem(getCreatureMaster(cid), 8).uid, "all") end doCureStatus(cid, "all") local uid = checkAreaUid(getThingPosWithDebug(cid), selfArea1, 1, 1) for _,pid in pairs(uid) do if isCreature(pid) then if ehMonstro(cid) and ehMonstro(pid) and pid ~= cid then doCureStatus(pid, "all") elseif isSummon(cid) and ((isSummon(pid) and canAttackOther(cid, pid) == "Cant") or (isPlayer(pid) and canAttackOther(cid, pid) == "Cant")) and pid ~= cid then if isSummon(pid) then doCureBallStatus(getPlayerSlotItem(getCreatureMaster(pid), 8).uid, "all") end doCureStatus(pid, "all") end end end
  16. elseif spell == "Stored Power" then local tempo = 2 doSendMagicEffect(getThingPosWithDebug(cid), 54) addEvent(function() if not isCreature(cid) then return true end doMoveInArea2(cid, 54, selfArea1, PSYCHICDAMAGE, min, max, spell) doMoveInArea2(cid, 54, selfArea1, PSYCHICDAMAGE, 0, 0, spell) end, tempo*1000) em local tempo = 2 você define o tempo que o efeito de dano em área irá sair, quase igual do PxG Healing Wish não lembro muito bem como funciona, sei que é praticamente a área é igual do DynamicPunch (exemplo) com aqueles efeitos de "sing colorido"
  17. elseif spell == "Moon Blast" then moonP = getThingPosWithDebug(cid) local ret = {} ret.id = 0 ret.cd = 5 ret.eff = 620 ret.spell = spell ret.cond = "Silence" doMoveInArea2(cid, 0, selfArea1, FAIRYDAMAGE, min, max, spell, ret) doSendMagicEffect({x = moonP.x + 1, y = moonP.y, z = moonP.z}, 621) Caso seu servidor não tenha o FAIRYDAMAGE, mude para PSYCHICDAMAGE ou psyDmg
  18. O Mega Steelix é um pokemon normal? Como o Dragonite? Não precisa do Steelix pra poder "evoluir"?
  19. @Otpokemonmysticmove o spr e dat da pasta encaminhada no rme, dai vai dar um erro no rme de client nao encontrado, dps só selecionar dnv
  20. pra cada icon de poke vc precisa adicionar no items.otb sendo o on = ball normal use = não pode ser movido off = pode ser movido
  21. veja se a masterball transforma em unique ou verifique se ela está como NÃO PODE SER MOVIDO no .spr .dat e items.otb No Object Builder a função é Não pode ser movido e no ItemEditor é Moveable (marque para que fique "movível")
  22. E também quando vc esta atacando com TARGET, se vc der move seu pokemon nao move
  23. abra o site por outro navegador
  • Quem Está Navegando   0 membros estão online

    • Nenhum usuário registrado visualizando esta página.
×
×
  • Criar Novo...