>>21
wx = Desktop.Width
wy = Desktop.Height
ws = Math.Min(wx,wy)
px = Math.Floor((wx-ws)/2)
py = Math.Floor((wy-ws)/2)

GraphicsWindow.Hide()
LDGraphicsWindow.TransparentGW()
LDGraphicsWindow.TopMost = "True"
GraphicsWindow.Left = px
GraphicsWindow.Top = py
GraphicsWindow.Width = ws
GraphicsWindow.Height = ws

GraphicsWindow.BrushColor = "White"
GraphicsWindow.FillRectangle(0,0,ws,ws)
GraphicsWindow.BrushColor = "Red"
GraphicsWindow.FillEllipse(0,0,ws,ws)

GraphicsWindow.Show()
GraphicsWindow.MouseUp=MouseUpEvent

Sub MouseUpEvent
Program.End()
EndSub