lib/quadparts.lps

   1 %! PostScript set of library objects for XCircuit
   2 %  Version: 3.6
   3 %  Library name is: quadparts
   4 %  Author: R. Timothy Edwards <tim@khachaturian.tim.linglan.net>
   5 %
   6
   7
   8 % XCircuitLib library objects
   9 /quadparts::quadnand {
  10 <</@vdd (VDD) /@gnd (GND) /@part (1) (lindex {1 2 3 4} 0) pop /@pinA (1)
  11 (lindex {0 1 4 9 12} @part) pop /@pinB (2) (lindex {0 2 5 10 13} @part) pop /@pinO
  12 (3) (lindex {0 3 6 8 11} @part) pop /@index (?) /@pkg (DIP14) >> begingate
  13 1 1.000 0 -48 -64 -48 -64 48 0 48 4 polygon
  14 1 1.000 56 0 8 0.000 360.000 xcarc
  15 1 1.000 0 0 48 -90.000 90.000 xcarc
  16 0.180 0.545 0.341 scb
  17 mark @vdd ( 14=) @gnd ( 7=) @index (pcb:U) {/Helvetica cf} ctmk 20 0 1.000 -80
  18 -96 infolabel
  19 sce
  20 mark @part (7400-) {/Helvetica cf} ctmk 21 0 0.500 0 0 label
  21 1.000 0.000 0.000 scb
  22 mark @pinO {/Times-Roman cf} ctmk 4 0 1.000 64 0 pinlabel
  23 mark @pinA {/Times-Roman cf} ctmk 7 0 1.000 -64 32 pinlabel
  24 mark @pinB {/Times-Roman cf} ctmk 7 0 1.000 -64 -32 pinlabel
  25 0.000 0.000 1.000 scb
  26 mark @index (U) {/Times-Roman cf} ctmk 16 0 0.700 -64 64 label
  27 endgate
  28 } def
  29
  30 <</@part (2) (lindex {1 2 3 4} 1) pop >> /quadparts::quadnand libinst
  31 <</@part (3) (lindex {1 2 3 4} 2) pop >> /quadparts::quadnand libinst
  32 <</@part (4) (lindex {1 2 3 4} 3) pop >> /quadparts::quadnand libinst
  33
  34 /quadparts::quadnor {
  35 <</@vdd (VDD) /@gnd (GND) /@part (1) (lindex {1 2 3 4} 0) pop /@pinA (1)
  36 (lindex {0 1 4 10 13} @part) pop /@pinB (2) (lindex {0 2 5 8 11} @part) pop /@pinO
  37 (3) (lindex {0 3 6 9 12} @part) pop /@index (?) /@pkg (DIP14) >> begingate
  38 1 1.000 -64 48 -35 48 2 polygon
  39 1 1.000 -64 -48 -35 -48 2 polygon
  40 1 1.000 -128 0 80 -37.000 37.000 xcarc
  41 1 1.000 56 0 8 0.000 360.000 xcarc
  42 1 1.000 -35 -48 96 30.000 90.000 xcarc
  43 1 1.000 -35 48 96 270.000 330.000 xcarc
  44 0.180 0.545 0.341 scb
  45 mark @vdd ( 14=) @gnd ( 7=) @index (pcb:U) {/Helvetica cf} ctmk 20 0 1.000 -64
  46 -96 infolabel
  47 sce
  48 mark @part (7402-) {/Helvetica cf} ctmk 21 0 0.500 0 0 label
  49 1.000 0.000 0.000 scb
  50 mark @pinO {/Times-Roman cf} ctmk 4 0 1.000 64 0 pinlabel
  51 mark @pinA {/Times-Roman cf} ctmk 7 0 1.000 -56 32 pinlabel
  52 mark @pinB {/Times-Roman cf} ctmk 7 0 1.000 -56 -32 pinlabel
  53 0.000 0.000 1.000 scb
  54 mark @index (U) {/Times-Roman cf} ctmk 16 0 0.700 -64 64 label
  55 endgate
  56 } def
  57
  58 <</@part (2) (lindex {1 2 3 4} 1) pop >> /quadparts::quadnor libinst
  59 <</@part (3) (lindex {1 2 3 4} 2) pop >> /quadparts::quadnor libinst
  60 <</@part (4) (lindex {1 2 3 4} 3) pop >> /quadparts::quadnor libinst
  61
  62 /quadparts::quador {
  63 <</@vdd (VDD) /@gnd (GND) /@part (1) (lindex {1 2 3 4} 0) pop /@pinA (1)
  64 (lindex {0 1 4 9 12} @part) pop /@pinB (2) (lindex {0 2 5 10 13} @part) pop /@pinO
  65 (3) (lindex {0 3 6 8 11} @part) pop /@index (?) /@pkg (DIP14) >> begingate
  66 1 1.000 -19 -48 96 30.000 90.000 xcarc
  67 1 1.000 -19 48 96 270.000 330.000 xcarc
  68 1 1.000 -112 0 80 -37.000 37.000 xcarc
  69 1 1.000 -48 48 -19 48 2 polygon
  70 1 1.000 -48 -48 -19 -48 2 polygon
  71 0.180 0.545 0.341 scb
  72 mark @vdd ( 14=) @gnd ( 7=) @index (pcb:U) {/Helvetica cf} ctmk 20 0 1.000 -64
  73 -96 infolabel
  74 sce
  75 mark @part (7432-) {/Helvetica cf} ctmk 21 0 0.500 16 0 label
  76 1.000 0.000 0.000 scb
  77 mark @pinO {/Times-Roman cf} ctmk 4 0 1.000 64 0 pinlabel
  78 mark @pinA {/Times-Roman cf} ctmk 7 0 1.000 -40 32 pinlabel
  79 mark @pinB {/Times-Roman cf} ctmk 7 0 1.000 -40 -32 pinlabel
  80 0.000 0.000 1.000 scb
  81 mark @index (U) {/Times-Roman cf} ctmk 16 0 0.700 -48 64 label
  82 endgate
  83 } def
  84
  85 <</@part (2) (lindex {1 2 3 4} 1) pop >> /quadparts::quador libinst
  86 <</@part (3) (lindex {1 2 3 4} 2) pop >> /quadparts::quador libinst
  87 <</@part (4) (lindex {1 2 3 4} 3) pop >> /quadparts::quador libinst
  88
  89 % EndLib