From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001 From: priyanka Date: Wed, 24 Jun 2015 15:03:17 +0530 Subject: initial commit / add all books --- 2951/CH3/EX3.1.A/additional_ex_1.jpeg | Bin 0 -> 20325 bytes 2951/CH3/EX3.1.A/additional_ex_1.sce | 33 +++++++++++++++++++++++++++++++++ 2951/CH3/EX3.1/ex3_1.sce | 15 +++++++++++++++ 2951/CH3/EX3.2.A/additional_ex_2.jpeg | Bin 0 -> 38357 bytes 2951/CH3/EX3.2.A/additional_ex_2.sce | 34 ++++++++++++++++++++++++++++++++++ 2951/CH3/EX3.2/ex3_2.sce | 7 +++++++ 2951/CH3/EX3.3.A/additional_ex_3.sce | 15 +++++++++++++++ 2951/CH3/EX3.3/ex3_3.sce | 16 ++++++++++++++++ 2951/CH3/EX3.4.A/additional_ex_4.sce | 20 ++++++++++++++++++++ 2951/CH3/EX3.4/ex3_4.sce | 23 +++++++++++++++++++++++ 2951/CH3/EX3.5.A/additional_ex_5.sce | 24 ++++++++++++++++++++++++ 2951/CH3/EX3.5/ex3_5.sce | 18 ++++++++++++++++++ 2951/CH3/EX3.7.A/additional_ex_7.sce | 13 +++++++++++++ 2951/CH3/EX3.8.A/additional_ex_8.sce | 23 +++++++++++++++++++++++ 14 files changed, 241 insertions(+) create mode 100755 2951/CH3/EX3.1.A/additional_ex_1.jpeg create mode 100755 2951/CH3/EX3.1.A/additional_ex_1.sce create mode 100755 2951/CH3/EX3.1/ex3_1.sce create mode 100755 2951/CH3/EX3.2.A/additional_ex_2.jpeg create mode 100755 2951/CH3/EX3.2.A/additional_ex_2.sce create mode 100755 2951/CH3/EX3.2/ex3_2.sce create mode 100755 2951/CH3/EX3.3.A/additional_ex_3.sce create mode 100755 2951/CH3/EX3.3/ex3_3.sce create mode 100755 2951/CH3/EX3.4.A/additional_ex_4.sce create mode 100755 2951/CH3/EX3.4/ex3_4.sce create mode 100755 2951/CH3/EX3.5.A/additional_ex_5.sce create mode 100755 2951/CH3/EX3.5/ex3_5.sce create mode 100755 2951/CH3/EX3.7.A/additional_ex_7.sce create mode 100755 2951/CH3/EX3.8.A/additional_ex_8.sce (limited to '2951/CH3') 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 Binary files /dev/null and b/2951/CH3/EX3.1.A/additional_ex_1.jpeg differ 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 Binary files /dev/null and b/2951/CH3/EX3.2.A/additional_ex_2.jpeg differ 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); + + + + + -- cgit