Banner com Efeitos

	seuserver.com.br	DESCRIÇÃO: ANUNCIE AQUI neste countdown e dê maior visibilidade ao seu lançamento \| Fórum Otserv \| Downloads \| Tutoriais \| IA Especializada para otserv \| Lista de Servidores \| mais de 10 anos de conteúdos!	INICIA EM:

Duvidas em .lua sobre if premium > 0

Postado Agosto 12, 2015 9 anos

Eu gostaria de perguntar uma coisa que creio eu seria basica aqui, mais que não estou achando um tutorial em pt-br, estou praticando .lua e gostaria de fazer uma certa exceção para premiuns, eu gostaria de saber como eu faria para fazer para se a quantidade de premium do player for maior que 0 ele ir para uma variavel e se for free ir para variavel free, gostaria de saber assim

if premium > 0 - se for maior que 0 ele ir para uma certa variavel, gostaria de saber até o end do if

seria assim no caso se for free o catch dele será menor, irá para variável de menor chance, agora se for p.a irá para variavel onde é maior a chance de catch do pokemon, também gostaria de saber como eu poderia fazer o script fluir normalmente após eu fazer ele passar para variavel Premium.

Caso precisarem do script :

------- SE FOR PREMIIUM USA AQUI---------
local ballcatch = {
	--id normal, id da ball shiy
	[2394] = {cr = 4, on = 193, off = 192, ball = {11826, 11737}, send = 47, typeee = "normal", boost = "0"},  --alterado v1.9  \/
	[2391] = {cr = 5, on = 198, off = 197, ball = {11832, 11740}, send = 48, typeee = "great", boost = "0"},
	[2393] = {cr = 8, on = 202, off = 201, ball = {11835, 11743}, send = 46, typeee = "super", boost = "0"},
	[2392] = {cr = 16, on = 200, off = 199, ball = {11829, 11746}, send = 49, typeee = "ultra", boost = "0"},
	[12617] = {cr = 7, on = 204, off = 203, ball = {10975, 12621}, send = 35, typeee = "saffari", boost = "0"}, 
	[12832] = {cr = 100000, on = 23, off = 24, ball = {12826, 12829}, send = 181, typeee = "dark", boost = "50"},
}

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

	local item2 = getTopCorpse(topos)

	if item2 == null then
		return true
	end

	if getItemAttribute(item2.uid, "catching") == 1 then
		return true
	end

	if getItemAttribute(item2.uid, "golden") and getItemAttribute(item2.uid, "golden") == 1 then
		return doPlayerSendCancel(cid, "You can't try to catch a pokemon in the Golden Arena!")
	end

	local name = string.lower(getItemNameById(item2.itemid))
	name = string.gsub(name, "fainted ", "")
	name = string.gsub(name, "defeated ", "")
	name = doCorrectPokemonName(name)

	local x = pokecatches[name]
	if not x then
		return true
	end

	local shinys = {"Shiny Alakazam", "Shiny Scyther", "Shiny Electivire", "Shiny Magmortar", "Shiny Salamence", "Shiny Magmar", "Shiny Mantine", "Shiny Gyarados", "Shiny Snorlax", "Shiny Onix", "Shiny Electabuzz", "Shiny Pidgeot", "Aerodactyl", "Ditto", "Shiny Gengar"}
	if item.itemid == 12832 and isInArray(shinys, name) then
		return doPlayerSendCancel(cid, "Você não pode catar esse pokemon com a master ball!")
	end

	local storage = newpokedex[name].stoCatch
	if getPlayerStorageValue(cid, storage) == -1 or not string.find(getPlayerStorageValue(cid, storage), ";") then  --alterado v1.9
		setPlayerStorageValue(cid, storage, "normal = 0, great = 0, super = 0, ultra = 0, saffari = 0, dark = 0;")             --alterado v1.9
	end

	local owner = getItemAttribute(item2.uid, "corpseowner")
	if owner and isCreature(owner) and isPlayer(owner) and cid ~= owner then
		return doPlayerSendCancel(cid, "You are not allowed to catch this pokemon.")
	end

	local newidd = isShinyName(name) and ballcatch[item.itemid].ball[2] or ballcatch[item.itemid].ball[1] --alterado v1.9
	local typeee = ballcatch[item.itemid].typeee
	local boost = ballcatch[item.itemid].boost

	local catchinfo = {}
	catchinfo.rate = ballcatch[item.itemid].cr
	catchinfo.catch = ballcatch[item.itemid].on
	catchinfo.fail = ballcatch[item.itemid].off
	catchinfo.newid = newidd
	catchinfo.name = doCorrectPokemonName(name)
	catchinfo.topos = topos
	catchinfo.chance = x.chance

	doSendDistanceShoot(getThingPos(cid), topos, ballcatch[item.itemid].send)
	doRemoveItem(item.uid, 1)

	local d = getDistanceBetween(getThingPos(cid), topos)
	if getPlayerStorageValue(cid, 98796) >= 1 and getPlayerItemCount(cid, 12617) <= 0 then  --alterado v1.9
		setPlayerStorageValue(cid, 98796, -1)
		setPlayerStorageValue(cid, 98797, -1)
		doTeleportThing(cid, SafariOut, false)
		doSendMagicEffect(getThingPos(cid), 21)
		doPlayerSendTextMessage(cid, 27, "You spend all your saffari balls, good luck in the next time...")
	end

	addEvent(doSendPokeBall, d * 70 + 100 - (d * 14) , cid, catchinfo, false, false, typeee)
	addEvent(doSendMagicEffect, (d * 70 + 100 - (d * 14)) - 100, topos, 3)

	return true
