function T9C1(dateiname)

% T9C1('dateiname')
% Reproduziert den gespeicherten Programmablauf.

load(dateiname)

%% Abbildung erzeugen

bild=figure;
set(bild,'Color','white');

% Achsen festlegen
axis([0 12 0 12])
axis off 'square'
hold on

%% Wiederholungen

for w=1:parameter.wiederholungen

    % Plotten des Quadrats
    fill(parameter.qx+parameter.posx(w),parameter.qy+parameter.posy(w),parameter.farbe(w,:),'EdgeColor',parameter.farbe(w,:))
    
    % 5 sec Wartezeit
    p=rand*parameter.pause;
    pause(p)
    
    % Löschen des Quadrats
    fill(parameter.qx+parameter.posx(w),parameter.qy+parameter.posy(w),'white','EdgeColor','white')
    
end

close