Matlab Modernize Code

% REMOVED: wavread no longer exists
[y, fs] = wavread('audio.wav');
[y, fs, nbits] = wavread('audio.wav');
y = wavread('audio.wav', [1000 5000]);  % Read samples 1000-5000

% Read entire file
[y, fs] = audioread("audio.wav");

% Read specific sample range
[y, fs] = audioread("audio.wav", [1000 5000]);

% Get native format (for bit depth)
[y, fs] = audioread("audio.wav", "native");
info = audioinfo("audio.wav");  % Contains BitsPerSample

% REMOVED: wavfinfo no longer exists
[size, fs, nbits, opts] = wavfinfo('audio.wav');

% Get complete audio file information
info = audioinfo("audio.wav");

% Access specific properties
fs = info.SampleRate;
numSamples = info.TotalSamples;
duration = info.Duration;
numChannels = info.NumChannels;
bitsPerSample = info.BitsPerSample;

% REMOVED: wavwrite no longer exists
wavwrite(y, fs, 'output.wav');
wavwrite(y, fs, 16, 'output.wav');  % 16-bit

% Write audio file (default format)
audiowrite("output.wav", y, fs);

% Specify bit depth
audiowrite("output.wav", y, fs, BitsPerSample=16);

% Write to different formats
audiowrite("output.flac", y, fs);  % FLAC (lossless)
audiowrite("output.ogg", y, fs);   % Ogg Vorbis
audiowrite("output.m4a", y, fs);   % MPEG-4 AAC

% REMOVED: wavplay no longer exists
wavplay(y, fs);
wavplay(y, fs, 'sync');  % Synchronous playback

% Create audio player object
player = audioplayer(y, fs);

% Play asynchronously (non-blocking)
play(player);

% Play synchronously (blocking) - use playblocking
playblocking(player);

% Control playback
pause(player);
resume(player);
stop(player);

% Play specific range (sample indices)
play(player, [1000 5000]);

% Clean up
clear player;

player = audioplayer(y, fs);
player.StopFcn = @(~,~) disp("Playback complete");
play(player);

% REMOVED: wavrecord no longer exists
y = wavrecord(n, fs);           % Record n samples
y = wavrecord(n, fs, ch);       % Specify channels
y = wavrecord(n, fs, ch, nbits);

% Create recorder object
recorder = audiorecorder(fs, nBits, nChannels);

% Record for specific duration
recordblocking(recorder, duration);  % Blocking record

% Or record asynchronously
record(recorder);
pause(duration);  % Or wait for user input
stop(recorder);

% Get recorded data
y = getaudiodata(recorder);

% Get data in specific format
y = getaudiodata(recorder, "double");
y = getaudiodata(recorder, "int16");

% Clean up
clear recorder;

recorder = audiorecorder(44100, 16, 1);
recorder.TimerFcn = @(~,~) plotAudio(recorder);
recorder.TimerPeriod = 0.1;
record(recorder);

% REMOVED (R2015b): aviread no longer exists
mov = aviread('video.avi');
frame = aviread('video.avi', 10);  % Read frame 10

% NOT RECOMMENDED: aviinfo still runs but will be removed
info = aviinfo('video.avi');

% Create VideoReader object
v = VideoReader("video.mp4");

% Get video properties
numFrames = v.NumFrames;
frameRate = v.FrameRate;
duration = v.Duration;
width = v.Width;
height = v.Height;

% Read all frames
while hasFrame(v)
    frame = readFrame(v);
    % Process frame
end

% Read specific frame (R2014b+)
frame = read(v, 10);  % Frame 10

% Read range of frames
frames = read(v, [10 20]);  % Frames 10-20

% Seek to time position
v.CurrentTime = 5.0;  % Jump to 5 seconds
frame = readFrame(v);

v = VideoReader("video.mp4");
% Process frame-by-frame to avoid loading entire video
while hasFrame(v)
    frame = readFrame(v);
    processedFrame = myProcessing(frame);
end

% REMOVED: avifile no longer exists
aviobj = avifile('output.avi');
aviobj.FPS = 30;
for i = 1:numFrames
    aviobj = addframe(aviobj, frame);
end
aviobj = close(aviobj);

% Create VideoWriter object
v = VideoWriter("output.mp4", "MPEG-4");
v.FrameRate = 30;
v.Quality = 90;  % For compressed formats

% Open, write frames, close
open(v);
for i = 1:numFrames
    frame = getFrame(i);  % Your frame generation
    writeVideo(v, frame);
end
close(v);

% Uncompressed AVI
v = VideoWriter("output.avi", "Uncompressed AVI");

% Motion JPEG AVI
v = VideoWriter("output.avi", "Motion JPEG AVI");

% MPEG-4 (requires license on some platforms)
v = VideoWriter("output.mp4", "MPEG-4");

% Grayscale AVI
v = VideoWriter("output.avi", "Grayscale AVI");

% Indexed AVI (with colormap)
v = VideoWriter("output.avi", "Indexed AVI");

% Read audio
[signal, fs] = audioread("input.wav");

% Get file info
info = audioinfo("input.wav");
fprintf("Duration: %.2f seconds, Channels: %d\n", info.Duration, info.NumChannels);

% Process (example: apply gain)
processed = signal*0.8;

% Write output
audiowrite("output.wav", processed, fs, BitsPerSample=24);

% Play result
player = audioplayer(processed, fs);
playblocking(player);

% Read video
reader = VideoReader("input.mp4");

% Create output
writer = VideoWriter("output.mp4", "MPEG-4");
writer.FrameRate = reader.FrameRate;
open(writer);

% Process frame-by-frame
while hasFrame(reader)
    frame = readFrame(reader);

    % Example: Convert to grayscale
    grayFrame = rgb2gray(frame);
    grayFrame = repmat(grayFrame, 1, 1, 3);  % Back to RGB for writing

    writeVideo(writer, grayFrame);
end

close(writer);