File: ResistorsDPV.m4

package info (click to toggle)
texlive-base 2024.20250309-1
  • links: PTS, VCS
  • area: main
  • in suites: trixie
  • size: 1,058,192 kB
  • sloc: perl: 44,903; sh: 5,008; makefile: 4,278; javascript: 3,034; ruby: 2,428; tcl: 2,131; xml: 1,874; python: 1,385; pascal: 1,249; cpp: 549; awk: 512; lisp: 447; ansic: 103; sed: 8
file content (39 lines) | stat: -rw-r--r-- 1,014 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
.PS
# `ResistorsDPV.m4'
cct_init(svg_font(sans-serif,11pt__))
textwid = 1.5

movewid = 2 pt__
hm = 2.1
vm = 0.28
{
   {resistor ; move ; svgLink(NportDPV.svg,"`resistor'" ljust)}
   move right_ hm
   {resistor(,5,Q) ; move ;"`...(,5,Q) '" ljust}
   move right_ hm
   {resistor(,,V) ; move ;"`...(,,V)'" ljust}
}
   move down vm; right_
{  {resistor(,,ES) ; move ;"`...(,,ES) '" ljust}
   move right_ hm
   {resistor(,4,H) ; move ;"`...(,4,H) '" ljust}
   move right_ hm
   {resistor(,,AC) ; move ;"`...(,,AC)'" ljust}
}
   move down vm; right_
{  {resistor(,,B) ; move ;"`...(,,B)'" ljust}
   move right_ hm
   {resistor(,,F) ; move ;"`...(,,F) '" ljust}
   move right_ hm
   {resistor(,,E) ; move ;"`...(,,E) svg_equiv ebox'" ljust}
}
   move down vm*1.1; right_
{  {ebox(,,,0.9) ; move ;"`ebox(,,,0.9)'" ljust}
   move right_ hm
   {ebox(,wdth=0.2;box=dashed shaded "green";text="X") ; move
   "`ebox(,wdth=0.2;box=dashed shaded \"green\";'" ljust \
     "`text=\"X\")'" ljust}
}

 command "</g>" # end font
.PE