• TibiaFace

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

    .
    demo menumenu

    Afiliados



    Votar:

    [Aporte] Bless TFS 1.2+

    Compartir:

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

    1Thắc mắc [Aporte] Bless TFS 1.2+ el Mar Jul 31, 2018 9:29 pm

    TeDragonni

    avatar
    Nuevo Miembro
    Nuevo Miembro
    Bueno En El server 11.49 de malucooo posteado por [GOD MAYA] no funcionan los scripts que encontre aqui asi realize estos
    el primero es un item X que al clickarle les da bless mas no se remueve:

    crean un scripts xnombre.lua y colocan eso

    Código:
    function onUse(cid, item)
    local p = Player(cid)

          -- VERIFICAR SI TIENE BLESS
    if(p:hasBlessing(1) and p:hasBlessing(2) and p:hasBlessing(3) and p:hasBlessing(4) and p:hasBlessing(5) and p:hasBlessing(6)) then
    return doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You have already been blessed by the gods.") and doSendMagicEffect(getCreaturePosition(cid), 3)
    end

    -- COLOCAR BLESS
    for i = 1, 8 do
    p:addBlessing(i,1)
    doSendMagicEffect(getCreaturePosition(cid), 47)
    doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You have been blessed by the gods!")
    end

    return true
    end

    y la tag en actions seria asi :
    Código:
    <action itemid="xxxx" script="xnombre.lua"/>


    ahora para hacerlo un talkaction
    crean un script xnombre.lua y colocan eso
    Código:
    function getCost(level)
    if level <= 30 then
    return 2000*5
    elseif level >= 120 then
    return 10000*5
    else
    return ((level - 20) * 200 * 5)
    end
    end

    function onSay(cid, words, param)
    local p = Player(cid)
    local cost = getCost(getPlayerLevel(cid))
    if(not(isPlayerPzLocked(cid))) then
    if(p:hasBlessing(1) and p:hasBlessing(2) and p:hasBlessing(3) and p:hasBlessing(4) and p:hasBlessing(5) and p:hasBlessing(6)) then
    p:sendCancelMessage("You have already been blessed by the gods.")
    return false
    end
    if(p:removeMoneyNpc(cost)) then
    for b = 1,8 do
    p:addBlessing(b,1)
    end
    p:getPosition():sendMagicEffect(50)
    p:sendTextMessage(19, "You have been blessed by the gods!")
    else
    p:sendCancelMessage("You need "..cost.." gold coins to buy all blessings.")
    end
    else
    p:sendCancelMessage("You can't buy bless, when you are in a battle.")
    end
    return false
    end

    y la tag en talkaction seria asi:
    Código:
    <talkaction words="!bless" script="xnombre.lua"/>

    espero les sirva

    OBS: Lo que le cambie fue que en las anteriores versiones solo tienen 6 bless y pues en esta tiene 8 por eso el >(for b = 1,8 )< y pues despues para que las añada se la añadiria una "," y un "1" asi "p:addBlessing(b,1)"

    Ver perfil de usuario

    2Thắc mắc Re: [Aporte] Bless TFS 1.2+ el Miér Ago 01, 2018 11:53 am

    [Admin] God Maya

    avatar
    Administrador
    Administrador
    buen aporte +1 (y)



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

    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.

     

    BienvenidosTibiaFace es una comunidad de Open Tibia. Para participar debes estar registrado (click para Regístrate).