diff options
author | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
commit | e0c6872cf40896c7be36b11dcc744620f10adf1d (patch) | |
tree | 60335e10d2f4354b0674ec22d7b53f0f8abee672 /graphics/circuit_macros/doc/Dac.m4 |
Initial commit
Diffstat (limited to 'graphics/circuit_macros/doc/Dac.m4')
-rw-r--r-- | graphics/circuit_macros/doc/Dac.m4 | 69 |
1 files changed, 69 insertions, 0 deletions
diff --git a/graphics/circuit_macros/doc/Dac.m4 b/graphics/circuit_macros/doc/Dac.m4 new file mode 100644 index 0000000000..77dda3cf55 --- /dev/null +++ b/graphics/circuit_macros/doc/Dac.m4 @@ -0,0 +1,69 @@ +.PS +# Dac.m4 +cct_init +s_init(Dacx) + + ar = 0.15 + +Q: dac +thinlines_ + arrow <- left ar from last [].In1; { move left 0.15 } + "In1" above rjust at Here+(0.1,0) + "\sl NW" at Q.NW above rjust + "\sl SW" at Q.SW below rjust + "\sl SE" at Q.SE below ljust + "\sl NE" at Q.NE above ljust + arrow <- up ar from Q.N1; "\sl N1" above + arrow <- down ar from Q.S1; "\sl S1" below + arrow <- right ar from Q.Out1; "\sl Out1" above ljust at Here-(0.1,0) + arrow <- right ar down ar/2 from Q.C; "\sl C" ljust + s_box(`\tt d`'ac') at Q.s+(0,-0.3) below +thicklines_ + +Q:dac(,,2,2,3,3) with .w at last [].e+(0.9,0) +thinlines_ + "DAC" at Q.C + arrow <- left ar from Q.In1; "\sl In1" rjust + arrow <- left ar from Q.In2; "\sl In2" rjust + arrow <- up ar from Q.N1; "\sl N1" above rjust + arrow <- up ar from Q.N2; "\sl N2" above ljust + arrow <- right ar from Q.Out1; "\sl Out1" ljust + arrow <- right ar from Q.Out2; "\sl Out2" ljust + arrow <- right ar from Q.Out3; "\sl Out3" ljust + arrow <- down ar left ar/2 from Q.S1; "\sl S1" below rjust + arrow <- down ar from Q.S2; "\sl S2" below + arrow <- down ar right ar/2 from Q.S3; "\sl S3" below ljust + s_box( + `\tt Q: d`'ac(,{,}2,2,3,3); \"DAC\" \"2\" at Q.C') at Q.s+(0,-0.3) below +thicklines_ + +Q: adc with .nw at last [].ne + (0.9,0) +thinlines_ + "\sl NW" at Q.NW above rjust + "\sl SW" at Q.SW below rjust + "\sl SE" at Q.SE below ljust + "\sl NE" at Q.NE above ljust + arrow <- left ar from Q.In1; "\sl In1" rjust above at Here+(0.1,0) + arrow <- up ar from Q.N1; "\sl N1" above + arrow <- down ar from Q.S1; "\sl S1" below + arrow <- right ar from Q.Out1; "\sl Out1" ljust above at Here-(0.1,0) + arrow <- left ar down ar/2 from Q.C; "\sl C" rjust + s_box(`\tt a`'dc') at Q.s+(0,-0.3) below +thicklines_ + +Q:adc(,,2,2,3,3) with .w at last [].e+(0.8,0) +thinlines_ + "ADC" at Q.C + arrow <- left ar from Q.In1; "\sl In1" rjust + arrow <- left ar from Q.In2; "\sl In2" rjust + arrow <- up ar from Q.N1; "\sl N1" above rjust + arrow <- up ar from Q.N2; "\sl N2" above ljust + arrow <- right ar from Q.Out1; "\sl Out1" ljust + arrow <- right ar from Q.Out2; "\sl Out2" ljust + arrow <- right ar from Q.Out3; "\sl Out3" ljust + arrow <- down ar left ar/2 from Q.S1; "\sl S1" below rjust + arrow <- down ar from Q.S2; "\sl S2" below + arrow <- down ar right ar/2 from Q.S3; "\sl S3" below ljust + s_box(`\tt a`'dc(,{,}2,2,3,3)') at Q.s+(0,-0.3) below + +.PE |