Animation graph with the slider

Hello guys,

I have question, how can I animate this graph with slider? I just want to shift green point from the start to the end and again back (as on the picture) Any tips?

Best regards

clear, clc, close

t = linspace(0, 2*pi, 100);
x = sin(t);

% Set up first frame
h = figure('Color', 'white');
plot(t,x, 'LineWidth', 2)
xlabel('x')
ylabel('y')
hold on

h1 = plot(t(1),x(1),'go','LineWidth', 3, 'MarkerSize', 10);

for q = 1:length(t)
    set(h1, 'XData', t(q), 'YData', x(q));
    title(['Amplituda ', num2str(x(q)), ' mV.'])
    pause(0.01)
end

for q = length(t):-1:1
    set(h1, 'XData', t(q), 'YData', x(q));
    title(['Amplituda ', num2str(x(q)), ' mV.'])
    pause(0.01)
end

[martin martin]

I tried simple GUI with only with axis and slider, but I don't know how to write it correctly.