xTibia

.com
MA

!buyitem So Num Certo Level ! Versao 2.0

Por Makelin1, 19 de abr. de 2012 em Actions e Talkactions

versao
2.0
otserv
tibia
script
6
1.4k
Makelin1M
19 de abril de 2012 às 18:32

Opa fala xtibia vinho trazer a versao 2.0 do buyitem so num certo lvl so que nao ha nada denovo nela eu so dei uma pouca modificaçao so arrumei para ficar mas facil para botar o preço do item !!! entao vamos ao script

 

Primeira Coisa va em

 

otserv / data / talkactions / talkactions.xml !

 

e ponha essa tag la

 

<talkaction words="!buyitem" event="script" value="buyitem.lua"/>

 

agr va em

 

otserv / data / talkactions / script

 

agr renome um arquivo.lua chamado buyitem !

 

e add isso la dentro

 

--(Script By Smartbox www.xtibia.com Versao 2.0 Buyitem Num Certo Level)--

 

function onSay(cid, words, param)

 

local money = 20000 ---(Preço Do Item)---

local item = 2160 ---(Qual Item Sera Adicionado)---

 

if doPlayerRemoveMoney(cid, money) then

doCreatureSay(cid, "EBAA Comprei Tudo Que eu desejava", TALKTYPE_ORANGE_1)

doSendMagicEffect(getCreaturePosition(cid),35)

else

doPlayerSendCancel(cid, "Você não tem level ou dinheiro suficiente.")

end

end

 

 

pronto so isso

 

se gostou rep +

VildenV
19 de abril de 2012 às 18:36

Porque não editou o tópico antigo? colocando como atualização?

Irei fechar o outro tópico.

 

Versão '1.0' desse script do SmartBox:

 

Opa fala xtibia ?

 

vinho trazer 1 script 100 % meu !!

 

entao vamos la

 

Primeira Coisa va em

 

otserv / data / talkactions / talkactions.xml !

 

e ponha essa tag la

 

<talkaction words="!buyitem" event="script" value="buyitem.lua"/>

 

agr va em

 

otserv / data / talkactions / script

 

agr renome um arquivo.lua chamado buyitem !

 

e add isso la dentro

 

------- Script By {!} Smartbox www.xtibia.com {!} Duvidas Add Msn skyltda@hotmail.com -------

 

function onSay(cid, words, param)

 

local level = 25000 -----qual level

local item = 2160 -----item a ganhar

 

if doPlayerRemoveMoney(cid, 10000) == TRUE and getPlayerLevel(cid) >= level then --- quanto de dinheiro vai remover

doPlayerAddItem(cid,item,1)

doCreatureSay(cid, "EBAA Comprei Tudo Que eu desejava", TALKTYPE_ORANGE_1)

else

doPlayerSendCancel(cid, "Você não tem level ou dinheiro suficiente.")

end

end

 

Pois so isso pois e um script simples

 

pois to novo em scripting !

 

mas posso fazer ainda muitos e subir

 

Gostaria ? de fazer um pedido de scripting ? me add msn ai que eu fasso pra voce

 

Msn : skyltda@hotmail.com

 

Se Copiar O Scripting pesso que postem os creditos !

 

So isso Gostou REP ++

 

Creditos !

 

Smartbox ! : 100 % (EU)

 

SubwatS
19 de abril de 2012 às 23:39

comando sem utilidade até por que tem espalhados pela seção dezenas de comandos do gênero muito melhores, no qual se pode comprar vários items com o mesmo comando.

 

segue abaixo o script que fiz para a mesma função:

 

 

 

function onSay(cid, words, param)
local premium = "no" -- Apenas players premium accounts "yes" or "no"!?
if premium == "yes" and not isPremium(cid) then
return doPlayerPopupFYI(cid,"Apenas Premium Accounts Podem usar este comando!")
end

if param == "" then
doPlayerSendTextMessage(cid,18, "cada special custa 6 vip coins! 3 vip coins cada super insira um parametro.")
end

if param == "wand" or param == "special wand" then
if doPlayerRemoveItem(cid,11192,6) then
doPlayerAddItem(cid,7424,1)
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end

if param == "special buster" or param == "special ammo" then
if doPlayerRemoveItem(cid,11192,6) then
doPlayerAddItem(cid,11223,1)
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end

if param == "frags remover" or param == "frag remover" then
if doPlayerRemoveItem(cid,11192,3) then
doPlayerAddItem(cid,5957,1)
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce comprou um frags remover! ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end

