.PS cct_init # Usual defs... qrt=dimen_/4; hlf=dimen_/2; dim=dimen_; "$V_i$ " rjust_; dot; line right_ hlf Op1:opamp(right_,,,,P) with .In2 at Here line from Op1.In1 left_ qrt then up_ hlf; Rleft:Here diode(from Op1.Out right_); Rright:dot {capacitor(down_);rlabel(,10\mu,); ground} line right_ hlf; dot {resistor(down_); llabel(,100k,); line left_ hlf; dot} line right_ qrt; Vout:" $V_\mathrm{out}$" above_ line from Rleft to (Rright,Rleft) line to Rright move from Vout right_ dim then down_ 3* dim then right_ hlf ground; resistor(up_); llabel(,1k,); dot {line right_ dim; O1:opamp(,,,hlf,P) with .In1 at Here} resistor(up_); llabel(,1k,); dot {line right_ dim; O2:opamp(,,,hlf,P) with .In1 at Here} resistor(up_); llabel(,2k7,); dot {line right_ dim; O3:opamp(,,,hlf,P) with .In1 at Here} resistor(up_); llabel(,3k9,); dot {line right_ dim; O4:opamp(,,,hlf,P) with .In1 at Here} resistor(up_); llabel(,8k2,); dot {line right_ dim; O5:opamp(,,,hlf,P) with .In1 at Here} resistor(up_); llabel(,16k,); dot {line right_ dim; O6:opamp(,,,hlf,P) with .In1 at Here} resistor(up_); llabel(,33k,); dot {line right_ dim; O7:opamp(,,,hlf,P) with .In1 at Here} line up_ hlf; dot; "$V_\mathrm{Ref}$" at Here+(0,3mm__) line from Vout right_ hlf then down_ 4*dim then right 1.5*dim line to (Here, O7.In2) line from O7.In2 left_ hlf; dot line from O6.In2 left_ hlf; dot line from O5.In2 left_ hlf; dot line from O4.In2 left_ hlf; dot line from O3.In2 left_ hlf; dot line from O2.In2 left_ hlf; dot line from O1.In2 left_ hlf; dot diode(from O7.Out-(0.75*dim,0) right_,LE); resistor(right_); ground " 36dB" ljust_ diode(from O6.Out-(0.75*dim,0) right_,LE); resistor(right_); ground " 30dB" ljust_ diode(from O5.Out-(0.75*dim,0) right_,LE); resistor(right_); ground " 24dB" ljust_ diode(from O4.Out-(0.75*dim,0) right_,LE); resistor(right_); ground " 18dB" ljust_ diode(from O3.Out-(0.75*dim,0) right_,LE); resistor(right_); ground " 12dB" ljust_ diode(from O2.Out-(0.75*dim,0) right_,LE); resistor(right_); ground " 6dB" ljust_ diode(from O1.Out-(0.75*dim,0) right_,LE); resistor(right_); ground " 0dB" ljust_ "\tiny LevelMeter" at (1.5*dim, -1*dim) rjust_ .PE