Ajuda Com Action Aki Rapido E Facio

[h3online 1]

eu tenho uma action de vip ai eu quero q soh de para usar ne player 1 ves até terminar o tempo de vip 30 dias

ajente n pode trocar de codigo porque se n apaga quem ja ta de vip entaum.

 

Tá certo ???

 

else doPlayerSendCancel(cid,"Vc ja é vip.") end

 

Quero adicionar a esse cod abaixo para q o player n possa usar a parada se n buga e corrijam pra min algum erro.

 

local text = ""
local effect = 50

function onUse(cid, item, frompos, item2, topos)

if item.itemid == 7535 then
text = "Você recebeu 30 dias de VIP e todos os ADDONS!"
effect = 27
end


if doPlayerAddPremiumDays(cid, 30) then


doPlayerSetVocation(cid, getPlayerVocation(cid)+8)

doPlayerAddOutfit(cid, 128, 1)
doPlayerAddOutfit(cid, 136, 1)
setPlayerStorageValue(cid,10001,1)

doPlayerAddOutfit(cid, 128, 2)
doPlayerAddOutfit(cid, 136, 2)
setPlayerStorageValue(cid,10002,1)

doPlayerSay(cid, text, 16)
doRemoveItem(item.uid, 1)
if effect < 31 then
doSendMagicEffect(getPlayerPosition(cid), 27)
end
end
return 1
end

Editado Outubro 12, 2008 por h3online

[tibiaa4e 86]

bem se eu entendi bem vai ficar assim

 

local text = "Você recebeu 30 dias de VIP e todos os ADDONS!"
local effect = 50
--effect = 27
local vipstatus = getPlayerStorageValue(cid,10001)

function onUse(cid, item, frompos, item2, topos)


if item.itemid == 7535 then
	if vipstatus = -1 then
	doPlayerAddPremiumDays(cid, 30)
	doPlayerSetVocation(cid, getPlayerVocation(cid)+8)
	doPlayerAddOutfit(cid, 128, 1)
	doPlayerAddOutfit(cid, 136, 1)
	setPlayerStorageValue(cid,10001,1)
	doPlayerAddOutfit(cid, 128, 2)
	doPlayerAddOutfit(cid, 136, 2)
	doCreatureSay(cid, text, TALKTYPE_ORANGE_1)
	doRemoveItem(item.uid, 1)
		if effect < 31 then
		doSendMagicEffect(getPlayerPosition(cid), 27)
		end
		   else
		   doPlayerSendCancel(cid,"Vc ja é vip.")
	   end
end
return 1
end

 

 

Mudei algumas coisas pois você declaro duas vezes a variavel texto e duas vezes a effect

(local é variavel q funciona apenas no script)

 

E mudei a função doplayersay pq depois do tfs 0.2.0 fico desse jeito...

Editado Outubro 12, 2008 por tibiaa4e

[h3online 1]

vlw ae vo testa se funcionar eu edito.