GraphicsWindow.Title = "miniclock"
GraphicsWindow.BackgroundColor = "#1a4780"
GraphicsWindow.Width = 120
GraphicsWindow.Height = 100
GraphicsWindow.Top = 0
GraphicsWindow.Left = 0
GraphicsWindow.CanResize = 0
Sound.PlayChime()
start:
GraphicsWindow.BrushColor = "lime"
GraphicsWindow.DrawText(20, 20, Clock.date)
GraphicsWindow.DrawText(20, 40, Clock.time)
GraphicsWindow.DrawText(20, 60, Clock.WeekDay)
Program.Delay(1000)
GraphicsWindow.Clear()
Goto start