initial commit / add all books

14 files changed, 241 insertions, 0 deletions

diff --git a/2951/CH3/EX3.1.A/additional_ex_1.jpeg b/2951/CH3/EX3.1.A/additional_ex_1.jpeg
new file mode 100755
index 000000000..488d5b817
--- /dev/null
+++ b/2951/CH3/EX3.1.A/additional_ex_1.jpeg
diff --git a/2951/CH3/EX3.1.A/additional_ex_1.sce b/2951/CH3/EX3.1.A/additional_ex_1.sce
new file mode 100755
index 000000000..a043e1d94
--- /dev/null
+++ b/2951/CH3/EX3.1.A/additional_ex_1.sce
@@ -0,0 +1,33 @@
+clc;

+clear;

+Fc=500;//carrier frequency in kHz

+Fm=1;// message signal frequency in kHz

+//a)

+

+USB=Fc+Fm;

+LSB=Fc-Fm;

+disp(USB,"USBI(in kHZ)=");

+disp(LSB,"LSB(in kHz)=");

+

+//b)

+

+Bandwidth=USB-LSB;

+disp(Bandwidth,"Bandwidth(in kHZ)=")

+//c)

+

+Fm=1.5;//message signal frequency in kHz

+

+USB1=Fc+Fm;

+LSB1=Fc-Fm;

+disp(USB1,"USB(in kHz)=");

+disp(LSB1,"LSB(in kHZ)=");

+

+

+//d)

+

+Amplitude=[0 0 0 0 0 0 0 0 0 5 10 5 0]; //sample values as denoted in textbook

+frequency=490:1:502;

+

+ plot2d3(frequency,Amplitude); 

+xlabel("Frequency(in kHZ)");

+ylabel("Amplitude(in V)");

diff --git a/2951/CH3/EX3.1/ex3_1.sce b/2951/CH3/EX3.1/ex3_1.sce
new file mode 100755
index 000000000..29917f0c0
--- /dev/null
+++ b/2951/CH3/EX3.1/ex3_1.sce
@@ -0,0 +1,15 @@
+clc;

+clear;

+Vm=3;// amplitude of message signal in V

+Vc=5;//amplitude of carrier signal in V

+m=Vm/Vc; //modulation index

+disp("modulation index");

+disp(m,"=");

+disp("Upper Sideband Frequency(in MHz)");

+Fm=4;//Frequency in KHz

+Fc=5;//Frequency in MHz

+disp(Fc+(Fm*10^(-3)),"=");

+disp("Lower Sideband Frequency(in MHz)");

+disp(Fc-(Fm*10^(-3)),"=");

+disp("AMplitude of each Sideband(in V)");

+disp(m*Vc/2,"=");

diff --git a/2951/CH3/EX3.2.A/additional_ex_2.jpeg b/2951/CH3/EX3.2.A/additional_ex_2.jpeg
new file mode 100755
index 000000000..77e6e7281
--- /dev/null
+++ b/2951/CH3/EX3.2.A/additional_ex_2.jpeg
diff --git a/2951/CH3/EX3.2.A/additional_ex_2.sce b/2951/CH3/EX3.2.A/additional_ex_2.sce
new file mode 100755
index 000000000..fd46a85b5
--- /dev/null
+++ b/2951/CH3/EX3.2.A/additional_ex_2.sce
@@ -0,0 +1,34 @@
+clear;

+clc;

+

+

+Fm=3; //frequency of message signal

+Fc=8; //frequency of carrier signal

+Ea=5;

+Eb=10;

+m=Ea/Eb; //modulation index

+

+disp(m,"m=");

+USf=Fc+Fm*10^(-3);//Upper Sideband frequency

+LSf=Fc-Fm*10^(-3);//Lower sideband frequency

+disp(USf,"USf(Mhz)=");

+disp(LSf,"LSf(Mhz)=");

+Amp=m*Eb/2;// amplitude of each sideband

+disp(Amp,"amp(v)=");

+

+

+

+function[x,Vm,Vc]=ampmod(Ea,Eb,m,Fc,Fm)

+    t=0:0.005:5;

+    

+    Vm = Ea*sin(2*%pi*Fm*t);

