function lab10_pelda0A_matlab2015
% binaris modu fajlkezeles

    % a kiirando fajl neve
    filename='szinusz_fwrite.bin'; % nem kotelezo a bin

    fs = filesep;
    dir_path = ['.', fs];
    file_path=[dir_path, filename];

    % fajl megnyitasa irasra, ez utan az
    % fid-val hivatkozok erre a fajlra
    fid=fopen(file_path,'w');

    t = linspace(0.1, 3*pi, 25);
    y = sin(t);

    % adatok kiirasa binarisan, double-kent
    fwrite(fid,[t' y'],'double');
    % fajl bezarasa, valtozok torlese
    fclose(fid);

    clear('t', 'y'); % lehetne meg a formaja: clear t, y

    % ujranyitas, visszaolvasas
    fid=fopen(file_path, 'r'); % vagy siman fid=fopen(file_path);

    data = fread(fid, inf, 'double');
    data = reshape(data, length(data)/2, 2);

    fclose(fid);

    figure;
    plot(data(:, 1), data(:, 2), 'b.-');

end

