1 files changed, 23 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=');
+