1function filter_open(...)
 2	buffer = ""
 3	for i = 1, select("#", ...) do
 4		buffer = buffer .. select(i, ...) .. " "
 5	end
 6end
 7
 8function filter_close()
 9	html(buffer)
10	return 0
11end
12
13function filter_write(str)
14	buffer = buffer .. string.upper(str)
15end
16
17