; Userlib
;.lib "user32.dll"
;GetActiveWindow%()
;SetWindowPos%(hWnd%,hAfter%,x%,y%,cx%,cy%,flags%)

Parent = CreateWindow("Window", 0, 0, ClientWidth(Desktop()), ClientHeight(Desktop()), 0, 4 + 16)
Menu = WindowMenu(Parent)

Const LEAVE = 1

File = CreateMenu("File", LEAVE, Menu)
UpdateWindowMenu Parent
hWnd = GetActiveWindow()

AutoSuspend 1
CreateTimer(60)
Repeat
Select WaitEvent()
	Case $1001
	If EventData() = LEAVE Then End

	Case $4001
	SetWindowPos hWnd, -1, 0, 0, ClientWidth(Desktop()), ClientHeight(Desktop()), 0 ; Keep it on top of Start menu

End Select
Until KeyDown(1)