% Spieldaten aus Datei laden
function l06_lade_spiel()
    global l06_data;  % Deklaration der globalen Datenbasis
    
    % Abfrage, ob ein Spiel bereits geladen ist
    if( l06_data.geladen == 1 )
        button = questdlg( 'Aktuelles Spiel beenden ?', ...
                           'Neues Spiel','Ja','Nein','Ja');
        if( strcmp( button, 'Nein' ) == 1 )
          return;
        end 
    end
    
    cla;  % Spielfeld loeschen
    
    % globales Datenfeld löschen
    l06_data = l06_data_clear(l06_data );

    % Namen der Spieledatei holen
    [FileName,PathName] = uigetfile( '*.l06', 'Labyrinth wählen' );
    if isequal( FileName, 0 )
       msgbox( 'Kein Labyrinth ausgewählt' );
       return;
    end
    
    % Spieldaten aus Datei einlesen
    l06_lese_spiel( FileName, PathName );