you can download the PPT from the link given below
https://drive.google.com/file/d/1VlcTj1XjTChR3BeER3bySh4R-cwgMwFF/view?usp=sharing
code
clc; clear all; clf;
t=[0:0.01:5*%pi];
A=5;
wc=5;
Vm=A.*squarewave(t);
Vc=A.*cos(wc.*t);
fc=wc/(2*%pi);
fd=0.5;
Vfsk=A.*cos(2.*%pi.*(fc+Vm.*fd).*t);
subplot(3,1,1);
plot(t,Vm,'red');
xlabel("Time");
ylabel("M(t)");
subplot(3,1,2);
plot(t,Vc);
xlabel("Time");
ylabel("C(t)");
subplot(3,1,3);
plot(t,Vfsk,'green');
xlabel("Time");
ylabel("BFSK");