HotKeySet("{ESC}","_EXIT")
Func _EXIT()
	Exit
EndFunc
$Process = InputBox("","Prozessname (Pfad sollte in der Path-Variable vorliegen oder im Scriptordner sein):","notepad.exe")
While 1
    If Not ProcessExists($Process) Then ShellExecuteWait($Process, "", "", "")
WEnd