from 3.5.0+

    if (strcmpi (axis_obj.box, "on"))
      if (nd == 3)
        fputs (plot_stream, "set border 4095;\n");
      else
        fputs (plot_stream, "set border 431;\n");
      endif
    else
      if (nd == 3)
        fputs (plot_stream, "set border 895;\n");
      elseif (! isempty (axis_obj.ytick))
        if (strcmpi (axis_obj.yaxislocation, "right"))
          fprintf (plot_stream, "unset ytics; set y2tics %s nomirror\n",
                   axis_obj.tickdir);
          if (strcmpi (axis_obj.xaxislocation, "top"))
            fprintf (plot_stream, "unset xtics; set x2tics %s nomirror\n",
                     axis_obj.tickdir);
            fputs (plot_stream, "set border 12;\n");
          elseif (strcmpi (axis_obj.xaxislocation, "bottom"))
            fprintf (plot_stream, "unset x2tics; set xtics %s nomirror\n",
                     axis_obj.tickdir);
            fputs (plot_stream, "set border 9;\n");
          else # xaxislocation == zero
            fprintf (plot_stream, "unset x2tics; set xtics %s nomirror\n",
                     axis_obj.tickdir);
            fputs (plot_stream, "set border 8;\n");
          endif
        elseif (strcmpi (axis_obj.yaxislocation, "left"))
          fprintf (plot_stream, "unset y2tics; set ytics %s nomirror\n",
                   axis_obj.tickdir);
          if (strcmpi (axis_obj.xaxislocation, "top"))
            fprintf (plot_stream, "unset xtics; set x2tics %s nomirror\n",
                     axis_obj.tickdir);
            fputs (plot_stream, "set border 6;\n");
          elseif (strcmpi (axis_obj.xaxislocation, "bottom"))
            fprintf (plot_stream, "unset x2tics; set xtics %s nomirror\n",
                     axis_obj.tickdir);
            fputs (plot_stream, "set border 3;\n");
          else # xaxislocation == zero
            fprintf (plot_stream, "unset x2tics; set xtics %s nomirror\n",
                     axis_obj.tickdir);
            fputs (plot_stream, "set border 2;\n");
          endif
        else # yaxislocation == zero
          fprintf (plot_stream, "unset y2tics; set ytics %s nomirror\n",
                   axis_obj.tickdir);
          if (strcmpi (axis_obj.xaxislocation, "top"))
            fprintf (plot_stream, "unset xtics; set x2tics %s nomirror\n",
                     axis_obj.tickdir);
            fputs (plot_stream, "set border 4;\n");
          elseif (strcmpi (axis_obj.xaxislocation, "bottom"))
            fprintf (plot_stream, "unset x2tics; set xtics %s nomirror\n",
                     axis_obj.tickdir);
            fputs (plot_stream, "set border 1;\n");
          else # xaxislocation == zero
            fprintf (plot_stream, "unset y2tics; set ytics %s nomirror\n",
                     axis_obj.tickdir);
            fprintf (plot_stream, "unset x2tics; set xtics %s nomirror\n",
                     axis_obj.tickdir);
            fputs (plot_stream, "unset border;\n");
          endif
        endif
      endif
    endif