summaryrefslogtreecommitdiff
path: root/macros/latex209/contrib/e_symbol
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /macros/latex209/contrib/e_symbol
Initial commit
Diffstat (limited to 'macros/latex209/contrib/e_symbol')
-rw-r--r--macros/latex209/contrib/e_symbol/e_symbol.tex573
-rw-r--r--macros/latex209/contrib/e_symbol/esymbdoc.dvibin0 -> 7272 bytes
-rw-r--r--macros/latex209/contrib/e_symbol/esymbdoc.tex305
3 files changed, 878 insertions, 0 deletions
diff --git a/macros/latex209/contrib/e_symbol/e_symbol.tex b/macros/latex209/contrib/e_symbol/e_symbol.tex
new file mode 100644
index 0000000000..d82d323c5d
--- /dev/null
+++ b/macros/latex209/contrib/e_symbol/e_symbol.tex
@@ -0,0 +1,573 @@
+% Diese Datei enth"alt nur elektrische Symbole, die zur Erstellung
+% eines Schaltplans genutzt werden k"onnen. Dazu ist das File mit
+% \input{e_symbol} in das Dokument einzubinden.
+%
+% Es gibt die Zeichen \hwiderstand{x}{y}, \vwiderstand{x}{y},
+% \hkondensator{x}{y}, \vkondensator{x}{y}, \hspule{x}{y},
+% \vspule{x}{y}, \masse{x}{y}, \biptrans{x}{y}{dir}{typ}{invers},
+% \fet{x}{y}{dir}{typ}, \diode{x}{y}{dir}, \zdiode{x}{y}{dir}.
+
+\typeout{} % 60 * / Zeile(10.Spalte--70.Spalte
+\typeout{*************************************************************}
+\typeout{* e_symbol.tex enthaelt Befehlsergaenzungen zum Erstellen__ *}
+\typeout{* von Schaltplaenen._______________________________________ *}
+\typeout{* Dieter Jurzitza, 30.07.92 0721/691909____________________ *}
+\typeout{*************************************************************}
+\typeout{}
+
+% horizontal angeordneter Widerstand der L"ange 2 Einheiten. #1(x)
+% und #2(y) geben den linken Drahtanfang an. Die Dicke betr"agt
+% 0.4 Einheiten.
+
+\newcommand{\hwiderstand}[2]{%
+ \put(#1,#2){%
+ \line(1,0){0.5}
+ \put(0,-0.2){\line(0,1){0.4}}
+ \put(0,-0.2){\line(1,0){1}}
+ \put(0,0.2){\line(1,0){1}}
+ \put(1,-0.2){\line(0,1){0.4}}
+ \put(1,0){\line(1,0){0.5}}
+ }%
+ }%
+
+% vertikal angeordneter Widerstand der L"ange 2 Einheiten. #1(x)
+% und #2(y) geben den unteren Drahtanfang an. Die Dicke betr"agt
+% 0.4 Einheiten.
+
+\newcommand{\vwiderstand}[2]{%
+ \put(#1,#2){%
+ \line(0,1){0.5}
+ \put(-0.2,0.5){\line(1,0){0.4}}
+ \put(-0.2,0.5){\line(0,1){1}}
+ \put(0.2,0.5){\line(0,1){1}}
+ \put(-0.2,1.5){\line(1,0){0.4}}
+ \put(0,1.5){\line(0,1){0.5}}
+ }%
+ }%
+
+% horizontal angeordneter Kondensator der L"ange 1 Einheit. #1(x)
+% und #2(y) geben den linken Drahtanfang an. Die Dicke betr"agt 1
+% Einheit.
+
+\newcommand{\hkondensator}[2]{%
+ \put(#1,#2){%
+ \line(1,0){0.4}
+ \put(0,-0.5){\line(0,1){1}}
+ \put(0.2,-0.5){\line(0,1){1}}
+ \put(0.2,0){\line(1,0){0.4}}
+ }%
+ }%
+
+% vertikal angeordneter Kondensator der L"ange 1 Einheit. #1(x)
+% und #2(y) geben den unteren Drahtanfang an. Die Dicke betr"agt 1
+% Einheit.
+
+\newcommand{\vkondensator}[2]{%
+ \put(#1,#2){%
+ \line(0,1){0.4}
+ \put(-0.5,0.4){\line(1,0){1}}
+ \put(-0.5,0.6){\line(1,0){1}}
+ \put(0,0.6){\line(0,1){0.4}}
+ }%
+ }%
+
+
+% horizontal angeordnete Spule der L"ange 3 Einheiten. #1(x)
+% und #2(y) geben den linken Drahtanfang an. Die Dicke betr"agt 0.5
+% Einheiten.
+
+\newcommand{\hspule}[2]{%
+ \put(#1,#2){%
+ \line(1,0){0.5}
+ \put(0.25,0){\oval(0.5,0.5)[t]}
+ \put(0.75,0){\oval(0.5,0.5)[t]}
+ \put(1.25,0){\oval(0.5,0.5)[t]}
+ \put(1.75,0){\oval(0.5,0.5)[t]}
+ \put(2,0){\line(1,0){0.5}}
+ }%
+ }%
+
+% vertikal angeordnete Spule der L"ange 3 Einheiten. #1(x)
+% und #2(y) geben den linken Drahtanfang an. Die Dicke betr"agt 0.5
+% Einheiten.
+
+\newcommand{\vspule}[2]{%
+ \put(#1,#2){%
+ \line(0,1){0.5}
+ \put(0,0.75){\oval(0.5,0.5)[l]}
+ \put(0,1.25){\oval(0.5,0.5)[l]}
+ \put(0,1.75){\oval(0.5,0.5)[l]}
+ \put(0,2.25){\oval(0.5,0.5)[l]}
+ \put(0,2.5){\line(0,1){0.5}}
+ }%
+ }%
+
+% horizontaler Strich der L"ange 0.5 Einheiten, symmetrisch zu
+% #1(x) und #2(y) angeordnet.
+
+\newcommand{\masse}[2]{
+ \put(#1,#2){%
+ \put(-0.25,0){\line(1,0){0.5}}
+ }%
+ }%
+
+% npn -- oder pnp Transistoren, nach links, nach rechts, nach
+% oben oder nach unten gerichtet. Die Ausrichtung ist vom
+% "ubergebenen Parameter #3, der Typ von Parameter #4 abh"angig.
+% Zul"assige Werte f"ur #3: o(ben), u(nten), (r)echts, (l)inks.
+% Zul"assige Werte f"ur #4: n(pn) oder p(np). #1 ergibt die X, #2
+% die Y- Koordinate. Die Boxgr"o"se betr"agt 1*1.5, Basisanschlu"s
+% bei (0,0.75)(r), (1,0.75)(l), (0.75,0)(o), (0.75,1.0)(u).
+% Parameter #5 vertauscht die Anschl"usse f"ur Kollektor und
+% Emitter, so da"s eine beliebige Orientierung des Elementes
+% m"oglich ist. Es gilt: Normal r: Emitter rechts unten, l:
+% Emitter links unten, o: Emitter rechts oben, u: Emitter rechts
+% unten.
+% Invers : jeweils oben und unten vertauscht.
+
+\newcommand{\biptrans}[5]%
+ {%
+ \let\transhlp=*% Zustandsspeicher f"ur Fehlermeldungen
+ \if#3r% Transistor nach rechts....
+ {%
+ \put(#1,#2)%
+ {%
+ \global\let\transhlp=t%
+ \put(0.5,0.25){\line(0,1){1.0}}% Basisbalken...
+ \put(0,0.75){\line(1,0){0.5}}% Basisanschlu"s...
+ %
+ \if#5i% Wenn Schalter 'invers'....
+ {%
+ \if#4n% und n(pn)
+ {%
+ \put(0.5,1.0){\vector(2,1){0.5}}%
+ }% Emitter rechts oben!
+ \else% sonst...
+ {% und p(np)
+ \put(1.0,1.25){\vector(-2,-1){0.5}}%
+ }% Emitter rechts oben!
+ \fi%
+ \put(0.5,0.5){\line(2,-1){0.5}}%
+ }% Kollektor rechts unten!
+ \else% Schalter 'normal'....
+ {%
+ \if#4n% und n(pn)
+ {%
+ \put(0.5,0.5){\vector(2,-1){0.5}}%
+ }% Emitter rechts unten!
+ \else%
+ {% und p(np)
+ \put(1.0,0.25){\vector(-2,1){0.5}}%
+ }% Emitter rechts unten!
+ \fi%
+ \put(0.5,1.0){\line(2,1){0.5}}%
+ }% Kollektor rechts oben!
+ \fi%
+ % Anschlu"s f"ur Kollektor und Emitter....
+ \put(1.0,0.25){\line(0,-1){0.25}}%
+ \put(1,1.25){\line(0,1){0.25}}%
+ }%
+ }%
+ \fi%
+ %
+ \if#3l% Transistor nach links...
+ {%
+ \put(#1,#2)%
+ {%
+ \global\let\transhlp=t%
+ \put(0.5,0.25){\line(0,1){1.0}}% Basisbalken..
+ \put(0.5,0.75){\line(1,0){0.5}}% Basisanschlu"s...
+ %
+ \if#5i% Wenn Schalter 'invers'...
+ {%
+ \if#4n% und n(pn)...
+ {%
+ \put(0.5,1.0){\vector(-2,1){0.5}}%
+ }% Emitter links oben!
+ \else%
+ {% und p(np)...
+ \put(0.0,1.25){\vector(2,-1){0.5}}%
+ }% Emitter links oben!
+ \fi%
+ \put(0.5,0.5){\line(-2,-1){0.5}}%
+ }% Kollektor links unten!
+ \else% Schalter 'normal'...
+ {%
+ \if#4n%
+ {% und n(pn)...
+ \put(0.5,0.5){\vector(-2,-1){0.5}}%
+ }% Emitter links unten!
+ \else%
+ {% und p(np)...
+ \put(0,0.25){\vector(2,1){0.5}}%
+ }% Emitter links unten!
+ \fi%
+ \put(0.5,1.0){\line(-2,1){0.5}}%
+ }% Kollektor links oben!
+ \fi%
+ % Anschlu"s f"ur Kollektor und Emitter...
+ \put(0,0.25){\line(0,-1){0.25}}%
+ \put(0,1.25){\line(0,1){0.25}}%
+ }%
+ }%
+ \fi%
+ %
+ \if#3o% Transistor nach oben...
+ {%
+ \put(#1,#2)%
+ {%
+ \global\let\transhlp=t%
+ \put(0.25,0.5){\line(1,0){1.0}}% Basisbalken...
+ \put(0.75,0){\line(0,1){0.5}}% Basisanschlu"s...
+ %
+ \if#5i% Schalter 'invers'...
+ {%
+ \if#4n% und n(pn)...
+ {%
+ \put(0.5,0.5){\vector(-1,2){0.25}}%
+ }% Emitter links oben!
+ \else%
+ {% und p(np)...
+ \put(0.25,1.0){\vector(1,-2){0.25}}%
+ }% Emitter links oben!
+ \fi%
+ \put(1.0,0.5){\line(1,2){0.25}}%
+ }% Kollektor rechts oben!
+ \else% Schalter 'normal...
+ {%
+ \if#4n% und n(pn)...
+ {%
+ \put(1.0,0.5){\vector(1,2){0.25}}%
+ }% Emitter rechts oben!
+ \else%
+ {% und p(np)...
+ \put(1.25,1.0){\vector(-1,-2){0.25}}%
+ }% Emitter rechts oben!
+ \fi%
+ \put(0.5,0.5){\line(-1,2){0.25}}%
+ }% Kollektor links oben!
+ \fi%
+ % Anschlu"s f"ur Kollektor und Emitter...
+ \put(1.25,1.0){\line(1,0){0.25}}%
+ \put(0,1){\line(1,0){0.25}}%
+ }%
+ }%
+ \fi%
+ %
+ \if#3u% Transistor nach unten...
+ {%
+ \put(#1,#2)%
+ {%
+ \global\let\transhlp=t%
+ \put(0.25,0.5){\line(1,0){1.0}}% Basisbalken...
+ \put(0.75,0.5){\line(0,1){0.5}}% Basisanschlu"s...
+ %
+ \if#5i% Schalter 'invers'...
+ {%
+ \if#4n% und n(pn)...
+ {%
+ \put(0.5,0.5){\vector(-1,-2){0.25}}%
+ }% Emitter links unten!
+ \else%
+ {% und p(np)...
+ \put(0.25,0){\vector(1,2){0.25}}%
+ }% Emitter links unten!
+ \fi%
+ \put(1.0,0.5){\line(1,-2){0.25}}%
+ }% Kollektor rechts unten!
+ \else%
+ {% Schalter 'normal'...
+ \if#4n% und n(pn)...
+ {%
+ \put(1.0,0.5){\vector(1,-2){0.25}}%
+ }% Emitter rechts unten!
+ \else%
+ {% und p(np)...
+ \put(1.25,0){\vector(-1,2){0.25}}%
+ }% Emitter rechts unten!
+ \fi%
+ \put(0.5,0.5){\line(-1,-2){0.25}}%
+ }% Kollektor links unten!
+ \fi%
+ % Anschlu"s f"ur Kollektor und Emitter!
+ \put(1.25,0){\line(1,0){0.25}}%
+ \put(0,0){\line(1,0){0.25}}%
+ }%
+ }%
+ \fi%
+ %
+ \if\transhlp*%
+ {%
+ \typeout{}%
+ \typeout{Falscher Parameter!}%
+ \typeout{Parameter 3 kann die Werte r(echts), l(inks), o(ben), u(unten) annehmen.}%
+ \typeout{Parameter 4 sollte die Werte n(pn) oder p(np) annehmen.}%
+ \typeout{Parameter 5 sollte i(nvers) oder n(ormal) sein}%
+ \typeout{Gewaehlt: #1 #2 #3 #4 #5}%
+ \typeout{}%
+ }%
+ \fi
+ }%
+
+% p- oder n-Kanal Feldeffekttransistoren, nach links, nach
+% rechts, nach oben oder nach unten gerichtet. Die Ausrichtung
+% ist vom "ubergebenen Parameter #3, der Typ von Parameter #4
+% abh"angig. Zul"assige Werte f"ur #3: o(ben), u(nten), (r)echts,
+% (l)inks. Zul"assige Werte f"ur #4: n(pn) oder p(np). #1 ergibt
+% die X, #2 die Y- Koordinate. Die Boxgr"o"se betr"agt 1*1,
+% Gateanschlu"s bei (0,0.5)(r), (1,0.5)(l), (0.5,0)(o),
+% (0.5,1.0)(u).
+
+\newcommand{\fet}[4]%
+ {%
+ \let\transhlp=*
+ \if#3r%
+ {%
+ \put(#1,#2)%
+ {%
+ \global\let\transhlp=t%
+ \if#4n%
+ {%
+ \put(0,0.5){\vector(1,0){0.5}}%
+ }%
+ \else%
+ {%
+ \put(0.5,0.5){\vector(-1,0){0.5}}%
+ }%
+ \fi%
+ \put(0.5,0){\line(0,1){1.0}}%
+ %
+ \put(0.5,0.25){\line(1,0){0.5}}%
+ \put(0.5,0.75){\line(1,0){0.5}}%
+ %
+ \put(1.0,0.25){\line(0,-1){0.25}}%
+ \put(1.0,0.75){\line(0,1){0.25}}%
+ }%
+ }%
+ \fi%
+
+ \if#3l%
+ {%
+ \put(#1,#2)%
+ {%
+ \global\let\transhlp=t%
+ \if#4n%
+ {%
+ \put(1.0,0.5){\vector(-1,0){0.5}}%
+ }%
+ \else%
+ {%
+ \put(0.5,0.5){\vector(1,0){0.5}}%
+ }%
+ \fi%
+ \put(0.5,0){\line(0,1){1.0}}%
+ %
+ \put(0.5,0.25){\line(-1,0){0.5}}%
+ \put(0.5,0.75){\line(-1,0){0.5}}%
+ %
+ \put(0,0.25){\line(0,-1){0.25}}%
+ \put(0,0.75){\line(0,1){0.25}}%
+ }%
+ }%
+ \fi%
+
+ \if#3u%
+ {%
+ \put(#1,#2)%
+ {%
+ \global\let\transhlp=t%
+ \if#4n%
+ {%
+ \put(0.5,1.0){\vector(0,-1){0.5}}%
+ }%
+ \else%
+ {%
+ \put(0.5,0.5){\vector(0,1){0.5}}%
+ }%
+ \fi%
+ \put(0,0.5){\line(1,0){1.0}}%
+ %
+ \put(0.25,0.5){\line(0,-1){0.5}}%
+ \put(0.75,0.5){\line(0,-1){0.5}}%
+ %
+ \put(0,0){\line(1,0){0.25}}%
+ \put(0.75,0){\line(1,0){0.25}}%
+ }%
+ }%
+ \fi%
+
+ \if#3o%
+ {%
+ \put(#1,#2)%
+ {%
+ \global\let\transhlp=t%
+ \if#4n%
+ {%
+ \put(0.5,0){\vector(0,1){0.5}}%
+ }%
+ \else%
+ {%
+ \put(0.5,0.5){\vector(0,-1){0.5}}%
+ }%
+ \fi%
+ \put(0,0.5){\line(1,0){1.0}}%
+ %
+ \put(0.25,0.5){\line(0,1){0.5}}%
+ \put(0.75,0.5){\line(0,1){0.5}}%
+ %
+ \put(0,1.0){\line(1,0){0.25}}%
+ \put(0.75,1.0){\line(1,0){0.25}}%
+ }%
+ }%
+ \fi%
+
+ \if\transhlp*%
+ {%
+ \typeout{}%
+ \typeout{Falscher Parameter!}%
+ \typeout{Parameter 3 kann die Werte r, l, o, u annehmen, nicht: #3 !}%
+ \typeout{}%
+ }%
+ \fi
+ }%
+
+% Zenerdiode in vier Richtungen. Gemeinsam ist die Anode. Die
+% L"ange betr"agt 1.5. Die Richtung wird mit #3 "ubergeben. Analog
+% \biptrans und \fet.
+
+\newcommand{\zdiode}[3]%
+ {%
+ \if#3o%
+ {%
+ \put(#1,#2)%
+ {%
+ \put(0,0){\line(0,1){1.5}}%
+ %
+ \put(-0.25,0.5){\line(1,0){0.5}}%
+ \put(-0.25,1.0){\line(1,0){0.5}}%
+ \put(0.25,1.0){\line(0,-1){0.15}}%
+ %
+ \put(-0.25,0.5){\line(1,2){0.25}}%
+ \put(0,1.0){\line(1,-2){0.25}}%
+ }%
+ }%
+ \fi
+
+ \if#3u%
+ {%
+ \put(#1,#2)%
+ {%
+ \put(0,0){\line(0,-1){1.5}}%
+ %
+ \put(-0.25,-1.0){\line(1,0){0.5}}%
+ \put(-0.25,-0.5){\line(1,0){0.5}}%
+ \put(-0.25,-1){\line(0,1){0.15}}%
+ %
+ \put(-0.25,-0.5){\line(1,-2){0.25}}%
+ \put(0.25,-0.5){\line(-1,-2){0.25}}%
+ }%
+ }%
+ \fi
+
+ \if#3r%
+ {%
+ \put(#1,#2)%
+ {%
+ \put(0,0){\line(1,0){1.5}}%
+ %
+ \put(1.0,0.25){\line(0,-1){0.5}}%
+ \put(0.5,0.25){\line(0,-1){0.5}}%
+ \put(1.0,-0.25){\line(-1,0){0.15}}%
+ %
+ \put(0.5,0.25){\line(2,-1){0.5}}%
+ \put(0.5,-0.25){\line(2,1){0.5}}%
+ }%
+ }%
+ \fi
+
+ \if#3l%
+ {%
+ \put(#1,#2)%
+ {%
+ \put(0,0){\line(-1,0){1.5}}%
+ %
+ \put(-1.0,0.25){\line(0,-1){0.5}}%
+ \put(-0.5,0.25){\line(0,-1){0.5}}%
+ \put(-1.0,0.25){\line(1,0){0.15}}%
+ %
+ \put(-0.5,0.25){\line(-2,-1){0.5}}%
+ \put(-0.5,-0.25){\line(-2,1){0.5}}%
+ }%
+ }%
+ \fi
+ }%
+
+% Diode in vier Richtungen. Gemeinsam ist die Anode. Die L"ange
+% betr"agt 1.5. Die Richtung wird mit #3 "ubergeben. Analog
+% \biptrans und \fet.
+
+\newcommand{\diode}[3]%
+ {%
+ \if#3o%
+ {%
+ \put(#1,#2)%
+ {%
+ \put(0,0){\line(0,1){1.5}}%
+ %
+ \put(-0.25,0.5){\line(1,0){0.5}}%
+ \put(-0.25,1.0){\line(1,0){0.5}}%
+ %
+ \put(-0.25,0.5){\line(1,2){0.25}}%
+ \put(0,1.0){\line(1,-2){0.25}}%
+ }%
+ }%
+ \fi
+
+ \if#3u%
+ {%
+ \put(#1,#2)%
+ {%
+ \put(0,0){\line(0,-1){1.5}}%
+ %
+ \put(-0.25,-1.0){\line(1,0){0.5}}%
+ \put(-0.25,-0.5){\line(1,0){0.5}}%
+ %
+ \put(-0.25,-0.5){\line(1,-2){0.25}}%
+ \put(0.25,-0.5){\line(-1,-2){0.25}}%
+ }%
+ }%
+ \fi
+
+ \if#3r%
+ {%
+ \put(#1,#2)%
+ {%
+ \put(0,0){\line(1,0){1.5}}%
+ %
+ \put(1.0,0.25){\line(0,-1){0.5}}%
+ \put(0.5,0.25){\line(0,-1){0.5}}%
+ %
+ \put(0.5,0.25){\line(2,-1){0.5}}%
+ \put(0.5,-0.25){\line(2,1){0.5}}%
+ }%
+ }%
+ \fi
+
+ \if#3l%
+ {%
+ \put(#1,#2)%
+ {%
+ \put(0,0){\line(-1,0){1.5}}%
+ %
+ \put(-1.0,0.25){\line(0,-1){0.5}}%
+ \put(-0.5,0.25){\line(0,-1){0.5}}%
+ %
+ \put(-0.5,0.25){\line(-2,-1){0.5}}%
+ \put(-0.5,-0.25){\line(-2,1){0.5}}%
+ }%
+ }%
+ \fi
+ }%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%%%%%%%%%%%%%%% ENDE %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
diff --git a/macros/latex209/contrib/e_symbol/esymbdoc.dvi b/macros/latex209/contrib/e_symbol/esymbdoc.dvi
new file mode 100644
index 0000000000..fde7a2d12c
--- /dev/null
+++ b/macros/latex209/contrib/e_symbol/esymbdoc.dvi
Binary files differ
diff --git a/macros/latex209/contrib/e_symbol/esymbdoc.tex b/macros/latex209/contrib/e_symbol/esymbdoc.tex
new file mode 100644
index 0000000000..6ec01622ae
--- /dev/null
+++ b/macros/latex209/contrib/e_symbol/esymbdoc.tex
@@ -0,0 +1,305 @@
+\documentstyle[12pt,german,fleqn]{article}
+\input{e_symbol}
+
+\textheight 24cm
+\textwidth 15cm
+\headheight 0cm
+\headsep 0cm
+\topmargin -1cm
+\oddsidemargin 0cm
+\evensidemargin 0cm
+
+\newfont{\mat}{cmsy10 scaled 1728}
+
+\pagestyle{plain}
+\sloppy
+
+\begin{document}
+
+\section{Schaltbilder mit \LaTeX}
+Insbesondere f"ur Elektrotechniker, aber auch f"ur Physiker besteht
+immer wieder einmal die Erfordernis, eine Schaltbild in ein
+Dokument mit einzubinden. Um dies f"ur weniger umfangreiche
+Stroml"aufe mit \LaTeX\ zu erm"oglichen, wurde eine Bibliothek von
+elektrischen Symbolen erstellt. Sie enth"alt Definitionen f"ur
+Schaltelemente wie Kondensatoren, Widerst"anden, Spulen, Dioden,
+und Transistoren, die innerhalb einer picture--Umgebung
+verwendbar sind. Dazu ist im Kopf des Dokumentes der
+Aufruf \verb|\input{e_symbol}| einzuf"ugen. Diese Datei
+stellt die erforderlichen Makros zur Verf"ugung.
+
+Ein damit erstelltes Schaltbild hat etwa die folgende Form:
+\begin{verbatim}
+\documentstyle[12pt,german]{article}
+\input{e_symbol}
+\end{verbatim}
+... {\bf Formatdeklarationen} ...
+\begin{verbatim}
+\begin{document}
+\unitlength1cm
+\begin{figure}[htbp]
+\begin{picture}(15,14)
+ \thicklines
+
+ \put(2.5,0.5){\line(1,0){7.0}}
+ \put(9.6,0.5){\circle{0.2}}
+ \put(9.0,0.8)%
+ {%
+ $-V_B$%
+ }%
+
+ \put(1.5,13.5){\line(1,0){8.0}}
+ \put(9.6,13.5){\circle{0.2}}
+ \put(9.0,13.0)%
+ {%
+ $+V_B$%
+ }%
+
+ \vwiderstand{2.5}{1.0}
+ \put(2.8,1.5)% Widerstand R1
+ {%
+ $R_1$%
+ }%
+
+
+ \biptrans{2.5}{3.5}{l}{n}{n}
+ \put(3.3,3.5)%
+ {%
+ $T_3$%
+ }%
+\end{verbatim}
+... {\bf Weitere Bildelemente} ...
+\begin{verbatim}
+\end{picture}
+\end{figure}
+\end{document}
+\end{verbatim}
+Es lassen sich auf diese Weise Schaltbilder wie das in
+Abbildung~\ref{schaltbild} gezeigte erstellen:
+\begin{figure}[btp]
+\unitlength1cm
+\begin{picture}(15,14)
+ \thicklines
+ \put(0,0){\makebox(10,14){}}
+ \put(10.5,0)%
+ {%
+ \makebox(4.5,14)[t]%
+ {%
+ \begin{minipage}{4cm}
+\caption[]{Bei"-spiel f"ur ein Schalt"-bild mit
+zu"-s"atz"-lich"-em ~Be"-gleit"-text. ~Die Gr"o"-"se
+der er"-stell"-ten ~Zeich"-nung l"a"st sich durch
+Va"-ria"-ti"-on des Ein"-heits"-ma"-"ses fast
+be"-lie"-big ver"-"an"-dern.}\label{schaltbild}
+ \end{minipage}
+ }%
+ }%
+
+ \put(2.5,0.5){\line(1,0){7.0}}
+ \put(9.6,0.5){\circle{0.2}}
+ \put(9.0,0.8)%
+ {%
+ $-V_B$%
+ }%
+
+ \put(1.5,13.5){\line(1,0){8.0}}
+ \put(9.6,13.5){\circle{0.2}}
+ \put(9.0,13.0)%
+ {%
+ $+V_B$%
+ }%
+
+ \put(2.5,0.5){\line(0,1){0.5}}
+
+ \vwiderstand{2.5}{1.0}
+ \put(2.8,1.5)% Widerstand R1
+ {%
+ $R_1$%
+ }%
+
+ \put(2.5,3.0){\line(0,1){0.5}}
+
+ \biptrans{2.5}{3.5}{l}{n}{n}
+ \put(3.3,3.5)%
+ {%
+ $T_3$%
+ }%
+
+ \put(2.5,5.0){\line(0,1){2.5}}
+ \put(2.5,7.5){\circle*{0.1}}
+
+ \put(1.5,7.5){\line(1,0){2}}
+ \put(1.5,7.5){\line(0,1){1}}
+
+ \fet{0.5}{8.5}{r}{n}
+ \put(0.8,8.0)%
+ {%
+ $T_1$%
+ }%
+
+ \put(0.2,9){\line(1,0){0.3}}
+ \put(0.1,9.0){\circle{0.2}}
+ \put(1.5,9.5){\line(0,1){4}}
+ \put(0.0,9.3)%
+ {%
+ $-E$%
+ }%
+
+ \put(3.5,7.5){\line(0,1){1.0}}
+
+ \fet{3.5}{8.5}{l}{n}
+ \put(3.8,8.0)%
+ {%
+ $T_2$%
+ }%
+
+ \put(3.5,9.5){\line(0,1){1.5}}
+
+ \vwiderstand{3.5}{11}
+ \put(3.8,11.5)%
+ {%
+ $R_2$%
+ }%
+
+ \put(3.5,13){\line(0,1){0.5}}
+ \put(3.5,13.5){\circle*{0.1}}
+
+ \put(3.5,10.5){\circle*{0.1}}
+ \put(3.5,10.5){\line(1,0){2.5}}
+
+ \put(4.5,13.5){\circle*{0.1}}
+ \put(4.5,13.5){\line(0,-1){1.0}}
+
+ \vkondensator{4.5}{11.5}
+ \put(4.8,11.5)%
+ {%
+ $C_1$%
+ }%
+
+ \put(4.5,10.5){\circle*{0.1}}
+ \put(4.5,10.5){\line(0,1){1.0}}
+
+ \put(5.5,13.5){\circle*{0.1}}
+ \put(5.5,13.5){\line(0,-1){0.5}}
+
+ \vwiderstand{5.5}{11}
+ \put(5.8,11.5)%
+ {%
+ $R_3$%
+ }%
+
+ \put(5.5,11.0){\line(0,-1){8.25}}
+
+ \zdiode{5.5}{1.25}{o}
+ \put(5.8,1.5)%
+ {%
+ $ZD_1$%
+ }%
+
+ \put(5.5,0.5){\circle*{0.1}}
+ \put(5.5,0.5){\line(0,1){0.75}}
+ \put(5.5,4.25){\circle*{0.1}}
+ \put(5.5,4.25){\line(-1,0){2.0}}
+
+ \put(4.5,9.0){\line(0,-1){2.5}}
+ \put(4.5,6.5){\line(-1,0){4.3}}
+ \put(0.1,6.5){\circle{0.2}}
+ \put(0.0,6.0)%
+ {%
+ $+E$%
+ }%
+
+ \put(7.0,13.5){\circle*{0.1}}
+ \put(7.0,13.5){\line(0,-1){0.5}}
+
+ \vwiderstand{7}{11}
+ \put(7.3,11.5)%
+ {%
+ $R_4$%
+ }%
+
+ \biptrans{6.0}{9.75}{r}{p}{i}
+ \put(7.3,10.0)%
+ {%
+ $T_4$%
+ }%
+
+ \put(7.0,9.75){\line(0,-1){0.5}}
+
+ \diode{7}{9.25}{u}
+ \put(7.3,8.25)%
+ {%
+ $D_1$%
+ }%
+
+ \diode{7}{7.75}{u}
+ \put(7.3,6.75)%
+ {%
+ $D_2$%
+ }%
+
+ \diode{7}{6.25}{u}
+ \put(7.3,5.25)%
+ {%
+ $D_3$%
+ }%
+
+ \put(7.0,4.75){\line(0,-1){2.25}}
+
+ \vwiderstand{7.0}{1.0}
+ \put(7.3,1.5)%
+ {%
+ $R_5$%
+ }%
+
+ \put(7.0,1.0){\line(0,-1){0.5}}
+ \put(7.0,0.5){\circle*{0.1}}
+
+ \put(8.5,13.5){\circle*{0.1}}
+ \put(8.5,13.5){\line(0,-1){3.25}}
+
+ \biptrans{7.5}{8.75}{r}{n}{n}
+ \put(8.8,9.0)%
+ {%
+ $T_5$%
+ }%
+
+ \put(7.0,9.5){\circle*{0.1}}
+ \put(7.0,9.5){\line(1,0){0.5}}
+
+ \vwiderstand{8.5}{7.0}
+ \put(8.8,7.5)%
+ {%
+ $R_6$%
+ }%
+
+ \put(8.5,7.0){\circle*{0.1}}
+ \put(8.5,7.0){\line(1,0){0.9}}
+ \put(9.4,7.0){\circle{0.2}}
+
+ \vwiderstand{8.5}{5.0}
+ \put(8.8,5.5)%
+ {%
+ $R_7$%
+ }%
+
+ \biptrans{7.5}{3.75}{r}{p}{i}
+ \put(8.8,4.0)%
+ {%
+ $T_6$%
+ }%
+
+ \put(7.0,4.5){\circle*{0.1}}
+ \put(7.0,4.5){\line(1,0){0.5}}
+ \put(8.5,3.75){\line(0,-1){3.25}}
+ \put(8.5,0.5){\circle*{0.1}}
+\end{picture}
+\end{figure}
+
+Bei Schaltungen dieser Gr"o"senordnung wird es schon recht
+aufwendig. Elegant w"are es, solche Bibliotheken etwa in das
+\TeX{CAD}--Programm einzubinden, das zusammen mit EM\TeX\ bei
+DANTE erh"altlich ist. Das Erstellen eines solchen Schaltbildes
+lie"se sich damit erheblich vereinfachen, der zun"achst notwendige
+Entwurf auf dem Papier k"onnte entfallen.
+\end{document}