summaryrefslogtreecommitdiff
path: root/graphics/circuit_macros/examples/Switches.m4
diff options
context:
space:
mode:
Diffstat (limited to 'graphics/circuit_macros/examples/Switches.m4')
-rw-r--r--graphics/circuit_macros/examples/Switches.m498
1 files changed, 56 insertions, 42 deletions
diff --git a/graphics/circuit_macros/examples/Switches.m4 b/graphics/circuit_macros/examples/Switches.m4
index d8262be92d..46b3f9240d 100644
--- a/graphics/circuit_macros/examples/Switches.m4
+++ b/graphics/circuit_macros/examples/Switches.m4
@@ -2,38 +2,40 @@
# Switches.m4
cct_init
+define(`Below',`at last [].s+(0,-10bp__)')
+
movewid = 0.25
# Row 1
right_; {
- lswitch; {S:"\tt ls{}witch" at last [].s+(0,-10bp__)}
+ lswitch; {S:"\tt ls{}witch" Below}
move right_
- lswitch(,,O); {"\tt (,,O)" at (last [],S)}
+ lswitch(,,O); {"\tt (,{,}O)" at (last [],S)}
move right_
- lswitch(,,C); {"\tt (,,C)" at (last [],S)}
+ lswitch(,,C); {"\tt (,{,}C)" at (last [],S)}
move right_
- lswitch(,,DA); {"\tt (,,DA)" at (last [],S)}
+ lswitch(,,DA); {"\tt (,{,}DA)" at (last [],S)}
move right_
- lswitch(,,dDO); {"\tt (,,dDO)" at (last [],S)}
+ lswitch(,,dDO); {"\tt (,{,}dDO)" at (last [],S)}
move right_
- lswitch(,,uDC); {"\tt (,,uDC)" at (last [],S)}
+ lswitch(,,uDC); {"\tt (,{,}uDC)" at (last [],S)}
}
# Row 2
move down; right_; {
- lswitch(,,K); {S:"\tt (,,K)" at last [].s+(0,-10bp__)}
+ lswitch(,,K); {S:"\tt (,{,}K)" Below}
move right_
- lswitch(,,KD); {"\tt (,,KD)" at (last [],S)}
+ lswitch(,,KD); {"\tt (,{,}KD)" at (last [],S)}
move right_
- lswitch(,,KOD); {"\tt (,,KOD)" at (last [],S)}
+ lswitch(,,KOD); {"\tt (,{,}KOD)" at (last [],S)}
move right_
- lswitch(,,KCD); {"\tt (,,KCD)" at (last [],S)}
+ lswitch(,,KCD); {"\tt (,{,}KCD)" at (last [],S)}
move right_
bswitch; {"\tt `bswitch'" at (last [],S)}
move right_
- bswitch(,,C); {"\tt (,,C)" at (last [],S)}
+ bswitch(,,C); {"\tt (,{,}C)" at (last [],S)}
}
# Row 3
move down; right_; {
- D: dswitch(,,); {S: "\tt ds{}witch(,{},)" at last [].s+(0,-10bp__)}
+ D: dswitch(,,); {S: "\tt ds{}witch(,{},)" Below}
thinlines_
{ spline <- from 0.25 along_(D) up 0.1 then up 0.05 left 0.1
{"\tt W" rjust}
@@ -41,7 +43,7 @@ movewid = 0.25
{"\tt B" rjust }}
thicklines_
move right_
- D: dswitch(,,WdBK); {"\tt (,,WdBK)" at (last [],S)+(0,-4bp__)}
+ 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}
@@ -49,69 +51,81 @@ movewid = 0.25
{"\tt K" above }}
thicklines_
move right_
- dswitch(,,WBmdDK); {"\tt (,,WBmdDK)" at (last [],S)}
+ dswitch(,,WBmdDK); {"\tt (,{,}WBmdDK)" at (last [],S)}
move right_
- dswitch(,,WBKTr); {"\tt (,,WBKTr)" at (last [],S)}
+ dswitch(,,WBKTr); {"\tt (,{,}WBKTr)" at (last [],S)}
move right_
- dswitch(,,WdBL); {"\tt (,,WdBL)" at (last [],S+(0,-4bp__))}
+ dswitch(,,WdBL); {"\tt (,{,}WdBL)" at (last [],S+(0,-4bp__))}
move right_
- dswitch(,,WBCo); {"\tt (,,WBCo)" at (last [],S)}
+ dswitch(,,WBCo); {"\tt (,{,}WBCo)" at (last [],S)}
}
# Row 4
move down; right_; {
- dswitch(,,WBKCo); {S: "\tt (,,WBKCo)" at last [].s+(0,-10bp__)}
+ dswitch(,,WBKCo); {S: "\tt (,{,}WBKCo)" Below}
move right_
- dswitch(,,WBCb); {"\tt (,,WBCb)" at (last [],S)}
+ dswitch(,,WBCb); {"\tt (,{,}WBCb)" at (last [],S)}
move right_
- dswitch(,,WBDI); {"\tt (,,WBDI)" at (last [],S)}
+ dswitch(,,WBDI); {"\tt (,{,}WBDI)" at (last [],S)}
move right_
- dswitch(,,WBSd); {"\tt (,,WBSd)" at (last [],S)}
+ dswitch(,,WBSd); {"\tt (,{,}WBSd)" at (last [],S)}
move right_
- dswitch(,,WBFDI); {"\tt (,,WBFDI)" at (last [],S)}
+ dswitch(,,WBFDI); {"\tt (,{,}WBFDI)" at (last [],S)}
move right_
- dswitch(,,WBFSd); {"\tt (,,WBFSd)" at (last [],S)}
+ 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__)}
+ dswitch(,,WBTh); {S: "\tt (,{,}WBTh)" Below}
move right_
- dswitch(,,WBKC); {"\tt (,,WBKC)" at (last [],S)}
+ dswitch(,,WBKC); {"\tt (,{,}WBKC)" at (last [],S)}
move right_
- dswitch(,,WBM); {"\tt (,,WBM)" at (last [],S)}
+ dswitch(,,WBM); {"\tt (,{,}WBM)" at (last [],S)}
move right_
- dswitch(,,WBCO); {"\tt (,,WBCO)" at (last [],S)}
+ dswitch(,,WBCO); {"\tt (,{,}WBCO)" at (last [],S)}
move right_
- dswitch(,,WBMP); {"\tt (,,WBMP)" at (last [],S)}
+ dswitch(,,WBMP); {"\tt (,{,}WBMP)" at (last [],S)}
move right_
- dswitch(,,WBoKCP); {"\tt (,,WBoKCP)" at (last [],S)}
+ 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__)}
+ dswitch(,,WBCY); {S: "\tt (,{,}WBCY)" Below}
move right_
- dswitch(,,WBCZ); {"\tt (,,WBCZ)" at (last [],S)}
+ dswitch(,,WBCZ); {"\tt (,{,}WBCZ)" at (last [],S)}
move right_
- dswitch(,,WBCE); {"\tt (,,WBCE)" at (last [],S)}
+ dswitch(,,WBCE); {"\tt (,{,}WBCE)" at (last [],S)}
move right_
- dswitch(,,WBRH); {"\tt (,,WBRH)" at (last [],S)}
+ dswitch(,,WBRH); {"\tt (,{,}WBRH)" at (last [],S)}
move right_
- dswitch(,,WBRdH); {"\tt (,,WBRdH)" at (last [],S)}
+ dswitch(,,WBRdH); {"\tt (,{,}WBRdH)" at (last [],S)}
move right_
- dswitch(,,WBRHH); {"\tt (,,WBRHH)" at (last [],S)}
+ dswitch(,,WBRHH); {"\tt (,{,}WBRHH)" at (last [],S)}
}
# Row 7
+ move down moveht; right_; {
+ move down_ 2bp__; right_
+ dswitch(,,WBPr); {S: "\tt (,{,}WBPr)" Below}
+ move right_
+ dswitch(,,WBPrT); {S: "\tt (,{,}WBPrT)" Below}
+# move right_
+# Proxim; {S: "\tt Pro{}xim" Below}
+# move right_
+# Magn; {S: "\tt Mag{}n" Below}
+ move down_ 6bp__ then right_
+ dswitch(,,WBPrM); {S: "\tt (,{,}WBPrM)" Below}
+ }
+# Row 8
move down; right_; {
- dswitch(,,WBMMR); {S: "\tt (,,WBMMR)" at last [].s+(0,-10bp__)}
+ dswitch(,,WBMMR); {S: "\tt (,{,}WBMMR)" Below}
move right_
- dswitch(,,WBMM); {"\tt (,,WBMM)" at (last [],S)}
+ dswitch(,,WBMM); {"\tt (,{,}WBMM)" at (last [],S)}
move right_
- dswitch(,,WBMR); {"\tt (,,WBMR)" at (last [],S)}
+ dswitch(,,WBMR); {"\tt (,{,}WBMR)" at (last [],S)}
move right_
- dswitch(,,WBEL); {"\tt (,,WBEL)" at (last [],S)}
+ dswitch(,,WBEL); {"\tt (,{,}WBEL)" at (last [],S)}
move right_
- dswitch(,,WBLE); {"\tt (,,WBLE)" at (last [],S)}
+ dswitch(,,WBLE); {"\tt (,{,}WBLE)" at (last [],S)}
move right_
- dswitch(,,WBoKEL); {"\tt (,,WBoKEL)" at (last [],S)}
+ dswitch(,,WBoKEL); {"\tt (,{,}WBoKEL)" at (last [],S)}
}
-
.PE