Sistema/Mod Forge System

[Garou 304]

ADVANCED FORGE SYSTEM

O SISTEMA DE CRIAÇÃO DE ITENS PARA SEU SERVIDOR

 

Creio que muitos já conhecem o sistema de forja criado por mim, acontece que o código já estava um pouco obsoleto, então resolvi reescrever ele do 0.

Simplesmente consiste em um sistema de criação de itens avançado que ressuscita um pouco do RPG perdido nos servidores de hoje em dia. O jogador poderá criar itens através de forja, agindo como um verdadeiro ferreiro medieval. Adiciona itens em cima de uma bigorna previamente colocada no mapa e com um martelo cria um item totalmente novo.

CARACTERÍSTICAS DA VERSÃO FINAL:

- Configuração intuitiva e fácil de compreender;

- Mini-tutorial auxiliando criação de novas receitas;

- Receitas podem conter até 250 itens diferentes com suas respectivas quantidades;

- Sistema inteligente que identifica uma receita em qualquer ordem;

- Código totalmente orientado a objetos;

- Possibilidade de configurar diferentes requerimentos, diferentes skills, magic level e level

 

Há dois modos de instalar o Advanced Forge System, o primeiro é seguir os passos deste tópico e o segundo e baixar pasta data/ anexada no tópico com os arquivos em seus respectivos diretórios, precisando apenas o registro das chaves nos arquivos XML.

Escolha o modo que mais convém a você.

 

Crie um arquivo em data/lib chamado forgesystem.lua e cole o conteúdo abaixo:

 

--[[


	ADVANCED FORGE SYSTEM

				FINAL


	Criado por Oneshot


	É proibido a venda ou a cópia sem os devidos créditos desse script.


]]--


RecipeHandler = {

	itemtype = 0,

	items = {},

	level = 1,

	maglevel = 0,

	skills = {[0] = 0, [1] = 0, [2] = 0, [3] = 0, [4] = 0, [5] = 0, [6] = 0}

}


Forge = {

	type = nil,

	position = nil,

	magicEffect = CONST_ME_MAGIC_GREEN,

	messages = {

		class = MESSAGE_STATUS_DEFAULT,

		success = "You have successfully forged a %s.",

		needskill = "You don't have enough %s to create a %s.",

		needlevel = "You need level %s to create a %s.",

		needmaglevel = "You need magic level %s to create a %s."

	}

}


function RecipeHandler:new(itemtype, items, level, maglevel, skills)

	local obj = {

		itemtype = (itemtype or 0),

		items = (items or {}),

		level = (level or 1),

		maglevel = (maglevel or 0),

		skills = (skills or {[0] = 0, [1] = 0, [2] = 0, [3] = 0, [4] = 0, [5] = 0, [6] = 0})

	}

	table.insert(Recipes, obj)

	return setmetatable(obj, {__index = self})

end


function RecipeHandler:setItem(itemtype)

	self.itemtype = (itemtype or 0)

end


function RecipeHandler:setRecipe(...)

	self.items = {...}

end


function RecipeHandler:setRecipeItem(itemid, amount)

	table.insert(self.items, {itemid, amount})

end


function RecipeHandler:setSkill(skillid, value)

	self.skills[skillid] = value

end


function RecipeHandler:setLevel(value)

	self.level = value

end


function RecipeHandler:setMagLevel(value)

	self.maglevel = value

end


function RecipeHandler:check(position)

	local match = false


	for n, item in ipairs(self.items) do

		local thing = getTileItemById(position, item[1])

		if thing.uid > 0 and math.max(1, thing.type) >= item[2] then

			if n == #self.items then

				match = true

			end

		else

			break

		end

	end


	return match

end


function RecipeHandler:get(position)

	if self:check(position) == true then

		return setmetatable({type = self, position = position}, {__index = Forge})

	end

	return false

end


function Forge:create(cid)

	if self.type.itemid == 0 then

		print("[FORGE SYSTEM - ERROR] ATTEMPT TO CREATE A RECIPE ITEMID 0")

		return

	end


	local status = true

	if(cid) then

		if getPlayerLevel(cid) < self.type.level then

			doPlayerSendTextMessage(cid, self.messages.class, self.messages.needlevel:format(self.type.level, getItemNameById(self.type.itemtype)))

			return

		end


		if getPlayerMagLevel(cid) < self.type.maglevel then

			doPlayerSendTextMessage(cid, self.messages.class, self.messages.needmaglevel:format(self.type.maglevel, getItemNameById(self.type.itemtype)))

			return

		end


		for skillid, value in pairs(self.type.skills) do

			if getPlayerSkillLevel(cid, skillid) < value then

				status = false

				doPlayerSendTextMessage(cid, self.messages.class, self.messages.needskill:format(SKILL_NAMES[skillid], getItemNameById(self.type.itemtype)))

				break

			end

		end

	end


	if status == true then

		for _, item in ipairs(self.type.items) do

			local thing = getTileItemById(self.position, item[1])

			doRemoveItem(thing.uid, item[2])

		end

		doSendMagicEffect(self.position, self.magicEffect)

		doPlayerSendTextMessage(cid, self.messages.class, self.messages.success:format(getItemNameById(self.type.itemtype)))

		doCreateItem(self.type.itemtype, self.position)

	end