+    Vc = Eb*sin(2*%pi*Fc*t);

+   

+    x = ((Eb+Ea*sin(2*%pi*Fm*t))).*(sin(2*%pi*Fc*t));

+    

+    subplot(3,1,2);

+    plot2d(t,x);

+    title('Amplitude Modulated Signal');

+endfunction

+

+ampmod(Ea,Eb,m,Fc,Fm)//amplitude modulation

diff --git a/2951/CH3/EX3.2/ex3_2.sce b/2951/CH3/EX3.2/ex3_2.sce
new file mode 100755
index 000000000..b79e922db
--- /dev/null
+++ b/2951/CH3/EX3.2/ex3_2.sce
@@ -0,0 +1,7 @@
+clc;

+clear;

+Pc=300;// Power of the carrier in W

+m=0.6// modulation index

+Pt=Pc*(1+(m^2)/2); //total power

+disp("Total power in the modulated wave(in W) is");

+disp(Pt);

diff --git a/2951/CH3/EX3.3.A/additional_ex_3.sce b/2951/CH3/EX3.3.A/additional_ex_3.sce
new file mode 100755
index 000000000..c665cb5e0
--- /dev/null
+++ b/2951/CH3/EX3.3.A/additional_ex_3.sce
@@ -0,0 +1,15 @@
+clc;

+clear;

+disp("efficiency(n)=(useful power/total power)*100%");

+disp("       =total sideband power/(total sideband power+carrier power)*100%");

+

+syms m Pc

+N=[((m^2)*Pc/2)/(Pc*(1+(m^2)/2))];

+disp("*100% ",N);

+

+disp("----------------------------------------------------------------");

+m=0.7 //modulation index

+

+

+n=[m^2/(m^2+2)]*100;  //efficiency

+disp(n,"the percentage of useful power is ");

diff --git a/2951/CH3/EX3.3/ex3_3.sce b/2951/CH3/EX3.3/ex3_3.sce
new file mode 100755
index 000000000..c9eeaf28d
--- /dev/null
+++ b/2951/CH3/EX3.3/ex3_3.sce
@@ -0,0 +1,16 @@
+clc;

+clear;

+Pt=11.5;//Total power in kW

+Pc=10;// Carrier power in kW

+//a)

+

+m_square=2*((Pt/Pc)-1);

+m=sqrt(m_square);//modulation index

+

+//b)

+m2=0.5;

+mt=sqrt(m^2 +m2^2); 

+Pt=Pc*(1+mt^2/2); //total power in kW

+

+disp(m,"modulation index is ");

+disp(Pt,"Total carrier power(in kW) ");

diff --git a/2951/CH3/EX3.4.A/additional_ex_4.sce b/2951/CH3/EX3.4.A/additional_ex_4.sce
new file mode 100755
index 000000000..ae3f6449f
--- /dev/null
+++ b/2951/CH3/EX3.4.A/additional_ex_4.sce
@@ -0,0 +1,20 @@
+clc;

+clear;

+Vc=8;// carrier signal voltage in V

+m=1;//modulation index

+R=8;//resistance in ohms

+//a)

+

+Pc=Vc^2/(2*R); 

+disp(Pc,"power of the carrier(in W) is");

+Ps=m^2*Pc/4;

+disp(Ps,"Power in each Side-Bands(in W)");

+

+//b)

+disp(2*Ps,"Total sideband Power(in W)");

+

+//c)

+disp(Pc+2*Ps,"Total Power of Modulated wave(in W)");

+

+//d)

+disp(2*Ps/(Pc+2*Ps)*100,"Efficiency Percentage");

diff --git a/2951/CH3/EX3.4/ex3_4.sce b/2951/CH3/EX3.4/ex3_4.sce
new file mode 100755
index 000000000..1a4e9bfcd
--- /dev/null
+++ b/2951/CH3/EX3.4/ex3_4.sce
@@ -0,0 +1,23 @@
+clc;

+clear;

+m1=0.3;

+m2=0.4;

+m3=0.5;

+m4=0.6; //modulation indices

+Pc=150;//power of carrier in Watts

+

+mt=sqrt(m1^2+m2^2+m3^2+m4^2); //total modulation index

