* Discrete Cascode Phono Preamp, Initial Values. * SPICE version: Spice Opus vsupply+ vdd 0 dc 30V vsupply2+ vcc 0 dc 30V vsupply- vee 0 dc -15V v1 vsig 0 dc 0 ac 1 distof1 7.071mV sin 0 7.071mV 1kHz * inverse riaa subcircuit * to insert uncomment line below and change vin net for v1 above to vsig x1ir vsig vin 0 invriaa xin1 vin vd njfblk xin2 vin vd njfblk xin3 vin vd njfblk xin4 vin vd njfblk xin5 vin vd njfblk xin6 vin vd njfblk xin7 vin vd njfblk xin8 vin vd njfblk r9 vdd vd 750 c1 vd ve 2.2m q9 vc 0 ve 2n3904 r10 ve vee 12.7647k * riaa eq network r1n vc vcc 17.8527k c1n vc eqnet 122.502n r2n eqnet vcc 2.59587k c2n vc vcc 42.0105n * output buffer j10 vcc vc vsj10 lsk170c j11 vsj10 0 vsj11 lsk170c r11 vsj11 0 75 c2 vsj10 c2tor12 100u r12 c2tor12 vout 1k r13 vout 0 100k * input ckt element .subckt njfblk vg vd j1 vd vg vs lsk170a rs vs 0 27.4 .ends * .include ./lsk170.txt .include ./mat02_03.txt .include ./models1.txt .include ./invriaa2.txt .end .control set fourgridsize=1024 set polydegree=3 set nfreqs=16 dc v1 0 0 0 setplot dc1 print vout noise v(vout) v1 dec 25 20Hz 20kHz * setplot noise2 * print all ac dec 25 10Hz 50khz setplot ac1 plot vdb(vout) tran 1u 10m 0 1u fourier 1k vout .endc