diff options
Diffstat (limited to 'graphics/circuit_macros/examples/svg/SwitchesSVG.m4')
-rw-r--r-- | graphics/circuit_macros/examples/svg/SwitchesSVG.m4 | 147 |
1 files changed, 84 insertions, 63 deletions
diff --git a/graphics/circuit_macros/examples/svg/SwitchesSVG.m4 b/graphics/circuit_macros/examples/svg/SwitchesSVG.m4 index 95c9f2b2ca..2bccc8cd8f 100644 --- a/graphics/circuit_macros/examples/svg/SwitchesSVG.m4 +++ b/graphics/circuit_macros/examples/svg/SwitchesSVG.m4 @@ -4,124 +4,145 @@ cct_init(svg_font(sans-serif,11bp__,2bp__)) textoffset = 3bp__ movewid = 0.25 + +define(`Below',`at last [].s+(0,-(8 ifelse(`$1',,,+10*(`$1')))bp__)') +movewid = 0.25 + # Row 1 right_; { - lswitch; {S:"svg_tt(`lswitch')" at last [].s+(0,-10bp__)} + lswitch; {"svg_tt(`lswitch')" at last [].s Below} move right_ - lswitch(,,O); {"svg_tt(`(,,O)')" at (last [],S)} + lswitch(,,O); {"svg_tt(`(,,O)')" at last [].s Below} move right_ - lswitch(,,C); {"svg_tt(`(,,C)')" at (last [],S)} + lswitch(,,C); {"svg_tt(`(,,C)')" at last [].s Below} move right_ - lswitch(,,DA); {"svg_tt(`(,,DA)')" at (last [],S)} + lswitch(,,DA); {"svg_tt(`(,,DA)')" at last [].s Below} move right_ - lswitch(,,dDO); {"svg_tt(`(,,dDO)')" at (last [],S)} + lswitch(,,dDO); {"svg_tt(`(,,dDO)')" at last [].s Below} move right_ - lswitch(,,uDC); {"svg_tt(`(,,uDC)')" at (last [],S)} + lswitch(,,uDC); {"svg_tt(`(,,uDC)')" at last [].s Below} } # Row 2 - move down; right_; { - lswitch(,,K); {S:"svg_tt(`(,,K)')" at last [].s+(0,-10bp__)} + move down 0.4; right_; { + lswitch(,,K); {"svg_tt(`(,,K)')" at last [].s Below} move right_ - lswitch(,,KD); {"svg_tt(`(,,KD)')" at (last [],S)} + lswitch(,,KD); {"svg_tt(`(,,KD)')" at last [].s Below} move right_ - lswitch(,,KOD); {"svg_tt(`(,,KOD)')" at (last [],S)} + lswitch(,,KOD); {"svg_tt(`(,,KOD)')" at last [].s Below} move right_ - lswitch(,,KCD); {"svg_tt(`(,,KCD)')" at (last [],S)} + lswitch(,,KCD); {"svg_tt(`(,,KCD)')" at last [].s Below} move right_ - bswitch; {"svg_tt(``bswitch'')" at (last [],S)} + bswitch; {"svg_tt(``bswitch'')" at last [].s Below} move right_ - bswitch(,,C); {"svg_tt(`(,,C)')" at (last [],S)} + bswitch(,,C); {"svg_tt(`(,,C)')" at last [].s Below} } # Row 3 - move down; right_; { - D: dswitch(,,); {S: "svg_tt(`dswitch(,,)')" at last [].s+(0,-10bp__)} + move down 0.45; right_; { + D: dswitch; {"svg_tt(`dswitch')" at D.start below ljust} thinlines_ - { spline <- from 0.25 along_(D) up 0.1 then up 0.05 left 0.1 - {"svg_tt(`W')" rjust} - spline <- from D.c+(0,m4sc*2) up 0.1 then up 0.05 left 0.1 - {"svg_tt(`B')" rjust }} + {spline <- from last [].B.c up 0.1 then up 0.05 left 0.1 + "svg_tt(`B')" rjust} thicklines_ move right_ - D: dswitch(,,WdBK); {"svg_tt(`(,,WdBK)')" at (last [],S)+(0,-4bp__)} + dswitch(,,WdBK); {"svg_tt(`(,,WdBK)')" at last [].s Below} thinlines_ - { spline <- from tr_xy(0,-2) up 0.1 then up 0.10 left 0.1 - {"svg_tt(`dB')" rjust} - spline <- from tr_xy(4,-2) right 0.1 then right 0.05 up 0.15 + { spline <- from 0.5 along_(last [].B) up 0.1 then up 0.10 left 0.1 + {"svg_tt(`B')" rjust} } + { spline <- from last [].K right 0.1 then right 0.05 up 0.15 {"svg_tt(`K')" above }} thicklines_ move right_ - dswitch(,,WBmdDK); {"svg_tt(`(,,WBmdDK)')" at (last [],S)} + dswitch(,,WBmdDK); {"svg_tt(`(,,WBmdDK)')" at last [].s Below} move right_ - dswitch(,,WBKTr); {"svg_tt(`(,,WBKTr)')" at (last [],S)} + dswitch(,,WBKTr); {"svg_tt(`(,,WBKTr)')" at last [].s Below} move right_ - dswitch(,,WdBL); {"svg_tt(`(,,WdBL)')" at (last [],S+(0,-4bp__))} + dswitch(,,WdBL); {"svg_tt(`(,,WdBL)')" at last [].s Below} move right_ - dswitch(,,WBCo); {"svg_tt(`(,,WBCo)')" at (last [],S)} + dswitch(,,WBSd); {"svg_tt(`(,,WBSd)')" at last [].s Below} } # Row 4 - move down; right_; { - dswitch(,,WBKCo); {S: "svg_tt(`(,,WBKCo)')" at last [].s+(0,-10bp__)} + move down 0.4; right_; { + dswitch(,,WBCb); {"svg_tt(`(,,WBCb)')" at last [].s Below} move right_ - dswitch(,,WBCb); {"svg_tt(`(,,WBCb)')" at (last [],S)} + dswitch(,,WBcCb); {"svg_tt(`(,,WBcCb)')" at last [].s Below} move right_ - dswitch(,,WBDI); {"svg_tt(`(,,WBDI)')" at (last [],S)} + dswitch(,,WBcDI); {"svg_tt(`(,,WBcDI)')" at last [].s Below} + thinlines_ + {arrow <- from last [].DI.start up_ 0.1 right_ 0.15; "svg_tt(`DI')" ljust} + thicklines_ move right_ - dswitch(,,WBSd); {"svg_tt(`(,,WBSd)')" at (last [],S)} +# dswitch(,,WBDI); {"svg_tt(`(,,WBDI)')" at last [].s Below} + dswitch(,,WBKCo); {"svg_tt(`(,,WBKCo)')" at last [].s Below} move right_ - dswitch(,,WBFDI); {"svg_tt(`(,,WBFDI)')" at (last [],S)} + dswitch(,,WBFDI); {"svg_tt(`(,,WBFDI)')" at last [].s Below} move right_ - dswitch(,,WBFSd); {"svg_tt(`(,,WBFSd)')" at (last [],S)} + dswitch(,,WBFSd); {"svg_tt(`(,,WBFSd)')" at last [].s Below} } # Row 5 - move down moveht*5/4; right_; { - dswitch(,,WBTh); {S: "svg_tt(`(,,WBTh)')" at last [].s+(0,-10bp__)} + move down 0.4; right_; { + dswitch(,,WBMMR); {"svg_tt(`(,,WBMMR)')" at last [].s Below} move right_ - dswitch(,,WBKC); {"svg_tt(`(,,WBKC)')" at (last [],S)} + dswitch(,,WBMM); {"svg_tt(`(,,WBMM)')" at last [].s Below} move right_ - dswitch(,,WBM); {"svg_tt(`(,,WBM)')" at (last [],S)} + dswitch(,,WBMR); {"svg_tt(`(,,WBMR)')" at last [].s Below} move right_ - dswitch(,,WBCO); {"svg_tt(`(,,WBCO)')" at (last [],S)} + dswitch(,,WBEL); {"svg_tt(`(,,WBEL)')" at last [].s Below} move right_ - dswitch(,,WBMP); {"svg_tt(`(,,WBMP)')" at (last [],S)} + dswitch(,,WBLE); {"svg_tt(`(,,WBLE)')" at last [].s Below} move right_ - dswitch(,,WBoKCP); {"svg_tt(`(,,WBoKCP)')" at (last [],S)} + dswitch(,,WBoKEL); {"svg_tt(`(,,WBoKEL)')" at last [].s Below} } # Row 6 - move down moveht*5/4; right_; { - dswitch(,,WBCY); {S: "svg_tt(`(,,WBCY)')" at last [].s+(0,-10bp__)} - move right_ - dswitch(,,WBCZ); {"svg_tt(`(,,WBCZ)')" at (last [],S)} + move down moveht+2bp__; right_; { + dswitch(,,WBTh); {"svg_tt(`(,,WBTh)')" at last [].s Below} move right_ - dswitch(,,WBCE); {"svg_tt(`(,,WBCE)')" at (last [],S)} + dswitch(,,WBKC); {"svg_tt(`(,,WBKC)')" at last [].s Below} + thinlines_ + { arrow <- from last [].C.c left 0.2; "svg_tt(`C')" rjust } + thicklines_ move right_ - dswitch(,,WBRH); {"svg_tt(`(,,WBRH)')" at (last [],S)} + dswitch(,,WBM); {"svg_tt(`(,,WBM)')" at last [].s Below} move right_ - dswitch(,,WBRdH); {"svg_tt(`(,,WBRdH)')" at (last [],S)} + dswitch(,,WBCO); {"svg_tt(`(,,WBCO)')" at last [].s Below} move right_ - dswitch(,,WBRHH); {"svg_tt(`(,,WBRHH)')" at (last [],S)} + dswitch(,,WBMP); {"svg_tt(`(,,WBMP)')" at last [].s Below} + move down_ 2bp__ then right_ + dswitch(,,WBoKCP); {"svg_tt(`(,,WBoKCP)')" at last [].s Below} } # Row 7 - move down moveht*5/4; right_; { - move down 2bp__; right_ - dswitch(,,WBPr); {S: "svg_tt(`(,,WBPr)')" at last [].s+(0,-10bp__)} + move down moveht*7/6; right_; { + dswitch(,,WBCY); {"svg_tt(`(,,WBCY)')" at last [].s Below} move right_ - dswitch(,,WBPrT); {S: "svg_tt(`(,,WBPrT)')" at last [].s+(0,-10bp__)} - move down_ 6bp__ then right_ - dswitch(,,WBPrM); {S: "svg_tt(`(,,WBPrM)')" at last [].s+(0,-10bp__)} + dswitch(,,WBCZ); {"svg_tt(`(,,WBCZ)')" at last [].s Below} + move right_ + dswitch(,,WBCE); {"svg_tt(`(,,WBCE)')" at last [].s Below} + move right_ + dswitch(,,WBRH); {"svg_tt(`(,,WBRH)')" at last [].s Below} + move right_ + dswitch(,,WBRdH); {"svg_tt(`(,,WBRdH)')" at last [].s Below} + move right_ + dswitch(,,WBRHH); {"svg_tt(`(,,WBRHH)')" at last [].s Below} } # Row 8 - move down; right_; { - dswitch(,,WBMMR); {S: "svg_tt(`(,,WBMMR)')" at last [].s+(0,-10bp__)} - move right_ - dswitch(,,WBMM); {"svg_tt(`(,,WBMM)')" at (last [],S)} + move down moveht; right_; { + move down_ 2bp__; right_ + dswitch(,,WBPr); {"svg_tt(`(,,WBPr)')" at last [].s Below} move right_ - dswitch(,,WBMR); {"svg_tt(`(,,WBMR)')" at (last [],S)} + dswitch(,,WBPrT); {"svg_tt(`(,,WBPrT)')" at last [].s Below} + move down_ 6bp__ then right_ + dswitch(,,WBPrM); {"svg_tt(`(,,WBPrM)')" at last [].s Below} move right_ - dswitch(,,WBEL); {"svg_tt(`(,,WBEL)')" at (last [],S)} + dswitch(,,WBDIGX,text=W); #{"svg_tt(`(,,WBDIGX,W)')" at last [].s Below} + {"svg_tt(`(,,WBDIGX,')" ljust at last line.start+(0,-15bp__) \ + "svg_tt(`text=W)')" ljust} move right_ - dswitch(,,WBLE); {"svg_tt(`(,,WBLE)')" at (last [],S)} + dswitch(,,WBDIGC,text=M) + {"svg_tt(`(,,WBDIGC,')" ljust at last line.start+(0,-15bp__) \ + "svg_tt(`text=M)')" ljust} move right_ - dswitch(,,WBoKEL); {"svg_tt(`(,,WBoKEL)')" at (last [],S)} + dswitch(,,WBcDIGC,text=M) # + {"svg_tt(`(,,WBcDIGC,')" ljust at last line.start+(0,-15bp__) \ + "svg_tt(`text=M)')" ljust} } command "</g>')" # end font |