-- / SCRIPT BY KYDRAI \--

function stop(gm, name)
_PESO[name]:onStop()

doPlayerSendTextMessage(_PESO[name].p1.cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você leventou ".._PESO[name].p1.points.." vezes o peso.\nSeu adversário leventou ".._PESO[name].p2.points.." vezes o peso.")
doPlayerSendTextMessage(_PESO[name].p2.cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você leventou ".._PESO[name].p2.points.." vezes o peso.\nSeu adversário leventou ".._PESO[name].p1.points.." vezes o peso.")
doPlayerSendTextMessage(gm, MESSAGE_STATUS_CONSOLE_BLUE, "O "..getCreatureName(_PESO[name].p1.cid).." levantou ".._PESO[name].p1.points.." vezes o peso.\n O "..getCreatureName(_PESO[name].p2.cid).." levantou ".._PESO[name].p2.points.." vezes o peso.")
local winner, looser = _PESO[name]:getWinner(), _PESO[name]:getLooser()
if winner then
	doSendAnimatedText(getCreaturePosition(winner), "WIN!", TEXTCOLOR_YELLOW)
	doSendAnimatedText(getCreaturePosition(looser), "LOSS!", TEXTCOLOR_RED)
else
	doSendAnimatedText(getCreaturePosition(_PESO[name].p1.cid), "EMPATE!", TEXTCOLOR_WHITE)
	doSendAnimatedText(getCreaturePosition(_PESO[name].p2.cid), "EMPATE!", TEXTCOLOR_WHITE)
end
end

function start(name, gm)
_PESO[name]:onStart()
addEvent(stop, 10 * 1000, gm, name) -- 10 segundos de jogo
end

function onUse(cid, item, fromPosition, itemEx, toPosition)
local localName = getItemAttribute(item.uid, "description")
if getPlayerGroupId(cid) > 1 then
	if item.itemid == 1945 then
		_PESO[localName] = peso:new(localName)
		if _PESO[localName]:getPositions() == TRUE then
			if _PESO[localName]:getPlayers() == TRUE then
				_PESO[localName]:prepareOnStart()
				doTransformItem(item.uid, 1946)
				addEvent(doSendAnimatedText, 1000, _PESO[localName].pos3, "3" , TEXTCOLOR_LIGHTBLUE)
				addEvent(doSendAnimatedText, 2000, _PESO[localName].pos3, "2" , TEXTCOLOR_LIGHTBLUE)
				addEvent(doSendAnimatedText, 3000, _PESO[localName].pos3, "1" , TEXTCOLOR_LIGHTBLUE)
				addEvent(doSendAnimatedText, 4000, _PESO[localName].pos3, "JÁ!" , TEXTCOLOR_LIGHTGREEN)
				addEvent(start, 4000, localName, cid)
			else
				doPlayerSendCancel(cid, "São necessários 2 players para jogar.")
				doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
			end
		else
			doPlayerSendCancel(cid, "[Error] Posição inválida!")
			doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
		end
	elseif item.itemid == 1946 then
		if _PESO[localName].start == 0 then
			doTransformItem(item.uid, 1945)
			peso:reward(7369, 7371, 7370) -- recompensa(winner, looser, draw)
			doSendMagicEffect(getCreaturePosition(cid), CONST_ME_MAGIC_RED)
			doCreatureSetNoMove(_PESO[localName].p1.cid, false)
			doCreatureSetNoMove(_PESO[localName].p2.cid, false)
		else
			doPlayerSendCancel(cid, "O tempo ainda não acabou.")
			doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
		end
	end
elseif item.actionid == 1011 then
	if _PESO[localName].start == 2 then
		_PESO[localName]:addPoint(cid)
	end
else
	doPlayerSendCancel(cid, "Só um GM pode puxar a alavanca.")
end
return TRUE
end

-- \ END SCRIPT /--

--/ LIB BY KYDRAI \--

_PESO = {}

PESO_POS = {
-- alavancas
["Levantamento 01"] = {
	pos1 = {x=122, y=122, z=7}, -- player 1
	pos2 = {x=122, y=120, z=7}, -- player 2
	pos3 = {x=120, y=121, z=7, stackpos=1}, -- alavanca
	pos4 = {x=121, y=122, z=7, stackpos=1}, -- peso 1
	pos5 = {x=121, y=120, z=7, stackpos=1}, -- peso 2
},
}

function setPesoDescriptions()
for name, positions in pairs(PESO_POS) do
	for i, pos in pairs(positions) do
		doItemSetAttribute(getTileThingByPos(pos).uid, "description", name)
	end
end
end

peso = {
pos1 = {},
pos2 = {},
pos3 = {},
p1 = {cid = 0, points = 0},
p2 = {cid = 0, points = 0},
start = 0
}

function peso:new(name)
local obj = {
	name = name
}
return setmetatable(obj, {__index = peso})
end

function peso:getPositions()
if PESO_POS[self.name] then
	self.pos1, self.pos2 = PESO_POS[self.name].pos1, PESO_POS[self.name].pos2
	self.pos3 = PESO_POS[self.name].pos3
	self.pos4, self.pos5 = PESO_POS[self.name].pos4, PESO_POS[self.name].pos5
	return TRUE
end
return FALSE
end

function peso:getPlayers()
local p1, p2 = getTopCreature(self.pos1).uid, getTopCreature(self.pos2).uid
if isPlayer(p1) and isPlayer(p2) then
	self.p1.cid = p1
	self.p2.cid = p2
	return TRUE
end
return FALSE
end

function peso:prepareOnStart()
self.start = 1
doCreatureSetNoMove(self.p1.cid, true)
doCreatureSetNoMove(self.p2.cid, true)
end

function peso:onStart()
self.start = 2
end

function peso:onStop()
self.start = 0
end

function peso:addPoint(cid)
if self.p1.cid == cid then
	self.p1.points = self.p1.points + 1
elseif self.p2.cid == cid then
	self.p2.points = self.p2.points + 1
end
end

function peso:getWinner()
return (self.p1.points > self.p2.points and self.p1.cid) or (self.p2.points > self.p1.points and self.p2.cid) or nil
end

function peso:getLooser()
return (self.p1.points < self.p2.points and self.p1.cid) or (self.p2.points < self.p1.points and self.p2.cid) or nil
end

function peso:reward(itemWin, itemLoss, itemDraw)
local winner, looser = self:getWinner(), self:getLooser()
if winner then
	doPlayerAddItem(self.p1.cid, winner == self.p1.cid and itemWin or itemLoss, 1)
	doPlayerAddItem(self.p2.cid, winner == self.p2.cid and itemWin or itemLoss, 1)
else
	doPlayerAddItem(self.p1.cid, itemDraw, 1)
	doPlayerAddItem(self.p2.cid, itemDraw, 1)
end
doSendMagicEffect(getCreaturePosition(self.p1.cid), CONST_ME_MAGIC_GREEN)
doSendMagicEffect(getCreaturePosition(self.p2.cid), CONST_ME_MAGIC_GREEN)
end

--\ END LIB /--

function onStartup()
setPesoDescriptions()
return true 
end

globalevents/globalevents.xml:

<globalevent name="serverstart" type="start" event="script" value="start.lua"/>