% ring_mod.m
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

filename='IlikeMM.wav';


% read the sample waveform
[x,Fs] = audioread(filename);

index = 1:length(x);

% Ring Modulate with a sine wave frequency Fc

Fc = 800;

carrier= sin(2*pi*index*(Fc/Fs))'; 


y = x.*carrier;

% write output
audiowrite('IlikeMM_ringmod.wav', y,Fs);