If OpenWindow(0,0,0,500,250,"Window",#PB_Window_SystemMenu|#PB_Window_ScreenCentered)
Repeat
EventID=WaitWindowEvent()
If EventID=#PB_Event_CloseWindow
  AnimateWindow_(WindowID(0),500,#AW_BLEND|#AW_HIDE)
  ;AnimateWindow_(WindowID(0),500,#AW_CENTER|#AW_HIDE)
  ;AnimateWindow_(WindowID(0),500,#AW_HOR_NEGATIVE|#AW_HIDE)
  ;AnimateWindow_(WindowID(0),500,#AW_HOR_POSITIVE|#AW_HIDE)
  ;AnimateWindow_(WindowID(0),500,#AW_VER_NEGATIVE|#AW_HIDE)
  ;AnimateWindow_(WindowID(0),500,#AW_VER_POSITIVE|#AW_HIDE)
  Quit=1
EndIf
Until Quit=1
EndIf