talkaction [Talkaction] !buypremium Day's

[Zmovir 41]

Eae galera do xtibia vim aqui trazer 2 scripts meu de !buypremium

tava meio parado mais

vamos ao primeiro script

 

primeiramente va em talkactions.xml e adcione essa tag

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

 

depois vá em /data/talkactions/scripts cria um arquivo buypremium e adcione isso dentro

 

function onSay(cid, words, param)

 

if(param == '') then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Digite !buypremium quantidade, exemplo !buypremium 20.")

return true

end

 

if getPlayerPremiumDays(cid) >= 360 then doPlayerPopupFYI(cid, "Você nao pode mais comprar premium") return TRUE end

local s = tonumber(param)

local cost = 100 -- quanto ira custar cada dia

if doPlayerRemoveMoney(cid, s * cost) == TRUE then

doPlayerAddPremiumDays(cid, s)

doPlayerPopupFYI(cid, "Você comprou "..s.." dias de premium por "..cost.." gp's cada um")

end

return TRUE

end

 

Como funciona você fala !buypremium 5 compra 5 dias de premium por 100 gps cada um preço editavel no script

 

Vamos ao segundo script de buypremium

 

em talkactions.xml adcione essa tag:

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

 

em /data/talkactions/scripts cria um arquivo e renomeie para buypremium e adcione isso dentro

function onSay(cid, words, param)

 

local t = {

[1] = {price = 1000}, --- dias de premium, quanto ira custar

[7] = {price = 7000},

[15] = {price = 15000},

[30] = {price = 30000},

[50] = {price = 50000},

[100] = {price = 100000},

}

 

local a = t[tonumber(param)]

 

if (param == "info") then

for days, price in pairs(t) do

text = "Dias: "..days..", Preço: "..price..","

doPlayerPopupFYI(cid, text)

end

end

 

if not a then

doPlayerSendTextMessage(cid,19,"Digite !buypremium info, para ver a quantidade para ser comprada")

return TRUE end

 

if getPlayerPremiumDays(cid) >= 360 then doPlayerPopupFYI(cid, "Você nao pode mais comprar premium") return TRUE end

 

if doPlayerRemoveMoney(cid,a.price) then

doPlayerAddPremiumDays(cid, a)

doPlayerSendTextMessage(cid,25,"Você comprou "..a.." dias de premium account por "..a.price.."!")

else

doPlayerSendCancel(cid,"Você precisa "..a.price.." para comprar "..a.." premium days")

end

return TRUE

end

 

 

Explicando

[1] =  {price = 1000}, --- dias de premium, quanto ira custar
[7] = {price = 7000},
[15] = {price = 15000},
[30] = {price = 30000},
[50] = {price = 50000},
[100] = {price = 100000},
}

 

em colchetes e quantos dias ira custar, price e alto explicativo para você adcionar mais opçoes do adcionar uma nova linha!

 

se gostaram REP+

Editado Abril 28, 2012 por Zmovir

[Makelin1 89]

hmm muito bom zmovir !!

seu script mt bom mesmo como sempre vc trazendo seus scripts pra nos do xtibia

ate

[Zmovir 41]

Obrigado. sempre tento trazer algo novo