if param == "experience potion" or param == "exp potion" then
if doPlayerRemoveItem(cid,11192,1) then
doPlayerAddItem(cid,7443,1)
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce comprou um experience potion! ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem  ".. getPlayerItemCount(cid, 11192) .." vip coins. ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end

if param == "super rune" or param == "vip sd" then
if doPlayerRemoveItem(cid,11192,6) then
doPlayerAddItem(cid,2270,1)
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce comprou um super rune! ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem  ".. getPlayerItemCount(cid, 11192) .." vip coins. ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end

if param == "super sword" or param == "super blade" then
if doPlayerRemoveItem(cid,11192,3) then
doPlayerAddItem(cid,7420,1)
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce comprou um super sword! ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end

if param == "super hat" or param == "super helmet" then
if doPlayerRemoveItem(cid,11192,3) then
doPlayerAddItem(cid,7902,1)
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce comprou um super hat! ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end

if param == "super armor" or param == "super armadura" then
if doPlayerRemoveItem(cid,11192,3) then
doPlayerAddItem(cid,7897,1)
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce comprou um super armor! ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end

if param == "super legs" or param == "super kilt" then
if doPlayerRemoveItem(cid,11192,3) then
doPlayerAddItem(cid,7896,1)
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce comprou um super legs! ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end

if param == "super boots" or param == "super shoes" then
if doPlayerRemoveItem(cid,11192,3) then
doPlayerAddItem(cid,7892,1)
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce comprou um super boots! ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end

if param == "super bow" or param == "super crossbow" then
if doPlayerRemoveItem(cid,11192,3) then
doPlayerAddItem(cid,8857,1)
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce comprou um super bow! ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end

if param == "super shield" or param == "super escudo" then
if doPlayerRemoveItem(cid,11192,3) then
doPlayerAddItem(cid,2542,1)
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce comprou um super shield! ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end

if param == "super axe" or param == "super hammer" then
if doPlayerRemoveItem(cid,11192,3) then
doPlayerAddItem(cid,7456,1)
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce comprou um super axe! ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end

if param == "super club" or param == "super club" then
if doPlayerRemoveItem(cid,11192,3) then
doPlayerAddItem(cid,7450,1)
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce comprou um super club! ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end

if param == "super arrow" or param == "super bolt" then
if doPlayerRemoveItem(cid,11192,3) then
doPlayerAddItem(cid,7850,1)
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce comprou um super arrow! ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end

if param == "super wand" or param == "super staff" then
if doPlayerRemoveItem(cid,11192,3) then
doPlayerAddItem(cid,7429,1)
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce comprou um super wand! ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end

if param == "axe" or param == "special axe" then
if doPlayerRemoveItem(cid,11192,6) then
doPlayerAddItem(cid,8925,1)
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end 

if param == "club" or param == "special club" then
if doPlayerRemoveItem(cid,11192,6) then
doPlayerAddItem(cid,8929,1)
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end 

if param == "sword" or param == "special sword" then
if doPlayerRemoveItem(cid,11192,6) then
doPlayerAddItem(cid,8932,1)
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end

if param == "arrow" or param == "special arrow" then
if doPlayerRemoveItem(cid,11192,6) then
doPlayerAddItem(cid,2352,1)
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end

if param == "bow" or param == "special bow" then
if doPlayerRemoveItem(cid,11192,6) then
doPlayerAddItem(cid,8853,1)
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end 

if param == "hat" or param == "special hat" then
if doPlayerRemoveItem(cid,11192,6) then
doPlayerAddItem(cid,6096,1)
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end 

if param == "armor" or param == "special armor" then
if doPlayerRemoveItem(cid,11192,6) then
doPlayerAddItem(cid,6095,1)
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end

if param == "addon" or param == "second addon" then
if doPlayerRemoveItem(cid,11192,6) then
doPlayerAddItem(cid,6527,1)
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end

if param == "legs" or param == "special legs" then
if doPlayerRemoveItem(cid,11192,6) then
doPlayerAddItem(cid,5918,1)
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end

if param == "boots" or param == "special boots" then
if doPlayerRemoveItem(cid,11192,6) then
doPlayerAddItem(cid,5462,1)
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end

if param == "backpack" or param == "special backpack" then
if doPlayerRemoveItem(cid,11192,6) then
doPlayerAddItem(cid,10518,1)
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end

if param == "shield" or param == "special shield" then
if doPlayerRemoveItem(cid,11192,6) then
doPlayerAddItem(cid,2527,1)
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end
if param == "super largartixa" or param == "super largatixa" then
if doPlayerRemoveItem(cid,11192,3) then
doPlayerAddItem(cid,12597,1)
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end
if param == "special luvinha" or param == "special luvinhas" then
if doPlayerRemoveItem(cid,11192,6) then
doPlayerAddItem(cid,12576,1)
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "voce nao tem vip coins suficientes para este item,voce tem apenas ".. getPlayerItemCount(cid, 11192) .." ")
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FLAMEAREA)
end
end    
end