+

+Pt=Pc*(1+mt^2/2);//Total transmitted power in Watts

+

+Ps=(mt^2)*Pc/4; //Sideband Power in Watts

+

+disp(mt,"Total Modulation index");

+

+disp(Pt,"Total Transmitted Power (in W)");

+

+//change in answer as compared to book ,due to approximation error..

+disp(Ps,"Sideband Power(in W)")

+

+

+

diff --git a/2951/CH3/EX3.5.A/additional_ex_5.sce b/2951/CH3/EX3.5.A/additional_ex_5.sce
new file mode 100755
index 000000000..baba460e6
--- /dev/null
+++ b/2951/CH3/EX3.5.A/additional_ex_5.sce
@@ -0,0 +1,24 @@
+clc;

+clear;

+m1=0.3;

+m2=0.4;

+m3=0.5;

+m4=0.6; //modulation indices

+Pc=80;// Power in carrier signal 

+

+mt=sqrt(m1^2+m2^2+m3^2+m4^2);

+

+//a)

+disp(mt,"Total Coefficient of Modulation ");

+

+//calculation error in book

+

+//b)

+Ps=(mt^2)*Pc/2;

+disp(Ps,"Sideband powers(in W) ");

+

+//c)

+disp(Pc+2*Ps,"Total Transmitted Power(in W)");

+

+//d)

+disp((Ps/(Pc+2*Ps))*100,"Efficiency Percentage");

diff --git a/2951/CH3/EX3.5/ex3_5.sce b/2951/CH3/EX3.5/ex3_5.sce
new file mode 100755
index 000000000..c68cbd0de
--- /dev/null
+++ b/2951/CH3/EX3.5/ex3_5.sce
@@ -0,0 +1,18 @@
+clc;

+clear;

+fLSB1=395;

+fLSB22=397.5;// Two  LSB frequencies in kHz

+E1=4;

+E2=3;//peak voltages of modulating signal in V

+R=60;//resistor in ohms

+

+Et=sqrt(E1^2+E2^2);

+

+Erms=Et*0.707;

+

+PEP=((Et*0.707)^2)/R; //Pak Envelope Power in W

+

+Avg_Power=PEP/2;

+

+disp(PEP,"Peak Envelope Power(in W)");

+disp(Avg_Power,"Average Power(in W)");

diff --git a/2951/CH3/EX3.7.A/additional_ex_7.sce b/2951/CH3/EX3.7.A/additional_ex_7.sce
new file mode 100755
index 000000000..25f256aa2
--- /dev/null
+++ b/2951/CH3/EX3.7.A/additional_ex_7.sce
@@ -0,0 +1,13 @@
+clc;

+clear;

+Fc=10;//carrier Frequency in kHz

+R=15;//Resistance in Kohms

+C=660;//Capacitance in pF

+a=1/R;

+b=2*%pi*Fc*10^(3)*C*10^(-12);

+Y=a+%i*b;

+Z=1/abs(Y);

+//after rounding off

+Z=12.83//Impedence in Kohms

+m=Z/(R);//modulation index

+disp(m,"MAximum modulation index to avoid diagonal clipping is");

diff --git a/2951/CH3/EX3.8.A/additional_ex_8.sce b/2951/CH3/EX3.8.A/additional_ex_8.sce
new file mode 100755
index 000000000..33a74c0b7
--- /dev/null
+++ b/2951/CH3/EX3.8.A/additional_ex_8.sce
@@ -0,0 +1,23 @@
+clc;

+clear;

+

+

+syms Ec Fc Fm pi t

+

+Wave=Ec*cos(2*pi*Fm*t)*cos(2*pi*Fc*t)+Ec*sin(2*pi*Fm*t)*sin(2*pi*Fc*t);

+ disp("when the wave is");

+ disp(Wave);

+

+f_upper=Ec*cos(2*pi*(Fc+Fm)*t); 

+disp("We get the upper sideband as");

+disp(f_upper);

+

+

+f_lower=Ec*cos(2*pi*(Fc-Fm)*t); 

+disp("We get the lower sideband as");

+disp(f_lower);

+

+

+

+

+