1 files changed, 37 insertions, 0 deletions
diff --git a/929/CH3/EX3.12/Example3_12.sce b/929/CH3/EX3.12/Example3_12.sce
new file mode 100755
index 000000000..11f07ac09
--- /dev/null
+++ b/929/CH3/EX3.12/Example3_12.sce
@@ -0,0 +1,37 @@
+//Example 3.12
+
+clear;
+
+clc;
+
+//To minimize the component count, choose the unity gain option, for which RA=infinity and RB=0.
+
+C=0.1*10^(-6);
+
+C1=C;
+
+C2=C;
+
+n=C1/C2;
+
+Q=1.5;
+
+f0=200;
+
+m=n/(((n+1)*Q)^2);
+
+R=1/(2*%pi*f0*((m*n)^(1/2))*C);
+
+R2=R;
+
+R1=m*R;
+
+printf("Designed High Pass KRC Filter :");
+
+printf("\nR1=%.2f kohms",R1*10^(-3));
+
+printf("\nR2=%.2f kohms",R2*10^(-3));
+
+printf("\nC1=%.1f uF",C1*10^6);
+
+printf("\nC2=%.1f uF",C2*10^6);
+\ No newline at end of file