window = Window:Create()
context = Context:Create(window)
while true do
if window:Closed() or window:KeyHit(Key.Escape) then return false end
local color = context:GetColor()
color.r = Math:Mod( color.r + 0.01 * Time:GetSpeed(), 1)
color.g = Math:Mod( color.g + 0.012 * Time:GetSpeed(), 1)
color.b = Math:Mod( color.b + 0.014 * Time:GetSpeed(), 1)
context:SetColor(color)
context:Clear()
context:Sync()
end