.octaverc

function userDir = getuserdir()
    %GETUSERDIR   return the user home directory.
    %   USERDIR = GETUSERDIR returns the user home directory using the registry
    %   on windows systems and using Java on non windows systems as a string
    %
    %   Example:
    %      getuserdir() returns on windows
    %           C:\Documents and Settings\MyName\Eigene Dateien

    if ispc
        % userDir = winqueryreg('HKEY_CURRENT_USER',...
            % ['Software\Microsoft\Windows\CurrentVersion\' ...
             % 'Explorer\Shell Folders'],'Personal');
        userDir = getenv('MYDOCUMENTS');
    else
%        userDir = char(java.lang.System.getProperty('user.home'));
        userDir = getenv('HOME');
    end
end

STARTUPSCRIPT=[getuserdir(),filesep,'MATLAB',filesep,'startup.m']
disp(['Running ',STARTUPSCRIPT,' ...']);
run(STARTUPSCRIPT);

if version() == '3.4.0' || version() == '3.6.1'
  disp('running startup()')
  % This does not work on GNU Octave, version 3.2.4
  % but works on GNU Octave, version 3.4.0 and later...
  startup()
end

disp('...done');