examples/threestage.ps

   1 %!PS-Adobe-3.0
   2 %%Title: threestage
   3 %%Creator: Xcircuit v2.3
   4 %%CreationDate: Thu Jun 21 10:14:16 2001
   5 %%Pages: 2
   6 %%BoundingBox: 79 62 522 313
   7 %%DocumentNeededResources: font Times-Roman font Symbol
   8 %%EndComments
   9 %%BeginProlog
  10 %
  11 %  PostScript prolog for output from xcircuit
  12 %  Version: 2.3
  13 %
  14 %  Electrical circuit (and otherwise general) drawing program
  15 %
  16 %  Written by Tim Edwards 8/5/93--5/16/01  (tim@bach.ece.jhu.edu)
  17 %  The Johns Hopkins University
  18 %
  19 %%BeginResource: procset XCIRCproc 2.3 1
  20 % supporting definitions --- these are the primary xcircuit types.
  21
  22 /XCIRCsave save def
  23 /topmat matrix currentmatrix def
  24
  25 /fontslant { /slant exch def [1 0 slant 1 0 0]
  26     exch findfont exch makefont dup length dict /ndict exch def
  27     { 1 index /FID ne { ndict 3 1 roll put } { pop pop } ifelse } forall
  28     ndict definefont pop} def
  29 /ul { dup type /stringtype eq showflag 1 eq and { gsave
  30    currentpoint topmat setmatrix 0 0 moveto 2 index stringwidth pop (_)
  31    false charpath flattenpath pathbbox grestore exch pop 1 index
  32    sub setlinewidth exch pop currentpoint 3 -1 roll add moveto 0
  33    rlineto stroke moveto } if } def
  34 /ol { dup type /stringtype eq showflag 1 eq and { gsave gsave
  35    currentpoint topmat setmatrix 2 index stringwidth pop 3 index
  36    true charpath flattenpath pathbbox grestore exch pop
  37    exch pop topmat setmatrix (_) true charpath pathbbox grestore
  38    exch pop 1 index sub setlinewidth exch pop currentpoint
  39    exch 4 1 roll exch sub add moveto pop 0 rlineto stroke
  40    moveto } if } def
  41 /stW { gsave currentpoint newpath moveto true charpath flattenpath
  42         pathbbox pop exch pop sub grestore } def
  43 /Ts {mark Tabs aload pop counttomark 1 add array astore /Tabs exch def Tabs
  44         0 currentpoint pop put} def
  45 /Tbn {mark Tabs aload pop counttomark dup 2 add 1 roll cleartomark 1 sub} def
  46 /Tb { 0 1 Tbn {Tabs exch get dup currentpoint pop lt
  47         {currentpoint exch pop moveto exit} {pop} ifelse } for } def
  48 /Tf { Tbn -1 0 {Tabs exch get dup currentpoint pop gt
  49         {currentpoint exch pop moveto exit} {pop} ifelse } for } def
  50 /qS { (aa) stW (a a) stW sub 4 div 0 Kn } def
  51 /hS { qS qS } def
  52 /pspc 0 def
  53 /cf0 { scalefont setfont } bind def
  54 /Kn { dup kY add /kY exch def rmoveto } bind def
  55 /ss { /fscale fscale 0.67 mul def currentfont 0.67 cf0 0 fscale0 fscale mul
  56         0.33 mul neg Kn} def
  57 /Ss { /fscale fscale 0.67 mul def currentfont 0.67 cf0 0 fscale0 fscale mul
  58         0.67 mul Kn } def
  59 /ns { 0 kY neg Kn /kY 0 def /fscale 1.0 def xfont0 1.0 cf0 } def
  60 /CR { ns 0 /Bline Bline fscale0 neg add def Bline moveto } def
  61 /cf { dup type /realtype ne {1.0} if exch findfont exch kY 0 eq
  62         { 40 mul dup /fscale0 exch def cf0 /xfont0 currentfont def}
  63         {fscale0 mul fscale mul cf0} ifelse } def
  64 /ctmk { counttomark dup 2 add -1 roll pop } bind def
  65 /label { gsave translate 0 0 moveto dup scale /rotval exch def /just exch def
  66         just 16 and 0 gt {0 1 dtransform gsave pagemat setmatrix idtransform
  67         exch grestore 1 0 dtransform gsave pagemat setmatrix idtransform
  68         exch grestore dup 0 eq {pop mul 0 gt} {3 1 roll pop pop 0 lt} ifelse
  69         {-1 /just just dup 3 and 1 ne {3 xor} if def} {1} ifelse exch 0 lt
  70         {-1 /just just dup 12 and 4 ne {12 xor} if def} {1} ifelse scale }
  71         if /showflag 0 def /fspc pspc def /Bline 0 def /Tabs 0 array def
  72         /fscale 1.0 def /kY 0 def
  73         gsave dup 1 add copy 0 exch {exch dup type /stringtype eq {true
  74         charpath flattenpath} {exec} ifelse } repeat pop pathbbox grestore
  75         3 -1 roll pop 3 1 roll just 1 and 0 gt {just 2 and 0 gt {exch pop
  76         neg fspc sub} {exch sub 0.5 mul neg} ifelse} {pop neg fspc add}
  77         ifelse exch Bline exch just 4 and 0 gt {just 8 and 0 gt {exch pop
  78         neg fspc sub} {add 0.5 mul neg} ifelse} {pop neg fspc add} ifelse
  79         /showflag 1 def rotval rotate Kn currentpoint translate
  80         /Bline 0 def /Tabs 0 array def /fscale 1.0 def /kY 0 def
  81         {dup type /stringtype eq {show}{exec} ifelse} repeat grestore } def
  82 /pinlabel { hlevel 0 eq { /pspc 20 def label /pspc 0 def }
  83         { pop pop pop pop pop {pop} repeat } ifelse } def
  84 /pinglobal { pinlabel } def
  85 /infolabel { pinlabel } def
  86
  87 /scb { setrgbcolor } bind def  /sce { defColor aload pop scb } bind def
  88 /cRedef {/defColor currentcolor 3 array astore def} def
  89 /begingate { /hlevel hlevel 1 add def /defColor currentcolor sce 3 array
  90         astore def gsave sce translate 0 0 moveto dup 0 lt
  91         {neg 1 sub -1 1 scale} if rotate dup scale } bind def
  92 /makeparm  {3 string cvs dup length 1 add string /tstr exch def tstr exch
  93         1 exch putinterval tstr 0 (v) putinterval tstr cvn} bind def
  94 /beginparm { -1 1 {makeparm exch def} for
  95         dup type /arraytype eq { aload length -1 1 {makeparm exch def}
  96         for } if begingate } bind def
  97 /endgate { /hlevel hlevel 1 sub def grestore defColor aload pop cRedef
  98         scb} bind def
  99
 100 /hlevel 0 def
 101 /tmpa [1 0 0 1 0 0] def
 102 /gar {8 8 true tmpa {<c0 c0 00 00 0c 0c 00 00>} imagemask} bind
 103 {8 8 true tmpa {<30 70 60 02 03 07 06 20>} imagemask} bind
 104 {8 8 true tmpa {<0c 1e 1e 0c c0 e1 e1 c0>} imagemask} bind
 105 {8 8 true tmpa {<0f 0f 0f 0f f0 f0 f0 f0>} imagemask} bind
 106 {8 8 true tmpa {<3f f3 e1 e1 f3 3f 1e 1e>} imagemask} bind
 107 {8 8 true tmpa {<df cf 8f 9f fd fc f8 f9>} imagemask} bind
 108 {8 8 true tmpa {<ff 3f 3f ff ff f3 f3 ff>} imagemask} bind 7 array astore def
 109 /ppaint { gsave clip tmpa dup setmatrix pathbbox neg exch neg 4 2 roll
 110   neg 4 -1 roll 2 copy gt {exch} if 8 div ceiling 8 mul 4 2 roll neg 2 copy
 111   gt {exch} if 8 div ceiling 8 mul 3 -1 roll -8 5 -1 roll
 112   { 3 index exch 5 exch put dup -8 3 index { 3 index
 113   exch 4 exch put 3 index exec } for } for pop pop pop pop grestore } bind def
 114 /setstyles {
 115   currentlinewidth mul setlinewidth /style exch def
 116   style 1 and 0 gt not {closepath} if
 117   style 1024 and 0 gt {2 setlinecap} if
 118   style 2 and 0 gt {currentlinewidth 4 mul dup 2 array astore 0 setdash} if
 119   style 4 and 0 gt {0.5 currentlinewidth 4 mul 2 array astore 0 setdash} if
 120   style dup 256 ge exch 480 lt and { gsave 1 setgray eofill grestore } if
 121   style 16 and 0 gt { gsave style 224 and -5 bitshift dup 7 lt
 122         {gar exch get ppaint} { pop eofill } ifelse grestore } if
 123   style 8 and 0 gt style 512 eq or { newpath } { stroke } ifelse grestore } def
 124
 125 /polygon { gsave /num exch def moveto num 1 sub {lineto} repeat setstyles } def
 126 /xcarc   { gsave newpath arc setstyles } def
 127 /elb { matrix currentmatrix 7 -1 roll 7 -1 roll translate 5 1 roll 4 -1 roll
 128         3 index div 1 scale } def
 129 /ele { 0 4 1 roll 0 4 1 roll } bind def
 130 /ellipse { gsave elb newpath ele arc setmatrix setstyles } def
 131 /pellip  { elb ele arc setmatrix } def
 132 /nellip  { elb ele arcn setmatrix } def
 133 /spline  { gsave moveto curveto setstyles } def
 134 /polyc   { {lineto} repeat } bind def
 135 /beginpath { gsave moveto } bind def
 136 /endpath { setstyles } bind def
 137 /bop     { 1 setlinecap 0 setlinejoin 6 setmiterlimit 0 0 0 scb cRedef } def
 138 /insertion {/PSobj save def /showpage {} def bop translate} def
 139 /end_insert {PSobj restore} def
 140 /setpagemat {/pagemat matrix currentmatrix def} def
 141 /inchscale  {setpagemat 0.375 mul dup scale} def
 142 /cmscale    {setpagemat 0.35433071 mul dup scale} def
 143
 144 %%EndResource
 145 %%EndProlog
 146
 147 % XCircuit output starts here.
 148
 149 /samp {
 150 % -80 -80 160 160 bbox
 151 % samp is_schematic
 152 begingate
 153 0  1.00 -80 -80 -80 80 80 0 3 polygon
 154 1  1.00 0 -40 0 -80 2 polygon
 155 (-) {/Symbol cf} 2 5 0 1.00 -61 50 label
 156 (+) {/Symbol cf} 2 5 0 1.00 -61 -46 label
 157 1.000 0.000 0.000 scb
 158 (in.m) {/Times-Roman cf} 2 7 0 1.00 -80 48 pinlabel
 159 (in.p) {/Times-Roman cf} 2 7 0 1.00 -80 -48 pinlabel
 160 (out) {/Times-Roman cf} 2 4 0 1.00 80 0 pinlabel
 161 (bias) {/Times-Roman cf} 2 13 0 1.00 0 -80 pinlabel
 162 endgate
 163 } def
 164
 165 /gnd {
 166 % -32 -60 64 68 bbox
 167 % trivial
 168 begingate
 169 1  1.00 0 0 0 -32 2 polygon
 170 1  1.00 -32 -32 32 -32 2 polygon
 171 1  1.00 -18 -46 18 -46 2 polygon
 172 1  1.00 -4 -60 4 -60 2 polygon
 173 1.000 0.000 0.000 scb
 174 (GND) {/Times-Roman cf} 2 1 0 1.00 0 0 pinglobal
 175 endgate
 176 } def
 177
 178 /circle {
 179 % -6 -12 28 24 bbox
 180 % trivial
 181 begingate
 182 1  1.00 16 0 6 0.00 360.00 xcarc
 183 1  1.00 0 0 10 0 2 polygon
 184 1.000 0.000 0.000 scb
 185 (out) {/Times-Roman cf} 2 4 0 1.00 16 0 pinlabel
 186 (out) {/Times-Roman cf} 2 7 0 1.00 0 0 pinlabel
 187 endgate
 188 } def
 189
 190 /capacitor {
 191 % -32 -64 64 128 bbox
 192 begingate
 193 1  1.00 0 -64 0 -6 2 polygon
 194 1  1.00 0 64 0 6 2 polygon
 195 1  1.00 -32 6 32 6 2 polygon
 196 1  1.00 -32 -6 32 -6 2 polygon
 197 1.000 0.000 0.000 scb
 198 (c.1) {/Times-Roman cf} 2 9 0 1.00 0 64 pinlabel
 199 (c.2) {/Times-Roman cf} 2 13 0 1.00 0 -64 pinlabel
 200 sce
 201 (spice:C%i %pc.1 %pc.2 1.0P) {/Times-Roman cf} 2 0 0 1.00 -208 -160 infolabel
 202 sce
 203 (sim:c %pc.1 %pc.2) {/Times-Roman cf} 2 0 0 1.00 -208 -208 infolabel
 204 endgate
 205 } def
 206
 207 /dot {
 208 % -10 -10 20 20 bbox
 209 % trivial
 210 begingate
 211 248  1.00 0 0 6 0.00 360.00 xcarc
 212 1.000 0.000 0.000 scb
 213 (x) {/Times-Roman cf} 2 29 0 1.00 0 0 pinlabel
 214 endgate
 215 } def
 216
 217 %%Page: threestage 1
 218 %%PageOrientation: Portrait
 219 /pgsave save def bop
 220 % 433 318 offsets
 221 1.0000 inchscale
 222 2.6000 setlinewidth
 223
 224 1.00 0 481 590 samp
 225 1.00 0 769 590 samp
 226 1.00 0 1057 590 samp
 227 1  1.00 481 510 481 286 1057 286 1057 510 4 polygon
 228 1  1.00 769 510 769 286 2 polygon
 229 1  1.00 561 590 609 590 609 542 689 542 4 polygon
 230 1  1.00 849 590 897 590 897 542 977 542 4 polygon
 231 1  1.00 1137 590 1185 590 1185 542 3 polygon
 232 1.00 0 1185 414 gnd
 233 1.00 0 897 414 gnd
 234 1.00 0 609 414 gnd
 235 1  1.00 609 590 609 702 369 702 369 638 401 638 5 polygon
 236 1  1.00 401 542 337 542 2 polygon
 237 1  1.00 689 638 657 638 657 702 897 702 897 590 5 polygon
 238 1  1.00 977 638 945 638 945 702 1185 702 1185 590 5 polygon
 239 1.00 -1 337 542 circle
 240 1  1.00 1185 590 1233 590 2 polygon
 241 1.00 0 1233 590 circle
 242 1.000 0.000 0.000 scb
 243 (Input) {/Times-Roman cf} 2 7 0 1.00 321 542 pinlabel
 244 (Output) {/Times-Roman cf} 2 4 0 1.00 1249 590 pinlabel
 245 (Bias) {/Times-Roman cf} 2 13 0 1.00 769 222 pinlabel
 246 sce
 247 1  1.00 769 286 769 238 2 polygon
 248 1.00 270 769 238 circle
 249 0.635 0.125 0.953 scb
 250 (Three-stage cascaded lowpass filter) {/Times-Roman cf} 2 0 0 1.00 497 798
 251 label
 252 sce
 253 1.00 0 609 478 capacitor
 254 1.00 0 897 478 capacitor
 255 1.00 0 1185 478 capacitor
 256 1.00 0 609 590 dot
 257 1.00 0 609 542 dot
 258 1.00 0 769 286 dot
 259 1.00 0 897 590 dot
 260 1.00 0 897 542 dot
 261 1.00 0 1185 590 dot
 262 pgsave restore showpage
 263
 264 /nmos {
 265 % -64 -64 64 128 bbox
 266 begingate
 267 1  1.00 0 -64 0 -28 -32 -28 -32 28 0 28 0 64 6 polygon
 268 1  1.00 -44 -28 -44 28 2 polygon
 269 1  1.00 -44 0 -64 0 2 polygon
 270 1.000 0.000 0.000 scb
 271 (G) {/Times-Roman cf} 2 7 0 1.00 -64 0 pinlabel
 272 (S) {/Times-Roman cf} 2 13 0 1.00 0 -64 pinlabel
 273 (D) {/Times-Roman cf} 2 9 0 1.00 0 64 pinlabel
 274 sce
 275 (spice:M%i %pD %pG %pS GND nmos) {/Times-Roman cf} 2 4 0 1.00 -244 -139
 276 infolabel
 277 sce
 278 (sim:n %pG %pS %pD) {/Times-Roman cf} 2 4 0 1.00 -244 -187 infolabel
 279 endgate
 280 } def
 281
 282 /pmos {
 283 % -64 -64 64 128 bbox
 284 begingate
 285 1  1.00 -44 -28 -44 28 2 polygon
 286 1  1.00 -60 0 -64 0 2 polygon
 287 1  1.00 0 -64 0 -28 -32 -28 -32 28 0 28 0 64 6 polygon
 288 1  1.00 -52 0 8 0.00 360.00 xcarc
 289 1.000 0.000 0.000 scb
 290 (S) {/Times-Roman cf} 2 9 0 1.00 0 64 pinlabel
 291 (D) {/Times-Roman cf} 2 13 0 1.00 0 -64 pinlabel
 292 (G) {/Times-Roman cf} 2 7 0 1.00 -64 0 pinlabel
 293 sce
 294 (spice:M%i %pD %pG %pS Vdd pmos) {/Times-Roman cf} 2 4 0 1.00 -196 -139
 295 infolabel
 296 sce
 297 (sim:p %pG %pS %pD) {/Times-Roman cf} 2 4 0 1.00 -196 -187 infolabel
 298 endgate
 299 } def
 300
 301 /vdd {
 302 % -32 0 64 66 bbox
 303 % trivial
 304 begingate
 305 1  1.00 0 0 0 32 2 polygon
 306 1  1.00 -32 32 32 32 2 polygon
 307 (Vdd) {/Times-Roman cf} 2 17 0 0.90 0 38 label
 308 1.000 0.000 0.000 scb
 309 (Vdd) {/Times-Roman cf} 2 13 0 1.00 0 0 pinglobal
 310 endgate
 311 } def
 312
 313 %%Page: samp 2
 314 %%PageOrientation: Portrait
 315 /pgsave save def bop
 316 % samp is_symbol
 317 % 685 449 offsets
 318 1.0000 inchscale
 319 2.6000 setlinewidth
 320
 321 1.000 0.000 0.000 scb
 322 (in.m) {/Times-Roman cf} 2 4 0 1.00 973 513 pinlabel
 323 (in.p) {/Times-Roman cf} 2 7 0 1.00 621 513 pinlabel
 324 (out) {/Times-Roman cf} 2 4 0 1.00 973 577 pinlabel
 325 (bias) {/Times-Roman cf} 2 7 0 1.00 719 353 pinlabel
 326 sce
 327 1.00 0 797 289 gnd
 328 1025  1.00 701 449 893 449 2 polygon
 329 1025  1.00 765 641 829 641 2 polygon
 330 1025  1.00 797 641 797 577 701 577 3 polygon
 331 1025  1.00 893 577 957 577 2 polygon
 332 1.00 0 957 513 circle
 333 1.00 0 957 577 circle
 334 1.00 -1 637 513 circle
 335 1.00 -1 735 353 circle
 336 1025  1.00 797 417 797 449 2 polygon
 337 1.00 0 797 353 nmos
 338 1.00 0 893 641 pmos
 339 1.00 0 701 513 nmos
 340 1.00 -1 893 513 nmos
 341 1.00 -1 701 641 pmos
 342 1.00 0 797 449 dot
 343 1.00 0 893 577 dot
 344 1.00 0 701 577 dot
 345 1.00 0 797 641 dot
 346 1.00 0 701 705 vdd
 347 1.00 0 893 705 vdd
 348 pgsave restore showpage
 349
 350 %%Trailer
 351 XCIRCsave restore
 352 %%EOF