schriftgroesse = 20;

    maxdarstellbarerwert = 20;
    mindarstellbarerwert = 0;
    
    
    zahnbreite = 30;
    zahnhoehe = 8;
    
%     zahnbreite = 50;
%     zahnhoehe = 15;
    
    
    
    %Faktor zur Faktorumrechnung der Darstellung
    clear faktor;
    faktor = (maxdarstellbarerwert - mindarstellbarerwert) /zahnbreite;
    
    %Erstellen der Grafik
    minA = 0;
    minB = 0;
    maxA = zahnbreite;
    maxB = zahnhoehe;

    %%******************************************
    %%Eigentlicher Grafikteil
    %%****************************************** 
   
    Graph = figure('units','normalized','position',[0,0,1,1], ...
            'Name', '3d');
        axes1 = axes('Parent',Graph,'FontSize',schriftgroesse,'DataAspectRatio',[1 1 faktor],'CLim', [mindarstellbarerwert maxdarstellbarerwert], 'LineWidth', 5, 'Position', [0, 0.2, 1,0.6]);
        xlim([minA maxA]);
        ylim([minB maxB]);
        zlim( [mindarstellbarerwert maxdarstellbarerwert]);
        %Höhenposition der Schrift Kopf/Ferse
        z = mindarstellbarerwert;

    
    view([45 45]);
    grid('on');
    hold('all');

    xlabel(axes1, 'Ferse      b [mm]', 'FontSize', schriftgroesse,...
        'HorizontalAlignment','left',...
        'VerticalAlignment','top',...
        'Position', [1 -5.5 z],...
        'Rotation',-36);
    ylabel('h [mm]','Rotation',41,...
        'HorizontalAlignment','right',...
        'VerticalAlignment','top',...
        'Position', [(maxA+5) maxB z], ...
        'FontSize',schriftgroesse);

    % Create zlabel
    zlabel(['Test'' '] ,'VerticalAlignment','bottom',...
        'FontSize',schriftgroesse);
%      zlabel(gesuchterwertdiagramm,'interpreter','latex','VerticalAlignment','bottom',...
    %Kennzeichnen wo Kopf und Ferse
    x= maxA/2+.5;
%     y= max(B)-0.5 ;
    y=maxB + 3;
%     z= min(minUebergabe) + .5;
    
    text ( x, y,z, 'Kopf','FontSize',schriftgroesse,'HorizontalAlignment','center','Rotation',-36);
%     text( -8,(min(B)- 6),z, 'Ferse','FontSize',schriftgroesse ,'Rotation',-38);
    
    %Ablegen in Bilddatei an uebergebenen Dateipfad
    set(gcf,'PaperPositionMode','auto');
% 
%     speicherort = '';
%     speicherort = [ausgabepfad, gesuchterwert, '_3d',['_Intervall' num2str(Intervall,'%03d')] ];
%     if (strcmp(ausgabeformat,'JPG') == 1)
%     print ('-djpeg',  '-r450', speicherort);
%     elseif (strcmp(ausgabeformat,'EPS') == 1)
%     print ('-deps2', speicherort);       
%     end

    close 3d;
    ret= 1;