Выполнение функции при зажатой кнопке GUI

function WonderZina()
fig = figure('resize', 'off');
ax = axes();
plM = plot([0 0 0 0],linspace(0, 4.1, 4),'linewidth',3);
set(ax, 'Xlim', [-10 10], 'Ylim', [-10 10], 'visible', 'off');
set(fig,'KeyPressFcn', {@keyControl, plM});
end
 
function keyControl(~, event, plM)
% keyControl Обработка команд с клавиатуры
x = get(plM,'XData');
y = get(plM,'YData');
temp1 = [x(4) y(4) 0 1];
fi = 0;
switch event.Key
    case 'uparrow'
        fi = -2;
    case 'downarrow'
        fi = 2;       
end
 
if fi ~= 0
    Ty = [cosd(fi) sind(fi) 0 0; -sind(fi) cosd(fi) 0 0; 0 0 1 0; 0 0 0 1];
    temp2 = temp1*Ty;
    set(plM,'XData',linspace(0, temp2(1), 4),'YData', linspace(0, temp2(2), 4));
end
end

function WonderZina()
fig = figure('resize', 'off', 'WindowButtonUpFcn', @figUp, 'WindowButtonDownFcn', @figDown);
ax = axes();
plM = plot([0 0 0 0],linspace(0, 4.1, 4),'linewidth',3);
set(ax, 'Xlim', [-10 10], 'Ylim', [-10 10], 'visible', 'off');
butPo = uicontrol('Style', 'PushButton', 'Tag', 'Po', ...
    'String', 'По часовой', ...
    'Position', [100 100 100 20], 'ButtonDownFcn', {@buttonPo, plM}, 'Enable', 'inactiv');
butProt = uicontrol('Style', 'PushButton', 'Tag', 'Protiv', ...
    'String', 'Против', ...
    'Position', [100 50 100 20], 'ButtonDownFcn', {@buttonProtiv, plM}, 'Enable', 'inactiv');
set(fig, 'UserData', [butPo butProt]);
end
 
function figUp(obj, ~)
temp = get(obj, 'UserData');
set(temp(1), 'UserData', 0);
set(temp(2), 'UserData', 0);
end
 
function figDown(obj, ~)
temp = get(obj, 'UserData');
set(temp(1), 'UserData', 1);
set(temp(2), 'UserData', 1);
end
 
function buttonPo(obj, ~, plM)
while get(obj, 'UserData')   
    x = get(plM,'XData');
    y = get(plM,'YData');
    temp1 = [x(4) y(4) 0 1];
    fi = -2;
    Ty = [cosd(fi) sind(fi) 0 0; -sind(fi) cosd(fi) 0 0; 0 0 1 0; 0 0 0 1];
    temp2 = temp1*Ty;
    set(plM,'XData',linspace(0, temp2(1), 4),'YData', linspace(0, temp2(2), 4));
    pause(0.05);
end
end
 
function buttonProtiv(obj, ~, plM)
while get(obj, 'UserData')   
    x = get(plM,'XData');
    y = get(plM,'YData');
    temp1 = [x(4) y(4) 0 1];
    fi = 2;
    Ty = [cosd(fi) sind(fi) 0 0; -sind(fi) cosd(fi) 0 0; 0 0 1 0; 0 0 0 1];
    temp2 = temp1*Ty;
    set(plM,'XData',linspace(0, temp2(1), 4),'YData', linspace(0, temp2(2), 4));
    pause(0.05);
end
end