(Resolvido)Sistema de Pesca quase pronto ajuda

Thenebrozo · Março 28, 2017

Primeiramente obrigado por está lendo esse tópico, Sistema de pesca !

Fala galerinha do TK vim aqui hoje pedi uma ajuda a vocês, já faz algum tempo que venho tentando fazer um script de fishing meio complicado tentei fazer vários tópicos aqui mais ninguém me ajudou então, tentei manda mensagens para alguns membros pedindo ajuda o único que me respondeu e me ajudou foi o xWhiteWolf. Ele me ajudou o problema e que eu não sei nada de script, ele conseguiu passa os algoritmos do script tipo aquilo que eu tava pedindo pra ele só que ele não fez o script em si ele só o começou, gostaria que alguém terminasse ele pra me ajudar porfavor nunca achei ele e sempre quis colocar ele no meu servidor.

Oq é esse script?

É um sistema de pescar monstro de acordo com o Level e com o fishing, Por exemplo se vc tiver lvl 800 mais so que ta com 105 de fishing vc so vai poder pescar Massive Water Elemental e Water elemental. Quando vc upar o fishing por exemplo pro 110 ae vc vai poder pescar Blood Crab, Massive Water Elemental, Water Elemental.
Espero que tenha alguma porcetagem para pescar os monstro por exemplo para pegar Water Elemental no lvl 400 e com 100 de fishing vc tera 5% de chance quando vc upar para o lvl 500 e estiver com 105 de fishing vc tera 10% de chance de pegar Water Elemental e 5% de chance de pegar Massive Water Elemental, quando vc tiver level 600 e com 110 de fishing vc tera 15% de chance de pegar Water Elemental e 10% Massive Water Elemental e 5% de pegar Blood Crab quando vc tiver com lvl 700 e 120 fishing vc tera 20% de chance de pegar Water Elemental 15% de chance de pegar Massive Water Elemental 10% de chance de pegar Blood Crab e 5% de chance de pegar Quara Constrictor com lvl 800 e 130 de fishing vc tera 25% de chance de pescar Water Elemental e 20% Massive Water Elemental 15% Blood Constrictor 10% Quara Constrictor e 5% Quara Predator Scout.
Para poder upar o fishing vai ter que ficar muito tempo treinando tipo vai ser bem dificil para o fishing subir, você tbm nao poderia pescar em aréas pz, caso o player não tivesse apareceria uma mensagem avisando que ele precisa estar em pz se o player tiver o fishing 100 mais nao tiver no minimo lvl 400 ele não poderia pescar monstros, enquanto o player tivesse pescando normal para subir seu fishing ele poderia pegar peixe tbm para dar mais rpg. Qualquer duvida so me perguntar

Já tenho um script ele só pesca monstro e não precisa de level e nem de level de fishing para poder pegar o script é esse

-- My Fat Doll improvisando nos otserver ;~
-- Fishing v 1.0 05/04/2013

function onUse(cid, item, fromPosition, itemEx, toPosition)
--Config--
local Bait = 2671 -- ID da isca
local needBait = false -- Precisa de isca? TRUE/FALSE
local FishRate = 1.0 -- Rate de fish
local time = 1 -- Tempo pra pescar denovo (em segundos)
local fishable = {"Water Elemental", "Massive Water Elemental", "Blood Crab", "Quara Constrictor", "Quara Predator Scout", "Quara Predator", "Quara Pincher Scout", "Quara Pincher", "Quara Mantassin Scout", "Quara Mantassin", "Quara Hydromancer Scout", "Quara Constrictor Scout", "Quara Hydromancer"} --Pescados
local message1 = "You need "..getItemNameById(Bait).."s to fish!" -- Mensagem se não tiver iscas!
local message2 = "You must wait few seconds!" --Mensagem se tiver pescando muito rapido
--Config End--

-- Não mecha --
local storage = 5560
local waterIds = {493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625}

