diff options
Diffstat (limited to '1409/CH5')
| -rw-r--r-- | 1409/CH5/EX5.10/5_10.sce | 23 | ||||
| -rw-r--r-- | 1409/CH5/EX5.11/5_11.sce | 11 | ||||
| -rw-r--r-- | 1409/CH5/EX5.12/5_12.sce | 19 | ||||
| -rw-r--r-- | 1409/CH5/EX5.13/5_13.sce | 14 | ||||
| -rw-r--r-- | 1409/CH5/EX5.17/5_17.sce | 10 | ||||
| -rw-r--r-- | 1409/CH5/EX5.4/5_4.sce | 12 | ||||
| -rw-r--r-- | 1409/CH5/EX5.5/5_5.sce | 25 | ||||
| -rw-r--r-- | 1409/CH5/EX5.6/5_6.sce | 15 | ||||
| -rw-r--r-- | 1409/CH5/EX5.7/5_7.sce | 12 | ||||
| -rw-r--r-- | 1409/CH5/EX5.8/5_8.sce | 11 | ||||
| -rw-r--r-- | 1409/CH5/EX5.9/5_9.sce | 15 |
11 files changed, 167 insertions, 0 deletions
diff --git a/1409/CH5/EX5.10/5_10.sce b/1409/CH5/EX5.10/5_10.sce new file mode 100644 index 000000000..e72902fc2 --- /dev/null +++ b/1409/CH5/EX5.10/5_10.sce @@ -0,0 +1,23 @@ +clc;
+//page no 5-18
+//Example 5.10
+//Given modulating voltage is 5V and frequency deviation constant is 1kHz/V
+amp=5;//Carrier amplitude in V
+fd=1;//in kHz/V
+fm=15;//in kHz
+Fd=fd*amp;//frequency deviation
+disp(+'kHz',Fd,'Frequency deviation is');
+beta1=Fd/fm;
+disp(beta1,'Modulation index is');
+//For beta1=0.333, from the table of bessel functions we have
+J0=0.96;
+J1=0.18;
+J2=0.02;//these values are for unmodulated carrier
+//Values for modulated carrier are
+j0=J0*amp;
+j1=J1*amp;
+j2=J2*amp;
+disp(j0,'J0=');
+disp(j1,'J1=');
+disp(j2,'J2=');
+
diff --git a/1409/CH5/EX5.11/5_11.sce b/1409/CH5/EX5.11/5_11.sce new file mode 100644 index 000000000..0bbe00182 --- /dev/null +++ b/1409/CH5/EX5.11/5_11.sce @@ -0,0 +1,11 @@ +clc;
+//page no 5-22
+//Example 5.11
+//Given frequency deviation is 50kHz and maximum modulating frequency is 15kHz
+fd=50;//in kHz
+fm=15;//in kHz
+beta1=fd/fm;
+disp(beta1,'Modulation index=');
+//Using Carson's rule
+BW=2*(beta1+1)*fm;
+disp(+'kHz',BW,'Transmission bandwidth is');
diff --git a/1409/CH5/EX5.12/5_12.sce b/1409/CH5/EX5.12/5_12.sce new file mode 100644 index 000000000..6d11d4e1c --- /dev/null +++ b/1409/CH5/EX5.12/5_12.sce @@ -0,0 +1,19 @@ +clc;
+//page no 5-23
+//Example 5.12
+//Given s(t)=10*sin[(5.7*10^8*t)+5*sin(12*10^3*t)]
+//Comparing it with standard FM: s(t)= Ac(wc*t+beta*sin(wm*t))
+Ac=10;
+wc=5.7*10^8;
+wm=12*10^3;
+beta1=5;
+fc=(wc/(2*%pi))*10^(-6);
+disp(+'MHz',fc,'Carrier frequency=');
+fm=(wm/(2*%pi))*10^(-3);
+disp(+'kHz',fm,'Modulating frequency=');
+disp(beta1,'Modulation index=');
+fd=beta1*fm;
+disp(+'kHz',fd,'Frequency deviation=');
+R=100;//in ohms
+p=[(Ac/sqrt(2))^2]/R;
+disp(+'W',p,'Power dissipated=');
diff --git a/1409/CH5/EX5.13/5_13.sce b/1409/CH5/EX5.13/5_13.sce new file mode 100644 index 000000000..dfe1d3e86 --- /dev/null +++ b/1409/CH5/EX5.13/5_13.sce @@ -0,0 +1,14 @@ +clc;
+//page no 5-25
+//Example 5.13
+//Given frequency deviation is 10kHz at modulation frequency of 5kHz
+fd=10;//in kHz
+fm=5;//in kHz
+//At the output of first frequency doubler
+fd1=2*fd;
+disp(+'kHz',fd1,'Frequency deviation at the output of first frequency multiplier is');
+fd2=2*fd1;
+disp(+'kHz',fd2,'Frequency deviation at the output of second frequency multiplier is');
+beta1=fd2/fm;
+disp(beta1,'Modulation index is');
+//Separation between adjacent side frequencies is equal to the moulating frequency i.e. 5kHz
diff --git a/1409/CH5/EX5.17/5_17.sce b/1409/CH5/EX5.17/5_17.sce new file mode 100644 index 000000000..5939e7593 --- /dev/null +++ b/1409/CH5/EX5.17/5_17.sce @@ -0,0 +1,10 @@ +clc;
+//page no 5-51
+//Example 5.17
+//Given maximum value of frequency deviation is 75kHz and modulation frequency is 15kHz
+fd=75;//in kHz
+fm=15;//in kHz
+//Bandwidth using carson's rule
+beta1=fd/fm;
+Bw=2*(beta1+1)*fm;
+disp(+'kHz',Bw,'Bandwidth of FM signal is');
diff --git a/1409/CH5/EX5.4/5_4.sce b/1409/CH5/EX5.4/5_4.sce new file mode 100644 index 000000000..73d14f3b7 --- /dev/null +++ b/1409/CH5/EX5.4/5_4.sce @@ -0,0 +1,12 @@ +clc;
+//page no 5-11
+//Example 5.4
+//Given amplitude of the wave as 5V and frequency as 1kHz
+amp=5;
+fs=50;//frequency sensitivity
+fd=amp*fs;//frequency deviation
+disp(+'Hz',fd,'Frequency Deviation=');
+fm=1*10^3;//in Hz
+mod=fd/fm;
+disp(mod,'Modulation index=');
+
diff --git a/1409/CH5/EX5.5/5_5.sce b/1409/CH5/EX5.5/5_5.sce new file mode 100644 index 000000000..426a0a020 --- /dev/null +++ b/1409/CH5/EX5.5/5_5.sce @@ -0,0 +1,25 @@ +clc;
+//page no 5-11
+//Example 5.5
+//The modulating voltage of 2.5V produces frequency deviation of 5kHz
+f=500;//Modulation frequency in Hz
+f2=250;//in Hz
+fd=5;//in kHz
+amp=2.5;//in V
+kf=fd/amp;//frequency deviation constant in kHz/V
+disp(+'kHz/V',kf,'Frequency deviation constant is ');
+//modulating voltage is 7.5V
+amp1=7.5;//in V
+fd1=kf*amp1;//in kHz
+disp(+'kHz',fd1,'Frequency deviation produced when modulating voltage is 7.5V is ');
+//When modulating voltage is 10V
+amp2=10;//in V
+fd2=kf*amp2;
+disp(+'kHz',fd2,'Frequency deviation when modulating voltage is 10V is ');
+//Modulation index be denoted by beta
+beta1=(fd*10^3)/f;
+disp(beta1,'Modulation index 1 is ');
+beta2=(fd1*10^3)/f;
+disp(beta2,'Modulation index 2 is ');
+beta3=(fd2*10^3)/f2;
+disp(beta3,'Modulation index 3 is');
diff --git a/1409/CH5/EX5.6/5_6.sce b/1409/CH5/EX5.6/5_6.sce new file mode 100644 index 000000000..f6651c15e --- /dev/null +++ b/1409/CH5/EX5.6/5_6.sce @@ -0,0 +1,15 @@ +clc;
+//page no 5-12
+//Example 5.6
+//Given carrier frequency is 93.2MHz and frequency of modulated wave is 5kHz and the frequency deviation is 40kHz
+fc=93.2*10^6;//in Hz
+fm=5*10^3;//in Hz
+fd=40*10^3;
+cs=2*fd*10^(-3);
+disp(+'kHz',cs,'Carrier swing is ');
+Hf=(fc+fd)*10^(-6);
+disp(+'MHz',Hf,'The highest frequency reached is ');
+Lf=(fc-fd)*10^(-6);
+disp(+'MHz',Lf,'The lowest frequency reached is ');
+beta1=fd/fm;
+disp(beta1,'Modulation index is');
diff --git a/1409/CH5/EX5.7/5_7.sce b/1409/CH5/EX5.7/5_7.sce new file mode 100644 index 000000000..ec311d521 --- /dev/null +++ b/1409/CH5/EX5.7/5_7.sce @@ -0,0 +1,12 @@ +clc;
+//page no 5-13
+//Example 5.7
+//Given carrier frequency is 50.4MHz and th highest freuency reached is 50.405 MHZ
+Hf=50.405*10^6;//in Hz
+fc=50.4*10^6;
+fd=(Hf-fc)*10^(-3);//in kHz
+disp(+'kHz',fd,'Frequency deviation= ');
+Cs=2*fd;
+disp(+'kHz',Cs,'Carrier swing= ');
+Lf=[fc-(fd*10^(3))]*10^(-6);
+disp(+'MHz',Lf,'Lowest frequency attained= ');
diff --git a/1409/CH5/EX5.8/5_8.sce b/1409/CH5/EX5.8/5_8.sce new file mode 100644 index 000000000..6e01f1bbb --- /dev/null +++ b/1409/CH5/EX5.8/5_8.sce @@ -0,0 +1,11 @@ +clc;
+//page no 5-13
+//Example 5.8
+//Given carrier swing is 70kHz and frequency of modulating signal is 7kHz
+Cs=70;//in kHz
+fm=7;//in kHz
+//Carrier swing=2*frequency deviation
+fd=Cs/2;
+disp(+'kHz',fd,'Frequency deviation is');
+beta1=fd/fm;
+disp(beta1,'Modulation index is');
diff --git a/1409/CH5/EX5.9/5_9.sce b/1409/CH5/EX5.9/5_9.sce new file mode 100644 index 000000000..b2ffede7d --- /dev/null +++ b/1409/CH5/EX5.9/5_9.sce @@ -0,0 +1,15 @@ +clc;
+//page no 5-13
+//Example 5.9
+//Given maximum and minimum frequency as 99.047MHz and 99.023MHz respectively. Frequency of modulating signal is 7kHz
+Hf=99.047*10^6;//in Hz
+Lf=99.023*10^6;//in Hz
+fm=7;//in kHz
+Cs=(Hf-Lf)*10^(-3);
+disp(+'kHz',Cs,'Carrier swing is');
+fd=Cs/2;
+disp(+'kHz',fd,'Frequency deviation is');
+fc=(Hf-(fd*10^3))*10^(-6);
+disp(+'MHz',fc,'Carrier frequency is');
+beta1=fd/fm;
+disp(beta1,'Modulation index is');
|