JeanCristianJ
20 de abril de 2012 às 08:38

@smartbox

depois que voce nao conseguiu a vaga de estagiario voce esta fazendo de tudo para melhorar ,eu admiro isso mais tenta fazer scripts inovadores uns que ninguem tenha tlg?

se voce esta aprendendo agora a fazer scripts o seu script fico bom ^^ mais se vc ja é velho nessa area pode aposentar :s

 

@subwat

eu queria uma quest que só posso fazer se tiver vip coin na mochila ou qualquer outro id ,tipo a quest dos itens vip do rozin e eu queria um sistema de vip por clicar no item e vira vip ,ja que ninguem me ajuda eu vou ser um bom xtibiano e tentar fazer eu mesmo :( .........................(que vergonha mapper fazendo script).

VildenV
20 de abril de 2012 às 13:23

Jean tem uma área de pedidos e dúvidas de script, peça la.

por favor não vamos sair do assunto do tópico.

Makelin1M
20 de abril de 2012 às 17:16

@smartbox

depois que voce nao conseguiu a vaga de estagiario voce esta fazendo de tudo para melhorar ,eu admiro isso mais tenta fazer scripts inovadores uns que ninguem tenha tlg?

se voce esta aprendendo agora a fazer scripts o seu script fico bom ^^ mais se vc ja é velho nessa area pode aposentar :s

 

@subwat

eu queria uma quest que só posso fazer se tiver vip coin na mochila ou qualquer outro id ,tipo a quest dos itens vip do rozin e eu queria um sistema de vip por clicar no item e vira vip ,ja que ninguem me ajuda eu vou ser um bom xtibiano e tentar fazer eu mesmo :( .........................(que vergonha mapper fazendo script).

 

 

 

kra eu nao te entendi mas entendi +- seu pedido aki !! PRIMEIRA COISA ESSE SCRIPT NAO E MEU !! Pq eu uso esse script no meu ot

 

primeiro va em

 

data / movements / scripts / renome qualqer arquivo.lua para viptille e adicione isso tudo la dentro

 

function onStepIn(cid, item, position, fromPosition)

 

local config = {

msgDenied = "Você precisa ser vip.",

msgWelcome = "Bem-Vindo a Area Vip!."

}

 

if getPlayerStorageValue(cid, 20191) - os.time() <= 0 then

doTeleportThing(cid, fromPosition, true)

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, config.msgDenied)

doSendMagicEffect(getThingPos(cid), CONST_ME_MAGIC_BLUE)

return TRUE

end

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, config.msgWelcome)

return TRUE

end

 

agr va em data / movements / movements.xml

 

e add esse tag la

 

<movevent type="StepIn" actionid="20191" event="script" value="viptille.lua"/>

 

agr va em data / actions / scripts / renome qualqer arquivo.lua para addvip

 

e adicione isso tudo la dentro

 

function onUse(cid, item, fromPosition, itemEx, toPosition)

 

local config={

removeOnUse = "yes" -- remover quando usar ("yes" or "no")

}

 

local days = 30 -- dias que serão adicionados

local daysvalue = days * 24 * 60 * 60

local storageplayer = getPlayerStorageValue(cid, 20191)

local timenow = os.time()

 

if getPlayerStorageValue(cid, 20191) - os.time() <= 0 then

time = timenow + daysvalue

else

time = storageplayer + daysvalue

end

 

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Foram adicionados ".. days .." dias de VIP no seu character.")

setPlayerStorageValue(cid, 20191, time)

local quantity = math.floor((getPlayerStorageValue(cid, 20191) - timenow)/(24 * 60 * 60))

doSendMagicEffect(getPlayerPosition(cid), math.random(28,30))

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você tem ".. quantity .." dias de VIP restantes.")

if (config.removeOnUse == "yes") then

doRemoveItem(item.uid, 1)

end

 

return TRUE

end

 

agr va em data / actions / actions.xml e add essa tag la

 

<action itemid="6567" script="addvip.lua"/>

 

so isso se ajudei + rep

 

 

Jean tem uma área de pedidos e dúvidas de script, peça la.

por favor não vamos sair do assunto do tópico.

 

concordo com isso vilden ! eu so dei ajuda ele pq eu sei o script ;D Mas seria em pedidos de scripts mesmo !