From 093e3f5f21227801f907a5cd0fd3dca4222a0174 Mon Sep 17 00:00:00 2001
From: Couriersud <couriersud@users.noreply.github.com>
Date: Mon, 6 Jan 2014 14:40:43 +0000
Subject: [PATCH] Some more netlist examples.

---
 .gitattributes                |  2 ++
 nl_examples/bjt_eb.c          | 36 ++++++++++++++++++++
 nl_examples/msx_mixer_stage.c | 64 +++++++++++++++++++++++++++++++++++
 nl_examples/opamp.c           |  1 +
 4 files changed, 103 insertions(+)
 create mode 100644 nl_examples/bjt_eb.c
 create mode 100644 nl_examples/msx_mixer_stage.c

diff --git a/.gitattributes b/.gitattributes
index 54c63b0e892..b134f237ca4 100644
--- a/.gitattributes
+++ b/.gitattributes
@@ -349,6 +349,8 @@ keymaps/km_se_OSX.map svneol=native#text/plain
 /makefile svneol=native#text/plain
 nl_examples/7400_astable.c svneol=native#text/plain
 nl_examples/bjt.c svneol=native#text/plain
+nl_examples/bjt_eb.c svneol=native#text/plain
+nl_examples/msx_mixer_stage.c svneol=native#text/plain
 nl_examples/ne555_astable.c svneol=native#text/plain
 nl_examples/opamp.c svneol=native#text/plain
 src/build/build.mak svneol=native#text/plain
diff --git a/nl_examples/bjt_eb.c b/nl_examples/bjt_eb.c
new file mode 100644
index 00000000000..cff1783edf3
--- /dev/null
+++ b/nl_examples/bjt_eb.c
@@ -0,0 +1,36 @@
+/*
+ * bjt.c
+ *
+ */
+
+
+#include "netlist/devices/net_lib.h"
+
+NETLIST_START(bjt)
+    /* Standard stuff */
+
+    NETDEV_CLOCK(clk)
+    NETDEV_PARAM(clk.FREQ, 1000) // 1000 Hz
+    NETDEV_SOLVER(Solver)
+    NETDEV_PARAM(Solver.FREQ, 48000)
+    NETDEV_PARAM(Solver.ACCURACY, 1e-4)
+    NETDEV_ANALOG_CONST(V5, 5)
+    NETDEV_ANALOG_CONST(V3, 3.5)
+
+    /* NPN - example */
+
+    NETDEV_QNPN_EB(Q, BC237B)
+    NETDEV_R(RB, 1000)
+    NETDEV_R(RC, 1000)
+
+    NET_C(RC.1, V5)
+    NET_C(RC.2, Q.C)
+    NET_C(RB.1, clk)
+    //NET_C(RB.1, V3)
+    NET_C(RB.2, Q.B)
+    NET_C(Q.E, GND)
+
+    NETDEV_LOG(logB, Q.B)
+    NETDEV_LOG(logC, Q.C)
+
+NETLIST_END()
diff --git a/nl_examples/msx_mixer_stage.c b/nl_examples/msx_mixer_stage.c
new file mode 100644
index 00000000000..af07606e57e
--- /dev/null
+++ b/nl_examples/msx_mixer_stage.c
@@ -0,0 +1,64 @@
+/*
+ * bjt.c
+ *
+ */
+
+
+#include "netlist/devices/net_lib.h"
+
+NETLIST_START(msx)
+    /* Standard stuff */
+
+    NETDEV_CLOCK(clk)
+    NETDEV_PARAM(clk.FREQ, 1000) // 1000 Hz
+    NETDEV_SOLVER(Solver)
+    NETDEV_PARAM(Solver.FREQ, 48000)
+    NETDEV_PARAM(Solver.ACCURACY, 1e-5)
+
+    NETDEV_R(RAY8910, 2345)     // Max Voltage
+
+    NETDEV_ANALOG_CONST(V5, 5)
+    NETDEV_ANALOG_CONST(V12, 12)
+
+    NETDEV_ANALOG_INPUT(SOUND)
+    NETDEV_PARAM(SOUND.OUT, 5)
+    NETDEV_ANALOG_INPUT(SND)
+    NETDEV_PARAM(SND.OUT, 5)
+
+    NET_MODEL(".model ss9014 NPN(is=2.87599e-14 bf=377.5 vaf=123 ikf=1.1841 ise=4.7863e-15 ne=1.5 br=4.79 var=11.29 ikr=0.275423 isc=1.44544e-14 nc=1.5 rb=200 irb=1e-5 rbm=10 re=0.56 rc=5 cje=1.7205e-11 vje=0.6905907 mje=0.3193434 tf=5.89463e-10 cjc=6.2956p vjc=0.4164212 mjc=0.2559546 xcjc=0.451391 xtb=1.8881 eg=1.2415 xti=3 fc=0.5 Vceo=45 Icrating=0.1 mfg=Fairchild)")
+
+    NETDEV_R(R24, RES_K(51))
+    NETDEV_R(R23, RES_K(5))
+    NETDEV_R(R21, RES_K(51))
+    NETDEV_R(R20, RES_K(1))
+    NETDEV_R(R9,  RES_K(10))
+    NETDEV_R(R8,  330)
+
+    NETDEV_C(C55, CAP_U(5))     // Guessed
+
+    //NET_C(RAY8910.1, SND)
+    NET_C(RAY8910.1, clk)
+
+    //NET_C(C55.1, SOUND)
+    NET_C(C55.1, V5)
+    NET_C(C55.2, R24.1)
+    NET_C(R24.2, R23.2)
+    NET_C(R23.1, RAY8910.2)
+    NET_C(R23.1, R20.1)
+    NET_C(R20.2, GND)
+
+    NET_C(R21.1, V5)
+    NET_C(R21.2, R23.2)
+
+    NETDEV_QNPN_EB(T2, ss9014)
+
+    NET_C(R9.1, V12)
+    NET_C(R9.2, T2.C)
+    NET_C(R21.2, T2.B)
+    NET_C(R8.1, T2.E)
+    NET_C(R8.2, GND)
+
+    //NETDEV_LOG(logB, T2.B)
+    //NETDEV_LOG(logC, T2.C)
+
+NETLIST_END()
diff --git a/nl_examples/opamp.c b/nl_examples/opamp.c
index 6999b2ec57b..9f17ac7cc2c 100644
--- a/nl_examples/opamp.c
+++ b/nl_examples/opamp.c
@@ -23,6 +23,7 @@ NETLIST_START(opamp)
     NETDEV_PARAM(clk.FREQ, 1000) // 1000 Hz
     NETDEV_SOLVER(Solver)
     NETDEV_PARAM(Solver.FREQ, 48000)
+    NETDEV_PARAM(Solver.ACCURACY, 1e-6)
 
     /* Wiring up the opamp */