#NoTrayIcon
#include <GUIConstants.au3>
#Include <Constants.au3>

$GUI = GuiCreate("Rahmen",@DesktopWidth,@DesktopHeight,0,0,$WS_POPUP,BitOR($WS_EX_TOPMOST,$WS_EX_TOOLWINDOW))
$colour1 = 0xFF00FF
$colour2 = 0x00FF00
WinSetTrans("Rahmen","",150)
$Rahmen = GUICtrlCreateLabel('',0,0,@DesktopWidth,@DesktopHeight,$SS_SUNKEN)
GUISetState(@SW_SHOW,$GUI)

HotKeySet("{ESC}","_exit")

Func _exit()
	GUIDelete($GUI)
	Exit
EndFunc

While 1
	GUICtrlSetBkColor($Rahmen,$colour1)
	sleep(500)
	GUICtrlSetBkColor($Rahmen,$colour2)
	sleep(500)
WEnd