function success=EyelinkDoDriftCorrection(el, x, y, draw, allowsetup)
% success=EyelinkDoDriftCorrection(el [, x][, y][, draw][, allowsetup])
%
% DO PRE-TRIAL DRIFT CORRECTION
% We repeat if ESC key pressed to do setup.
% Setup might also have erased any pre-drawn graphics.
%
% Note that EyelinkDoDriftCorrection() internally uses Beeper() and Snd() to play
% auditory feedback tones if el.targetbeep=1 or el.feedbackbeep=1 and the
% el.callback function is set to the default PsychEyelinkDispatchCallback().
% If you want to use PsychPortAudio in a script that also calls EyelinkDoDriftCorrection,
% then read "help Snd" for instructions on how to provide proper interoperation
% between PsychPortAudio and the feedback sounds created by Eyelink.
%

success=1;

% if no x and y are supplied, set x,y to center coordinates
if ~exist('x', 'var') || isempty(x) || ~exist('y', 'var') || isempty(y)
	[x,y] = WindowCenter(el.window); % convenience routine part of eyelink toolbox
end

if ~exist('draw', 'var') || isempty(draw)
	draw=1;
end

if ~exist('allowsetup', 'var') || isempty(allowsetup)
	allowsetup=1;
end

while 1	
	if Eyelink('IsConnected')==el.notconnected   % Check link often so we don't lock up if tracker lost
		%result=el.ABORT_EXPT;
		success=0;
		return;
	end;
	% DRIFT CORRECTION */
	% 3rd argument would be 0 to NOT draw a target */
	% fprintf('drifcorr at % d %d\n', x, y );
	error = EyelinkDoDriftCorrect(el, x, y, draw, allowsetup);
	
	if error==el.TERMINATE_KEY
		%result=el.ABORT_EXPT;
		success=0;
		return;
	end;
	% repeat if ESC was pressed to access Setup menu
	if(error~=el.ESC_KEY) break; end
end % while