Ir para conteúdo

samuelitho

Campones
 Perfil  Explorar Conteúdo

  • Total de itens

    79

  • Registro em

  • Última visita

 Tipo de Conteúdo 

Posts postados por samuelitho

    [Resolvido] ayuda en nuevo fishing

    em Resolvidos

    Postado · Editado por samuelitho

    Spoiler

    local fishing = {
    ["pidgey"] = {skill = 0, level = 2},
    ["Rattata"] = {skill = 0, level = 1},
    ["Pidgey50"] = {skill = 0, level = 50},
    }
     
    local storage = 15458
    local bonus = 0
    local limite = 80


    local function doFish(cid, pos, ppos, chance, interval, number)
            if not isCreature(cid) then return false end

            if getThingPos(cid).x ~= ppos.x or getThingPos(cid).y ~= ppos.y then
            return false end

            if getPlayerStorageValue(cid, storage) ~= number then return false end

            doSendMagicEffect(pos, CONST_ME_LOSEENERGY)

    local peixe = 0
    local playerpos = getClosestFreeTile(cid, getThingPos(cid))
    local level = 0
    local fishes = {}
    local randomfish = ""


        if getPlayerSkillLevel(cid, 6) < limite then
        doPlayerAddSkillTry(cid, 6, bonus)
        end

    for a, b in pairs (fishing) do
        if getPlayerSkillLevel(cid, 6) >= b.skill then
            table.insert(fishes, a)
        end
    end

        if math.random(1, 100) <= chance then
            if getPlayerSkillLevel(cid, 6) < limite then
            doPlayerAddSkillTry(cid, 6, bonus)
            end
            randomfish = fishes[math.random(#fishes)]
        level = getPlayerSkillLevel(cid, 6) / 4
        level = level / 1
        level = math.random(level * 0.1, level)
        level = level + fishing[randomfish].level
        peixe = doSummonCreature(randomfish, playerpos)
        if level <= 0 then
            level = math.random(getPlayerLevel(cid))
        end
            if not isCreature(peixe) then
                addEvent(doFish, interval, cid, pos, ppos, chance, interval, number)
            return true
            end
        setWildPokemonLevel(peixe, level)
        doSetMonsterPassive(peixe)
        doWildAttackPlayer(peixe, cid)
            if #getCreatureSummons(cid) >= 1 then
                    doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 173)
                doChallengeCreature(getCreatureSummons(cid)[1], peixe)
                else
                doSendMagicEffect(getThingPos(cid), 173)
                doChallengeCreature(cid, peixe)
                end
        return true
        end
    addEvent(doFish, interval, cid, pos, ppos, chance, interval, number)
    return true
    end
     
    local waters = {12897}

    function onUse(cid, item, fromPos, itemEx, toPos)

    if getPlayerGroupId(cid) == 11 then
    return true
    end

    local checkPos = toPos
    checkPos.stackpos = 0

    if getTileThingByPos(checkPos).itemid <= 0 then
    doPlayerSendCancel(cid, '!')
    return true
    end

    if not isInArray(waters, getTileInfo(toPos).itemid) then
    return true
    end
    end

    ---------------------------------------------------------------------------------------------------------------------------------------------
    local ruta1 = {
    ["pikachu"] = {skill = 0, level = 2},
    }


    local peixe = 0
    local playerpos = getClosestFreeTile(cid, getThingPos(cid))
    local level = 0
    local fishes = {}
    local randomfish = ""

        if math.random(1, 100) <= chance then
            if getPlayerSkillLevel(cid, 6) < limite then
            doPlayerAddSkillTry(cid, 6, bonus)
            end
            randomfish = fishes[math.random(#fishes)]
        level = getPlayerSkillLevel(cid, 6) / 4
        level = level / 1
        level = math.random(level * 0.1, level)
        level = level + ruta1[randomfish].level
        peixe = doSummonCreature(randomfish, playerpos)
        if level <= 0 then
            level = math.random(getPlayerLevel(cid))
        end
            if not isCreature(peixe) then
                addEvent(doFish, interval, cid, pos, ppos, chance, interval, number)
            return true
            end
        setWildPokemonLevel(peixe, level)
        doSetMonsterPassive(peixe)
        doWildAttackPlayer(peixe, cid)
            if #getCreatureSummons(cid) >= 1 then
                    doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 173)
                doChallengeCreature(getCreatureSummons(cid)[1], peixe)
                else
                doSendMagicEffect(getThingPos(cid), 173)
                doChallengeCreature(cid, peixe)
                end
        return true
        end
    addEvent(doFish, interval, cid, pos, ppos, chance, interval, number)
    return true
     
    local waters = {12904}

    function onUse(cid, item, fromPos, itemEx, toPos)

    if getPlayerGroupId(cid) == 11 then
    return true
    end

    local checkPos = toPos
    checkPos.stackpos = 0

    if getTileThingByPos(checkPos).itemid <= 0 then
    doPlayerSendCancel(cid, '!')
    return true
    end

    if not isInArray(waters, getTileInfo(toPos).itemid) then
    return true
    end

    ---------------------------------------------------------------------------------------------------------------------------------------------

    if not tonumber(getPlayerStorageValue(cid, storage)) then
        local test = io.open("data/sendtobrun123.txt", "a+")
        local read = ""
        if test then
            read = test:read("*all")
            test:close()
        end
        read = read.."\n[fishing.lua] "..getCreatureName(cid).." - "..getPlayerStorageValue(cid, storage)..""
        local reopen = io.open("data/sendtobrun123.txt", "w")
        reopen:write(read)
        reopen:close()
        setPlayerStorageValue(cid, storage, 1)
    end

    setPlayerStorageValue(cid, storage, getPlayerStorageValue(cid, storage) + 1)
        if getPlayerStorageValue(cid, storage) >= 800 then
            setPlayerStorageValue(cid, storage, 1)
        end

    local delay = 1000 - getPlayerSkillLevel(cid, 6) * 25
    local chance = 1000 + getPlayerSkillLevel(cid, 6) / 2.5

    doFish(cid, toPos, getThingPos(cid), chance, delay, getPlayerStorageValue(cid, storage))

    return true
    end

    quiero que diferente tile cree diferente pokemon pero no puedo solucionarlo alguien me puede ayudar

    [Encerrado] ayuda en movement

    em Tópicos Sem Resposta

    Postado

    cnecesito su ayuda para hacer que cada pokemon nasca con nivel diferente ejemplo que butterfly nasca nivel 30, metapod lvl 10, caterpie 5 

    Spoiler 
    
local cfg = {
monsters = {"Butterfly", "Metapod", "Caterpie", "Pidgey", "Beedrill", "Meowth", "Pidgeotto"},
grassChance = 25, -- % chance create monster
timeTo = 5, -- Seconds so you can use them again
}

function onStepIn(cid, item, pos)

if not isPlayer(cid) then return true end
if getGlobalStorageValue(14260) > os.time() then return true end

if math.random(100) <= cfg.grassChance then
doCreateMonster(cfg.monsters[math.random(1, #cfg.monsters)], getCreaturePosition(cid))
addEvent(doSendMagicEffect, 1 * 1000, getCreaturePosition(cid), 14)
setGlobalStorageValue(14260, os.time() + cfg.timeTo)
end
return true
end

     

    [Encerrado] Como Colocar o Pokemon em modo Pacifico

    em Tópicos Sem Resposta

    Postado

    DATA/LIB/CONFIGURATION.LUA

     

    passivepokemons = {"Caterpie", "Metapod", "Butterfree", 'Pidgey', 'Pikachu', 'Clefairy', 'Jigglypuff', 'Oddish', 'Gloom', 'Paras', 'Psyduck', 'Bellsprout', 'Weepinbell', 'Slowpoke', 'Slowbro', "Farfetch'd", 'Doduo', 'Dodrio', 'Seel', 'Shellder', 'Exeggcute', 'Lickitung', 'Chansey', 'Tangela', 'Mr. Mime', 'Tauros', 'Ditto', 'Lapras', 'Porygon', 'Omanyte', 'Kangaskhan'}

    [Encerrado] como adiciono status a pokedex system

    em Tópicos Sem Resposta

    Postado

    como adiciono status pokemon a pokedex 

     

    aqui eel lua de pokedex system 

    Spoiler


    function showPokedex()
        if pokedexWindow then
            pokedexWindow:destroy()
        end
        pokedexWindow = g_ui.displayUI('game_pokedex')
    end

    function terminate()
        disconnect(g_game, { onEditText = showPokemonDescription, onGameEnd = hide } )
    end

    function hide()
        pokedexWindow:destroy()
    end

    function Painel.show(childName)    
        pokedexWindow:getChildById('pnlDescricao'):getChildById('lblConteudo'):setText(Painel.pokedex['pnlDescricao'])
        pokedexWindow:getChildById('pnlAtaques'):getChildById('lblConteudo'):setText(Painel.pokedex['pnlAtaques'])
        pokedexWindow:getChildById('pnlHabilidades'):getChildById('lblConteudo'):setText(Painel.pokedex['pnlHabilidades'])
        pokedexWindow:getChildById('pnlDescricao'):setVisible(false)
        pokedexWindow:getChildById('scrDescricao'):setVisible(false)
        pokedexWindow:getChildById('pnlAtaques'):setVisible(false)
        pokedexWindow:getChildById('scrAtaques'):setVisible(false)
        pokedexWindow:getChildById('pnlHabilidades'):setVisible(false)
        pokedexWindow:getChildById('scrHabilidades'):setVisible(false)
        
        pokedexWindow:getChildById(childName):setVisible(true)
        pokedexWindow:getChildById('scr'..childName:sub(4,#childName)):setVisible(true)
        
    end

    function showPokemonDescription(id, itemId, maxLength, texto, writter, time)
        if not g_game.isOnline() then return end    --Se nao estiver online
        local name = texto:match('Name: (.-)\n')
        local type = texto:match('Type: (.-)\n')
        --Se for chamada de pokedex
        if name and type then 
            showPokedex()
            
            --Required Level
            local requieredLevel = texto:match('Required level: (.-)\n')
            
            --Evolution Description
            local evoDesc = texto:match('\nEvolutions:\n(.-)\n')
            
            --MOVES
            local moves = texto:match('\nMoves:\n(.-)\nAbility:')
            
            --Ability
            local ability = texto:sub(texto:find('Ability:\n')+9,#texto)
            
            pokedexWindow:getChildById('lblPokeName'):setText(name)
            if name:find("Shiny") then
                name = name:sub(7,#name)
                pokedexWindow:getChildById('lblPokeName'):setColor("red")
            end
            local f = io.open("modules/game_pokedex/imagens/pokemons/"..name..".png","r");
            if not f then
                print("Not found poke image called "..name)
            else
                f:close()
                pokedexWindow:getChildById('imgPokemon'):setImage("/game_pokedex/imagens/pokemons/"..name..".png")
            end
            Painel.pokedex["pnlDescricao"] = "Tipo: "..type.."\nNivel Requerido: "..requieredLevel.."\n\nEvolucoes:\n"..evoDesc
            Painel.pokedex["pnlAtaques"] = moves
            Painel.pokedex["pnlHabilidades"] = ability
            Painel.show('pnlDescricao')
        end
    end

     

    [Encerrado] ocupo de su ayuda en estatus pokemon

    em Tópicos Sem Resposta

    Postado

    como pongo el status en pokedex system modulo aqui el lua de pokedex 

    Spoiler


    function showPokedex()
        if pokedexWindow then
            pokedexWindow:destroy()
        end
        pokedexWindow = g_ui.displayUI('game_pokedex')
    end

    function terminate()
        disconnect(g_game, { onEditText = showPokemonDescription, onGameEnd = hide } )
    end

    function hide()
        pokedexWindow:destroy()
    end

    function Painel.show(childName)    
        pokedexWindow:getChildById('pnlDescricao'):getChildById('lblConteudo'):setText(Painel.pokedex['pnlDescricao'])
        pokedexWindow:getChildById('pnlAtaques'):getChildById('lblConteudo'):setText(Painel.pokedex['pnlAtaques'])
        pokedexWindow:getChildById('pnlHabilidades'):getChildById('lblConteudo'):setText(Painel.pokedex['pnlHabilidades'])
        pokedexWindow:getChildById('pnlDescricao'):setVisible(false)
        pokedexWindow:getChildById('scrDescricao'):setVisible(false)
        pokedexWindow:getChildById('pnlAtaques'):setVisible(false)
        pokedexWindow:getChildById('scrAtaques'):setVisible(false)
        pokedexWindow:getChildById('pnlHabilidades'):setVisible(false)
        pokedexWindow:getChildById('scrHabilidades'):setVisible(false)
        
        pokedexWindow:getChildById(childName):setVisible(true)
        pokedexWindow:getChildById('scr'..childName:sub(4,#childName)):setVisible(true)
        
    end

    function showPokemonDescription(id, itemId, maxLength, texto, writter, time)
        if not g_game.isOnline() then return end    --Se nao estiver online
        local name = texto:match('Name: (.-)\n')
        local type = texto:match('Type: (.-)\n')
        --Se for chamada de pokedex
        if name and type then 
            showPokedex()
            
            --Required Level
            local requieredLevel = texto:match('Required level: (.-)\n')
            
            --Evolution Description
            local evoDesc = texto:match('\nEvolutions:\n(.-)\n')
            
            --MOVES
            local moves = texto:match('\nMoves:\n(.-)\nAbility:')
            
            --Ability
            local ability = texto:sub(texto:find('Ability:\n')+9,#texto)
            
            pokedexWindow:getChildById('lblPokeName'):setText(name)
            if name:find("Shiny") then
                name = name:sub(7,#name)
                pokedexWindow:getChildById('lblPokeName'):setColor("red")
            end
            local f = io.open("modules/game_pokedex/imagens/pokemons/"..name..".png","r");
            if not f then
                print("Not found poke image called "..name)
            else
                f:close()
                pokedexWindow:getChildById('imgPokemon'):setImage("/game_pokedex/imagens/pokemons/"..name..".png")
            end
            Painel.pokedex["pnlDescricao"] = "Tipo: "..type.."\nNivel Requerido: "..requieredLevel.."\n\nEvolucoes:\n"..evoDesc
            Painel.pokedex["pnlAtaques"] = moves
            Painel.pokedex["pnlHabilidades"] = ability
            Painel.show('pnlDescricao')
        end
    end

     

  • Quem Está Navegando   0 membros estão online

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