end

Citar

Mention

Postado Agosto 12, 2015 9 anos

pra verificar se ele é premium tem uma função pra isso:

isPremium(cid)

Todos os meus trabalhos importantes estão na seção "Sobre mim" no meu perfil; Dá uma passada lá!

"Há três caminhos para o fracasso: não ensinar o que se sabe, não praticar o que se ensina, e não perguntar o que se ignora." - São Beda

(obg ao @Beeny por fazer essa linda sign <3)

Citar

Mention

Postado Agosto 12, 2015 9 anos

Assim?

local chance_premium = 30 -- Mude aqui a chance de capiturar

------- SE FOR PREMIIUM USA AQUI---------
local ballcatch = {
--id normal, id da ball shiy
[2394] = {cr = 4, on = 193, off = 192, ball = {11826, 11737}, send = 47, typeee = "normal", boost = "0"}, --alterado v1.9 \/
[2391] = {cr = 5, on = 198, off = 197, ball = {11832, 11740}, send = 48, typeee = "great", boost = "0"},
[2393] = {cr = 8, on = 202, off = 201, ball = {11835, 11743}, send = 46, typeee = "super", boost = "0"},
[2392] = {cr = 16, on = 200, off = 199, ball = {11829, 11746}, send = 49, typeee = "ultra", boost = "0"},
[12617] = {cr = 7, on = 204, off = 203, ball = {10975, 12621}, send = 35, typeee = "saffari", boost = "0"},
[12832] = {cr = 100000, on = 23, off = 24, ball = {12826, 12829}, send = 181, typeee = "dark", boost = "50"},
}

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

local item2 = getTopCorpse(topos)

if item2 == null then
return true
end

if getItemAttribute(item2.uid, "catching") == 1 then
return true
end

if getItemAttribute(item2.uid, "golden") and getItemAttribute(item2.uid, "golden") == 1 then
return doPlayerSendCancel(cid, "You can't try to catch a pokemon in the Golden Arena!")
end

local name = string.lower(getItemNameById(item2.itemid))
name = string.gsub(name, "fainted ", "")
name = string.gsub(name, "defeated ", "")
name = doCorrectPokemonName(name)

local x = pokecatches[name]
if not x then
return true
end

local shinys = {"Shiny Alakazam", "Shiny Scyther", "Shiny Electivire", "Shiny Magmortar", "Shiny Salamence", "Shiny Magmar", "Shiny Mantine", "Shiny Gyarados", "Shiny Snorlax", "Shiny Onix", "Shiny Electabuzz", "Shiny Pidgeot", "Aerodactyl", "Ditto", "Shiny Gengar"}
if item.itemid == 12832 and isInArray(shinys, name) then
return doPlayerSendCancel(cid, "Você não pode catar esse pokemon com a master ball!")
end

