summaryrefslogtreecommitdiff
path: root/graphics/circuit_macros/doc/Relay.m4
blob: ee52fa49943280ebf4d169bb4b261c28b8000639 (plain)
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
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
.PS
# Relay.m4
cct_init

movw = 0.85
{contact
 {`"\tt contact"' at last [].s+(0,-0.2)
  "\sl P" rjust at last [].P.w
  "\sl O" ljust at last [].O
  "\sl C" ljust at last [].C }
 move right_ movw; contact(R,)
 {`"\tt contact(,R)"' at last [].s+(0,-0.2)
  "\sl P" rjust at last [].P.w
  "\sl O" ljust at last [].O
  "\sl C" ljust at last [].C }
 move right_ movw; contact(P)
 {`"\tt contact(P)"' at last [].s+(0,-0.2)
  "\sl P" rjust at last [].P.w
  "\sl O" ljust at last [].O
  "\sl C" ljust at last [].C }
 move right_ movw; contact(O,); {`"\tt contact(O,)"' at last [].s+(0,-0.2)}
 move right_ movw; contact(C,); {`"\tt contact(C,)"' at last [].s+(0,-0.2)}
#move right_ movw; reed; {`"\tt reed"' at last [].s+(0,-0.2)}
}
move down 0.8
right_
{contact(I)
 {`"\tt contact(I)"' at last [].s+(0,-0.2)
  "\sl P" rjust at last [].P.w
  "\sl O" ljust at last [].O.e
  "\sl C" ljust at last [].C.e }
 move right_ movw; contact(RI)
 {`"\tt contact(RI)"' at last [].s+(0,-0.2)
  "\sl P" rjust at last [].P.w
  "\sl O" ljust at last [].O.e
  "\sl C" ljust at last [].C.e }
 move right_ movw; contact(PI)
 {`"\tt contact(PI)"' at last [].s+(0,-0.2)
  "\sl P" rjust at last [].P.w
  "\sl O" ljust at last [].O.e
  "\sl C" ljust at last [].C.e }
 move right_ movw; contact(OI); {`"\tt contact(OI)"' at last [].s+(0,-0.2)}
 move right_ movw; contact(CI); {`"\tt contact(CI)"' at last [].s+(0,-0.2)}
#move right_ movw; reed(,,,fill_(0.9),CR);
#  {`"\shortstack[l]{\tt reed(\\\tt$\;\;$,{,},fill\_(0.9),CR)}"' \
#  at last [].s+(0,-0.2)}
}
move down 1.2
right_
{
relay
 {"\sl V1" wid 0.16 rjust at last [].V1
  "\sl V2" ljust at last [].V2
  "\sl P1" rjust at last [].P1.w
  "\sl O1" ljust at last [].O1
  "\sl C1" ljust at last [].C1 }
`"\tt relay"' at last [].s+(0,-0.2)
relay(2) with .sw at last [].sw+(1.2,0)
 {"\sl V1" rjust at last [].V1
  "\sl V2" ljust at last [].V2
  "\sl P1" rjust at last [].P1.w
  "\sl O1" ljust at last [].O1
  "\sl C1" ljust below at last [].C1
  "\sl P2" rjust at last [].P2.w
  "\sl O2" ljust at last [].O2
  "\sl C2" ljust at last [].C2 }
`"\tt relay(2)"' at last [].s+(0,-0.2)
relay(2,RPI) with .sw at last [].sw+(1.2,0)
 {"\sl V1" rjust at last [].V1
  "\sl V2" ljust at last [].V2
  "\sl P1" rjust at last [].P1.w
  "\sl O1" ljust at last [].O1
  "\sl C1" ljust at last [].C1+(0,2pt__)
  "\sl P2" rjust at last [].P2.w
  "\sl O2" ljust at last [].O2+(0,-2pt__)
  "\sl C2" ljust at last [].C2 }
`"\tt relay(2,RIP)"' at last [].s+(0,-0.2)
relay(2,O) with .sw at last [].sw+(1.2,0)
`"\tt relay(2,O)"' at last [].s+(0,-0.2)
relay(2,CT) with .sw at last [].sw+(1.2,0)
`"\tt relay(2,CT)"' at last [].s+(0,-0.2)
}

.PE