BlackTibia

No estás conectado. Conéctate o registrate

 » Open Tibia » Pedido de Scripts » 

pedido de bless invisible

pedido de bless invisible

#1 pedido de bless invisible el Sáb Mar 29, 2014 10:57 pm

david1997


Novato
Ola amigos de blacktibia

Les bengo a pedir una bless invisible que cueste 3 crystal coins y que se pueda adquirir con el comando !blessing, espero y me ayuden con esto y si pueden decirme en donde agregar los scripts :Dpliss soi nuevo.

#2 Re: pedido de bless invisible el Sáb Mar 29, 2014 11:19 pm

Kroxos


Estudiante
Te vas a la carpeta talkactions habre talkactions.xml y agregas esto:


Código:
<talkaction words="!buybless;/buybless;!bless;/bless" script="bless.lua" />


luego creas un lua llamado bless y agregas esto:

Código:
-- !blessing by artofwork
local bless = {1, 2, 3, 4, 5}
local cost = 30000
local maxlevel = 50000

function onSay(cid, words, param)
local lvl = getPlayerLevel(cid)
local new_cost = 30000
local target = getPlayerGUID(cid)


        for i = 1, table.maxn(bless) do
                if(getPlayerBlessing(cid, bless[i])) then
                        doPlayerSendCancel(cid, "Você já tem todas as blessings.")
                        return TRUE
                end
        end
       
        if (getPlayerLevel(cid) >= maxlevel)  then
                if(doPlayerRemoveMoney(cid, new_cost) == TRUE) then
                        for i = 1, table.maxn(bless) do
                        doPlayerAddBlessing(cid, bless[i])
                  end
                        doPlayerSendTextMessage(cid,18,"Você acaba de comprar uma blessing, e com ela veio um AOL, use-o pois a bless pode falhar")
                  local bp = doPlayerAddItem(cid, 2173, 1)
                else
                doPlayerPopupFYI(cid, "Você precisa de "..cost.." para comprar uma bless.")
                end
       
        elseif(getPlayerLevel(cid) < maxlevel) then
                if(doPlayerRemoveMoney(cid, cost) == TRUE) then
                        for i = 1, table.maxn(bless) do
                        doPlayerAddBlessing(cid, bless[i])
                        end
                        doPlayerSendTextMessage(cid,18,"Você acaba de comprar uma blessing, e com ela veio um AOL, use-o pois a bless pode falhar")
                  local bp = doPlayerAddItem(cid, 2173, 1)
                else
                        doPlayerPopupFYI(cid, "Você precisa de "..cost.." para comprar uma bless.")
                end
        end
        return FALSE
end


Aqui Tienes Men Si Te Sirvio Dame +Rep

http://tibiadarkblue.activo.mx/

#3 Re: pedido de bless invisible el Dom Mar 30, 2014 2:13 am

david1997


Novato
Okey amigo vere si me funciona te todas maneras si no me sirvio te doi tu rep por intentar gracias

#4 Re: pedido de bless invisible Hoy a las 6:14 pm

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.

 

¿Quién está en línea?

En total hay 0 usuarios en línea: 0 Registrados, 0 Ocultos y 0 Invitado :: 1 Motor de búsqueda

Usuarios navegando en este foro: Ninguno
Motores de búsqueda : bing

Forum Statistics

Nuestros miembros han públicado un total de posts en temas.
Actualmente hay miembros registrados.
Démosle la bienvenida al miembro más reciente,
La mayor cantidad de usuarios en línea ha sido de .