• TibiaFace

    Tibiaface | Una comunidad Open Tibia donde encontras : mapas, scripts, Otserver, npc y amigos etc ...

    .
    demo menumenu

    Afiliados



    Votar:

    [CreatureEvents] MultipleExp System por player online + bonus por player premium

    Ver el tema anterior Ver el tema siguiente Ir abajo  Mensaje (Página 1 de 1.)

    [Admin] God Maya

    avatar
    Administrador
    Administrador
    Hola usuarios de tibiaface hoy le daremos uso a esta funsion: getPlayersOnline()


    Bueno este script trata stage online player experiencia, ustedes diran que es eso?

    Bueno consiste en que mas player online la experiencia ira aumentando por ejemplo:

    Observemos la primer línea del scripts:

    Configuracion escribió:if(#players >= 1 and #players <= 49) then ---> aqui no esta diciendo que que si en el servidor hay entre 1 y 45 player conectado la experiencia sera ( la condiciones nos las muestra ahi abajo)
    for _, pid in ipairs(players) do
    if isPremium(pid) then
    doPlayerSetRate(pid, SKILL__LEVEL, 1.5) ---> si el player es premium recive 1.5 exp adicional
    else
    doPlayerSetRate(pid, SKILL__LEVEL, 1.0) -- si el player no es premium el player 1.0 de exp adicional
    end
    end


    hecha la explicación del script como funciona comencemos con la instalación:


    Nos vamos a:

    data/creaturescripts/scripts

    copiamos cualquier archivo y renombramos por MultipleExpLogin.lua y pegamos esto dentro:

    Código:
    local config = getBooleanFromString(getConfigInfo('experienceStages'))


    function onLogin(cid)
    registerCreatureEvent(cid, "MultipleExp")
    if(config) then
          exp = getExperienceStage(getPlayerLevel(cid), getVocationInfo(getPlayerVocation(cid)).experienceMultiplier)
    end
    local players = getPlayersOnline()

    if(#players >= 1 and #players <= 49) then
        for _, pid in ipairs(players) do
          if isPremium(pid) then
          doPlayerSetRate(pid, SKILL__LEVEL, 1.5)
          else
          doPlayerSetRate(pid, SKILL__LEVEL, 1.0)
        end
    end
    if isPremium(cid) then
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "--[MultipleExp System]--\nPlayers Online : "..#players.."\nSeu Exp Foi Atualizado Para : ("..exp.."x + 0.5x)")
    else
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "--[MultipleExp System]--\nPlayers Online : "..#players.."\nSeu Exp Foi Atualizado Para : ("..exp.."x)")
    end
    elseif(#players >= 50 and #players <= 99) then
        for _, pid in ipairs(players) do
          if isPremium(pid) then
          doPlayerSetRate(pid, SKILL__LEVEL, 1.6)
          else
          doPlayerSetRate(pid, SKILL__LEVEL, 1.1)
        end
    end
    if isPremium(cid) then
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "--[MultipleExp System]--\nPlayers Online : "..#players.."\nSeu Exp Foi Atualizado Para : ("..exp.."x + 0.5x + 0.1x)")
    else
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "--[MultipleExp System]--\nPlayers Online : "..#players.."\nSeu Exp Foi Atualizado Para : ("..exp.."x + 0.1x)")
    end
    elseif(#players >= 100 and #players <= 149) then
        for _, pid in ipairs(players) do
          if isPremium(pid) then
          doPlayerSetRate(pid, SKILL__LEVEL, 1.7)
          else
          doPlayerSetRate(pid, SKILL__LEVEL, 1.2)
        end
    end
    if isPremium(cid) then
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "--[MultipleExp System]--\nPlayers Online : "..#players.."\nSeu Exp Foi Atualizado Para : ("..exp.."x + 0.5x + 0.2x)")
    else
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "--[MultipleExp System]--\nPlayers Online : "..#players.."\nSeu Exp Foi Atualizado Para : ("..exp.."x + 0.2x)")
    end
    elseif(#players >= 150 and #players <= 199) then
        for _, pid in ipairs(players) do
          if isPremium(pid) then
          doPlayerSetRate(pid, SKILL__LEVEL, 1.8)
          else
          doPlayerSetRate(pid, SKILL__LEVEL, 1.3)
        end
    end
    if isPremium(cid) then
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "--[MultipleExp System]--\nPlayers Online : "..#players.."\nSeu Exp Foi Atualizado Para : ("..exp.."x + 0.5x + 0.3x)")
    else
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "--[MultipleExp System]--\nPlayers Online : "..#players.."\nSeu Exp Foi Atualizado Para : ("..exp.."x + 0.3x)")
    end
    elseif(#players >= 200 and #players <= 249) then
        for _, pid in ipairs(players) do
          if isPremium(pid) then
          doPlayerSetRate(pid, SKILL__LEVEL, 1.9)
          else
          doPlayerSetRate(pid, SKILL__LEVEL, 1.4)
        end
    end
    if isPremium(cid) then
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "--[MultipleExp System]--\nPlayers Online : "..#players.."\nSeu Exp Foi Atualizado Para : ("..exp.."x + 0.5x + 0.4x)")
    else
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "--[MultipleExp System]--\nPlayers Online : "..#players.."\nSeu Exp Foi Atualizado Para : ("..exp.."x + 0.4x)")
    end
    elseif(#players >= 250) then
        for _, pid in ipairs(players) do
          if isPremium(pid) then
          doPlayerSetRate(pid, SKILL__LEVEL, 2.0)
          else
          doPlayerSetRate(pid, SKILL__LEVEL, 1.5)
        end
    end
    if isPremium(cid) then
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "--[MultipleExp System]--\nPlayers Online : "..#players.."\nSeu Exp Foi Atualizado Para : ("..exp.."x + 0.5x + 0.5x)")
    else
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "--[MultipleExp System]--\nPlayers Online : "..#players.."\nSeu Exp Foi Atualizado Para : ("..exp.."x + 0.5x)")
    end
    end
    return true
    end

    Luego añadimos esta tag en:

    data/creaturescripts/creaturescripts.xml

    Código:
    <event type="login" name="MultipleExp" event="script" value="MultipleExpLogin.lua"/>

    y listo ya tenemos el multiexperiencia con el numero de player online + bonus para player premium ya no necesitaran colocar doble exp.


    creditos:

    Emerson Henrique



    Ver perfil de usuario http://www.tibiaface.com

    ciaffa

    avatar
    Nuevo Miembro
    Nuevo Miembro
    muy bueno ese sistema !

    Ver perfil de usuario http://seriesvenez.blogspot.com

    Humox

    avatar
    Miembro
    Miembro
    tfs?

    Ver perfil de usuario

    Contenido patrocinado


    Ver el tema anterior Ver el tema siguiente Volver arriba  Mensaje (Página 1 de 1.)

    Permisos de este foro:
    No puedes responder a temas en este foro.