sync on : sync rate 30 : sync

#constant AW_HOR_POSITIVE 0x00000001
#constant AW_HOR_NEGATIVE 0x00000002
#constant AW_VER_POSITIVE 0x00000004
#constant AW_VER_NEGATIVE 0x00000008
#constant AW_CENTER       0x00000010
#constant AW_HIDE         0x00010000
#constant AW_ACTIVATE     0x00020000
#constant AW_SLIDE        0x00040000
#constant AW_BLEND        0x00080000
#constant WINDOW_NORMAL   13565952

user32 = find free dll()
load dll "user32.dll", user32
if dll exist(1)=1 
	print "dll exists and loaded ok."
else
	end
endif

hwnd as dword
hwnd = call dll(user32,"GetActiveWindow")
print "hwnd: ";hwnd
dwTime as dword
dwTime = 1000
dwFlags as dword 
dwFlags = AW_CENTER || AW_HIDE 
bool as boolean
bool=call dll(user32,"AnimateWindow", hwnd , dwTime, dwFlags ) 
print bool
dwFlags = AW_CENTER || AW_ACTIVATE
bool=call dll(user32,"AnimateWindow", hwnd , dwTime, dwFlags ) 
print bool


sync
wait key
delete dll user32
end