summaryrefslogtreecommitdiff
path: root/graphics/circuit_macros/doc/BigResistor.m4
blob: 9599c9c9d2fbe5d54bb65849d036de8f67b8ffe2 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
.PS
   cct_init
   linewid = 2.0
   linethick_(2.0)

R1: resistor

   thinlines_
   box dotted wid last [].wid ht last [].ht at last []

   move to 0.85 between last [].sw and last [].se
   spline <- down arrowht*2 right arrowht/2 then right 0.15; "\tt last []" ljust

   arrow <- down 0.3 from R1.start chop 0.05; "\tt R1.start" below
   arrow <- down 0.3 from R1.end chop 0.05; "\tt R1.end" below
   arrow <- down last [].c.y-last arrow.end.y from R1.c; "\tt R1.centre" below

   dimension_(from R1.start to R1.end,0.45,\tt elen\_,0.4)
   dimension_(right_ dimen_ from R1.c-(dimen_/2,0),0.3,\tt dimen\_,0.5)
.PE