initial commit / add all books

12 files changed, 126 insertions, 0 deletions

diff --git a/61/CH12/EX12.1/ex12_1.sce b/61/CH12/EX12.1/ex12_1.sce
new file mode 100755
index 000000000..e9642895e
--- /dev/null
+++ b/61/CH12/EX12.1/ex12_1.sce
@@ -0,0 +1,7 @@
+//ex12.1

+A_ol=100000;    //open loop voltage gain

+A_cm=0.2;    //common mode gain

+CMRR=A_ol/A_cm;

+CMRR_dB=20*log10(CMRR);

+disp(CMRR,'CMRR')

+disp(CMRR_dB,'CMRR in decibels')
\ No newline at end of file
diff --git a/61/CH12/EX12.10/ex12_10.sce b/61/CH12/EX12.10/ex12_10.sce
new file mode 100755
index 000000000..f40646f2f
--- /dev/null
+++ b/61/CH12/EX12.10/ex12_10.sce
@@ -0,0 +1,15 @@
+//ex12.10

+A_v1=40;    //all gains are in decibels

+A_v2=32;

+A_v3=20;

+f_c1=2*10^3;

+f_c2=40*10^3;

+f_c3=150*10^3;

+f=f_c1;

+A_ol_mid=A_v1+A_v2+A_v3;

+theta_1=phase_shift(f,f_c1);

+theta_2=phase_shift(f,f_c2);

+theta_3=phase_shift(f,f_c3);

+theta_tot=theta_1+theta_2+theta_3;

+disp(A_ol_mid,'open loop midrange gain in decibels')

+disp(theta_tot,'total phase lag in degrees')
\ No newline at end of file
diff --git a/61/CH12/EX12.11/ex12_11.sce b/61/CH12/EX12.11/ex12_11.sce
new file mode 100755
index 000000000..3315fd710
--- /dev/null
+++ b/61/CH12/EX12.11/ex12_11.sce
@@ -0,0 +1,6 @@
+//ex12.11

+A_ol_mid=150000;    //open loop midrange gain

+B=0.002;    //feedback attenuation

+BW_ol=200;    //open loop bandwidth

+BW_cl=BW_ol*(1+B*A_ol_mid);

+disp(BW_cl,'closed loop bandwidth in hertz')
\ No newline at end of file
diff --git a/61/CH12/EX12.12/ex12_12.sce b/61/CH12/EX12.12/ex12_12.sce
new file mode 100755
index 000000000..c13abd458
--- /dev/null
+++ b/61/CH12/EX12.12/ex12_12.sce
@@ -0,0 +1,15 @@
+//ex12.12

+BW=3*10^6;    //unity gain bandwidth

+A_ol=100;    //open loop gain

+disp("non-inverting amplifier")

+R_f=220*10^3;

+R_i=3.3*10^3;

+A_cl=1+(R_f/R_i);    //closed loop gain

+BW_cl=BW/A_cl;

+disp(BW_cl,'closed loop bandwidth in hertz')

+disp("inverting amplifier")

+R_f=47*10^3;

+R_i=1*10^3;

+A_cl=-R_f/R_i;

+BW_cl=BW/(abs(A_cl));

+disp(BW_cl,'closed loop bandwidth in hertz')
\ No newline at end of file
diff --git a/61/CH12/EX12.2/ex12_2.sce b/61/CH12/EX12.2/ex12_2.sce
new file mode 100755
index 000000000..c6af398ce
--- /dev/null
+++ b/61/CH12/EX12.2/ex12_2.sce
@@ -0,0 +1,6 @@
+//ex12.2

+del_t=1;    // in microseconds

+//lower limit is -9V and upper limit is 9V from the graph

+del_V_out=9-(-9);

+slew_rate=del_V_out/del_t;

+disp(slew_rate,'slew rate in volts per microseconds')
\ No newline at end of file
diff --git a/61/CH12/EX12.3/ex12_3.sce b/61/CH12/EX12.3/ex12_3.sce
new file mode 100755
index 000000000..502b246db
--- /dev/null
+++ b/61/CH12/EX12.3/ex12_3.sce
@@ -0,0 +1,5 @@
+//ex12.3

+R_f=100*10^3;

+R_i=4.7*10^3;

+A_cl_NI=1+(R_f/R_i);

+disp(A_cl_NI,'closed loop voltage gain')
\ No newline at end of file
diff --git a/61/CH12/EX12.4/ex12_4.sce b/61/CH12/EX12.4/ex12_4.sce
new file mode 100755
index 000000000..4bcada2a4
--- /dev/null
+++ b/61/CH12/EX12.4/ex12_4.sce
@@ -0,0 +1,5 @@
+//ex12.4

+R_i=2.2*10^3;

