function s= my_ammod(m, K, A, fc, fs)
%here i want to show the method of generating AM signal, here m is the
%modulating signal, K is the constant factor, A is the carrier eamplitude,
%fc is the carrier ferquency, and fs is the sampling ferequency here s iis
%defined as s = A(1 + K*m(t))cos(2*pi*fc*t)
%santosh shah, The LNM IIT Jaipur (India)(santosh.jnt@gmail.com) 21/04/07
% show the warning messege when K is too large
if(K*max(abs(m)) > 1)
warning('warining K*m(t) must me <= 1');
end
%calcualting the time vector from sampling frequency and signal
t = linspace(0, (length(m)-1) / fs, length(m));
%process for computing AM signal
s = A*(1 + K*m).*cos(2*pi*fc*t);%+ rand(length(fs));
end