if not getTilePzInfo(getCreaturePosition(cid)) then
if needBait == TRUE then
if getPlayerItemCount(cid, Bait) > 0 then
if exhaustion.get(cid, storage) == FALSE then
exhaustion.set(cid, storage, time)
doPlayerAddSkillTry(cid, SKILL_FISHING, 1)
if isInArray(waterIds, itemEx.itemid) == TRUE then
doSendMagicEffect(toPosition, CONST_ME_LOSEENERGY)
if itemEx.itemid ~= 493 then
if math.random(1, (100 + (getPlayerSkill(cid, SKILL_FISHING) / 10))) <= (getPlayerSkill(cid, SKILL_FISHING)*FishRate) then
doPlayerRemoveItem(cid, Bait, 1)
doCreateMonster(fishable[math.random(#fishable)], getPlayerPosition(cid))
end
end
end
return TRUE
else
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, message2)
end
else
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, message1)
end
return FALSE
end

if needBait == FALSE then
if exhaustion.get(cid, storage) == FALSE then
exhaustion.set(cid, storage, time)
doPlayerAddSkillTry(cid, SKILL_FISHING, 1)

if isInArray(waterIds, itemEx.itemid) == TRUE then
doSendMagicEffect(toPosition, CONST_ME_LOSEENERGY)
if itemEx.itemid ~= 493 then
if math.random(1, (100 + (getPlayerSkill(cid, SKILL_FISHING) / 10))) <= (getPlayerSkill(cid, SKILL_FISHING)*FishRate) then
doCreateMonster(fishable[math.random(#fishable)], getPlayerPosition(cid))
end
end

end
return TRUE
else
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, message2)
end
end
return FALSE
else
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You can't fish in a protection zone!")
end
end

No que o xWhiteWolf me ajudou ?

Ele fez os algoritmos do jeito que eu queria só que ele não o adicionou no script e eu como não manjo disso não sei como fazer, mais gostaria mesmo que alguém me ajudasse tem muito tempo que to correndo atras disso e nunca consigo dessa vez consegui uma ajuda ta 50% feito falta só terminar, os os algoritmos do xWhiteWolf abaixo.

-- tabela de nivel
-- [nivel] = {level, fishing}
local tablelevel = {
[1] = {400, 100},
[2] = {500, 105},
[3] = {600, 110},
[4] = {700, 120},
[5] = {800, 130}
}
-- tabela de monstros
-- [nivel] = monstro adicionado
-- note que se voce for nivel 3 vc tera os monstros do 2 e do 1 tambem.
local tablemonsters = {
[1] = "Water Elemental",
[2] = "Massive Water Elemental",
[3] = "Blood Crab",
[4] = "Quara Constrictor",
[5] = "Quara Predator Scout"
}

-- Aqui eu defino valores aleatorios de level e de fishing de um suposto player e printo esses valores
plvl, fishing = math.random(300, 1000), math.random(95, 140)
print("Nivel "..plvl..". Fishing: ".. fishing)
--- isso aqui so serve para testes mas lembre-se de que plvl tem que ser igual a getCreatureLevel(cid)
-- e que fishing tem que ser getPlayerSkill(cid, SKILL_FISHING)

-- aqui fazemos o algoritmo para definir qual o level de pesca o player sera
local level = 0
for i, lvl in ipairs(tablelevel) do
if plvl >= lvl[1] and fishing >= lvl[2] then
level = i
else break
end
end
print("Level: ".. level)
-- a partir daqui o level do player pode ser pego atraves da variavel "level"

-- aqui nos retornamos a tabela de monstros pescaveis pelo player
local fishable = {} -- partimos de uma tabela vazia
for i, mob in ipairs(tablemonsters) do
if level >= i then
fishable[#fishable + 1] = {chance = 5 * (level - i + 1), monster = mob}
end
end
-- pra cada monstro temos uma chance associada que vai variar do nivel do player e da dificuldade do monstro

-- printando tudo que tem em fishable
for i = 1, #fishable do
print(fishable.chance, fishable.monster)
end
-- isso aqui é só pra testar que funciona

-- retornando oque vai pescar
local get = false -- nao vai pescar nada de inicio
for i = 1, #fishable do
if fishable.chance >= math.random(1, 100) then
get = fishable.monster
break
end
end

if not get then -- se nao pescou nada, da peixe
print("pescou peixe")
else -- se pescou algo, falar oque pescou/criar a criatura
print("pescou ".. get)
end

Bom é isso pessoa espero mesmo que alguém possa me ajuda, abraço !!

A esse video monstra como funciona

Vodkart · Março 29, 2017

local t = {
	[{100,105}] = {{5,"Water Elemental"}},
	[{106,110}] = {{5,"Massive Water Elemental"}, {10,"Water Elemental"}}, 
	[{111,119}] = {{5,"Blood Crab"},{10,"Massive Water Elemental"},{15,"Water Elemental"}}, 
	[{120,129}] = {{5,"Quara Constrictor"},{10,"Blood Crab"},{15,"Massive Water Elemental"},{20,"Water Elemental"}},
	[{130,math.huge}] = {{5,"Quara Predator Scout"},{10,"Quara Constrictor"},{15,"Blood Crab"}, {20,"Massive Water Elemental"},{25,"Water Elemental"}}
}
local lvl, fish_level = 400, 100
local useWorms = true
local waterIds = {493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625}
function onUse(cid, item, fromPosition, itemEx, toPosition)
	if isInArray(waterIds, itemEx.itemid) == TRUE then
		if itemEx.itemid ~= 493 then
			if getPlayerLevel(cid) >= lvl and getPlayerSkill(cid, SKILL_FISHING) >= fish_level then
				for v , r in pairs(t) do
					if getPlayerSkill(cid, SKILL_FISHING) >= v[1] and getPlayerSkill(cid, SKILL_FISHING) <= v[2] then
						for _ , var in pairs(r) do
							if var[1] > math.random(1, 100) then 
								doCreateMonster(var[2], getPlayerPosition(cid)) return true
							end
						end
					end
				end
			end
				if math.random(1, (100 + (getPlayerSkill(cid, SKILL_FISHING) / 10))) <= getPlayerSkill(cid, SKILL_FISHING) then
					if useWorms then
						if getPlayerItemCount(cid, ITEM_WORM) > 0 then
							doPlayerRemoveItem(cid, ITEM_WORM, 1)
							doPlayerAddItem(cid, ITEM_FISH, 1)
						end
					else
						doPlayerAddItem(cid, ITEM_FISH, 1)
					end
				end
				doPlayerAddSkillTry(cid, SKILL_FISHING, 1)
			end
			doSendMagicEffect(toPosition, CONST_ME_LOSEENERGY)
			return true
		end
	return false
end

Thenebrozo · Março 29, 2017

18 minutos atrás, Vodkart disse:


local t = {
	[{100,105}] = {{5,"Water Elemental"}},
	[{106,110}] = {{5,"Massive Water Elemental"}, {10,"Water Elemental"}}, 
	[{111,119}] = {{5,"Blood Crab"},{10,"Massive Water Elemental"},{15,"Water Elemental"}}, 
	[{120,129}] = {{5,"Quara Constrictor"},{10,"Blood Crab"},{15,"Massive Water Elemental"},{20,"Water Elemental"}},
	[{130,math.huge}] = {{5,"Quara Predator Scout"},{10,"Quara Constrictor"},{15,"Blood Crab"}, {20,"Massive Water Elemental"},{25,"Water Elemental"}}
}
local lvl, fish_level = 400, 100
local useWorms = true
local waterIds = {493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625}
function onUse(cid, item, fromPosition, itemEx, toPosition)
	if isInArray(waterIds, itemEx.itemid) == TRUE then
		if itemEx.itemid ~= 493 then
			if getPlayerLevel(cid) >= lvl and getPlayerSkill(cid, SKILL_FISHING) >= fish_level then
				for v , r in pairs(t) do
					if getPlayerSkill(cid, SKILL_FISHING) >= v[1] and getPlayerSkill(cid, SKILL_FISHING) <= v[2] then
						for _ , var in pairs(r) do
							if var[1] > math.random(1, 100) then 
								doCreateMonster(var[2], getPlayerPosition(cid)) return true
							end
						end
					end
				end
			end
				if math.random(1, (100 + (getPlayerSkill(cid, SKILL_FISHING) / 10))) <= getPlayerSkill(cid, SKILL_FISHING) then
					if useWorms then
						if getPlayerItemCount(cid, ITEM_WORM) > 0 then
							doPlayerRemoveItem(cid, ITEM_WORM, 1)
							doPlayerAddItem(cid, ITEM_FISH, 1)
						end
					else
						doPlayerAddItem(cid, ITEM_FISH, 1)
					end
				end
				doPlayerAddSkillTry(cid, SKILL_FISHING, 1)
			end
			doSendMagicEffect(toPosition, CONST_ME_LOSEENERGY)
			return true
		end
	return false
end

irei testar aqui e jaja te falo obrigado !

cara deu certo me Deus não to acreditando se é um Deus muito obrigado msm so tem um problema não tem level para pegar os bichos por exemplo pega tall montro em tall lvl so isso o resto ta tudo certinho

Vodkart · Março 29, 2017

18 minutos atrás, Thenebrozo disse:

irei testar aqui e jaja te falo obrigado !

cara deu certo me Deus não to acreditando se é um Deus muito obrigado msm so tem um problema não tem level para pegar os bichos por exemplo pega tall montro em tall lvl so isso o resto ta tudo certinho

como assim não tem level?

você não disse que seria tudo acima de level 400 e os monstro só iriam depender do fish skill?

Thenebrozo · Março 29, 2017

-- tabela de nivel
-- [nivel] = {level, fishing}
local tablelevel = {
[1] = {400, 100},
[2] = {500, 105},
[3] = {600, 110},
[4] = {700, 120},
[5] = {800, 130}

para cada bicho tem um level e um fishing por exemplo lvl 400 com 100 de fishing vc pescaria water elemental

lvl 500 com fishing 105 continuaria pescando water elemental e passaria pescar tbm Massive Water Elemental

Espero que tenha alguma porcetagem para pescar os monstro por exemplo para pegar Water Elemental no lvl 400 e com 100 de fishing vc tera 5% de chance quando vc upar para o lvl 500 e estiver com 105 de fishing vc tera 10% de chance de pegar Water Elemental e 5% de chance de pegar Massive Water Elemental, quando vc tiver level 600 e com 110 de fishing vc tera 15% de chance de pegar Water Elemental e 10% Massive Water Elemental e 5% de pegar Blood Crab quando vc tiver com lvl 700 e 120 fishing vc tera 20% de chance de pegar Water Elemental 15% de chance de pegar Massive Water Elemental 10% de chance de pegar Blood Crab e 5% de chance de pegar Quara Constrictor com lvl 800 e 130 de fishing vc tera 25% de chance de pescar Water Elemental e 20% Massive Water Elemental 15% Blood Constrictor 10% Quara Constrictor e 5% Quara Predator Scout.

aqui eu to explicando como seria apartir do 400 vc pescaria mais os outro bicho para cima pra cima n por exemplo o Massive Water Elemental seria lvl 500 lvl 400 nao poderia pescar

Vodkart · Março 29, 2017

--nothing

--------------

editei uma parte

local t = {
	[{100,105}] = {{5,"Water Elemental",400}}, -- chance, name, min level
	[{106,110}] = {{5,"Massive Water Elemental",400}, {10,"Water Elemental",500}}, 
	[{111,119}] = {{5,"Blood Crab",500},{10,"Massive Water Elemental",520},{15,"Water Elemental",540}}, 
	[{120,129}] = {{5,"Quara Constrictor",550},{10,"Blood Crab",555},{15,"Massive Water Elemental",560},{20,"Water Elemental",580}},
	[{130,math.huge}] = {{5,"Quara Predator Scout",600},{10,"Quara Constrictor",650},{15,"Blood Crab",700}, {20,"Massive Water Elemental",700},{25,"Water Elemental",700}}
}
local lvl, fish_level = 400, 100
local useWorms = true
local waterIds = {493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625}
function onUse(cid, item, fromPosition, itemEx, toPosition)
	if isInArray(waterIds, itemEx.itemid) == TRUE then
		if itemEx.itemid ~= 493 then
			if getPlayerLevel(cid) >= lvl and getPlayerSkill(cid, SKILL_FISHING) >= fish_level then
				for v , r in pairs(t) do
					if getPlayerSkill(cid, SKILL_FISHING) >= v[1] and getPlayerSkill(cid, SKILL_FISHING) <= v[2] then
						for _ , var in pairs(r) do
							if getPlayerLevel(cid) >= var[3] and var[1] > math.random(1, 100) then 
								doCreateMonster(var[2], getPlayerPosition(cid)) return true
							end
						end
					end
				end
			end
			if math.random(1, (100 + (getPlayerSkill(cid, SKILL_FISHING) / 10))) <= getPlayerSkill(cid, SKILL_FISHING) then
				if useWorms then
					if getPlayerItemCount(cid, ITEM_WORM) > 0 then
						doPlayerRemoveItem(cid, ITEM_WORM, 1)
						doPlayerAddItem(cid, ITEM_FISH, 1)
					end
				else
					doPlayerAddItem(cid, ITEM_FISH, 1)
				end
			end
			doPlayerAddSkillTry(cid, SKILL_FISHING, 1)
		end
		doSendMagicEffect(toPosition, CONST_ME_LOSEENERGY)
		return true
	end
	return false
end

Thenebrozo · Março 29, 2017

Deu certo cara muito obrigado Deus te pague muito obrigado mesmo mais uma duvida quanto maio a chance mais dificil de pega? o

Vodkart · Março 29, 2017

5 = 5% chance de pegar

quanto maior ali, maior vai ser a chance de pegar

se for 50, vai ser 50% de chance de pegar!

Thenebrozo · Março 29, 2017

to testando aqui ver se pega os outro bichos pq ta pegando so wanter elemental e massive water elemental. Deu certo aqui vlw msm muito obrigado

Editado Março 29, 2017 por Thenebrozo (veja o histórico de edições)

xWhiteWolf · Março 29, 2017

não é por nada não mas achei que a pessoa que fosse te ajudar seguiria meu modelo de algoritmo. Já que o vod praticamente ignorou meu código eu decidi fazer um script de pesca com base no que eu já havia feito;

Spoiler


-- tabela de nivel
-- [nivel] = {level, fishing}
local tablelevel = {
  [1] = {400, 100},
  [2] = {500, 105},
  [3] = {600, 110},
  [4] = {700, 120},
  [5] = {800, 130}
}
-- tabela de monstros
-- [nivel] = monstro adicionado
-- note que se voce for nivel 3 vc tera os monstros do 2 e do 1 tambem.
local tablemonsters = {
  [1] = "Water Elemental",
  [2] = "Massive Water Elemental",
  [3] = "Blood Crab",
  [4] = "Quara Constrictor",
  [5] = "Quara Predator Scout"
}

local useWorms = true
local waterIds = {493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625}

function onUse(cid, item, fromPosition, itemEx, toPosition)
	
	if getTilePzInfo(getCreaturePosition(cid)) then
		doPlayerSendCancel(cid, "You can't fish in a protection zone!")
		return true
	end
	
	if isInArray(waterIds, itemEx.itemid) then
		if useWorms then
			if getPlayerItemCount(cid, ITEM_WORM) > 0 then
				doPlayerRemoveItem(cid, ITEM_WORM, 1)
			else
				doPlayerSendCancel(cid, "You don't have any worm to fish.")
				return true
			end
		end
		doPlayerAddSkillTry(cid, SKILL_FISHING, 1)		
		local plvl, fishing = getPlayerLevel(cid), getPlayerSkill(cid, SKILL_FISHING)
		-- aqui fazemos o algoritmo para definir qual o level de pesca o player sera
		local level = 0
		for i, lvl in ipairs(tablelevel) do
			if plvl >= lvl[1] and fishing >= lvl[2] then
				level = i
			else break
			end
		end
		-- a partir daqui o level do player pode ser pego atraves da variavel "level"
		-- aqui nos retornamos a tabela de monstros pescaveis pelo player
		local fishable = {} -- partimos de uma tabela vazia
		for i, mob in ipairs(tablemonsters) do
			if level >= i then
				fishable[#fishable + 1] = {chance = 5 * (level - i + 1), monster = mob}
			else break
			end
		end
		-- pra cada monstro temos uma chance associada que vai variar do nivel do player e da dificuldade do monstro
		-- retornando oque vai pescar
		local get = false -- nao vai pescar nada de inicio
		for i = 1, #fishable do
			if fishable[i].chance >= math.random(1, 100) then
				get = fishable[i].monster
				break
			end
		end
		
		if not get then -- se nao pescou nada, da peixe
			doPlayerAddItem(cid, ITEM_FISH, 1)
		else -- se pescou algo, falar oque pescou/criar a criatura
			doCreateMonster(get, fromPosition)
		end
		doSendMagicEffect(toPosition, CONST_ME_LOSEENERGY)
		return true
	end
return false
end

não tem melhor ou pior, ambos devem funcionar e se vc já tá usando o dele, continue usando. O meu só tá nos moldes da minha linha de raciocínio anterior.

Editado Março 29, 2017 por xWhiteWolf (veja o histórico de edições)

Camilo Salvadori · Março 29, 2017

Aproveitando o Tópico, @Vodkart, ou @xWhiteWolf... Caso eu queira, ao invés de pescar um monstro eu pescar um peixe.. por IDS, poderiam me dizer no que mudar? (No Caso eu NÃO PRECISO de Level... só de Fishing Skill mesmo..., porém consigo ajustar isto, caso eu estiver abusando!) Estarei usando as chances também, porém, quanto mais Skill, mais fácil a probabilidade de pescar, igual ao peixe normal... só que no caso, o peixe NORMAL (igual o sistema do global) seria, claro, mais fácil de ser pescado (na mesma medida do global), porém os outros peixes que requerem mais skills, irão facilitando muito lentamente de acordo com o up dos skills... Com isto, posso substituir completamente o script de fishing antigo!

Se for necessário, uso a versão do TFS 1.1..

Muito obrigado, de coração!

Editado Março 29, 2017 por Camilo Salvadori (veja o histórico de edições)

xWhiteWolf · Março 29, 2017

13 horas atrás, Camilo Salvadori disse:

Aproveitando o Tópico, @Vodkart, ou @xWhiteWolf... Caso eu queira, ao invés de pescar um monstro eu pescar um peixe.. por IDS, poderiam me dizer no que mudar? (No Caso eu NÃO PRECISO de Level... só de Fishing Skill mesmo..., porém consigo ajustar isto, caso eu estiver abusando!) Estarei usando as chances também, porém, quanto mais Skill, mais fácil a probabilidade de pescar, igual ao peixe normal... só que no caso, o peixe NORMAL (igual o sistema do global) seria, claro, mais fácil de ser pescado (na mesma medida do global), porém os outros peixes que requerem mais skills, irão facilitando muito lentamente de acordo com o up dos skills... Com isto, posso substituir completamente o script de fishing antigo!

Se for necessário, uso a versão do TFS 1.1..

Muito obrigado, de coração!

Spoiler


-- tabela de nivel
-- [nivel] = {level, fishing}
local tablelevel = {
  [1] = {400, 100},
  [2] = {500, 105},
  [3] = {600, 110},
  [4] = {700, 120},
  [5] = {800, 130}
}
-- tabela de monstros
-- [nivel] = monstro adicionado
-- note que se voce for nivel 3 vc tera os monstros do 2 e do 1 tambem.
local fishes = {
  [1] = 2160,
  [2] = 2152,
  [3] = 2152,
  [4] = 2152,
  [5] = 2152
}

local useWorms = true
local waterIds = {493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625}

function onUse(cid, item, fromPosition, itemEx, toPosition)
	
	if getTilePzInfo(getCreaturePosition(cid)) then
		doPlayerSendCancel(cid, "You can't fish in a protection zone!")
		return true
	end
	
	if isInArray(waterIds, itemEx.itemid) then
		if useWorms then
			if getPlayerItemCount(cid, ITEM_WORM) > 0 then
				doPlayerRemoveItem(cid, ITEM_WORM, 1)
			else
				doPlayerSendCancel(cid, "You don't have any worm to fish.")
				return true
			end
		end
		doPlayerAddSkillTry(cid, SKILL_FISHING, 1)		
		local plvl, fishing = getPlayerLevel(cid), getPlayerSkill(cid, SKILL_FISHING)
		-- aqui fazemos o algoritmo para definir qual o level de pesca o player sera
		local level = 0
		for i, lvl in ipairs(tablelevel) do
			if plvl >= lvl[1] and fishing >= lvl[2] then
				level = i
			else break
			end
		end
		-- a partir daqui o level do player pode ser pego atraves da variavel "level"
		-- aqui nos retornamos a tabela de monstros pescaveis pelo player
		local fishable = {} -- partimos de uma tabela vazia
		for i, fish in ipairs(fishes) do
			if level >= i then
				fishable[#fishable + 1] = {chance = 5 * (level - i + 1), fishid = fish}
			else break
			end
		end
		-- pra cada monstro temos uma chance associada que vai variar do nivel do player e da dificuldade do monstro
		-- retornando oque vai pescar
		local get = false -- nao vai pescar nada de inicio
		for i = 1, #fishable do
			if fishable[i].chance >= math.random(1, 100) then
				get = fishable[i].fishid
				break
			end
		end
		
		if not get then -- se nao pescou nada, da peixe
			doPlayerAddItem(cid, ITEM_FISH, 1)
		else -- se pescou algo, falar oque pescou/criar a criatura
			doPlayerAddItem(cid, get, 1)
		end
		doSendMagicEffect(toPosition, CONST_ME_LOSEENERGY)
		return true
	end
return false
end

fiz as modificações mas não sei se rodaria em tfs 1.1 pois esse código é de 0.4. Testa e me diz se apareceu algum erro

Thenebrozo · Março 30, 2017

Em 29/03/2017 ás 01:08, xWhiteWolf disse:

não é por nada não mas achei que a pessoa que fosse te ajudar seguiria meu modelo de algoritmo. Já que o vod praticamente ignorou meu código eu decidi fazer um script de pesca com base no que eu já havia feito;

Mostrar conteúdo oculto



-- tabela de nivel
-- [nivel] = {level, fishing}
local tablelevel = {
  [1] = {400, 100},
  [2] = {500, 105},
  [3] = {600, 110},
  [4] = {700, 120},
  [5] = {800, 130}
}
-- tabela de monstros
-- [nivel] = monstro adicionado
-- note que se voce for nivel 3 vc tera os monstros do 2 e do 1 tambem.
local tablemonsters = {
  [1] = "Water Elemental",
  [2] = "Massive Water Elemental",
  [3] = "Blood Crab",
  [4] = "Quara Constrictor",
  [5] = "Quara Predator Scout"
}

local useWorms = true
local waterIds = {493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625}

function onUse(cid, item, fromPosition, itemEx, toPosition)
	
	if getTilePzInfo(getCreaturePosition(cid)) then
		doPlayerSendCancel(cid, "You can't fish in a protection zone!")
		return true
	end
	
	if isInArray(waterIds, itemEx.itemid) then
		if useWorms then
			if getPlayerItemCount(cid, ITEM_WORM) > 0 then
				doPlayerRemoveItem(cid, ITEM_WORM, 1)
			else
				doPlayerSendCancel(cid, "You don't have any worm to fish.")
				return true
			end
		end
		doPlayerAddSkillTry(cid, SKILL_FISHING, 1)		
		local plvl, fishing = getPlayerLevel(cid), getPlayerSkill(cid, SKILL_FISHING)
		-- aqui fazemos o algoritmo para definir qual o level de pesca o player sera
		local level = 0
		for i, lvl in ipairs(tablelevel) do
			if plvl >= lvl[1] and fishing >= lvl[2] then
				level = i
			else break
			end
		end
		-- a partir daqui o level do player pode ser pego atraves da variavel "level"
		-- aqui nos retornamos a tabela de monstros pescaveis pelo player
		local fishable = {} -- partimos de uma tabela vazia
		for i, mob in ipairs(tablemonsters) do
			if level >= i then
				fishable[#fishable + 1] = {chance = 5 * (level - i + 1), monster = mob}
			else break
			end
		end
		-- pra cada monstro temos uma chance associada que vai variar do nivel do player e da dificuldade do monstro
		-- retornando oque vai pescar
		local get = false -- nao vai pescar nada de inicio
		for i = 1, #fishable do
			if fishable[i].chance >= math.random(1, 100) then
				get = fishable[i].monster
				break
			end
		end
		
		if not get then -- se nao pescou nada, da peixe
			doPlayerAddItem(cid, ITEM_FISH, 1)
		else -- se pescou algo, falar oque pescou/criar a criatura
			doCreateMonster(get, fromPosition)
		end
		doSendMagicEffect(toPosition, CONST_ME_LOSEENERGY)
		return true
	end
return false
end

não tem melhor ou pior, ambos devem funcionar e se vc já tá usando o dele, continue usando. O meu só tá nos moldes da minha linha de raciocínio anterior.

xWhiteWolf o seu funcionou o unico problema é que não ta pescando os monstros não sei se é por causa da dificuldade onde eu mecho para ficar mais fácil pescar os monstro?

[Error - Actions Iterface]
data/actions/tools/fishing.lua:oneUse
Description:
<luaDoCreateMonster> Cannot create monster: Water elemental

[Error - Actions Iterface]
data/actions/tools/fishing.lua:oneUse
Description:
<luaDoCreateMonster> Cannot create monster: Massive Water elemental

[Error - Actions Iterface]
data/actions/tools/fishing.lua:oneUse
Description:
<luaDoCreateMonster> Cannot create monster: Water elemental

[Error - Actions Iterface]
data/actions/tools/fishing.lua:oneUse
Description:
<luaDoCreateMonster> Cannot create monster: Blod Crab

ta dando esse erros e com os outro monstro tbm

xWhiteWolf · Março 30, 2017

3 horas atrás, Thenebrozo disse:

xWhiteWolf o seu funcionou o unico problema é que não ta pescando os monstros não sei se é por causa da dificuldade onde eu mecho para ficar mais fácil pescar os monstro?

[Error - Actions Iterface]
data/actions/tools/fishing.lua:oneUse
Description:
<luaDoCreateMonster> Cannot create monster: Water elemental

[Error - Actions Iterface]
data/actions/tools/fishing.lua:oneUse
Description:
<luaDoCreateMonster> Cannot create monster: Massive Water elemental

[Error - Actions Iterface]
data/actions/tools/fishing.lua:oneUse
Description:
<luaDoCreateMonster> Cannot create monster: Water elemental

[Error - Actions Iterface]
data/actions/tools/fishing.lua:oneUse
Description:
<luaDoCreateMonster> Cannot create monster: Blod Crab

ta dando esse erros e com os outro monstro tbm

testa o do vodkart, se funcionar troca essa linha aqui do meu:
doCreateMonster(get, fromPosition)
por
doCreateMonster(get, getCreaturePosition(cid))

Tecnicamente as duas eram pra dar errado, o correto seria usar doCreateMonster(get, getClosestFreeTile(cid, fromPosition, true)). Mas como o vod usa a getCreaturePosition(cid) e o carinha do tópico disse que deu certo então com fromPosition tb deveria dar certo.

Thenebrozo · Março 30, 2017

37 minutos atrás, xWhiteWolf disse:

testa o do vodkart, se funcionar troca essa linha aqui do meu:
doCreateMonster(get, fromPosition)
por
doCreateMonster(get, getCreaturePosition(cid))

Tecnicamente as duas eram pra dar errado, o correto seria usar doCreateMonster(get, getClosestFreeTile(cid, fromPosition, true)). Mas como o vod usa a getCreaturePosition(cid) e o carinha do tópico disse que deu certo então com fromPosition tb deveria dar certo.

Deu certo a sua e a do Vod mais irei usar a sua, fico agradecido ao Vod ter me ajudado tbm, mas vc foi o unico que me respondeu e me ajudou quando eu precisei sendo assim fico muito grato e gostei muito, obrigado mesmo de coração. Tenho uma duvida onde eu mudo para ficar mais dificil para pescar os monstro? e quanto maior o level mais facil fica ?

xWhiteWolf · Março 31, 2017

7 horas atrás, Thenebrozo disse:

Deu certo a sua e a do Vod mais irei usar a sua, fico agradecido ao Vod ter me ajudado tbm, mas vc foi o unico que me respondeu e me ajudou quando eu precisei sendo assim fico muito grato e gostei muito, obrigado mesmo de coração. Tenho uma duvida onde eu mudo para ficar mais dificil para pescar os monstro? e quanto maior o level mais facil fica ?

eu montei uma fórmula com base nas informações que você me passou.

a chance é calculada nessa linha:
if level >= i then
ishable[#fishable + 1] = {chance = 5 * (level - i + 1), monster = mob} --- aqui <
perceba que ele usa 5 * (level - i + 1) sendo que o i é sempre menor ou igual ao level, ou seja:
se eu sou level 5 e estou no primeiro nivel i ("water elemental") eu vou fazer 5-1 + 1 que dá 5, ou seja, a porcentagem fica 25%.
Se você quiser você pode diminuir esse numero 5 ou modificar a formula livremente. Nesse sentido o do vodkart é melhor configuravel porém ele usa muito mais espaço de memória que o meu (pra valores simples é muito melhor você fazer contas simples de soma e multiplicação para chegar nos valores do que salvá-los numa tabela consumindo espaço de memória)
A questão é que o script do vodkart possui alguns erros lógicos então a % que ele colocou lá não necessariamente vai ser a % correta então eu sugiro você realmente usar o meu com essas pequenas edições na formula.

Note que o código que eu te passei e o código que você falou que eu te passei estão diferentes, o código que eu te mandei foi esse aqui: https://repl.it/Gh8z/1

Spoiler



-- tabela de nivel
-- [nivel] = {level, fishing}
local tablelevel = {
  [1] = {400, 100},
  [2] = {500, 105},
  [3] = {600, 110},
  [4] = {700, 120},
  [5] = {800, 130}
}
-- tabela de monstros
-- [nivel] = monstro adicionado
-- note que se voce for nivel 3 vc tera os monstros do 2 e do 1 tambem.
local tablemonsters = {
  [1] = "Water Elemental",
  [2] = "Massive Water Elemental",
  [3] = "Blood Crab",
  [4] = "Quara Constrictor",
  [5] = "Quara Predator Scout"
}

-- Aqui eu defino valores aleatorios de level e de fishing de um suposto player e printo esses valores
plvl, fishing = math.random(300, 1000), math.random(95, 140)
print("Nivel "..plvl..". Fishing: ".. fishing)
--- isso aqui so serve para testes mas lembre-se de que plvl tem que ser igual a getCreatureLevel(cid) 
-- e que fishing tem que ser getPlayerSkill(cid, SKILL_FISHING)


-- aqui fazemos o algoritmo para definir qual o level de pesca o player sera
local level = 0
for i, lvl in ipairs(tablelevel) do
  if plvl >= lvl[1] and fishing >= lvl[2] then
    level = i
  else break
  end
end
print("Level: ".. level)
-- a partir daqui o level do player pode ser pego atraves da variavel "level"

-- aqui nos retornamos a tabela de monstros pescaveis pelo player
local fishable = {} -- partimos de uma tabela vazia
for i, mob in ipairs(tablemonsters) do
  if level >= i then
    fishable[#fishable + 1] = {chance = 5 * (level - i + 1), monster = mob}
    else break
  end
end
-- pra cada monstro temos uma chance associada que vai variar do nivel do player e da dificuldade do monstro


-- printando tudo que tem em fishable
for i = 1, #fishable do 
  print(fishable[i].chance, fishable[i].monster)
end
-- isso aqui é só pra testar que funciona


-- retornando oque vai pescar
local get = false -- nao vai pescar nada de inicio
for i = 1, #fishable do
  if fishable[i].chance >= math.random(1, 100) then
    get = fishable[i].monster
    break
  end
end

if not get then -- se nao pescou nada, da peixe
  print("pescou peixe")
else -- se pescou algo, falar oque pescou/criar a criatura
  print("pescou ".. get)
end

e eu te mandei ele no repl.it justamente pra vc editar e clicar no run pra ver o que acontece com cada edição.

A cada run ele vai te retornar isso aqui:

Nivel 916. Fishing: 133 (nivel do player e nivel de fishing)
Level: 5 (level de pesca)
-- monstros que participam desse nivel de pesca
-- chance na frente e nome do monstro (a chance é a fórmula que eu falei)
25 Water Elemental
20 Massive Water Elemental
15 Blood Crab
10 Quara Constrictor
5 Quara Predator Scout
--
-- resultado final:
pescou peixe

Thenebrozo · Março 31, 2017

11 horas atrás, xWhiteWolf disse:
eu montei uma fórmula com base nas informações que você me passou.

a chance é calculada nessa linha:
if level >= i then
ishable[#fishable + 1] = {chance = 5 * (level - i + 1), monster = mob} --- aqui <
perceba que ele usa 5 * (level - i + 1) sendo que o i é sempre menor ou igual ao level, ou seja:
se eu sou level 5 e estou no primeiro nivel i ("water elemental") eu vou fazer 5-1 + 1 que dá 5, ou seja, a porcentagem fica 25%.
Se você quiser você pode diminuir esse numero 5 ou modificar a formula livremente. Nesse sentido o do vodkart é melhor configuravel porém ele usa muito mais espaço de memória que o meu (pra valores simples é muito melhor você fazer contas simples de soma e multiplicação para chegar nos valores do que salvá-los numa tabela consumindo espaço de memória)
A questão é que o script do vodkart possui alguns erros lógicos então a % que ele colocou lá não necessariamente vai ser a % correta então eu sugiro você realmente usar o meu com essas pequenas edições na formula.

Note que o código que eu te passei e o código que você falou que eu te passei estão diferentes, o código que eu te mandei foi esse aqui: https://repl.it/Gh8z/1
Mostrar conteúdo oculto
-- tabela de nivel
-- [nivel] = {level, fishing}
local tablelevel = {
  [1] = {400, 100},
  [2] = {500, 105},
  [3] = {600, 110},
  [4] = {700, 120},
  [5] = {800, 130}
}
-- tabela de monstros
-- [nivel] = monstro adicionado
-- note que se voce for nivel 3 vc tera os monstros do 2 e do 1 tambem.
local tablemonsters = {
  [1] = "Water Elemental",
  [2] = "Massive Water Elemental",
  [3] = "Blood Crab",
  [4] = "Quara Constrictor",
  [5] = "Quara Predator Scout"
}

-- Aqui eu defino valores aleatorios de level e de fishing de um suposto player e printo esses valores
plvl, fishing = math.random(300, 1000), math.random(95, 140)
print("Nivel "..plvl..". Fishing: ".. fishing)
--- isso aqui so serve para testes mas lembre-se de que plvl tem que ser igual a getCreatureLevel(cid) 
-- e que fishing tem que ser getPlayerSkill(cid, SKILL_FISHING)


-- aqui fazemos o algoritmo para definir qual o level de pesca o player sera
local level = 0
for i, lvl in ipairs(tablelevel) do
  if plvl >= lvl[1] and fishing >= lvl[2] then
    level = i
  else break
  end
end
print("Level: ".. level)
-- a partir daqui o level do player pode ser pego atraves da variavel "level"

-- aqui nos retornamos a tabela de monstros pescaveis pelo player
local fishable = {} -- partimos de uma tabela vazia
for i, mob in ipairs(tablemonsters) do
  if level >= i then
    fishable[#fishable + 1] = {chance = 5 * (level - i + 1), monster = mob}
    else break
  end
end
-- pra cada monstro temos uma chance associada que vai variar do nivel do player e da dificuldade do monstro


-- printando tudo que tem em fishable
for i = 1, #fishable do 
  print(fishable[i].chance, fishable[i].monster)
end
-- isso aqui é só pra testar que funciona


-- retornando oque vai pescar
local get = false -- nao vai pescar nada de inicio
for i = 1, #fishable do
  if fishable[i].chance >= math.random(1, 100) then
    get = fishable[i].monster
    break
  end
end

if not get then -- se nao pescou nada, da peixe
  print("pescou peixe")
else -- se pescou algo, falar oque pescou/criar a criatura
  print("pescou ".. get)
end
e eu te mandei ele no repl.it justamente pra vc editar e clicar no run pra ver o que acontece com cada edição.

A cada run ele vai te retornar isso aqui:

Nivel 916. Fishing: 133 (nivel do player e nivel de fishing)
Level: 5 (level de pesca)
-- monstros que participam desse nivel de pesca
-- chance na frente e nome do monstro (a chance é a fórmula que eu falei)
25 Water Elemental
20 Massive Water Elemental
15 Blood Crab
10 Quara Constrictor
5 Quara Predator Scout
--
-- resultado final:
pescou peixe

Entendi perfeitamente e usarei o seu pois é exatamente oq eu queria e com o repl.it como exemplo eu posso editar a porcetagem deixar do jeito que eu quero a adificuldade muito obrigado mesmo de coração cara, não sei se vc acredita em Deus mais que Deus te abençôe e ilumine seu caminho obrigado msm tava tentando fazer isso tem muito tempo, e vc não me cobrou nada por isso ! Obrigado

Xiolones · Setembro 10, 2017

@Thenebrozo Sei que o seu problema já foi resolvido, mas o vídeo que você postou é do meu server que nunca abri kk O script que eu usava está postado logo abaixo :

Spoiler

local config = {
   waterIds = {493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625, 4820, 4821, 4822, 4823, 4824, 4825},
   rateSkill = getConfigValue("rateSkill"),
   allowFromPz = false,
   useWorms = false,
   randomsize = 2000,
   v = {
       [{1, 300}] = {level = 200, fishing = 80, monster = "Water Demon", msg = "You've caught a Water Demon!"},
       [{301, 450}] = {level = 500, fishing = 100, monster = "Hydrosea", msg = "You've caught a Hydrosea!", bc1 = true},
       [{451, 530}] = {level = 800, fishing = 105, monster = "Leviatan", msg = "You've caught a Leviatan!", bc2 = true},
       [{531, 600}] = {level = 1200, fishing = 105, monster = "Equidna", msg = "You've caught an Equidna!", bc3 = true},
       [{601, 635}] = {level = 1750, fishing = 110, monster = "Massive Hydrosea", msg = "You've caught a Massive Hydrosea!", bc4 = true},
       [{636, 755}] = {level = 2500, fishing = 110, monster = "Lerna", msg = "You've caught a Lerna!", bc5 = true},
       [{756, 764}] = {level = 3500, fishing = 115, monster = "Tifon", msg = "You've caught a Tifon!", bc6 = true},
       [{765, 770}] = {level = 3500, fishing = 115, monster = "Water Anfitrity", msg = "You've caught a Water Anfitrity", bc7 = true},
       [{771, 774}] = {level = 4500, fishing = 120, monster = "Wartoise", msg = "You've caught a Wartoise!", bc8 = true},
       [{775, 776}] = {level = 5000, fishing = 125, monster = "Poseidon", msg = "You've angered the water gods and a water god has been sent to kill you!!", bc = true}
   }
}
function onUse(cid, item, fromPosition, itemEx, toPosition)
   if not isInArray(config.waterIds, itemEx.itemid) then
       return false
   end
   if (config.allowFromPz or not getTileInfo(getThingPos(cid)).protection) and itemEx.itemid ~= 493 and math.random((100 + (getPlayerSkill(cid, SKILL_FISHING) / 50))) < getPlayerSkill(cid, SKILL_FISHING) and (not config.useWorms or (getPlayerItemCount(cid, ITEM_WORM) > 0 and doPlayerRemoveItem(cid, ITEM_WORM, 1))) then
       doPlayerAddSkillTry(cid, SKILL_FISHING, 1)
       doPlayerAddItem(cid, ITEM_FISH, 1)
       local formula, lvl = math.random(config.randomsize), getPlayerLevel(cid)
       local fishing = getPlayerSkillLevel(cid, SKILL_FISHING)
       for range, inf in pairs(config.v) do
       if formula >= range[1] and formula <= range[2] and lvl >= inf.level and fishing >= inf.fishing then
               doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, inf.msg)
               doSummonCreature(inf.monster, getThingPos(cid))
               if inf.bc then
                   doBroadcastMessage(" WATER FISHING : " .. getPlayerName(cid) .. " has angered the goddess of water, The POSEIDON !", 22)
               end
               if inf.bc1 then
                   doBroadcastMessage(" WATER FISHING : " .. getPlayerName(cid) .. " has fishing a Hydrosea !", 22)
               end
               if inf.bc2 then
                   doBroadcastMessage(" WATER FISHING : " .. getPlayerName(cid) .. " has fishing a Leviatan !", 22)
               end
               if inf.bc3 then
                   doBroadcastMessage(" WATER FISHING : " .. getPlayerName(cid) .. " has fishing a Equidna !", 22)
               end
               if inf.bc4 then
                   doBroadcastMessage(" WATER FISHING : " .. getPlayerName(cid) .. " has fishing a Massive Hydrosea !", 22)
               end
               if inf.bc5 then
                   doBroadcastMessage(" WATER FISHING : " .. getPlayerName(cid) .. " has fishing a Lerna !", 22)
               end
               if inf.bc6 then
                   doBroadcastMessage(" WATER FISHING : " .. getPlayerName(cid) .. " has fishing a Trifon !", 22)
               end
               if inf.bc7 then
                   doBroadcastMessage(" WATER FISHING : " .. getPlayerName(cid) .. " has fishing a Water Anfitrity !", 22)
               end
               if inf.bc8 then
                   doBroadcastMessage(" WATER FISHING : " .. getPlayerName(cid) .. " has fishing a Wartoise !", 22)
               end
               break
           end
       end
   end
   doSendMagicEffect(toPosition, CONST_ME_LOSEENERGY)
   return true
end

PS : Desculpe reviver o tópico, só quero colaborar também! XD

Entrar

(Resolvido)Sistema de Pesca quase pronto ajuda

Posts Recomendados

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Participe da conversa

Quem Está Navegando 0 membros estão online

Conteúdo Similar

TibiaKing

Open Tibia Server

Redes Sociais

Anuncie no TibiaKing

Informação Importante