Advanced Quest Chest

Bem eu tava fuçando no otland e acabei achando esse script ignorante (Não de ruim, de bom) do Gesior (O genio da Polonia).

So funfa em TFS 0.3.0 ALpha 3 +

Consiste nessa foto :

é um sistema que vc escolhe os itens que darão no bau, colocando eles pelo map editor

Se vc sabe o minimo de inglês ja entende pela foto

para funcionar eh so adicionar isso em actions

crie o multiquests.lua e adicione :

function copyItem(item)
if (isContainer(item.uid) == TRUE) then
	uid = copyContainer(item.uid, item.itemid)
	if item.actionid > 0 then
		doSetItemActionId(uid, item.actionid)
	end
	return uid
else
	return doCreateItemEx(item.itemid, item.type)
end
end

function copyContainer(uid, itemid)
local container = doCreateItemEx(itemid, 1)
local iterator = getContainerSize(uid)
while iterator > 0  do
	iterator = iterator - 1
	doAddContainerItemEx(container, copyItem(getContainerItem(uid, iterator)))
end
return container
end

function onUse(cid, item, fromPosition, itemEx, toPosition)
if getPlayerStorageValue(cid, item.uid) ~= 1 then
	local items = {}
	local item_in = {}
	local item_slot = 0
	local item_to_give = 0
	local item_desc = ''
	while(true) do
		item_in = getContainerItem(item.uid, item_slot)
		if item_in.itemid > 0 then
			table.insert(items, item_in)
		else
			break
		end
		item_slot = item_slot+1
	end
	if #items == 0 then
		item_to_give = doCreateItemEx(item.uid)
		item_desc = getItemNameById(item.uid)
	elseif #items == 1 then
		item_to_give = doCreateItemEx(items[1].itemid, items[1].type)
		if items[1].actionid > 0 then
			doSetItemActionId(item_to_give, items[1].actionid)
		end
		item_desc = getItemNameById(items[1].itemid)
	else
		if #items <= 8 then
			item_to_give = doCreateItemEx(1987, 1)
		else
			item_to_give = doCreateItemEx(1988, 1)
		end
		local n = 0
		local uid = 0
		for i=1, #items do
			n = #items - i + 1
			uid = doAddContainerItemEx(item_to_give, copyItem(items[n]))
			if items[n].actionid > 0 then
				doSetItemActionId(uid, items[n].actionid)
			end
			item_desc = getItemNameById(items[n].itemid) .. item_desc
			if i ~= #items then
				item_desc = ", " .. item_desc
			end
		end
	end
	if doPlayerAddItemEx(cid, item_to_give, 0) == RETURNVALUE_NOERROR then
		doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, 'You have found a ' .. item_desc .. '.')
		setPlayerStorageValue(cid, item.uid, 1)
		if item.uid < 2000 then
			setPlayerStorageValue(cid, 1000, getPlayerStorageValue(cid,1000)+1)
		end
	else
		doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, 'You don\'t have enought capacity or free place in backpack for a ' .. item_desc .. '.')
	end
else
	doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "It is empty.")
end
return TRUE
end

e em actions.xml add:

<action actionid="1740" script="quests/multiquests.lua"/>

FUnfa em qualquer bau ou caixa eh so adicionar a actionid 1740

Realmente muito bom! Esse cara é fera.

Muito bem feito mesmo, não entendi muito bem algumas partes por ele ter deixado complexo o script ;p

@up

Eh eles faz umas "frescuradas" para mostra que manjam xD

Porém para usar ele é bem simples

Muito bom, pena que ele é PL

Funfo no meu TFS 2 xD

Muito legal o script além de ser simples de ser usado

@up

funfa em todo tfs 8.21+

+ tipo os antigo sempre da uns bug tosco...

AI os cara fala pra usa sempre o + novo

crie o multiquest.lua e adicione :

e em actions.xml add:

CODE

<action actionid="1740" script="quests/multiquests.lua"/>

Você tem que arrumar isso um você pede multiquest e o otro multiquest xD

Nossa que script legal nunca tinha visto um desse na minha vida o primeiro e mesmo o Gesior e foda!!!!Os Enforced dele e roxxxxx

Muito bom script,

Obg :smile_positivo:

Thor,

Posts como esse é considerado flood,

Não reviva mais tópicos, já suspendi sua conta por causa disso.

Obrigado,

Abraços ;*