AdlibRegister("MyAdlib", 500) ; каждые пол-секунды вызываем функцию MyAdlib
Sleep(3000) ; в течение 3 сек
Exit

Func MyAdlib()
	; выполнение этой функции не должно быть заблокировано, избегайте использования ...Wait(), MsgBox(), InputBox()
	If WinActive("Error") Then ; проверяем не появилось ли активное окно с названием Error
		;...
	EndIf
	MouseMove(Random(1, @DesktopWidth, 1), Random(1, @DesktopHeight, 1)) ; наглядно показываем случайное перемещение мыши
EndFunc