+A_cl=-100;    //closed loop voltage gain

+R_f=abs(A_cl)*R_i;

+disp(R_f,'value of R_f in ohms')
\ No newline at end of file
diff --git a/61/CH12/EX12.5/ex12_5.sce b/61/CH12/EX12.5/ex12_5.sce
new file mode 100755
index 000000000..b1f428b79
--- /dev/null
+++ b/61/CH12/EX12.5/ex12_5.sce
@@ -0,0 +1,13 @@
+//ex12.5

+Z_in=2*10^6;

+Z_out=75;

+A_ol=200000;

+R_f=220*10^3;

+R_i=10*10^3;

+B=R_i/(R_i+R_f);    //B is attenuation

+Z_in_NI=(1+A_ol*B)*Z_in;

+Z_out_NI=Z_out/(1+A_ol*B);

+A_cl_NI=1+(R_f/R_i);

+disp(Z_in_NI,'input impedance in ohms')

+disp(Z_out_NI,'output impedance in ohms')

+disp(A_cl_NI,'closed loop voltage gain')
\ No newline at end of file
diff --git a/61/CH12/EX12.6/ex12_6.sce b/61/CH12/EX12.6/ex12_6.sce
new file mode 100755
index 000000000..c275de239
--- /dev/null
+++ b/61/CH12/EX12.6/ex12_6.sce
@@ -0,0 +1,9 @@
+//ex12.6

+B=1;    //voltage follower configuration

+A_ol=200000;

+Z_in=2*10^6;

+Z_out=75;

+Z_in_VF=(1+A_ol)*Z_in;

+Z_out_VF=Z_out/(1+A_ol);

+disp(Z_in_VF,'input impedance in ohms')

+disp(Z_out_VF,'output impedance in ohms')
\ No newline at end of file
diff --git a/61/CH12/EX12.7/ex12_7.sce b/61/CH12/EX12.7/ex12_7.sce
new file mode 100755
index 000000000..55a16f6fe
--- /dev/null
+++ b/61/CH12/EX12.7/ex12_7.sce
@@ -0,0 +1,13 @@
+//ex12.7

+R_i=1*10^3;

+R_f=100*10^3;

+Z_in=4*10^6;

+Z_out=50;

+A_ol=50000;

+B=R_i/(R_i+R_f);    //attenuation

+Z_in_I=R_i;    //almost equal to R_i

+Z_out_I=Z_out/(1+(A_ol*B));

+A_cl_I=-R_f/R_i;

+disp(Z_in_I,'input impedance in ohms')

+disp(Z_out_I,'output impedance in ohms')

+disp(A_cl_I,'closed loop voltage gain')
\ No newline at end of file
diff --git a/61/CH12/EX12.8/ex12_8.sce b/61/CH12/EX12.8/ex12_8.sce
new file mode 100755
index 000000000..096e09d3b
--- /dev/null
+++ b/61/CH12/EX12.8/ex12_8.sce
@@ -0,0 +1,15 @@
+//ex12.8

+f_c_ol=100;

+A_ol_mid=100000;

+f=0;

+A_ol=open_loop_gain(A_ol_mid,f,f_c_ol)

+disp(A_ol,'open loop gain when f=0Hz');

+f=10;

+A_ol=open_loop_gain(A_ol_mid,f,f_c_ol)

+disp(A_ol,'open loop gain when f=10Hz')

+f=100;

+A_ol=open_loop_gain(A_ol_mid,f,f_c_ol)

+disp(A_ol,'open loop gain when f=100Hz')

+f=1000;

+A_ol=open_loop_gain(A_ol_mid,f,f_c_ol)

+disp(A_ol,'open loop gain when f=1000Hz')
\ No newline at end of file
diff --git a/61/CH12/EX12.9/ex12_9.sce b/61/CH12/EX12.9/ex12_9.sce
new file mode 100755
index 000000000..150bc7841
--- /dev/null
+++ b/61/CH12/EX12.9/ex12_9.sce
@@ -0,0 +1,17 @@
+//ex12.9

+f_c=100;

+f=1;

+theta=phase_shift(f,f_c);

+disp(theta,'phase lag when f=1Hz (in degrees)')

+f=10;

+theta=phase_shift(f,f_c);

+disp(theta,'phase lag when f=10Hz (in degrees)')

+f=100;

+theta=phase_shift(f,f_c);

+disp(theta,'phase lag when f=100Hz (in degrees)')

+f=1000;

+theta=phase_shift(f,f_c);

+disp(theta,'phase lag when f=1000Hz (in degrees)')

+f=10000;

+theta=phase_shift(f,f_c);

+disp(theta,'phase lag when f=10000Hz (in degrees)')
\ No newline at end of file