1 // license:CC0
2 // copyright-holders:Couriersud
3 
4 #include "netlist/devices/net_lib.h"
5 
6 /* ----------------------------------------------------------------------------
7  *  cocoloco schematics
8  * ---------------------------------------------------------------------------*/
9 
10 // 7W LM383T Amplifier not included below
11 
12 NETLIST_START(cocoloco)
13 
14 	/* Standard stuff */
15 
16 	SOLVER(Solver, 48000)
17 	PARAM(Solver.ACCURACY, 1e-5)
18 	ANALOG_INPUT(V5, 5)
19 
20 	/* AY 8910 internal resistors */
21 
22 	RES(R_AY1_1, 1000)
23 	RES(R_AY1_2, 1000)
24 	RES(R_AY1_3, 1000)
25 
26 	RES(R1, 4700)
27 	RES(R2, 4700)
28 	RES(R3, 4700)
29 	RES(RAMP, 150000)
30 	//RES(RAMP, 150)
31 	POT(P1, 5000)
32 	PARAM(P1.DIAL, 0.5) // 50%
33 
34 	CAP(C1, 10e-6)
35 
36 	NET_C(V5, R_AY1_1.1, R_AY1_2.1, R_AY1_3.1)
37 
38 	NET_C(R_AY1_1.2, R1.1)
39 	NET_C(R_AY1_2.2, R2.1)
40 	NET_C(R_AY1_3.2, R3.1)
41 
42 	NET_C(R1.2, R2.2, R3.2, P1.1)
43 
44 	NET_C(P1.3, RAMP.2, GND)
45 	NET_C(P1.2, C1.1)
46 	NET_C(C1.2, RAMP.1)
47 #if 0
48 	CAP(C2, 0.1e-6)
49 	NET_C(C2.2, GND)
50 	NET_C(C2.1, RAMP.1)
51 #endif
52 NETLIST_END()
53 
54