.PS
cct_init

# Usual defs...
qrt=dimen_/4;
hlf=dimen_/2;
dim=dimen_;

ground; resistor(right_); llabel(,10k\Omega,)
Q1:bi_tr(down_,R,P)
resistor(from Q1.E up_); rlabel(,1k\Omega,); dot; "+5V" at Here+(0,3mm__)
resistor(from Q1.C down_); llabel(,10k\Omega,); dot; "$-$5V" at Here+(0,-4mm__)

"\tiny PnpSat" at (0,-dim)
.PE