end


dofile(getDataDir() .."/lib/recipes.lua")

Crie um arquivo em data/lib chamado recipes.lua e adicione o conteúdo abaixo:

 

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

-----** TUTORIAL DE CONFIGURAÇÃO **-----

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


--[[


	O 'ADVANCED FORGE SYSTEM' é muito fácil e intuitivo de configurar, você só precisa chamar

	a função RecipeHandler:new(...), sendo que você já configurar os atributos da receita nela

	ou usar outras funções para isso.


	Por exemplo, quero criar uma Magic Sword que precise de 100 Gold Nuggets.


	RecipeHandler:new(2400, {{2157, 100}})


	Ou então


	Magic_Sword = RecipeHandler:new()

	Magic_Sword:setItem(2400)

	Magic_Sword:setRecipe({2157, 100})


	Funções do Sistema:


	RecipeHandler:new(itemtype, items, level, maglevel, skills) --> Cria uma nova instância de forja.

	RecipeHandler:setItem(itemtype) --> Atribui um certo itemid como resultado da receita.

	RecipeHandler:setRecipe(recipe) --> Atribui uma receita.

	RecipeHandler:setRecipeItem(itemid, amount) --> Adiciona um itemid e sua quantidade a receita.

	RecipeHandler:setSkill(skillid, value) --> Atribui um valor necessário de uma certa skill para poder criar a receita.

	RecipeHandler:setLevel(value) --> Atribui o level necessário para criar uma receita.

	RecipeHandler:setMagLevel(value) --> Atribui o magic level necessário para criar uma receita.


]]--



--[[	

	Este é um exemplo de receita usando algumas funções.


	É uma Magic Sword (ITEMID: 2400) que precisa de 100 Gold Nuggets (ITEMID: 2157),

	além disso, o personagem que tentar forjar, precisa ter Level 100 e Sword Fighting 50.

]]--


Recipes = {}


magicsword = RecipeHandler:new()

magicsword:setItem(2400)

magicsword:setRecipeItem(2157, 100)

magicsword:setLevel(100)

magicsword:setSkill(2, 50)

Agora em data/actions/scripts, crie um arquivo chamado iron_hammer.lua e adicione o conteúdo abaixo:

 

function onUse(cid, item, fromPosition, itemEx, toPosition)

	local recipe = nil


	for _, v in ipairs(Recipes) do

		recipe = v:get(toPosition)

		if(recipe ~= false) then

			break

		end

	end


	if(recipe) then

		recipe:create(cid)

	else

		doPlayerSendCancel(cid, "This is not a valid recipe.")

	end

	return true

end

E por fim em actions.xml, adicione a seguinte linha:

 

<action itemid="4846" event="script" value="iron_hammer.lua"/>

OPCIONAL - TALKACTION A talkaction abaixo mostra ao jogadoras receitas configuradas no servidor que ele pode fazer. Em data/talkactions/scripts, crie um arquivo chamado recipes.lua e adicione o conteúdo abaixo:

 

function onSay(cid, words, param, channel)

	local ret = {}


	local msg = "		 ADVANCED FORGE SYSTEM\n"



	for _, recipe in ipairs(Recipes) do

		local skills = true

		for skillid, value in pairs(recipe.skills) do

			if getPlayerSkillLevel(cid, skillid) < value then

				skills = false

				break

			end

		end


		if skills == true then

			if getPlayerLevel(cid) >= recipe.level and getPlayerMagLevel(cid) >= recipe.maglevel then

				table.insert(ret, {recipe, true})

			else

				table.insert(ret, {recipe, false})

			end

		else

			table.insert(ret, {recipe, false})

		end

	end


	for _, recipe in ipairs(ret) do

		msg = msg .."\nRecipe for ".. getItemNameById(recipe[1].itemtype) ..":\n\n"

		if recipe[2] == true then

			for _, item in ipairs(recipe[1].items) do

				msg = msg .."* ".. getItemNameById(item[1]) .." [".. math.min(item[2], math.max(0, getPlayerItemCount(cid, item[1]))) .."/".. item[2] .."]\n"

			end

		else

			msg = msg .."[LOCKED]\n"

		end

	end

	doShowTextDialog(cid, 2555, msg)

	return true

