.PS cct_init # Usual defs... qrt=dimen_/4; hlf=dimen_/2; dim=dimen_; "$V_\mathrm{in}$ " rjust_ dot;line right_; ebox(right_,dim,0.75*dim); End:Here "317" at last[].center move down_ 0.375*dim;line down_ 0.625*dim then right_ dim; dot line from End right_ hlf; resistor(down_ 1.2*dim);llabel(,R,); resistor(down_ 1.2*dim);b_current(i);llabel(,\mathrm{Load},);ground(,T) move left_ dim then up_ hlf "$i=\frac{1.25}{R}$" move down_ dim/3 "7805$\Rightarrow\frac{5}{R}$" "\tiny ISource" at (3*dim,-2.5*dim) .PE