tracingstats:=1;
%prologues:=2;
texlabels := 1;
u:=10bp;
input mpcirc;

% flip-flop
beginfig(10)
prepare (npn1,npn2,gnd1,gnd2,R1,R2,R3,R4,R5,R6,ioc.cc,ioc.ee);

wd:=10u;
ht:=12u;

z6=origin;
z5=z6+(0,ht);
z2-z1=(wd,0);
.5[z1,z2]=z6+(0,2/3ht);
z4-z3=(ypart (z1-z3),0);			% to get a nice crossing
.5[z3,z4]=z6+(0,.45ht);

valign npn1c,z1;
valign npn2c,z2;
halign npn1b,z3;
halign npn2b,z4;

betw.u(R1) 1,5;
betw.u(R2) 2,5;
conn.h(z1,R3a) u;
conn.h(z2,R4b) -u;

betw.d(R5) 3,6;
betw.d(R6) 4,6;

npn1t=T.L;
ioc.cc.t=T.u; ioc.ee.t=T.d;

conn.v (z5,ioc.cc.a) u;
conn.v (z6,ioc.ee.a) -u;

conn.v (npn1e,gnd1) -u; conn.v (npn2e,gnd2) -u;
setlab.npn._.lab ("Q")(rt)(rt);
ioc._.lab := "U";

%showtoken preparedwires;
edraw;

junction 1,2,3,4,5,6;

%label.lft ("Z", epos.lft(npn1));

wire (npn1c,z1); wire (npn2c,z2);
wire (npn1b,z3); wire (npn2b,z4);
awire (R3b, (xpart z3, ypart R3), z4);
awire (R4a, (xpart z4, ypart R4), z3);

endfig;
end