summaryrefslogtreecommitdiff
path: root/1595/CH2
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1595/CH2
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1595/CH2')
-rwxr-xr-x1595/CH2/EX2.1/ex2_1.sce15
-rwxr-xr-x1595/CH2/EX2.2/ex2_2.sce18
-rwxr-xr-x1595/CH2/EX2.3/ex2_3.sce14
-rwxr-xr-x1595/CH2/EX2.4/ex2_4.sce7
-rwxr-xr-x1595/CH2/EX2.5/ex2_5.sce10
-rwxr-xr-x1595/CH2/EX2.6/ex2_6.sce9
-rwxr-xr-x1595/CH2/EX2.7/ex2_7.sce6
-rwxr-xr-x1595/CH2/EX2.8/ex2_8.sce11
-rwxr-xr-x1595/CH2/EX2.9/ex2_9.sce10
9 files changed, 100 insertions, 0 deletions
diff --git a/1595/CH2/EX2.1/ex2_1.sce b/1595/CH2/EX2.1/ex2_1.sce
new file mode 100755
index 000000000..a00e6b42e
--- /dev/null
+++ b/1595/CH2/EX2.1/ex2_1.sce
@@ -0,0 +1,15 @@
+// Amplitude Modulation-Transmission : example 2-1 : pg(74 & 75)
+//upper sideband is equal to the sum of carrier and intelligence frequencies
+c=1.4*10^6;
+m1=20;
+m2=10*10^3;
+Ur1=c+m1;
+Ur2=c+m2;
+Lr1=c-m1;
+Lr2=c-m2;
+//range of upper sideband(usb)
+printf("\nupper sideband will include frequencies from %.f Hz",Ur1 );
+printf("\nto \n %.f Hz",Ur2);
+//range of lower sideband (lsb)
+printf("\nlower sideband will include frequencies from %.f Hz",Lr1);
+printf("\nto \n %.f Hz",Lr2); \ No newline at end of file
diff --git a/1595/CH2/EX2.2/ex2_2.sce b/1595/CH2/EX2.2/ex2_2.sce
new file mode 100755
index 000000000..3bca7af42
--- /dev/null
+++ b/1595/CH2/EX2.2/ex2_2.sce
@@ -0,0 +1,18 @@
+// Amplitude Modulation-Transmission : example 2-2 : pg(78)
+b=100;
+a=60;
+d=125;
+c=35;
+x=180;
+y=0;
+m1=((b-a)/(b+a))*100;
+m2=((d-c)/(d+c))*100;
+m3=((x-y)/(y+x))*100;
+//part(a)
+printf("\npercent(m) = (B-A/B+A)*100percent = %.f percent",m1);
+//part(b)
+printf("\npercent(m) = (B-A/B+A)*100percent = %.f percent",m2);
+//part(c)
+printf("\npercent(m) = (B-A/B+A)*100percent = %.f percent",m3);
+//part(d) : this is a case of overmodulation
+//part(e) : this is a distorted AM wave as the increase > decrease in carrier's amplitude \ No newline at end of file
diff --git a/1595/CH2/EX2.3/ex2_3.sce b/1595/CH2/EX2.3/ex2_3.sce
new file mode 100755
index 000000000..68731d7c8
--- /dev/null
+++ b/1595/CH2/EX2.3/ex2_3.sce
@@ -0,0 +1,14 @@
+// Amplitude Modulation-Transmission : example 2-3 : pg(79 & 80)
+// m=1 or 100 percent
+//each side frequency = 1/2 the carrier amplitude
+//power is proportional to (V)^2
+//each side band power = 1/4 carrier power
+c=1*10^3;
+esb= 1/4*(c);
+tsp=(esb*2);
+tp=(tsp+c);
+printf("\nESF = mEc/2 ");
+printf("\nCarrier power = %.f W",c);
+printf("\n Each side-band power = 1/4 of carrier power = %.f W",esb);
+printf("\nTotal side-band power = %.f W",tsp);
+printf("\nTotal transmitted power = %.f W",tp);
diff --git a/1595/CH2/EX2.4/ex2_4.sce b/1595/CH2/EX2.4/ex2_4.sce
new file mode 100755
index 000000000..1f6504bfa
--- /dev/null
+++ b/1595/CH2/EX2.4/ex2_4.sce
@@ -0,0 +1,7 @@
+// Amplitude Modulation-Transmission : example 2-4 : pg(81)
+m=0.9; //modulation index
+Pc=500; //carrier Power
+x=(m^2)/2;
+y=(1+x)*Pc;
+printf("\nPt = Pc*(1+(m^2)/2)");
+printf("\nPt = %.1f W",y);//total transmitted powwer
diff --git a/1595/CH2/EX2.5/ex2_5.sce b/1595/CH2/EX2.5/ex2_5.sce
new file mode 100755
index 000000000..ab2851342
--- /dev/null
+++ b/1595/CH2/EX2.5/ex2_5.sce
@@ -0,0 +1,10 @@
+// Amplitude Modulation-Transmission : example 2-5 : pg(81)
+m=0.95;//modulation index
+Pt= 50*10^3;//total transmitted power
+x=(m^2)/2;
+y=1+x;
+z=(Pt/y);
+Pi=Pt-z;
+printf("\nPt = Pc*(1+(m^2)/2)");
+printf("\nPc = %.f W",z);//carrier power
+printf("\nPi = Pt-Pc = %.f W",Pi);//intelligence signal
diff --git a/1595/CH2/EX2.6/ex2_6.sce b/1595/CH2/EX2.6/ex2_6.sce
new file mode 100755
index 000000000..069c21667
--- /dev/null
+++ b/1595/CH2/EX2.6/ex2_6.sce
@@ -0,0 +1,9 @@
+// Amplitude Modulation-Transmission : example 2-6 : pg(81 & 82)
+Ic=12;//antenna current of AM transmitter when unmodulated
+It=13;//current when modulated
+x=2*((13/12)^2-1);
+m=sqrt(x);
+a=m*100;
+printf("\nIt = Ic.sqrt(1+(m^2)/2) \nm^2 = %.2f ",x);
+printf("\nm = %.2f",m);
+printf("\npercent(m) = %.f percent",a);//percentage of modulation
diff --git a/1595/CH2/EX2.7/ex2_7.sce b/1595/CH2/EX2.7/ex2_7.sce
new file mode 100755
index 000000000..62a1e6a1b
--- /dev/null
+++ b/1595/CH2/EX2.7/ex2_7.sce
@@ -0,0 +1,6 @@
+// Amplitude Modulation-Transmission : example 2-7 : pg(82)
+n=0.7;//efficiency
+c=10*10^3;//carrier wave
+Is=0.5*c;//intelligence signal
+p=(Is/n);
+printf("\ndc input power = %.f W",p);//dc input power \ No newline at end of file
diff --git a/1595/CH2/EX2.8/ex2_8.sce b/1595/CH2/EX2.8/ex2_8.sce
new file mode 100755
index 000000000..30c862bb5
--- /dev/null
+++ b/1595/CH2/EX2.8/ex2_8.sce
@@ -0,0 +1,11 @@
+// Amplitude Modulation-Transmission : example 2-8 : pg(82 & 83)
+Pc=10*10^3;//carrier power
+Pt=11.2*10^3;//transmitted power
+m2=0.5;//modulation index of another sine wave
+x=2*((Pt/Pc)-1);
+m=sqrt(x);
+meff=sqrt((m^2)+(m2^2));
+a=Pc*(1+((meff^2)/2));
+printf("\nPt = Pc.(1+m^2/2) \nm=%.2f",m);
+printf("\nmeff = sqrt(m1^2+m2^2) \nmeff = %.1f",meff);//effective modulation index
+printf("\nPt = Pc.(1+m^2/2) \n Pt = %.f W",a);//total transmitted power \ No newline at end of file
diff --git a/1595/CH2/EX2.9/ex2_9.sce b/1595/CH2/EX2.9/ex2_9.sce
new file mode 100755
index 000000000..bf1cf630f
--- /dev/null
+++ b/1595/CH2/EX2.9/ex2_9.sce
@@ -0,0 +1,10 @@
+// Amplitude Modulation-Transmission : example 2-9 : pg(100)
+a=1;
+b=0.03;
+c=0.05;
+d=0.02;
+e=0.04;
+x=sqrt((b^2+c^2+d^2+e^2)/a^2);
+y=x*100;
+printf("\nTHD = sqrt((V2^2)+(V3^3)+(V4^2)+(V5^2)/(V1^2)) \nTHD = %.5f",x);
+printf("\nTHD = %.2f percent",y);//total harmonic distortion \ No newline at end of file