axis([0 10 0 10])
hold on

%% Markieren der Punkte
b = [];
n = 1;

%% Markieren der Kontrollpunkte

disp('Left mouse button picks points.')
disp('Right mouse button picks last point.')

% Der erste Kontrollpunkt
[xi,yi,but] = ginput(1);
plot(xi,yi,'or')
b(:,n) = [xi;yi];

while but == 1
    [xi,yi,but] = ginput(1);
    % Markieren des Kontrollpunktes
    plot(xi,yi,'-or')
    % Verbinden benachbarter Kontrollpunkte
    %TO DO: Linie zwischen Kontrollpunkten zeichnen
    
    n = n+1;
    % Speichern des Kontrollpunktes
    b(:,n) = [xi;yi];
end

%% Auswerten der Bezier-Kurve

t = linspace(0,1,400);
% TO DO: Bezier Kurve auswerten

%% Plot des Interpolanten

%TO DO: Bezier Kurve zeichnen


%% Casteljau Algorightmus
%Fuer Teil (v)