[Encerrado] Criei Vip 3

[Bolten 0]

gente ajudem

criei vip 3 como crio comando para comprar vip 3

rep+

[TendoTensei 2]

va em talckations/script e cri um arquivo com o nome de systemvip10.lua e add isso

 

function onSay(cid, words, param)
if(words == "!buyvip10") then
local price = 30
if doPlayerRemoveItem(cid, 5785, 1) == TRUE then
local days = 30
local daysvalue = days * 24 * 60 * 60
local storageplayer = getPlayerStorageValue(cid, 13542)
local timenow = os.time()
if getPlayerStorageValue(cid, 13542) - os.time() <= 0 then
time = timenow + daysvalue
else
time = storageplayer + daysvalue
end
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Foram adicionados ".. days .." dias de VIP 10 no seu character.")
setPlayerStorageValue(cid, 13542, time)
local quantity = math.floor((getPlayerStorageValue(cid, 13542) - timenow)/(24 * 60 * 60))
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você compro 30 dias de VIP 30 e agora você têm ".. quantity .." dias de VIP 30.")
else
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você não tem "..price.." barras de ouro.")
end
elseif(words == "!vipdays10") then
local timenow = os.time()
local quantity = math.floor((getPlayerStorageValue(cid, 13542) - timenow)/(24 * 60 * 60))
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você tem ".. (quantity < 0 and 0 or quantity) .." dias de VIP 30.")
elseif(words == "/checkvip10") then
if getPlayerAccess(cid) == 5 then
if not param then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.")
end
local player = getPlayerByName(param)
local pid = getPlayerByNameWildcard(param)
if(not pid or (isPlayerGhost(pid) and getPlayerGhostAccess(pid) > getPlayerGhostAccess(cid))) then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player with this name doesn\'t exist or is offline.")
return TRUE
end
local timenow = os.time()
local quantity = math.floor((getPlayerStorageValue(player, 13542) - timenow)/(24 * 60 * 60))
doPlayerPopupFYI(cid, "O jogador tem ".. (quantity < 0 and 0 or quantity) .." dias de VIP 30 no character.")
return TRUE
end
elseif(words == "/addvip10") then
if getPlayerAccess(cid) == 5 then
local t = string.explode(param, ",")
if not t[2] then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.")
end
local player = getPlayerByName(t[1])
local days = t[2]
local pid = getPlayerByNameWildcard(t[1])
if(not pid or (isPlayerGhost(pid) and getPlayerGhostAccess(pid) > getPlayerGhostAccess(cid))) then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player with this name doesn\'t exist or is offline.")
return TRUE
end
local daysvalue = days*3600*24
local storageplayer = getPlayerStorageValue(player, 13542)
local timenow = os.time()
local time = storageplayer <= 0 and (timenow + daysvalue) or (storageplayer + daysvalue)
doPlayerSendTextMessage(player, MESSAGE_INFO_DESCR, "Foram adicionados "..days.." dias de VIP 30.")
setPlayerStorageValue(player, 13542, time)
local quantity = math.floor((getPlayerStorageValue(player,13542) - timenow)/(3600*24))
doPlayerSendTextMessage(player, MESSAGE_INFO_DESCR, "Você comprou "..quantity.." dias de VIP 30.")
end
elseif(words == "/delvip10") then
if getPlayerAccess(cid) == 5 then
local dec = MESSAGE_INFO_DESCR
if(param == "") then return TRUE,doPlayerSendTextMessage(cid,18,"Command param required.")end
local C,t = {},string.explode(param, ",")
C.pos = getPlayerPosition(cid)
C.uid = getCreatureByName(t[1])
C.time = ((tonumber(t[2]) == nil) and 1 or tonumber(t[2]))*3600*24 --Tempo da vip por dia.
C.days = (tonumber(t[2]) == nil) and 1 or tonumber(t[2]) --Dias de vip.
local pid = getPlayerByNameWildcard(t[1])
if(not pid or (isPlayerGhost(pid) and getPlayerGhostAccess(pid) > getPlayerGhostAccess(cid))) then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player with this name doesn\'t exist or is offline.")
return TRUE
end
if(getPlayerStorageValue(C.uid,13542) < C.time)then
doPlayerSendTextMessage(cid,dec,'O jogador '..t[1]..' não possui '..C.days..' dias de vip.')
else
doPlayerSendTextMessage(cid,dec,'Você removeu '..C.days..' dias de vip do player '..t[1]..'.')
setPlayerStorageValue(C.uid,13542,getPlayerStorageValue(C.uid,13542)-C.time)
end
doSendMagicEffect(C.pos, math.random(28,30))
end
end
return TRUE
end

 

 

e em tacklaction.xml add isso

 

<talkaction words="!vipdays10;!buyvip10;/checkvip10;/addvip10;/delvip10" script="systemvip10.lua"/>

 

Com isso vc faz um npc ou quest q de esse item Medal Of Honor (id - 5785) e com esse item o player fala !buyvip10 e recebe 30 dias ae so falto os tiles q agr não estou com o script pronto aqui fico devendo..

Editado Janeiro 9, 2012 por TendoTensei

[Bolten 0]

po vlws rep+ ae

 

mas gostaria assim sem ganha esses itens so fala buyvip e entra na area tem como

[TendoTensei 2]

if doPlayerRemoveItem(cid,2160, 1000000) == TRUE then

 

 

 

Tente so mudar essa linha

Onde esta o 2160 é o id do dinheiro e onde está 10000000 é a quantidade

Se não funcionar me avise estou no aprendizado de script ainda

[Stigal 584]

A questão neste tópico de suporte foi encerrada por falta de respostas. Este tópico está fechado e foi movido para Suporte - Tópicos Sem Resposta.

+ Caso a dúvida não tenha sido resolvida você poderá criar outro tópico solicitando ajuda.
* Lembre-se que é permitido dar UP no tópico a cada 24 horas para assim o destacar e manter movimentado.