

        [~] = incrementWaitbar(hWaitbar, waitbarIndex, numWaitStages, 'Generating Fluorometer Plot...');
        hFigPlot = figure('Name','Fluorometer');
        clf;
        set(hFigPlot, 'UserData', 'Plot_Fluor');

        % got a wlbb2f
        % IOP site skips showing fluor_temp on the same graph
        show_fluor_temp = 0;
        if (show_fluor_temp)
        [fmin,fmax,fdel] = plot_bounds([fluor;fluor_temp],0,2000,[0,200]);
        else
        [fmin,fmax,fdel] = plot_bounds(fluor,0,2000,[0,200]);
        end

        hold on;
        grid on;
        set(gca,'YDir','reverse');

        legend_text = {};
        line( fluor(wet_dive_i), wet_depth_m(wet_dive_i), 'Marker', 'v', 'Color', 'b', ...
            'MarkerSize', 1, 'LineStyle', '-');
        legend_text(end+1) = {'Descent'};
        line( fluor(wet_climb_i), wet_depth_m(wet_climb_i), 'Marker', '^', 'Color', 'r', ...
            'MarkerSize', 1, 'LineStyle', '-');
        legend_text(end+1) = {'Ascent'};
        if (show_fluor_temp)
            line( fluor_temp(wet_dive_i), wet_depth_m(wet_dive_i), 'Marker', 'v', 'Color', 'c', ...
                  'MarkerSize', 1, 'LineStyle', '-');
            legend_text(end+1) = {'Temperature descent'};
            line( fluor_temp(wet_climb_i), wet_depth_m(wet_climb_i), 'Marker', '^', 'Color', 'm', ...
                  'MarkerSize', 1, 'LineStyle', '-');
            legend_text(end+1) = {'Temperature ascent'};
        end
        ax1 = gca;
        set(ax1, 'XAxisLocation', 'top', 'XColor', 'r', 'XLim', [fmin,fmax], ...
               'XTick', [fmin:fdel:fmax],'YLim', [dmin,dmax]);
        xlabel( 'Fluorometer Output [counts]' );
        ylabel( 'Depth [counts]');

        lg = legend(legend_text,'Location','SouthEast');
        set(lg,'color','none'); % make transparent

        v = axis;
        ytxt = v(4) + 0.1*(v(4)-v(3));
        xtxt = v(1);
        text(xtxt , ytxt, timelabel);
        xtxt = v(1) +0.4*(v(2)-v(1));
        text(xtxt , ytxt, titlestring);

        xtxt = v(1);
        ytxt = v(3) - 0.05*(v(4)-v(3));
        text(xtxt , ytxt, base_file);

        comment = '';
        xtxt = v(1) + 0.6*(v(2)-v(1));
        text(xtxt, ytxt, comment);