local storage = newpokedex[name].stoCatch
if getPlayerStorageValue(cid, storage) == -1 or not string.find(getPlayerStorageValue(cid, storage), ";") then --alterado v1.9
setPlayerStorageValue(cid, storage, "normal = 0, great = 0, super = 0, ultra = 0, saffari = 0, dark = 0;") --alterado v1.9
end

local owner = getItemAttribute(item2.uid, "corpseowner")
if owner and isCreature(owner) and isPlayer(owner) and cid ~= owner then
return doPlayerSendCancel(cid, "You are not allowed to catch this pokemon.")
end

local newidd = isShinyName(name) and ballcatch[item.itemid].ball[2] or ballcatch[item.itemid].ball[1] --alterado v1.9
local typeee = ballcatch[item.itemid].typeee
local boost = ballcatch[item.itemid].boost

local catchinfo = {}
if isPremium(cid) then ----- Verificar se é Premium Account
catchinfo.rate = ballcatch[item.itemid].cr + chance_premium ------ Somando a Rate Original da Ball + Rate de Premium Account
doPlayerSendTextMessage(cid, 19, "Catch Rate: [ball Name: "..ballcatch[item.itemid].typeee.."] [Rate Ball: "..ballcatch[item.itemid].cr.."x + Premium Rate: "..chance_premium.."x]")
else
catchinfo.rate = ballcatch[item.itemid].cr
end
catchinfo.catch = ballcatch[item.itemid].on
catchinfo.fail = ballcatch[item.itemid].off
catchinfo.newid = newidd
catchinfo.name = doCorrectPokemonName(name)
catchinfo.topos = topos
catchinfo.chance = x.chance

doSendDistanceShoot(getThingPos(cid), topos, ballcatch[item.itemid].send)
doRemoveItem(item.uid, 1)

local d = getDistanceBetween(getThingPos(cid), topos)
if getPlayerStorageValue(cid, 98796) >= 1 and getPlayerItemCount(cid, 12617) <= 0 then --alterado v1.9
setPlayerStorageValue(cid, 98796, -1)
setPlayerStorageValue(cid, 98797, -1)
doTeleportThing(cid, SafariOut, false)
doSendMagicEffect(getThingPos(cid), 21)
doPlayerSendTextMessage(cid, 27, "You spend all your saffari balls, good luck in the next time...")
end

addEvent(doSendPokeBall, d * 70 + 100 - (d * 14) , cid, catchinfo, false, false, typeee)
addEvent(doSendMagicEffect, (d * 70 + 100 - (d * 14)) - 100, topos, 3)

return true
end

- Quando Jogador Premium Account Capturar o Pokemon vai aparecer a seguinte msg Exemplo:

Catch Rate: [ball Name: Ultra] [Rate Ball: 90x + Premium Rate: 30x]

Citar

Mention

Postado Agosto 12, 2015 9 anos

aparentemente sim, dá uma testada agr. O código em si parece que tá certo, o if é isso aí mesmo que você fez e você lembrou de somar os rates.

Todos os meus trabalhos importantes estão na seção "Sobre mim" no meu perfil; Dá uma passada lá!

"Há três caminhos para o fracasso: não ensinar o que se sabe, não praticar o que se ensina, e não perguntar o que se ignora." - São Beda

(obg ao @Beeny por fazer essa linda sign <3)

Citar

Mention

Participe da conversa

Você pode postar agora e se cadastrar mais tarde. Se você tem uma conta, faça o login para postar com sua conta.

https://tibiaking.com/topic/61448-duvidas-em-lua-sobre-if-premium-0/

Seguidores

Ir para a lista de tópicos

Nenhum usuário registrado visualizando esta página.

Tópicos 96.9k
Posts 519.6k

Entrar

Duvidas em .lua sobre if premium > 0

Featured Replies

Participe da conversa

Quem Está Navegando 0

Conteúdo Similar

Estatísticas dos Fóruns

Informação Importante

Account

Navigation

Pesquisar