end

Em data/talkactions/talkactions.xml, adicione a linha:

 

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

---

Siga as instruções para configuração de novas receitas.

Em breve vídeo de funcionamento

Advanced Forge System.rar

[Lebre 2]

Cara muito bom! Bem parecido com o que o Maxwelldon MaxWellden (Agora acertei) !! Fez pra mim mas o dele não tem esses sistema de skill!! Parabens.

+REP

Editado Março 8, 2012 por Lebre (veja o histórico de edições)

[3visan 416]

Boa Lpz, esse sistema é otimo até hoje não vi um forja mais completo que esse.

[Augusto 660]

Como sempre, um excelente sistema Lpz, meus parabéns e muito obrigado por compartilhar com a comunidade =D

[Erimyth 95]

Lpz voltando a ativa?!

O sistema ficou show...

[Vodkart 2155]

hoho gostei do script e tem um excelente código,bem elaborado!

obs: lpz é o oneshot?

REP+

[Kimoszin 1160]

É ele sim,

Gostei do script, bastante legal, otimo para servidores inovadores.

Reputado.

[Garou 304]

Vídeo de funcionamento do sistema adicionado ao tópico.

Brigadão, CéuPerigoso \o

[Skydangerous 374]

de nada amore,

UHah,

Realmente esse script funciona perfeitamente, e limpo .D

Grande Scripter !

[Generator 0]

Não pega em versão TFS 3+ não?

Tudo em seus devidos lugares, com com as tags em cada arquivo. (actions.xml e talkactions.xml)

Agora me diga, PORQUE? =[

Olha o erro /\

why? =|

EDIT

Realmente...

falha minha =P

vai ver foi o sono AUHuahuahu

+ valeu pela ajuda e pelo script

funcionando 100%

Editado Março 17, 2012 por Generator
edit (veja o histórico de edições)

[Garou 304]

Ele está acusando que os arquivos em actions/scripts e talkactions/scripts estão sem suas funções primárias (ou seja vazios), melhor dar uma olhada.

[Matheus Rocha 0]

O que significa a parte isInArray? Do action?

[Garou 304]

Ela serve para evitar que o jogador não possa forjar o item no inventário, apesar que eu não cheguei a atualizar a action, apenas lib. Acho que essa parte pode ser removida sem problemas.

[Faelz Danil 21]

Gostaria de saber se assim:

Quero fazer um Great Shield que precise de 10 dwarven shield ( exemplo ). Preciso fazer assim :

[iDitem] = {

items = {

{2379, 1}

{2379, 1}

{2379, 1}

colocando 10 veses com o count = 1, ou posso botar 10 ali ? sendo que o item nao é agrupavel

[Garou 304]

Como não é agrupável, você deverá colocar de 1 em 1 na receita. Vou dar uma olhada se posso optimizar ainda mais o código nesse quesito.

[Takayaki 0]

@Lpz

Sou novo aqui no forum do TibiaKing.

Cara você salvou a minha vida com esse script ueahueahue~

Mas eu queria te pedir um grande favor se possivel~

Haveria alguma forma de você adicionar algo ao Talkaction ou um novo Talkaction que mostrasse quantos % ou quanto de experiencia falta para o proximo nivel de UP de Forging?

E também adicionar um metodo de chances onde a Forja poderia falhar [ Exemplo.: Quanto melhor o item, mais dificil ficaria para conseguir forja-lo, mas com os skills as suas chances almentam em alguns %. Porem caso a forja não der certo os items do Recipe sumirião e você teria de tentar novamente, sem que essa tentativa falha désse EXP para o Forging Skill. ]

Ficaria muito agradecido com isso. E tenho certeza de que muitos usuarios daqui gostariam de ver um script assim. então, se possivel... mas de qualquer forma, obrigado LPZ \o>

[Garou 304]

Sistema atualizado com novas funcionalidades e mais fácil de configurar.

Abraços.

[skybia 1]

Ei cara amo seu sistema poderia me achudar ne um negosio ?

 

Tipo eu queria colocar dois sistema desse no meu ot um com o hammer mas outro com um outro iten que eu criei eu queria saber onde eu edito pra mudar o iten de forjar tipo o hammer eu queria tirar o hammer. ae eu criei outro script tudo sertim so que não fasia com esse iten onde que eu mudo o iten de forja eu ja mudei no actions n deu serto so da serto com o hammer  poderia me ajudar.

[Emersonssss 114]

Poderia explica como adicionar mais a necessidade de mais de 1 item em uma receita ?

[morfios 1]

Boas adorei o sistema gostava de saber se alguem podia fazer com que o sistema so funcione tendo os items em sima da bigorna , também colocar rates de sucesso.