Ir para conteúdo

lol08

Artesão
  • Total de itens

    145
  • Registro em

  • Última visita

Tudo que lol08 postou

  1. Quero botar a ball com id :2392 Abaixo Catch system local skill25 = 25 -- Mude aqui a chance de capiturar local skill50 = 50-- Mude aqui a chance de capiturar local skill75 = 75 -- Mude aqui a chance de capiturar local skill100 = 100 -- Mude aqui a chance de capiturar local ballcatch = { --id normal, id da ball shiy [2394] = {cr = 10, on = 24, off = 23, ball = 11826, send = 47, typeee = "normal"}, --alterado v2.9 \/ [2391] = {cr = 20, on = 198, off = 197, ball = 11832, send = 48, typeee = "great"}, --Moon v3.1 \/ [2393] = {cr = 30, on = 202, off = 201, ball = 11835, send = 47, typeee = "super"}, --Fast v3.1 \/ [2392] = {cr = 40, on = 200, off = 199, ball = 11829, send = 49, typeee = "ultra"}, --Heavy v3.2 \/ [12617] = {cr = 50, on = 204, off = 203, ball = 10975, send = 35, typeee = "saffari"}, --Saffari v3.1 \/ [12971] = {cr = 60, on = 193, off = 192, ball = 11737, send = 46, typeee = "love"}, --Love v3.2 \/ [13258] = {cr = 500, on = 193, off = 192, ball = 11740, send = 46, typeee = "master"}, --Master v3.2 \/ } function onUse(cid, item, frompos, item3, topos) local item2 = getTopCorpse(topos) if item2 == null then return true end if getItemAttribute(item2.uid, "catching") == 1 then return true end local name = string.lower(getItemNameById(item2.itemid)) --alterado v2.9 \/ name = string.gsub(name, "fainted ", "") name = string.gsub(name, "defeated ", "") name = doCorrectPokemonName(name) local x = pokecatches[name] local storage = newpokedex[doCorrectPokemonName(name)].stoCatch --alterado v2.9 \/ if getPlayerStorageValue(cid, storage) == -1 or not string.find(getPlayerStorageValue(cid, storage), ";") then setPlayerStorageValue(cid, storage, "normal = 0, great = 0, super = 0, ultra = 0, saffari = 0, love = 0, master = 0;") end if not x then return true end local owner = getItemAttribute(item2.uid, "corpseowner") if owner and isCreature(owner) and isPlayer(owner) and cid ~= owner then --alterado v2.5 doPlayerSendCancel(cid, "[Owner] Voce Nao Pode Capturar o Pokemon de outro Jogador!.") return true end local newidd = ballcatch[item.itemid].ball --alterado v2.9 local typeee = ballcatch[item.itemid].typeee local catchinfo = {} if getPlayerSkillLevel(cid, 2) <= 50 then ---- Skill Cathing 0 a 25 catchinfo.rate = ballcatch[item.itemid].cr + skill25 doPlayerSendTextMessage(cid, 19, "Catch Rate: [ball: "..ballcatch[item.itemid].cr.." + Bonus: "..skill25.."]") else if getPlayerSkillLevel(cid, 2) >= 51 then ---- Skill Cathing 26 a 50 catchinfo.rate = ballcatch[item.itemid].cr + skill50 doPlayerSendTextMessage(cid, 19, "Catch Rate: [ball: "..ballcatch[item.itemid].cr.." + Bonus: "..skill50.."]") else if getPlayerSkillLevel(cid, 2) >= 101 then ---- Skill Cathing 51 a 75 catchinfo.rate = ballcatch[item.itemid].cr + skill75 doPlayerSendTextMessage(cid, 19, "Catch Rate: [ball: "..ballcatch[item.itemid].cr.." + Bonus: "..skill75.."]") else if getPlayerSkillLevel(cid, 2) >= 150 then ---- Skill Cathing 76 a 100...... catchinfo.rate = ballcatch[item.itemid].cr + skill100 doPlayerSendTextMessage(cid, 19, "Catch Rate: [ball: "..ballcatch[item.itemid].cr.." + Bonus: "..skill100.."]") else catchinfo.rate = ballcatch[item.itemid].cr end end end end catchinfo.catch = ballcatch[item.itemid].on catchinfo.fail = ballcatch[item.itemid].off catchinfo.newid = newidd catchinfo.name = doCorrectPokemonName(name) catchinfo.topos = topos catchinfo.chance = x.chance doSendDistanceShoot(getThingPos(cid), topos, ballcatch[item.itemid].send) doRemoveItem(item.uid, 1) local d = getDistanceBetween(getThingPos(cid), topos) addEvent(doSendPokeBall, d * 70 + 100 - (d * 14) , cid, catchinfo, false, false, typeee) addEvent(doSendMagicEffect, (d * 70 + 100 - (d * 14)) - 100, topos, 3) return true end
  2. Gostaria de alguma técnica que botasse a pokebola tal apenas para premium por favor
  3. lol08

    TM PARA ERONDINO

    tm para erondino
  4. lol08

    erro aloot

    poxa mais esse seu ai cata tudo e tem uns players dizendo que ele clona stone
  5. lol08

    erro aloot

    function onLogin(cid) registerCreatureEvent(cid, "aloot_kill") return true end local stor = 7575 function autoloot(cid, target, pos) local function doStack(cid, itemid, new) local count = getPlayerItemCount(cid, itemid) if (count > 100) then count = count - math.floor(count / 100) * 100 end local newCount = count + new if (count ~= 0) then local find = getPlayerItemById(cid, true, itemid, count).uid if (find > 0) then doRemoveItem(find) else newCount = new end end local item = doCreateItemEx(itemid, newCount) doPlayerAddItemEx(cid, item, true) end local function scanContainer(cid, uid, list) for k = (getContainerSize(uid) - 1), 0, -1 do local tmp = getContainerItem(uid, k) if (isInArray(list, tmp.itemid)) then if isItemStackable(tmp.itemid) and (getPlayerItemCount(cid, tmp.itemid) > 0) then doStack(cid, tmp.itemid, tmp.type) else local item = doCreateItemEx(tmp.itemid, tmp.type) doPlayerAddItemEx(cid, item, true) end doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, 'Looted ' .. tmp.type .. ' ' .. getItemNameById(tmp.itemid) .. '.') doRemoveItem(tmp.uid) elseif isContainer(tmp.uid) then scanContainer(cid, tmp.uid, list) end end end local items = {} for i = getTileInfo(pos).items, 1, -1 do pos.stackpos = i table.insert(items, getThingFromPos(pos)) end if (#items == 0) then return end local corpse = -1 for _, item in ipairs(items) do local name = getItemName(item.uid):lower() if name:find(target:lower()) then corpse = item.uid break end end if (corpse ~= -1) and isContainer(corpse) then scanContainer(cid, corpse, tostring(getPlayerStorageValue(cid, stor)):gsub('_', ''):explode(',')) end end function onKill(cid, target, lastHit) if not isPlayer(target) then local infos = getPlayerStorageValue(cid, stor) if (infos == -1) then return true end local list = tostring(infos):explode(',') if (#list == 0) then return true end addEvent(autoloot, 150, cid, getCreatureName(target), getCreaturePosition(target)) end return true end
  6. lol08

    erro aloot

    [01/05/2015 22:05:07] [Error - CreatureScript Interface] [01/05/2015 22:05:07] In a timer event called from: [01/05/2015 22:05:07] data/creaturescripts/scripts/aloot.lua:onKill [01/05/2015 22:05:07] Description: [01/05/2015 22:05:07] data/lib/050-function.lua:234: attempt to index a boolean value [01/05/2015 22:05:07] stack traceback: [01/05/2015 22:05:07] data/lib/050-function.lua:234: in function 'getItemName' [01/05/2015 22:05:07] data/creaturescripts/scripts/aloot.lua:57: in function <data/creaturescripts/scripts/aloot.lua:8>
  7. alguem sabe?
  8. poxa vida ridiculo isso server sem duel system nem rola hoje em dia ne ?
  9. Teria como adicionar duel system em um server tipo erondino entre outros que tem distro ? se tiver como , tutorial por favor!
  10. Galera a base erondino v16 esta com um erro na master ball quando vc captura o pokemon com ela , ele simplesmente nao sai da pokebola e fica dando esse erro 4/2015 13:52:22] [Error - Action Interface] [28/04/2015 13:52:22] data/actions/scripts/goback.lua:onUse [28/04/2015 13:52:22] Description: [28/04/2015 13:52:22] data/actions/scripts/goback.lua:19: attempt to index field '?' (a nil value) [28/04/2015 13:52:22] stack traceback: [28/04/2015 13:52:22] data/actions/scripts/goback.lua:19: in function <data/actions/scripts/goback.lua:10> Meu Goback.lua
  11. lol08

    Cooldown Bar

    adoraria , sim . Smowking poderia me ajudar com alguns erros que ta dando la ?
  12. lol08

    Cooldown Bar

    Galera alguem poderia me explicar como adc Cooldown Bar no erondino 15 por favor
  13. Como ADC Poke nessa base
  14. [25/04/2015 22:01:43] [Error - Action Interface] [25/04/2015 22:01:43] In a timer event called from: [25/04/2015 22:01:43] data/actions/scripts/goback.lua:onUse [25/04/2015 22:01:43] Description: [25/04/2015 22:01:43] data/lib/some functions.lua:1710: attempt to compare two boolean values [25/04/2015 22:01:43] stack traceback: [25/04/2015 22:01:44] data/lib/some functions.lua:1710: in function <data/lib/some functions.lua:1694>
  15. [17/04/2015 12:09:36] [Error - Action Interface] [17/04/2015 12:09:36] In a timer event called from: [17/04/2015 12:09:36] data/actions/scripts/goback.lua:onUse [17/04/2015 12:09:36] Description: [17/04/2015 12:09:36] data/lib/some functions.lua:1710: attempt to compare two boolean values [17/04/2015 12:09:36] stack traceback: [17/04/2015 12:09:36] data/lib/some functions.lua:1710: in function <data/lib/some functions.lua:1694> [17/04/2015 12:09:36] [Error - Action Interface] [17/04/2015 12:09:36] In a timer event called from: [17/04/2015 12:09:36] data/actions/scripts/goback.lua:onUse [17/04/2015 12:09:36] Description: [17/04/2015 12:09:36] (luaGetCreatureMaxHealth) Creature not found [17/04/2015 12:10:26] [Error - CreatureScript Interface] [17/04/2015 12:10:26] data/creaturescripts/scripts/look.lua:onLook [17/04/2015 12:10:26] Description: [17/04/2015 12:10:26] data/lib/some functions.lua:149: attempt to concatenate local 'rank' (a nil value) [17/04/2015 12:10:26] stack traceback: [17/04/2015 12:10:26] data/lib/some functions.lua:149: in function 'getPlayerDesc' [17/04/2015 12:10:26] data/creaturescripts/scripts/look.lua:218: in function <data/creaturescripts/scripts/look.lua:89> [17/04/2015 12:09:36] [Error - Action Interface] [17/04/2015 12:09:36] In a timer event called from: [17/04/2015 12:09:36] data/actions/scripts/goback.lua:onUse [17/04/2015 12:09:36] Description: [17/04/2015 12:09:36] data/lib/some functions.lua:1710: attempt to compare two boolean values [17/04/2015 12:09:36] stack traceback: [17/04/2015 12:09:36] data/lib/some functions.lua:1710: in function <data/lib/some functions.lua:1694> [17/04/2015 11:29:24] [Error - CreatureScript Interface] [17/04/2015 11:29:24] In a timer event called from: [17/04/2015 11:29:24] data/creaturescripts/scripts/aloot.lua:onKill [17/04/2015 11:29:24] Description: [17/04/2015 11:29:24] data/lib/050-function.lua:239: attempt to index a boolean value [17/04/2015 11:29:24] stack traceback: [17/04/2015 11:29:24] data/lib/050-function.lua:239: in function 'getItemName' [17/04/2015 11:29:24] data/creaturescripts/scripts/aloot.lua:57: in function <data/creaturescripts/scripts/aloot.lua:8> up
  16. pode me mandar o link nao achei >)
  17. aconselha eu usar qual base entao?
  18. mais eles so vendem linux
  19. Galera queria empresas de dicados descente com preço adequado internacional ou nacional tanto faz com proteçao ddos
  20. Galera queria empresas de dicados descente com preço adequado internacional ou nacional tanto faz com proteçao ddos
  21. http://www.xtibia.com/forum/topic/233057-pda-pokemon-dash-advanced-open-source-2015/ Gostaria de saber tambem se vale apena botar essa base pra frente function onAttack(cid, target) if not isCreature(cid) then return false end if isPlayer(target) then if #getCreatureSummons(target) >= 1 then doMonsterSetTarget(cid, getCreatureSummons(target)[1]) end end return true end --function onAttack(cid, target) -- if not isCreature(cid) then --return false --end --if isPlayer(target) then -- if #getCreatureSummons(target) >= 1 then -- doMonsterSetTarget(cid, getCreatureSummons(target)[1]) --end --end --return true --end
  22. Erros [14/12/2014 18:12:37] [Error - CreatureScript Interface] [14/12/2014 18:12:37] data/creaturescripts/scripts/atk.lua:onAttack [14/12/2014 18:12:37] Description: [14/12/2014 18:12:37] (luaDoMonsterSetTarget) Monster not found [Esse Erro acontece na arena pvp e nao sei como arrumar, se tirar esse script buga o ataque dos pokemons "Wild" eles começam a atacar o jogador ao inves de Seu Pokemon] Alguns Erros vão surgir durante o Jogo: Erro no Exp.lua Erro Na hora de Evoluir (Automatico) erro de MaxHealth, algo assim Bugs gerais Os Pokemons Uniques Fazem Crashar o Servidor (Se voce pegar uma Pokeball Unique e jogar no Teleport, o Servidor Crasha) Os Pokemon Lock Fazem Crashar o Servidor (Se voce pegar uma Pokeball Lock e jogar no Teleport, o Servidor Crashar) Pode ser que + Alguns Atributos do PDA fazem Crashar o Servidor e estamos a Procura Disso Retirem o NPC SR.SPLIT (Segundo Andar do CP)
  • Quem Está Navegando   0 membros estão online

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