local syscalls = require("syscalls")

local function Redraw()
	syscalls.StartRedraw()

	syscalls.CreateWidnow(100)

	syscalls.EndRedraw()
end

local exit = false
while not exit do
	local event = syscalls.WaitEvent()

	if event == syscalls.Redraw then
		Redraw()
	elseif event == syscalls.Button then
		if syscalls.GetButton() == syscalls.buttons.close then
			exit = true
		end
	end
end

print("End")