local man = peripheral.find"manipulator"
assert(man and man.hasModule"plethora:chat")
local m = peripheral.wrap"monitor"
assert(m)

local function p(...)
	term.redirect(m)
	print(...)
	term.redirect(term.native())
end

local function score(msg)
	local s = 0
	for num in msg:gmatch"%-?%d+" do s=s+num end
	return s
end

while true do
	local _,user,msg = os.pullEvent"chat_message"
	local s = score(msg)
	p(string.format("(%d) <%s> %s",s,user,msg))
end