summaryrefslogtreecommitdiff
path: root/graphics/circuit_macros/examples/Switches.m4
blob: d8262be92db188916b983a0afb9cc2dc6c32f245 (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
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
.PS
# Switches.m4
cct_init

movewid = 0.25
# Row 1
  right_; {
    lswitch; {S:"\tt ls{}witch" at last [].s+(0,-10bp__)}
    move right_
    lswitch(,,O); {"\tt (,,O)" at (last [],S)}
    move right_
    lswitch(,,C); {"\tt (,,C)" at (last [],S)}
    move right_
    lswitch(,,DA); {"\tt (,,DA)" at (last [],S)}
    move right_
    lswitch(,,dDO); {"\tt (,,dDO)" at (last [],S)}
    move right_
    lswitch(,,uDC); {"\tt (,,uDC)" at (last [],S)}
    }
# Row 2
  move down; right_; {
    lswitch(,,K); {S:"\tt (,,K)" at last [].s+(0,-10bp__)}
    move right_
    lswitch(,,KD); {"\tt (,,KD)" at (last [],S)}
    move right_
    lswitch(,,KOD); {"\tt (,,KOD)" at (last [],S)}
    move right_
    lswitch(,,KCD); {"\tt (,,KCD)" at (last [],S)}
    move right_
    bswitch; {"\tt `bswitch'" at (last [],S)}
    move right_
    bswitch(,,C); {"\tt (,,C)" at (last [],S)}
    }
# Row 3
  move down; right_; {
    D: dswitch(,,); {S: "\tt ds{}witch(,{},)" at last [].s+(0,-10bp__)}
    thinlines_
    { spline <- from 0.25 along_(D) up 0.1 then up 0.05 left 0.1
      {"\tt W" rjust}
      spline <- from D.c+(0,m4sc*2) up 0.1 then up 0.05 left 0.1
      {"\tt B" rjust }}
    thicklines_
    move right_
    D: dswitch(,,WdBK); {"\tt (,,WdBK)" at (last [],S)+(0,-4bp__)}
    thinlines_
    { spline <- from tr_xy(0,-2) up 0.1 then up 0.10 left 0.1
      {"\tt dB" rjust}
      spline <- from tr_xy(4,-2) right 0.1 then right 0.05 up 0.15
      {"\tt K" above }}
    thicklines_
    move right_
    dswitch(,,WBmdDK); {"\tt (,,WBmdDK)" at (last [],S)}
    move right_
    dswitch(,,WBKTr); {"\tt (,,WBKTr)" at (last [],S)}
    move right_
    dswitch(,,WdBL); {"\tt (,,WdBL)" at (last [],S+(0,-4bp__))}
    move right_
    dswitch(,,WBCo); {"\tt (,,WBCo)" at (last [],S)}
    }
# Row 4
  move down; right_; {
    dswitch(,,WBKCo); {S: "\tt (,,WBKCo)" at last [].s+(0,-10bp__)}
    move right_
    dswitch(,,WBCb); {"\tt (,,WBCb)" at (last [],S)}
    move right_
    dswitch(,,WBDI); {"\tt (,,WBDI)" at (last [],S)}
    move right_
    dswitch(,,WBSd); {"\tt (,,WBSd)" at (last [],S)}
    move right_
    dswitch(,,WBFDI); {"\tt (,,WBFDI)" at (last [],S)}
    move right_
    dswitch(,,WBFSd); {"\tt (,,WBFSd)" at (last [],S)}
    }
# Row 5
  move down moveht*5/4; right_; {
    dswitch(,,WBTh); {S: "\tt (,,WBTh)" at last [].s+(0,-10bp__)}
    move right_
    dswitch(,,WBKC); {"\tt (,,WBKC)" at (last [],S)}
    move right_
    dswitch(,,WBM); {"\tt (,,WBM)" at (last [],S)}
    move right_
    dswitch(,,WBCO); {"\tt (,,WBCO)" at (last [],S)}
    move right_
    dswitch(,,WBMP); {"\tt (,,WBMP)" at (last [],S)}
    move right_
    dswitch(,,WBoKCP); {"\tt (,,WBoKCP)" at (last [],S)}
    }
# Row 6
  move down moveht*5/4; right_; {
    dswitch(,,WBCY); {S: "\tt (,,WBCY)" at last [].s+(0,-10bp__)}
    move right_
    dswitch(,,WBCZ); {"\tt (,,WBCZ)" at (last [],S)}
    move right_
    dswitch(,,WBCE); {"\tt (,,WBCE)" at (last [],S)}
    move right_
    dswitch(,,WBRH); {"\tt (,,WBRH)" at (last [],S)}
    move right_
    dswitch(,,WBRdH); {"\tt (,,WBRdH)" at (last [],S)}
    move right_
    dswitch(,,WBRHH); {"\tt (,,WBRHH)" at (last [],S)}
    }
# Row 7
  move down; right_; {
    dswitch(,,WBMMR); {S: "\tt (,,WBMMR)" at last [].s+(0,-10bp__)}
    move right_
    dswitch(,,WBMM); {"\tt (,,WBMM)" at (last [],S)}
    move right_
    dswitch(,,WBMR); {"\tt (,,WBMR)" at (last [],S)}
    move right_
    dswitch(,,WBEL); {"\tt (,,WBEL)" at (last [],S)}
    move right_
    dswitch(,,WBLE); {"\tt (,,WBLE)" at (last [],S)}
    move right_
    dswitch(,,WBoKEL); {"\tt (,,WBoKEL)" at (last [],S)}
    }

.PE