summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/eltex
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/latex/contrib/eltex
Initial commit
Diffstat (limited to 'macros/latex/contrib/eltex')
-rw-r--r--macros/latex/contrib/eltex/README17
-rw-r--r--macros/latex/contrib/eltex/eltex1.tex829
-rw-r--r--macros/latex/contrib/eltex/eltex2.tex1261
-rw-r--r--macros/latex/contrib/eltex/eltex3.tex383
-rw-r--r--macros/latex/contrib/eltex/eltex4.tex142
-rw-r--r--macros/latex/contrib/eltex/eltex5.tex309
-rw-r--r--macros/latex/contrib/eltex/eltex6.tex261
-rw-r--r--macros/latex/contrib/eltex/eltex7.tex139
-rw-r--r--macros/latex/contrib/eltex/man_en.pdfbin0 -> 91293 bytes
-rw-r--r--macros/latex/contrib/eltex/man_en.tex1052
-rw-r--r--macros/latex/contrib/eltex/pri_cz.pdfbin0 -> 103476 bytes
-rw-r--r--macros/latex/contrib/eltex/pri_cz.tex1059
12 files changed, 5452 insertions, 0 deletions
diff --git a/macros/latex/contrib/eltex/README b/macros/latex/contrib/eltex/README
new file mode 100644
index 0000000000..105a81b98d
--- /dev/null
+++ b/macros/latex/contrib/eltex/README
@@ -0,0 +1,17 @@
+This software is the free license of Latex project public license. This is
+a macro running in latex2.09 or also latex2e. It enables you to draw simple
+electrical circuit diagrams in the picture environment withouth any special
+fonts. The application of this macro for drawing is proper for school
+materials in education area. The size of whole macro is approximately
+100kB distributed into several parts which enables you to use only what
+you need. The circuit symbols are accordingly the IEC 617 standard.
+
+No special type of installation. Further description is in documentation.
+The name of this macro is eltex it means "electrotechnical tex".
+
+
+Author
+Libor Gajdosik
+The Czech republic
+
+libor.gajdosik@vsb.cz
diff --git a/macros/latex/contrib/eltex/eltex1.tex b/macros/latex/contrib/eltex/eltex1.tex
new file mode 100644
index 0000000000..d2a9f82220
--- /dev/null
+++ b/macros/latex/contrib/eltex/eltex1.tex
@@ -0,0 +1,829 @@
+%%%%%%%%%%% accordingly the CSN IEC 617-1 to 11 (1993-1995) %%%%%%%%
+%%%%%%%%%%% Libor Gajdosik 2009 eltex version 2.0 %%%%%%%%%%%%%
+
+\unitlength=1mm
+%%%%%%%%grid -generating help grid 10x10mm to simplify orientation%%%%%%
+\newcommand{\grid}[2]{
+\linethickness{0.1mm}
+\unitlength=10mm
+ \newcounter{sloupec}
+ \setcounter{sloupec}{10}
+\put(0,0){\line(0,1){#2}}
+\multiput(1,0)(1,0){#1}{\line(0,1){#2}}
+\multiput(0.7,-0.5)(1,0){#1}{\arabic{sloupec}\addtocounter{sloupec}{10}}
+ \setcounter{sloupec}{10}
+\multiput(0.6,#2)(1,0){#1}{\makebox(0.7,0.6)
+ {\arabic{sloupec}\addtocounter{sloupec}{10}}}
+ \newcounter{radek}
+ \put(-0.3,-0.3){\arabic{radek}}
+ \setcounter{radek}{10}
+\put(0,0){\line(1,0){#1}}
+\multiput(0,1)(0,1){#2}{\line(1,0){#1}}
+\multiput(-0.8,0.7)(0,1){#2}{\makebox(0.7,0.5)[r]
+ {\arabic{radek}\addtocounter{radek}{10}}}
+ \setcounter{radek}{10}
+\multiput(#1,0.6)(0,1){#2}{\makebox(0.7,0.6)[r]
+ {\arabic{radek}\addtocounter{radek}{10}}}
+\thicklines
+\unitlength=1mm
+}
+%%%%basic pasive devices (source, resistor, capacitor, inductor)%%%%
+%horizontal voltage source
+\newcommand{\hsourcev}{
+\put(0,0){\line(1,0){30}}
+\put(15,0){\circle{10}}
+}
+%vertical voltage source
+\newcommand{\vsourcev}{
+\put(0,0){\line(0,1){30}}
+``\put(0,15){\circle{10}}
+}
+%horizontal current source
+\newcommand{\hsourcec}{
+\put(0,0){\line(1,0){10}}
+\put(15,-5){\line(0,1){10}}
+\put(15,0){\circle{10}}
+\put(20,0){\line(1,0){10}}
+}
+%vertical current source
+\newcommand{\vsourcec}{
+\put(0,0){\line(0,1){10}}
+\put(5,15){\line(-1,0){10}}
+\put(0,15){\circle{10}}
+\put(0,20){\line(0,1){10}}
+}
+\newcommand{\hhsourcev}{
+\put(0,0){\line(1,0){20}}
+\put(10,0){\circle{10}}
+}
+%vertical voltage source
+\newcommand{\vvsourcev}{
+\put(0,0){\line(0,1){20}}
+\put(0,10){\circle{10}}
+}
+%diagonal voltage source
+\newcommand{\dsourcev}[1]{
+\ifx#1U %source up right oriented
+ \put(0,0){\line(1,1){20}}
+ \put(10,10){\circle{10}}
+\else \ifx#1D %source down right oriented
+ \put(0,0){\line(1,-1){20}}
+ \put(10,-10){\circle{10}}
+\fi \fi
+}
+%horizontal current source
+\newcommand{\hhsourcec}{
+\put(0,0){\line(1,0){5}}
+\put(10,-5){\line(0,1){10}}
+\put(10,0){\circle{10}}
+\put(15,0){\line(1,0){5}}
+}
+%vertical current source
+\newcommand{\vvsourcec}{
+\put(0,0){\line(0,1){5}}
+\put(5,10){\line(-1,0){10}}
+\put(0,10){\circle{10}}
+\put(0,15){\line(0,1){5}}
+}
+%diagonal current source
+\newcommand{\dsourcec}[1]{
+\ifx#1U %source up right oriented
+ \put(0,0){\line(1,1){6.5}}
+ \put(6.5,13.5){\line(1,-1){7}}
+ \put(10,10){\circle{10}}
+ \put(13.5,13.5){\line(1,1){6.5}}
+\else \ifx#1D %source down right oriented
+ \put(0,0){\line(1,-1){6.5}}
+ \put(13.5,-6.5){\line(-1,-1){7}}
+ \put(10,-10){\circle{10}}
+ \put(13.5,-13.5){\line(1,-1){6.5}}
+\fi \fi
+}
+%horizontal rezistor
+\newcommand{\hhrez}[1]{
+\put(0,0){\line(1,0){5}}
+\put(5,-2){\framebox(10,4){}\put(0,2){\line(1,0){5}}}
+\ifnum#1=1 % rez. adjustable by tool (medium pin down oriented)
+\put(8,-6){\line(1,3){4}}
+\put(10,7){\line(3,-1){4}}
+\else \ifnum#1=2 % rez. adjustable by tool (medium pin up oriented)
+\put(8,6){\line(1,-3){4}}
+\put(10,-7){\line(3,1){4}}
+\else \ifnum#1=3 % rez. adjustable by tool (medium pin shortly
+ %conected)
+\put(8,6){\line(1,-3){4}}
+\put(10,-7){\line(3,1){4}}
+\put(8,6){\line(-1,0){5}}
+\put(3,6){\line(0,-1){6}}
+\put(3,0){\node}
+\else \ifnum#1=4 % rez. adjustable (medium pin down oriented)
+\put(6,-4){\vector(1,1){9}}
+\else \ifnum#1=5 % rez. adjustable (medium pin up oriented)
+\put(6,4){\vector(1,-1){9}}
+\else \ifnum#1=6 % rez. adjustable (medium pin shortly conected)
+\put(8,6){\vector(1,-3){4}}
+\put(8,6){\line(-1,0){5}}
+\put(3,6){\line(0,-1){6}}
+\put(3,0){\node}
+\else \ifnum#1=7 %nonlinearly dependent
+\put(6,-4){\line(1,1){8}}
+\put(3,-4){\line(1,0){3}}
+
+
+\fi \fi \fi \fi \fi \fi \fi
+ }
+%vertical rezistor
+\newcommand{\vvrez}[1]{
+\put(0,0){\line(0,1){5}}
+\put(-2,5){\framebox(4,10){}\put(-2,10){\line(0,1){5}}}
+\ifnum#1=1 % rez. adjustable by tool (medium pin left oriented)
+\put(-6,8){\line(3,1){12}}
+\put(5,14){\line(1,-2){2}}
+\else \ifnum#1=2 % rez. adjustable by tool (medium pin right oriented)
+\put(-6,12){\line(3,-1){12}}
+\put(-7,10){\line(1,2){2}}
+\else \ifnum#1=3 % rez. adjustable by tool (medium pin shortly
+ %conected)
+\put(-6,7){\line(3,1){12}}
+\put(5,13){\line(1,-2){2}}
+\put(-6,7){\line(0,-1){4}}
+\put(-6,3){\line(1,0){6}}
+\put(0,3){\node}
+\else \ifnum#1=4 % rez. adjustable (medium pin left oriented)
+\put(-4,6){\vector(1,1){9}}
+\else \ifnum#1=5 % rez. adjustable (medium pin right oriented)
+\put(4,6){\vector(-1,1){9}}
+\else \ifnum#1=6 % rez. adjustable (medium pin shortly conected)
+\put(-6,8){\vector(3,1){12}}
+\put(-6,8){\line(0,-1){5}}
+\put(-6,3){\line(1,0){6}}
+\put(0,3){\node}
+\else \ifnum#1=7
+\put(-4,6){\line(1,1){8}}
+\put(4,14){\line(1,0){3}}
+
+\fi \fi \fi \fi \fi \fi \fi
+ }
+%diagonal rezistor
+\newcommand{\drez}[2]{
+\ifx#1U % up left oriented
+\put(0,0){\line(1,1){7}\put(2.2,5.2){\line(-1,1){4}}
+\put(-1.9,9){\line(1,1){7}}\put(2.2,5){\line(1,1){7}}
+\put(9,12){\line(-1,1){4}}\put(7,14){\line(1,1){6}}}
+ \ifnum#2=1 % rez. adjustable by tool (medium pin left oriented)
+\put(2,10){\line(1,0){16}}
+\put(18,12){\line(0,-1){4}}
+ \fi \ifnum#2=2 % rez. adjustable by tool (medium pin right oriented)
+\put(2,10){\line(1,0){16}}
+\put(2,12){\line(0,-1){4}}
+ \fi \ifnum#2=3 % rez. adjustable by tool (medium pin shortly
+ %conected)
+\put(2,10){\line(1,0){16}}
+\put(18,12){\line(0,-1){4}}
+\put(2,10){\line(0,-1){4}}
+\put(2,6){\line(1,0){4}}
+\put(6,6){\node}
+ \fi \ifnum#2=4 % rez. adjustable (medium pin left oriented)
+\put(2,10){\vector(1,0){16}}
+ \fi \ifnum#2=5 % rez. adjustable (medium pin right oriented)
+\put(18,10){\vector(-1,0){16}}
+ \fi \ifnum#2=6 % rez. adjustable (medium pin shortly conected)
+\put(2,10){\vector(1,0){16}}
+\put(2,10){\line(0,-1){4}}
+\put(2,6){\line(1,0){4}}
+\put(6,6){\node}
+ \fi \ifnum#2=7
+\put(2,10){\line(1,0){16}}
+\put(18,10){\line(1,1){4}}
+ \fi \fi
+
+\ifx#1D %down right oriented
+\put(0,0){\line(1,-1){7}\put(-1.9,-9){\line(1,1){4}}
+\put(2,-4.9){\line(1,-1){7}}\put(-1.9,-9){\line(1,-1){7}}}
+\put(12,-16){\line(1,1){4}\put(-2,2){\line(1,-1){6}}}
+ \ifnum#2=1 % rez. adjustable by tool (medium pin left oriented)
+\put(2,-10){\line(1,0){16}}
+\put(18,-8){\line(0,-1){4}}
+ \else \ifnum#2=2 % rez. adjustable by tool (medium pin right oriented)
+\put(2,-10){\line(1,0){16}}
+\put(2,-8){\line(0,-1){4}}
+ \else \ifnum#2=3 % rez. adjustable by tool (medium pin shortly
+ %conected)
+\put(2,-10){\line(1,0){16}}
+\put(18,-8){\line(0,-1){4}}
+\put(2,-10){\line(0,1){4}}
+\put(2,-6){\line(1,0){4}}
+\put(6,-6){\node}
+ \else \ifnum#2=4 % rez. adjustable (medium pin left oriented)
+\put(2,-10){\vector(1,0){16}}
+ \else \ifnum#2=5 % rez. adjustable (medium pin right oriented)
+\put(18,-10){\vector(-1,0){16}}
+ \else \ifnum#2=6 % rez. adjustable (medium pin shortly conected)
+\put(2,-10){\vector(1,0){16}}
+\put(2,-10){\line(0,1){4}}
+\put(2,-6){\line(1,0){4}}
+\put(6,-6){\node}
+ \else \ifnum#2=7
+\put(2,-10){\line(1,0){16}}
+\put(18,-10){\line(1,1){4}}
+\fi \fi \fi \fi \fi \fi \fi \fi
+}
+
+%diagonal rezistor (short)
+\newcommand{\ddrez}[2]{
+\ifx#1U % up left oriented
+\put(0,0){\line(1,1){4}\put(2,2){\line(-1,1){4}}
+\put(2,2){\line(1,1){7}}\put(-2,6){\line(1,1){7}}
+\put(9,9){\line(-1,1){4}}\put(7,11){\line(1,1){4}}}
+ \ifnum#2=1 % rez. adjustable by tool (medium pin left oriented)
+\put(-1,7){\line(1,0){16}}
+\put(15,9){\line(0,-1){4}}
+ \fi \ifnum#2=2 % rez. adjustable by tool (medium pin right oriented)
+\put(0,7){\line(1,0){16}}
+\put(0,9){\line(0,-1){4}}
+ \fi \ifnum#2=3 % rez. adjustable by tool (medium pin shortly
+ %conected)
+\put(-1,8){\line(1,0){16}}
+\put(15,10){\line(0,-1){4}}
+\put(-1,8){\line(0,-1){6}}
+\put(-1,2){\line(1,0){3}}
+\put(2,2){\node}
+ \fi \ifnum#2=4 % rez. adjustable (medium pin left oriented)
+\put(1,8){\vector(1,0){16}}
+ \fi \ifnum#2=5 % rez. adjustable (medium pin right oriented)
+\put(16,8){\vector(-1,0){16}}
+ \fi \ifnum#2=6 % rez. adjustable (medium pin shortly conected)
+\put(-1,8){\vector(1,0){18}}
+\put(-1,8){\line(0,-1){6}}
+\put(-1,2){\line(1,0){3}}
+\put(2,2){\node}
+ \fi \ifnum#2=7
+\put(2,8){\line(1,0){16}}
+\put(18,8){\line(1,1){4}}
+ \fi \fi
+
+\ifx#1D %down right oriented
+\put(0,0){\line(1,-1){4}\put(-2,-6){\line(1,1){4}}
+\put(-2,-6){\line(1,-1){7}}\put(2,-2){\line(1,-1){7}}}
+\put(9,-13){\line(1,1){4}\put(-2,2){\line(1,-1){4}}}
+ \ifnum#2=1 % rez. adjustable by tool (medium pin left oriented)
+\put(0,-8){\line(1,0){16}}
+\put(16,-6){\line(0,-1){4}}
+ \else \ifnum#2=2 % rez. adjustable by tool (medium pin right oriented)
+\put(0,-8){\line(1,0){16}}
+\put(0,-6){\line(0,-1){4}}
+ \else \ifnum#2=3 % rez. adjustable by tool (medium pin shortly
+ %conected)
+\put(0,-8){\line(1,0){16}}
+\put(16,-6){\line(0,-1){4}}
+\put(0,-8){\line(0,1){6}}
+\put(0,-2){\line(1,0){2}}
+\put(2,-2){\node}
+ \else \ifnum#2=4 % rez. adjustable (medium pin left oriented)
+\put(0,-8){\vector(1,0){16}}
+ \else \ifnum#2=5 % rez. adjustable (medium pin right oriented)
+\put(16,-8){\vector(-1,0){16}}
+ \else \ifnum#2=6 % rez. adjustable (medium pin shortly conected)
+\put(0,-8){\vector(1,0){16}}
+\put(0,-8){\line(0,1){6}}
+\put(0,-2){\line(1,0){2}}
+\put(2,-2){\node}
+ \else \ifnum#2=7
+\put(0,-8){\line(1,0){16}}
+\put(16,-8){\line(1,1){4}}
+\fi \fi \fi \fi \fi \fi \fi \fi
+}
+%horizontal rezistor
+\newcommand{\hrez}[1]{
+\put(0,0){\line(1,0){10}}
+\put(10,-2){\framebox(10,4){}\put(0,2){\line(1,0){10}}}
+\ifnum#1=1 % rez. adjustable by tool (medium pin down oriented)
+\put(12,-6){\line(1,3){4}}
+\put(14,7){\line(3,-1){4}}
+\else \ifnum#1=2 % rez. adjustable by tool (medium pin up oriented)
+\put(12,6){\line(1,-3){4}}
+\put(14,-7){\line(3,1){4}}
+\else \ifnum#1=3 % rez. adjustable by tool (medium pin shortly
+ %conected)
+\put(12,6){\line(1,-3){4}}
+\put(14,-7){\line(3,1){4}}
+\put(12,6){\line(-1,0){4}}
+\put(8,6){\line(0,-1){6}}
+\put(8,0){\node}
+\else \ifnum#1=4 % rez. adjustable (medium pin down oriented)
+\put(11,-4){\vector(1,1){9}}
+\else \ifnum#1=5 % rez. adjustable (medium pin up oriented)
+\put(11,4){\vector(1,-1){9}}
+\else \ifnum#1=6 % rez. adjustable (medium pin shortly conected)
+\put(12,6){\vector(1,-3){4}}
+\put(12,6){\line(-1,0){4}}
+\put(8,6){\line(0,-1){6}}
+\put(8,0){\node}
+\else \ifnum#1=7 %%nonlinearly dependent
+\put(11,-4){\line(1,1){8}}
+\put(19,4){\line(1,0){3}}
+\fi \fi \fi \fi \fi \fi \fi
+ }
+%vertical rezistor
+\newcommand{\vrez}[1]{
+\put(0,0){\line(0,1){10}}
+\put(-2,10){\framebox(4,10){}\put(-2,10){\line(0,1){10}}}
+\ifnum#1=1 % rez. adjustable by tool (medium pin left oriented)
+\put(-6,12){\line(3,1){12}}
+\put(5,18){\line(1,-2){2}}
+\else \ifnum#1=2 % rez. adjustable by tool (medium pin right oriented)
+\put(-6,18){\line(3,-1){12}}
+\put(-7,16){\line(1,2){2}}
+\else \ifnum#1=3 % rez. adjustable by tool (medium pin shortly
+ %conected)
+\put(-6,12){\line(3,1){12}}
+\put(5,18){\line(1,-2){2}}
+\put(-6,12){\line(0,-1){4}}
+\put(-6,8){\line(1,0){6}}
+\put(0,8){\node}
+\else \ifnum#1=4 % rez. adjustable (medium pin left oriented)
+\put(-4,11){\vector(1,1){9}}
+\else \ifnum#1=5 % rez. adjustable (medium pin right oriented)
+\put(4,11){\vector(-1,1){9}}
+\else \ifnum#1=6 % rez. adjustable (medium pin shortly conected)
+\put(-6,12){\vector(3,1){12}}
+\put(-6,12){\line(0,-1){4}}
+\put(-6,8){\line(1,0){6}}
+\put(0,8){\node}
+\else \ifnum#1=7
+\put(-4,11){\line(1,1){8}}
+\put(4,19){\line(1,0){3}}
+\fi \fi \fi \fi \fi \fi \fi
+ }
+%horizontal capacitor
+\newcommand{\hcap}[1]{
+\put(0,0){\line(1,0){14.5}}
+\multiput(14.5,3)(1,0){2}{\line(0,-1){6}}
+\put(15.5,0){\line(1,0){14.5}}
+\ifnum#1=1 % capacitor adjustable by tool
+\put(18,-3){\line(-1,1){6}}
+\put(9.5,0.5){\makebox(5,5){/}}
+ \else \ifnum#1=4 %capacitor adjustable
+\put(18,-3){\vector(-1,1){6}}
+ \fi \fi
+ }
+%vertical capacitor
+\newcommand{\vcap}[1]{
+\put(0,0){\line(0,1){14.5}}
+\multiput(-3,14.5)(0,1){2}{\line(1,0){6}}
+\put(0,15.5){\line(0,1){14.5}}
+ \ifnum#1=1 %cap. adjustable by tool
+\put(2.5,12.5){\line(-1,1){6}}
+\put(-6,16){\makebox(5,5){/}}
+ \else \ifnum#1=4 %cap. adjustable
+\put(-3,12){\vector(1,1){7}}
+ \fi \fi
+ }
+%diagonal capacitor
+\newcommand{\dcap}[2]{
+\ifx#1U % up right oriented
+\put(0,0){\line(1,1){9.25}}
+\multiput(7.25,11.75)(1,1){2}{\line(1,-1){4.5}}
+\put(10.75,10.75){\line(1,1){9.25}}
+ \ifnum#2=1 %cap. adjustable with tool
+\put(5,10){\line(1,0){10}}
+\put(15,8){\line(0,1){4}}
+ \else \ifnum#2=4 %cap. adjustable
+\put(5,10){\vector(1,0){12}}
+ \fi \fi
+\fi
+\ifx#1D % down right oriented
+\put(0,0){\line(1,-1){9.3}}
+\multiput(7.25,-11.75)(1,-1){2}{\line(1,1){4.5}}
+\put(10.75,-10.75){\line(1,-1){9.25}}
+ \ifnum#2=1 %cap. adjustable with tool
+\put(10,-15){\line(0,1){10}}
+\put(8,-5){\line(1,0){4}}
+ \else \ifnum#2=4 %cap. adjustable
+\put(10,-15){\vector(0,1){11}}
+ \fi \fi
+\fi
+}
+%horizontal capacitor
+\newcommand{\hhcap}[1]{
+\put(0,0){\line(1,0){4.5}}
+\multiput(4.5,3)(1,0){2}{\line(0,-1){6}}
+\put(5.5,0){\line(1,0){4.5}}
+\ifnum#1=1 % capacitor adjustable by tool
+\put(8,-3){\line(-1,1){6}}
+\put(-0.5,0.5){\makebox(5,5){/}}
+ \else \ifnum#1=4 %capacitor adjustable
+\put(8,-3){\vector(-1,1){7}}
+ \fi \fi
+ }
+%vertical capacitor
+\newcommand{\vvcap}[1]{
+\put(0,0){\line(0,1){4.5}}
+\multiput(-3,4.5)(0,1){2}{\line(1,0){6}}
+\put(0,5.5){\line(0,1){4.5}}
+ \ifnum#1=1 %cap. adjustable by tool
+\put(2.5,2.5){\line(-1,1){6}}
+\put(-6,6){\makebox(5,5){/}}
+ \else \ifnum#1=4 %cap. adjustable
+\put(-3,2){\vector(1,1){7}}
+ \fi \fi
+ }
+%\horizontal 2 turns
+\newcommand{\hturn}[2]{
+\ifx#1U %up arces
+\multiput(1.5,0)(3,0){2}{\oval(3,3)[t]}
+ \ifnum#2=1 %variable inducance
+\put(1.5,4){\line(1,-2){3}}
+\put(-0.5,3.25){\line(2,1){4}}
+ \fi
+\else \ifx#1D %down arces
+\multiput(1.5,0)(3,0){2}{\oval(3,3)[b]}
+ \ifnum#2=1 %variable inductance
+\put(1.5,-4){\line(1,2){3}}
+\put(-0.5,-3.5){\line(2,-1){4}}
+ \fi
+\fi \fi
+}
+%vertical 2 turns
+\newcommand{\vturn}[2]{
+\ifx#1L %left arces
+\multiput(0,1.5)(0,3){2}{\oval(3,3)[l]}
+ \ifnum#2=1 %variable inductance
+ \put(1,4.5){\line(-2,-1){4}}
+ \put(-4.5,4.5){\line(1,-2){2}}
+ \fi
+\else \ifx#1R %right arces
+\multiput(0,1.5)(0,3){2}{\oval(3,3)[r]}
+ \ifnum#2=1 %variable inductance
+ \put(-1,1.5){\line(2,1){4}}
+ \put(2.4,5.5){\line(1,-2){2}}
+ \fi
+\fi \fi
+}
+
+
+%\horizontal inductor
+\newcommand{\hind}[2]{
+\put(0,0){\line(1,0){9}}
+\ifx#1U %up arces
+\multiput(10.5,0)(3,0){4}{\oval(3,3)[t]}
+ \ifnum#2=1 %variable inducance
+\put(12,7){\line(1,-2){5}}
+\put(15.25,-4.25){\line(2,1){4}}
+ \fi
+\else \ifx#1D %down arces
+\multiput(10.5,0)(3,0){4}{\oval(3,3)[b]}
+ \ifnum#2=1 %variable inductance
+\put(12,-7){\line(1,2){5}}
+\put(15.25,4.25){\line(2,-1){4}}
+ \fi
+\fi \fi
+\put(21,0){\line(1,0){9}}
+}
+%vertical inductor
+\newcommand{\vind}[2]{
+\put(0,0){\line(0,1){9}}
+\ifx#1L %left arces
+\multiput(0,10.5)(0,3){4}{\oval(3,3)[l]}
+ \ifnum#2=1 %variable inductance
+ \put(4,18){\line(-2,-1){10}}
+ \put(3,20){\line(1,-2){2}}
+ \fi
+\else \ifx#1R %right arces
+\multiput(0,10.5)(0,3){4}{\oval(3,3)[r]}
+ \ifnum#2=1 %variable inductance
+ \put(-4,13){\line(2,1){10}}
+ \put(-5,15){\line(1,-2){2}}
+ \fi
+\fi \fi
+\put(0,21){\line(0,1){9}}
+}
+%diagonal inductor
+\newcommand{\dind}[3]{
+\ifx#1D %down oriented
+\put(0,0){\line(1,-1){5}}
+\put(15,-15){\line(1,-1){5}}
+ \ifx#2R %right arces
+\multiput(5,-5)(2.5,-2.5){4}{\bezier{40}(0,0)(3.5,1)(2.5,-2.5)}
+ \ifnum#3=1 %variable inductance
+ \put(5,-10.5){\line(1,0){12}}
+ \put(5,-8.5){\line(0,-1){4}}
+ \fi
+ \fi
+ \ifx#2L %left arces
+\multiput(5,-5)(2.5,-2.5){4}{\bezier{40}(0,0)(-1,-3.5)(2.5,-2.5)}
+ \ifnum#3=1 %variable inductance
+ \put(15,-11){\line(-1,0){12}}
+ \put(15,-9){\line(0,-1){4}}
+ \fi
+ \fi
+\fi
+\ifx#1U %up oriented
+\put(0,0){\line(1,1){5}}
+\put(15,15){\line(1,1){5}}
+ \ifx#2R %right arces
+\multiput(5,5)(2.5,2.5){4}{\bezier{40}(0,0)(3.5,-1)(2.5,2.5)}
+ \ifnum#3=1 %variable inductance
+ \put(6,11){\line(1,0){12}}
+ \put(6,13){\line(0,-1){4}}
+ \fi
+ \fi
+ \ifx#2L %left arces
+\multiput(5,5)(2.5,2.5){4}{\bezier{40}(0,0)(-1,3.5)(2.5,2.5)}
+ \ifnum#3=1 %variable inductance
+ \put(15,11){\line(-1,0){12}}
+ \put(15,13){\line(0,-1){4}}
+ \fi
+ \fi
+\fi
+}
+%\horizontal inductor
+\newcommand{\hhind}[2]{
+\put(0,0){\line(1,0){4}}
+\ifx#1U %up arces
+\multiput(5.5,0)(3,0){4}{\oval(3,3)[t]}
+ \ifnum#2=1 %variable inducance
+\put(7,7){\line(1,-2){5}}
+\put(10.25,-4.25){\line(2,1){4}}
+ \fi
+\else \ifx#1D %down arces
+\multiput(5.5,0)(3,0){4}{\oval(3,3)[b]}
+ \ifnum#2=1 %variable inductance
+\put(7,-7){\line(1,2){5}}
+\put(10.25,4.25){\line(2,-1){4}}
+ \fi
+\fi \fi
+\put(16,0){\line(1,0){4}}
+}
+%vertical inductor
+\newcommand{\vvind}[2]{
+\put(0,0){\line(0,1){4}}
+\ifx#1L %left arces
+\multiput(0,5.5)(0,3){4}{\oval(3,3)[l]}
+ \ifnum#2=1 %variable inductance
+ \put(4,13){\line(-2,-1){10}}
+ \put(3,15){\line(1,-2){2}}
+ \fi
+\else \ifx#1R %right arces
+\multiput(0,5.5)(0,3){4}{\oval(3,3)[r]}
+ \ifnum#2=1 %variable inductance
+ \put(-4,8){\line(2,1){10}}
+ \put(-5,10){\line(1,-2){2}}
+ \fi
+\fi \fi
+\put(0,16){\line(0,1){4}}
+}
+%diagonal coil core
+\newcommand{\dcore}[3]{
+\ifx#1D %down oriented
+ \ifx#3I %iron core
+\put(0,0){\line(1,-1){#2}}
+ \else \ifx#3F %ferrite core
+\multiput(0,0)(5,-5){#2}{\line(1,-1){4}}
+ \fi \fi
+ \else \ifx#1U %up oriented
+ \ifx#3I %iron core
+\put(0,0){\line(1,1){#2}}
+ \else \ifx#3F %ferrit core
+\multiput(0,0)(5,5){#2}{\line(1,1){4}}
+ \fi \fi
+\fi \fi
+}
+%vertical coil core
+\newcommand{\vcore}[2]{
+ \ifx#2I %iron core
+\put(0,0){\line(0,1){#1}}
+ \else \ifx#2F %ferrite core
+\multiput(0,0)(0,4){#1}{\line(0,1){3}}
+ \fi \fi
+}
+%horizontal coil core
+\newcommand{\hcore}[2]{
+ \ifx#2I %iron core
+\put(0,0){\line(1,0){#1}}
+ \else \ifx#2F %ferrite core
+\multiput(0,0)(4,0){#1}{\line(1,0){3}}
+ \fi \fi
+}
+%%%switch%%%%%%%%%%%%
+%horizontal switch
+\newcommand{\hswitch}[1]{
+\put(0,0){\line(1,0){2.5}}
+ \ifnum#1=1 %switch on
+\put(2.5,0){\line(3,1){6}}
+ \fi \ifnum#1=0 %switch off
+\put(2.5,0){\line(3,1){6}}
+\put(7.5,0){\line(0,1){1.9}}
+ \fi
+\put(7.5,0){\line(1,0){2.5}}
+}
+%vertical switch
+\newcommand{\vswitch}[1]{
+\put(0,0){\line(0,-1){2.5}}
+ \ifnum#1=1 %switch on
+\put(0,-2.5){\line(1,-3){2}}
+ \fi \ifnum#1=0 %switch off
+\put(0,-2.5){\line(1,-3){2}}
+\put(0,-7.5){\line(1,0){1.9}}
+ \fi
+\put(0,-7.5){\line(0,-1){2.5}}
+}
+%horizontal overswitch
+\newcommand{\hoswitch}[2]{
+\ifx#1R %right oriented
+ \ifnum#2=0 %switch off
+\put(0,0){\line(1,0){2.5}}
+\put(2.5,0){\line(2,1){6}}
+\put(7.5,2.3){\line(0,1){2.8}}
+\put(7.5,5){\line(1,0){2.5}}
+\put(7.5,0){\line(1,0){2.5}}
+ \fi
+ \ifnum#2=1 %switch on
+\put(0,0){\line(1,0){2.5}}
+\put(2.5,0){\line(2,-1){6}}
+\put(7.5,-2.3){\line(0,-1){2.8}}
+\put(7.5,-5){\line(1,0){2.5}}
+\put(7.5,0){\line(1,0){2.5}}
+ \fi
+\fi
+\ifx#1L %left oriented
+ \ifnum#2=0 %switch off
+\put(0,0){\line(1,0){2.5}}
+\put(7.5,0){\line(-2,1){6}}
+\put(2.5,2.3){\line(0,1){2.8}}
+\put(0,5){\line(1,0){2.5}}
+\put(7.5,0){\line(1,0){2.5}}
+ \fi
+ \ifnum#2=1 %switch on
+\put(0,0){\line(1,0){2.5}}
+\put(7.5,0){\line(-2,-1){6}}
+\put(2.5,-2.3){\line(0,-1){2.8}}
+\put(0,-5){\line(1,0){2.5}}
+\put(7.5,0){\line(1,0){2.5}}
+ \fi
+\fi
+}
+%vertical overswitch
+\newcommand{\voswitch}[2]{
+\ifx#1D %down oriented
+ \ifnum#2=0 %switch off
+\put(0,0){\line(0,-1){2.5}}
+\put(0,-2.5){\line(-1,-2){3}}
+\put(-5,-7.5){\line(1,0){2.5}}
+\put(0,-7.5){\line(0,-1){2.5}}
+\put(-5,-7.5){\line(0,-1){2.5}}
+ \fi
+ \ifnum#2=1 %switch on
+\put(0,0){\line(0,-1){2.5}}
+\put(0,-2.5){\line(1,-2){3}}
+\put(2.5,-7.5){\line(1,0){2.5}}
+\put(0,-7.5){\line(0,-1){2.5}}
+\put(5,-7.5){\line(0,-1){2.5}}
+ \fi
+\fi
+\ifx#1U %up oriented
+ \ifnum#2=0 %switch off
+\put(0,0){\line(0,1){2.5}}
+\put(0,2.5){\line(-1,2){3}}
+\put(-5,7.5){\line(1,0){2.5}}
+\put(0,7.5){\line(0,1){2.5}}
+\put(-5,7.5){\line(0,1){2.5}}
+ \fi
+ \ifnum#2=1 %switch on
+\put(0,0){\line(0,1){2.5}}
+\put(0,2.5){\line(1,2){3}}
+\put(2.5,7.5){\line(1,0){2.5}}
+\put(0,7.5){\line(0,1){2.5}}
+\put(5,7.5){\line(0,1){2.5}}
+ \fi
+\fi
+}
+%%%%node, loop, pin, wire, earth, chassis%%%%%%%%%
+\newcommand{\node}{ %conection of devices
+\put(0,0){\circle*{1}}
+}
+\newcommand{\pin}{
+\put(0,0){\circle{1.5}}
+}
+\newcommand{\hwire}[1]{
+\put(0,0){\line(1,0){#1}} % length mm
+}
+\newcommand{\vwire}[1]{
+\put(0,0){\line(0,1){#1}} % length mm
+}
+\newcommand{\dwire}[2]{
+\ifx#1U %up right oriented
+\put(0,0){\line(1,1){#2}} %length mm
+\fi
+\ifx#1D %down right oriented
+\put(0,0){\line(1,-1){#2}} %length mm
+\fi
+}
+%simbol
+\newcommand{\simb}[1]{
+\ifnum#1=1
+\put(0,0){\circle*{1.5}}
+ \else \ifnum#1=2
+\put(0,0){$\Box$}
+ \else \ifnum#1=3
+\put(0,0){$\triangle$}
+ \fi \fi \fi
+}
+%current loop oriented
+\newcommand{\cloop}[2]{
+\ifx#1L %anti-clockwise oriented
+\put(0,0){\oval(12,12)[t]}
+\put(0,0){\oval(12,12)[l]\put(0,-6){\vector(1,0){1}}}
+\put(-5,-5){\makebox(10,10){#2}} %label
+ \else \ifx#1R %clockwise oriented
+\put(0,0){\oval(12,12)[t]}
+\put(0,0){\oval(12,12)[l]\put(6,0){\vector(0,-1){1}}}
+\put(-5,-5){\makebox(10,10){#2}} %label
+\fi \fi
+}
+%earth
+\newcommand{\earth}[1]{
+ \ifx#1D
+ \put(0,0){\line(0,-1){5}}
+ \put(-4,-5){\line(1,0){8}}
+ \put(-3,-6){\line(1,0){6}}
+ \put(-2,-7){\line(1,0){4}}
+ \fi
+ \ifx#1U
+ \put(0,0){\line(0,1){5}}
+ \put(-4,5){\line(1,0){8}}
+ \put(-3,6){\line(1,0){6}}
+ \put(-2,7){\line(1,0){4}}
+ \fi
+ \ifx#1L
+ \put(0,0){\line(-1,0){5}}
+ \put(-5,-4){\line(0,1){8}}
+ \put(-6,-3){\line(0,1){6}}
+ \put(-7,-2){\line(0,1){4}}
+ \fi
+ \ifx#1R
+ \put(0,0){\line(1,0){5}}
+ \put(5,-4){\line(0,1){8}}
+ \put(6,-3){\line(0,1){6}}
+ \put(7,-2){\line(0,1){4}}
+ \fi
+
+}
+%chassis
+\newcommand{\chassis}[1]{
+\ifx#1D
+ \put(0,0){\line(0,-1){5}}
+ {\thicklines \put(-2.5,-5){\line(1,0){5}} }
+\fi
+\ifx#1U
+ \put(0,0){\line(0,1){5}}
+ {\thicklines \put(-2.5,5){\line(1,0){5}}}
+\fi
+\ifx#1L
+ \put(0,0){\line(-1,0){5}}
+{\thicklines \put(-5,-2.5){\line(0,1){5}}}
+\fi
+\ifx#1R
+ \put(0,0){\line(1,0){5}}
+{\thicklines \put(5,-2.5){\line(0,1){5}} }
+\fi
+}
+%horizontal measuring instrument
+\newcommand{\hmeasure}[1]{
+\put(0,0){\line(1,0){10}}
+\put(15,0){\circle{10}}
+\put(20,0){\line(1,0){10}}
+\put(10,-4.75){\makebox(10,10){#1}} %label
+}
+\newcommand{\hhmeasure}[1]{
+\put(0,0){\line(1,0){5}}
+\put(10,0){\circle{10}}
+\put(15,0){\line(1,0){5}}
+\put(5,-4.75){\makebox(10,10){#1}} %label
+}
+%vertical measuring instrument
+\newcommand{\vmeasure}[1]{
+\put(0,0){\line(0,1){10}}
+\put(0,15){\circle{10}}
+\put(0,20){\line(0,1){10}}
+\put(-4.75,10){\makebox(10,10){#1}} %label
+}
+\newcommand{\vvmeasure}[1]{
+\put(0,0){\line(0,1){5}}
+\put(0,10){\circle{10}}
+\put(0,15){\line(0,1){5}}
+\put(-4.75,5){\makebox(10,10){#1}} %label
+}
+\newcommand{\osc}[1]{ %oscilloscope
+\put(0,0){\line(0,1){5}}
+ \ifx#1I
+\put(0,10){\circle{10}} %indicating
+ \fi \ifx#1R
+\put(-5,5){\framebox(10,10){}} %recording
+ \fi
+\put(0,15){\line(0,1){5}}
+\multiput(-4,9)(4,0){2}{\line(2,1){4}}
+\put(0,9){\line(0,1){2}}
+}
+
+\endinput
diff --git a/macros/latex/contrib/eltex/eltex2.tex b/macros/latex/contrib/eltex/eltex2.tex
new file mode 100644
index 0000000000..24cc9ed0e5
--- /dev/null
+++ b/macros/latex/contrib/eltex/eltex2.tex
@@ -0,0 +1,1261 @@
+%%%%%%semiconductors%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%diode, thyristor, triac, diac, optomember, opamplifier
+%%%%%%OTA, BOTA,
+%%%%%%tranzistor bjt, jfet, mosfet, ujt%%%%%%%%%%%%%%%%%
+%%%%%%%graetz, Hall's generator, magnistor, thermistor, varistor,
+%%%%%%%photoresistor,
+\newcommand{\graetz}[1]{
+ \ifx#1R
+\put(0,0){\ddiode{U}{U}}
+\put(20,20){\ddiode{D}{D}}
+\put(0,0){\ddiode{D}{D}}
+\put(20,-20){\ddiode{U}{U}}
+ \fi
+ \ifx#1L
+\put(0,0){\ddiode{U}{D}}
+\put(20,20){\ddiode{D}{U}}
+\put(0,0){\ddiode{D}{U}}
+\put(20,-20){\ddiode{U}{D}}
+ \fi
+}
+%diagonal diode
+\newcommand{\ddiode}[2]{
+\ifx#1D %down right oriented
+ \put(0,0){\line(1,-1){20}}
+ \put(10.5,-5.5){\line(-1,-1){5}}
+ \ifx#2D %cathode down
+ \put(10.5,-5.5){\line(1,-3){2.5}}
+ \put(5.5,-10.5){\line(3,-1){7}}
+ \fi \ifx#2U %cathode up
+ \put(10.5,-15.5){\line(-1,3){2.5}}
+ \put(15.5,-10.5){\line(-3,1){7}}
+ \fi
+ \put(15.5,-10.5){\line(-1,-1){5}}
+\fi
+
+\ifx#1U %up right oriented
+ \put(0,0){\line(1,1){20}}
+ \put(10.5,5.5){\line(-1,1){5}}
+ \ifx#2U %cathode up
+ \put(10.5,5.5){\line(1,3){2.5}}
+ \put(5.5,10.5){\line(3,1){7}}
+ \fi \ifx#2D %cathode down
+ \put(10.5,15.5){\line(-1,-3){2.5}}
+ \put(15.5,10.5){\line(-3,-1){7}}
+ \fi
+ \put(15.5,10.5){\line(-1,1){5}}
+ \fi
+}
+%horizontal diode
+\newcommand{\hdiode}[2]{
+\ifx#1R %cathode right
+ \put(0,0){\line(1,0){20}}
+ \put(7,3){\line(0,-1){6}}
+ \put(7,3){\line(2,-1){6}}
+ \put(7,-3){\line(2,1){6}}
+ \put(13,3){\line(0,-1){6}}
+ \ifx#2C %varicap
+ \multiput(9,4)(3,0){2}{\line(1,0){2}}
+ \multiput(11,2.5)(1,0){2}{\line(0,1){3}}
+ \else \ifx#2Z %zener diode
+ \put(13,-3){\line(-1,0){2}}
+ \else \ifx#2E %esaki diode
+ \put(13,-3){\line(-1,0){2}}
+ \put(13,3){\line(-1,0){2}}
+ \else \ifx#2S %shottky diode
+ \put(13,-3){\line(-1,0){1}}
+ \put(12,-3){\line(0,1){1}}
+ \put(13,3){\line(1,0){1}}
+ \put(14,3){\line(0,-1){1}}
+ \else \ifx#2D %led diode
+ \multiput(10,3)(2,2){2}{\vector(-1,1){4}}
+ \else \ifx#2L %laser diode
+ \multiput(10,4)(2,2){2}{\vector(-1,1){4}}
+ \put(9,3){\line(1,1){4}}
+ \else \ifx#2P %photo diode
+ \multiput(5,8)(2,2){2}{\vector(1,-1){4}}
+ \fi \fi \fi \fi \fi \fi \fi \fi
+
+\ifx#1L %cathode left
+ \put(7,3){\line(0,-1){6}}
+ \put(13,3){\line(-2,-1){6}}
+ \put(13,-3){\line(-2,1){6}}
+ \put(13,3){\line(0,-1){6}}
+ \put(0,0){\line(1,0){20}}
+ \ifx#2C %varicap
+ \multiput(6,4)(3,0){2}{\line(1,0){2}}
+ \multiput(8,2.5)(1,0){2}{\line(0,1){3}}
+ \else \ifx#2Z %zener diode
+ \put(7,-3){\line(1,0){2}}
+ \else \ifx#2E %esaki diode
+ \put(7,-3){\line(1,0){2}}
+ \put(7,3){\line(1,0){2}}
+ \else \ifx#2S %shottky diode
+ \put(7,-3){\line(-1,0){1}}
+ \put(6,-3){\line(0,1){1}}
+ \put(7,3){\line(1,0){1}}
+ \put(8,3){\line(0,-1){1}}
+ \else \ifx#2D %led diode
+ \multiput(10,3)(-2,2){2}{\vector(1,1){4}}
+ \else \ifx#2L %laser diode
+ \multiput(10,4)(-2,2){2}{\vector(1,1){4}}
+ \put(11,3){\line(-1,1){4}}
+ \else \ifx#2P %photo diode
+ \multiput(13,10)(2,-2){2}{\vector(-1,-1){4}}
+ \fi \fi \fi \fi \fi \fi \fi \fi
+}
+%vertical diode
+\newcommand{\vdiode}[2]{
+\ifx#1U %cathode up
+ \put(0,0){\line(0,1){20}}
+ \put(3,7){\line(-1,0){6}}
+ \put(3,7){\line(-1,2){3}}
+ \put(-3,7){\line(1,2){3}}
+ \put(3,13){\line(-1,0){6}}
+ \ifx#2C %varicap
+ \multiput(6,8)(0,3){2}{\line(0,1){2}}
+ \multiput(4.5,10)(0,1){2}{\line(1,0){3}}
+ \else \ifx#2Z %zener diode
+ \put(3,13){\line(0,-1){2}}
+ \else \ifx#2E %esaki diode
+ \put(-3,13){\line(0,-1){2}}
+ \put(3,13){\line(0,-1){2}}
+ \else \ifx#2S %shottky diode
+ \put(-3,13){\line(0,1){1}}
+ \put(-3,14){\line(1,0){1}}
+ \put(3,13){\line(0,-1){1}}
+ \put(3,12){\line(-1,0){1}}
+ \else \ifx#2D %led diode
+ \multiput(3,10)(2,2){2}{\vector(1,-1){4}}
+ \else \ifx#2L %laser diode
+ \multiput(4,10)(2,2){2}{\vector(1,-1){4}}
+ \put(3,9){\line(1,1){4}}
+ \else \ifx#2P %photo diode
+ \multiput(10,7)(-2,-2){2}{\vector(-1,1){4}}
+ \fi \fi \fi \fi \fi \fi \fi \fi
+
+\ifx#1D %cathode down
+ \put(0,0){\line(0,1){20}}
+ \put(3,7){\line(-1,0){6}}
+ \put(3,13){\line(-1,-2){3}}
+ \put(-3,13){\line(1,-2){3}}
+ \put(3,13){\line(-1,0){6}}
+ \ifx#2C %varicap
+ \multiput(6,8)(0,3){2}{\line(0,1){2}}
+ \multiput(4.5,10)(0,1){2}{\line(1,0){3}}
+ \else \ifx#2Z %zener diode
+ \put(3,7){\line(0,1){2}}
+ \else \ifx#2E %esaki diode
+ \put(-3,7){\line(0,1){2}}
+ \put(3,7){\line(0,1){2}}
+ \else \ifx#2S %shottky diode
+ \put(-3,7){\line(0,1){1}}
+ \put(-3,8){\line(1,0){1}}
+ \put(3,7){\line(0,-1){1}}
+ \put(3,6){\line(-1,0){1}}
+ \else \ifx#2D %led diode
+ \multiput(3,10)(2,-2){2}{\vector(1,1){4}}
+ \else \ifx#2L %laser diode
+ \multiput(4,10)(2,-2){2}{\vector(1,1){4}}
+ \put(3,11){\line(1,-1){4}}
+ \else \ifx#2P %photo diode
+ \multiput(7,14)(2,-2){2}{\vector(-1,-1){4}}
+ \fi \fi \fi \fi \fi \fi \fi \fi
+
+}
+%vertical triac
+\newcommand{\vtriac}[1]{
+ \put(0,0){\line(0,1){7}}
+ \put(6,7){\line(-1,0){6}}
+ \put(6,7){\line(-1,2){3}}
+ \put(0,7){\line(1,2){3}}
+ \put(6,13){\line(-1,0){6}}
+ \put(0,13){\line(0,1){7}}
+ \put(0,7){\line(-1,0){6}}
+ \put(0,13){\line(-1,-2){3}}
+ \put(-6,13){\line(1,-2){3}}
+ \put(-6,13){\line(1,0){7}}
+ \ifx#1A %gate down left
+ \put(0,7){\line(-1,-1){5}}
+ \put(-5,2){\line(-1,0){5}}
+ \fi \ifx#1B %gate up left
+ \put(0,13){\line(-1,1){4}}
+ \put(-4,17){\line(-1,0){6}}
+ \fi \ifx#1C %gate down right
+ \put(0,7){\line(1,-1){5}}
+ \put(5,2){\line(1,0){5}}
+ \fi \ifx#1D %gate up right
+ \put(0,13){\line(1,1){4}}
+ \put(4,17){\line(1,0){6}}
+ \fi
+}
+%horizontal triac
+\newcommand{\htriac}[1]{
+ \put(0,0){\line(1,0){7}}
+ \put(7,0){\line(0,-1){6}}
+ \put(7,0){\line(2,-1){6}}
+ \put(7,-6){\line(2,1){6}}
+ \put(13,0){\line(0,-1){6}}
+ \put(13,0){\line(1,0){7}}
+ \put(7,0){\line(0,1){6}}
+ \put(13,6){\line(-2,-1){6}}
+ \put(13,0){\line(-2,1){6}}
+ \put(13,0){\line(0,1){6}}
+ \ifx#1A %gate down left
+ \put(7,0){\line(-1,-1){5}}
+ \put(2,-5){\line(0,-1){5}}
+ \fi \ifx#1C %gate down right
+ \put(13,0){\line(1,-1){4}}
+ \put(17,-4){\line(0,-1){6}}
+ \fi \ifx#1D %gate up right
+ \put(13,0){\line(1,1){4}}
+ \put(17,4){\line(0,1){6}}
+ \fi \ifx#1B %gate up left
+ \put(7,0){\line(-1,1){4}}
+ \put(3,4){\line(0,1){6}}
+ \fi
+}
+%diagonal thyristor
+\newcommand{\dthyristor}[3]{
+ \ifx#1D %down oriented
+ \put(0,0){\line(1,-1){8}}
+ \put(10.5,-5.5){\line(-1,-1){5}}
+ \ifx#2D %cathode down
+ \put(10.5,-5.5){\line(1,-3){2.5}}
+ \put(5.5,-10.5){\line(3,-1){7}}
+ \fi \ifx#2U %cathode up
+ \put(10.5,-15.5){\line(-1,3){2.5}}
+ \put(15.5,-10.5){\line(-3,1){7}}
+ \fi
+ \put(15.5,-10.5){\line(-1,-1){5}}
+ \put(13,-13){\line(1,-1){7}}
+
+ \ifx#3A %gate down left
+ \put(13,-13){\line(0,-1){4}}
+ \put(13,-17){\line(-1,-1){4}}
+ \fi \ifx#3B %gate up left
+ \put(8,-8){\line(-1,0){6}}
+ \put(2,-8){\line(-1,-1){4}}
+ \fi
+ \ifx#3C %gate down right
+ \put(13,-13){\line(1,0){4}}
+ \put(17,-13){\line(1,1){4}}
+ \fi \ifx#3D %gate up right
+ \put(8,-8){\line(0,1){6}}
+ \put(8,-2){\line(1,1){4}}
+\fi \fi
+
+
+\ifx#1U %up oriented
+\put(0,0){\line(1,1){8}}
+\put(10.5,5.5){\line(-1,1){5}}
+ \ifx#2U %cathode up
+\put(10.5,5.5){\line(1,3){2.5}}
+\put(5.5,10.5){\line(3,1){7}}
+ \fi \ifx#2D %cathode down
+\put(10.5,15.5){\line(-1,-3){2.5}}
+\put(15.5,10.5){\line(-3,-1){7}}
+ \fi
+\put(15.5,10.5){\line(-1,1){5}}
+\put(13,13){\line(1,1){7}}
+
+ \ifx#3A %gate down left
+\put(8,8){\line(-1,0){6}}
+\put(2,8){\line(-1,1){4}}
+ \fi \ifx#3B %gate up left
+\put(13,13){\line(0,1){4}}
+\put(13,17){\line(-1,1){4}}
+ \fi \ifx#3C %gate down right
+\put(8,8){\line(0,-1){6}}
+\put(8,2){\line(1,-1){4}}
+ \fi \ifx#3D %gate up right
+\put(13,13){\line(1,0){4}}
+\put(17,13){\line(1,-1){4}}
+ \fi \fi
+}
+
+%vertical thyristor
+\newcommand{\vthyristor}[2]{
+ \ifx#2A %gate down left
+\put(0,7){\line(-1,-1){5}}
+\put(-5,2){\line(-1,0){5}}
+ \fi \ifx#2B %gate up left
+\put(0,13){\line(-1,1){4}}
+\put(-4,17){\line(-1,0){6}}
+ \fi \ifx#2C %gate down right
+\put(0,7){\line(1,-1){5}}
+\put(5,2){\line(1,0){5}}
+ \fi \ifx#2D %gate up right
+\put(0,13){\line(1,1){4}}
+\put(4,17){\line(1,0){6}}
+ \fi
+ \ifx#1U %cathode up
+\put(3,7){\line(-1,0){6}}
+\put(3,7){\line(-1,2){3}}
+\put(-3,7){\line(1,2){3}}
+\put(3,13){\line(-1,0){6}}
+ \fi \ifx#1D %cathode down
+\put(-3,7){\line(1,0){6}}
+\put(3,13){\line(-1,-2){3}}
+\put(-3,13){\line(1,-2){3}}
+\put(-3,13){\line(1,0){6}}
+ \fi
+\put(0,0){\line(0,1){20}}
+}
+%horizontal thyristor
+\newcommand{\hthyristor}[2]{
+ \ifx#2A %gate down left
+\put(7,0){\line(-1,-1){5}}
+\put(2,-5){\line(0,-1){5}}
+ \fi \ifx#2C %gate down right
+\put(13,0){\line(1,-1){4}}
+\put(17,-4){\line(0,-1){6}}
+ \fi \ifx#2B %gate up left
+\put(7,0){\line(-1,1){5}}
+\put(2,5){\line(0,1){5}}
+ \fi \ifx#2D %gate up right
+\put(13,0){\line(1,1){4}}
+\put(17,4){\line(0,1){6}}
+ \fi
+ \ifx#1R %cathode right
+\put(7,3){\line(0,-1){6}}
+\put(7,3){\line(2,-1){6}}
+\put(7,-3){\line(2,1){6}}
+\put(13,3){\line(0,-1){6}}
+ \fi \ifx#1L %cathode left
+\put(7,-3){\line(0,1){6}}
+\put(13,3){\line(-2,-1){6}}
+\put(13,-3){\line(-2,1){6}}
+\put(13,-3){\line(0,1){6}}
+ \fi
+\put(0,0){\line(1,0){20}}
+}
+%horizontal diac
+\newcommand{\hdiac}{
+\put(0,0){\line(1,0){7}}
+\put(7,0){\line(0,-1){6}}
+\put(7,0){\line(2,-1){6}}
+\put(7,-6){\line(2,1){6}}
+\put(13,0){\line(0,-1){6}}
+\put(13,0){\line(1,0){7}}
+\put(7,0){\line(0,1){6}}
+\put(13,6){\line(-2,-1){6}}
+\put(13,0){\line(-2,1){6}}
+\put(13,0){\line(0,1){6}}
+}
+%vertical diac
+\newcommand{\vdiac}{
+\put(0,0){\line(0,1){7}}
+\put(6,7){\line(-1,0){6}}
+\put(6,7){\line(-1,2){3}}
+\put(0,7){\line(1,2){3}}
+\put(6,13){\line(-1,0){6}}
+\put(0,13){\line(0,1){7}}
+\put(0,7){\line(-1,0){6}}
+\put(0,13){\line(-1,-2){3}}
+\put(-6,13){\line(1,-2){3}}
+\put(-6,13){\line(1,0){6}}
+}
+%optocoupler
+\newcommand{\opto}[1]{
+ \ifx#1R
+\put(0,0){\line(0,1){20}}
+\put(-2,8){\line(1,0){4}}
+\put(0,8){\line(-1,2){2}}
+\put(0,8){\line(1,2){2}}
+\put(-2,12){\line(1,0){4}}
+\multiput(3,9)(0,2){2}{\vector(1,0){4}}
+\put(11,8){\line(0,1){4}}
+\put(15,0){\line(0,1){7.5}}
+\put(15,12.5){\line(0,1){7.5}}
+\put(11,10.5){\line(2,1){4}}
+\put(11,9.5){\vector(2,-1){4}}
+\multiput(-5,5)(25,0){2}{\line(0,1){10}}
+\multiput(-5,5)(0,10){2}{\line(1,0){25}}
+ \fi \ifx#1L
+\put(0,0){\line(0,1){20}}
+\put(2,8){\line(-1,0){4}}
+\put(0,8){\line(1,2){2}}
+\put(0,8){\line(-1,2){2}}
+\put(2,12){\line(-1,0){4}}
+\put(0,12){\line(0,1){8}}
+\multiput(-3,9)(0,2){2}{\vector(-1,0){4}}
+\put(-11,8){\line(0,1){4}}
+\put(-15,0){\line(0,1){7.5}}
+\put(-15,12.5){\line(0,1){7.5}}
+\put(-11,10.5){\line(-2,1){4}}
+\put(-11,9.5){\vector(-2,-1){4}}
+\multiput(5,5)(-25,0){2}{\line(0,1){10}}
+\multiput(5,5)(0,10){2}{\line(-1,0){25}}
+ \fi
+}
+
+%operational amplifier
+\newcommand{\opamp}[2]{
+ \ifx#1R %right oriented
+\multiput(0,0)(0,10){2}{\line(1,0){5}}
+\put(25,5){\line(1,0){5}}
+\put(5,-5){\line(0,1){20}}
+\put(5,-5){\line(2,1){20}}
+\put(5,15){\line(2,-1){20}}
+ \ifx#2D %-input down
+\put(7,0){\line(1,0){3}}
+\put(7,7){\makebox(5,5)[l]{+}}
+ \fi \ifx#2U %-input up
+\put(7,10){\line(1,0){3}}
+\put(7,-2){\makebox(5,5)[l]{+}}
+ \fi
+ \fi \ifx#1L %left oriented
+\multiput(0,0)(0,10){2}{\line(-1,0){5}}
+\put(-25,5){\line(-1,0){5}}
+\put(-5,-5){\line(0,1){20}}
+\put(-5,-5){\line(-2,1){20}}
+\put(-5,15){\line(-2,-1){20}}
+ \ifx#2D %-input down
+\put(-7,0){\line(-1,0){3}}
+\put(-12,7){\makebox(5,5)[r]{+}}
+ \fi \ifx#2U %-input up
+\put(-7,10){\line(-1,0){3}}
+\put(-12,-2){\makebox(5,5)[r]{+}}
+ \fi \fi \ifx#1U %up oriented
+\multiput(0,0)(10,0){2}{\line(0,1){5}}
+\put(5,25){\line(0,1){5}}
+\put(-5,5){\line(1,0){20}}
+\put(-5,5){\line(1,2){10}}
+\put(15,5){\line(-1,2){10}}
+ \ifx#2L %-input left
+\put(2,8){\line(-1,0){3}}
+\put(6,6){\makebox(5,5)[r]{+}}
+ \fi \ifx#2R %-input right
+\put(11,8){\line(-1,0){3}}
+\put(-3,6){\makebox(5,5)[r]{+}}
+ \fi \fi \ifx#1D %down oriented
+\multiput(0,0)(10,0){2}{\line(0,-1){5}}
+\put(5,-25){\line(0,-1){5}}
+\put(-5,-5){\line(1,0){20}}
+\put(-5,-5){\line(1,-2){10}}
+\put(15,-5){\line(-1,-2){10}}
+ \ifx#2L %-input left
+\put(2,-8){\line(-1,0){3}}
+\put(6,-11){\makebox(5,5)[r]{+}}
+ \fi \ifx#2R %-input right
+\put(11,-8){\line(-1,0){3}}
+\put(-3,-11){\makebox(5,5)[r]{+}}
+ \fi
+ \fi
+}
+
+%operational transconductance amplifier
+\newcommand{\ota}[3]{
+ \ifx#1R %right oriented
+\multiput(0,0)(0,10){2}{\line(1,0){5}}
+\put(15,5){\line(1,0){5}}
+\put(5,-5){\line(0,1){20}}
+\put(15,0){\line(0,1){10}}
+\put(5,-5){\line(2,1){10}}
+\put(5,15){\line(2,-1){10}}
+ \ifx#3Y %with linearization diodes
+ \put(3.5,6.5){$\bigtriangleup$ }
+ \put(3.5,2){$\bigtriangledown$ }
+ \multiput(3.5,1.5)(0,7.25){2}{\line(1,0){3}}
+ \put(0,5){\line(1,0){5}}
+ \fi
+ \ifx#2D %-input down
+\put(7,0){\line(1,0){3}}
+\put(7,7){\makebox(5,5)[l]{+}}
+ \fi \ifx#2U %-input up
+\put(7,10){\line(1,0){3}}
+\put(7,-2){\makebox(5,5)[l]{+}}
+ \fi
+ \fi \ifx#1L %left oriented
+\multiput(0,0)(0,10){2}{\line(-1,0){5}}
+\put(-15,5){\line(-1,0){5}}
+\put(-5,-5){\line(0,1){20}}
+\put(-15,0){\line(0,1){10}}
+\put(-5,-5){\line(-2,1){10}}
+\put(-5,15){\line(-2,-1){10}}
+ \ifx#3Y %with linearization diodes
+ \put(-6.5,6.5){$\bigtriangleup$ }
+ \put(-6.5,2){$\bigtriangledown$ }
+ \multiput(-6.5,1.5)(0,7.25){2}{\line(1,0){3}}
+ \put(0,5){\line(-1,0){5}}
+ \fi
+ \ifx#2D %-input down
+\put(-7,0){\line(-1,0){3}}
+\put(-12,7){\makebox(5,5)[r]{+}}
+ \fi \ifx#2U %-input up
+\put(-7,10){\line(-1,0){3}}
+\put(-12,-2){\makebox(5,5)[r]{+}}
+ \fi \fi \ifx#1U %up oriented
+\multiput(0,0)(10,0){2}{\line(0,1){5}}
+\put(5,15){\line(0,1){5}}
+\put(0,15){\line(1,0){10}}
+\put(-5,5){\line(1,0){20}}
+\put(-5,5){\line(1,2){5}}
+\put(15,5){\line(-1,2){5}}
+ \ifx#3Y %with linearization diodes
+ \put(7.2,4.2){$\triangleright$ }
+ \put(1.4,4.2){$\triangleleft$ }
+ \multiput(1.5,3.5)(7.25,0){2}{\line(0,1){3}}
+ \put(5,0){\line(0,1){5}}
+ \fi
+ \ifx#2L %-input left
+\put(2,8){\line(-1,0){3}}
+\put(6,6){\makebox(5,5)[r]{+}}
+ \fi \ifx#2R %-input right
+\put(11,8){\line(-1,0){3}}
+\put(-3,6){\makebox(5,5)[r]{+}}
+ \fi \fi \ifx#1D %down oriented
+\multiput(0,0)(10,0){2}{\line(0,-1){5}}
+\put(5,-15){\line(0,-1){5}}
+\put(0,-15){\line(1,0){10}}
+\put(-5,-5){\line(1,0){20}}
+\put(-5,-5){\line(1,-2){5}}
+\put(15,-5){\line(-1,-2){5}}
+ \ifx#3Y %with linearization diodes
+ \put(7.2,-5.8){$\triangleright$ }
+ \put(1.4,-5.8){$\triangleleft$ }
+ \multiput(1.5,-3.5)(7.25,0){2}{\line(0,-1){3}}
+ \put(5,0){\line(0,-1){5}}
+ \fi
+ \ifx#2L %-input left
+\put(2,-8){\line(-1,0){3}}
+\put(6,-11){\makebox(5,5)[r]{+}}
+ \fi \ifx#2R %-input right
+\put(11,-8){\line(-1,0){3}}
+\put(-3,-11){\makebox(5,5)[r]{+}}
+ \fi
+ \fi
+}
+
+% balanced operational transconductance amplifier
+\newcommand{\bota}[3]{
+ \ifx#1R %right oriented
+\multiput(0,0)(0,10){2}{\line(1,0){5}}
+\multiput(15,2.5)(0,5){2}{\line(1,0){5}}
+\put(5,-5){\line(0,1){20}}
+\put(15,0){\line(0,1){10}}
+\put(5,-5){\line(2,1){10}}
+\put(5,15){\line(2,-1){10}}
+ \ifx#3Y %with linearization diodes
+ \put(3.5,6.5){$\bigtriangleup$ }
+ \put(3.5,2){$\bigtriangledown$ }
+ \multiput(3.5,1.5)(0,7.25){2}{\line(1,0){3}}
+ \put(0,5){\line(1,0){5}}
+ \fi
+ \ifx#2D %-input down
+\put(7,0){\line(1,0){3}}
+\put(7,7){\makebox(5,5)[l]{+}}
+ \fi \ifx#2U %-input up
+\put(7,10){\line(1,0){3}}
+\put(7,-2){\makebox(5,5)[l]{+}}
+ \fi
+ \fi \ifx#1L %left oriented
+\multiput(0,0)(0,10){2}{\line(-1,0){5}}
+\multiput(-15,2.5)(0,5){2}{\line(-1,0){5}}
+\put(-5,-5){\line(0,1){20}}
+\put(-15,0){\line(0,1){10}}
+\put(-5,-5){\line(-2,1){10}}
+\put(-5,15){\line(-2,-1){10}}
+ \ifx#3Y %with linearization diodes
+ \put(-6.5,6.5){$\bigtriangleup$ }
+ \put(-6.5,2){$\bigtriangledown$ }
+ \multiput(-6.5,1.5)(0,7.25){2}{\line(1,0){3}}
+ \put(0,5){\line(-1,0){5}}
+ \fi
+ \ifx#2D %-input down
+\put(-7,0){\line(-1,0){3}}
+\put(-12,7){\makebox(5,5)[r]{+}}
+ \fi \ifx#2U %-input up
+\put(-7,10){\line(-1,0){3}}
+\put(-12,-2){\makebox(5,5)[r]{+}}
+ \fi \fi \ifx#1U %up oriented
+\multiput(0,0)(10,0){2}{\line(0,1){5}}
+\multiput(2.5,15)(5,0){2}{\line(0,1){5}}
+\put(0,15){\line(1,0){10}}
+\put(-5,5){\line(1,0){20}}
+\put(-5,5){\line(1,2){5}}
+\put(15,5){\line(-1,2){5}}
+ \ifx#3Y %with linearization diodes
+ \put(7.2,4.2){$\triangleright$ }
+ \put(1.4,4.2){$\triangleleft$ }
+ \multiput(1.5,3.5)(7.25,0){2}{\line(0,1){3}}
+ \put(5,0){\line(0,1){5}}
+ \fi
+ \ifx#2L %-input left
+\put(2,8){\line(-1,0){3}}
+\put(6,6){\makebox(5,5)[r]{+}}
+ \fi \ifx#2R %-input right
+\put(11,8){\line(-1,0){3}}
+\put(-3,6){\makebox(5,5)[r]{+}}
+ \fi \fi \ifx#1D %down oriented
+\multiput(0,0)(10,0){2}{\line(0,-1){5}}
+\multiput(2.5,-15)(5,0){2}{\line(0,-1){5}}
+\put(0,-15){\line(1,0){10}}
+\put(-5,-5){\line(1,0){20}}
+\put(-5,-5){\line(1,-2){5}}
+\put(15,-5){\line(-1,-2){5}}
+ \ifx#3Y %with linearization diodes
+ \put(7.2,-5.8){$\triangleright$ }
+ \put(1.4,-5.8){$\triangleleft$ }
+ \multiput(1.5,-3.5)(7.25,0){2}{\line(0,-1){3}}
+ \put(5,0){\line(0,-1){5}}
+ \fi
+ \ifx#2L %-input left
+\put(2,-8){\line(-1,0){3}}
+\put(6,-11){\makebox(5,5)[r]{+}}
+ \fi \ifx#2R %-input right
+\put(11,-8){\line(-1,0){3}}
+\put(-3,-11){\makebox(5,5)[r]{+}}
+ \fi
+ \fi
+}
+%%%%%%tranzistors bjt, jfet, mosfet,%%%%%%%%%%%%
+%bipolar transistor
+\newcommand{\bjt}[4]{
+ \ifx#2R %right oriented
+ \put(0,0){\line(1,0){10}}
+ \put(10,3){\line(0,-1){6}}
+ \put(10,1){\line(1,1){9}}
+ \put(10,-1){\line(1,-1){9}}
+ \ifx#4N
+ \else
+ \put(11,0){\circle{10}}
+ \fi
+ \ifx#3D %emitor down
+ \ifx#1N %npn type
+ \put(10,-1){\vector(1,-1){3}}
+ \else \ifx#1P %pnp type
+ \put(13,-4){\vector(-1,1){3}}
+ \fi \fi
+ \else \ifx#3U %emitor up
+ \ifx#1N %npn type
+ \put(10,1){\vector(1,1){3}}
+ \else \ifx#1P %pnp type
+ \put(13,4){\vector(-1,-1){3}}
+ \fi \fi
+ \fi \fi
+\fi
+\ifx#2L %left oriented
+ \put(0,0){\line(-1,0){10}}
+ \put(-10,1){\line(-1,1){9}}
+ \put(-10,-1){\line(-1,-1){9}}
+ \put(-10,3){\line(0,-1){6}}
+ \ifx#4N
+ \else
+ \put(-11,0){\circle{10}}
+ \fi
+ \ifx#3D %emitor down
+ \ifx#1N %npn type
+ \put(-10,-1){\vector(-1,-1){3}}
+ \else \ifx#1P %pnp type
+ \put(-13,-4){\vector(1,1){3}}
+ \fi \fi
+ \else \ifx#3U %emitor up
+ \ifx#1N %npn type
+ \put(-10,1){\vector(-1,1){3}}
+ \else \ifx#1P %pnp type
+ \put(-13,4){\vector(1,-1){3}}
+ \fi \fi
+ \fi \fi
+\fi
+\ifx#2U %up oriented
+ \put(0,0){\line(0,1){10}}
+ \put(-3,10){\line(1,0){6}}
+ \put(1,10){\line(1,1){9}}
+ \put(-1,10){\line(-1,1){9}}
+ \ifx#4N
+ \else
+ \put(0,11){\circle{10}}
+ \fi
+ \ifx#3R %emitor right
+ \ifx#1N %npn type
+ \put(1,10){\vector(1,1){3}}
+ \else \ifx#1P %pnp type
+ \put(4,13){\vector(-1,-1){3}}
+ \fi \fi
+ \else \ifx#3L %emitor left
+ \ifx#1N %npn type
+ \put(-1,10){\vector(-1,1){3}}
+ \else \ifx#1P %pnp type
+ \put(-4,13){\vector(1,-1){3}}
+ \fi \fi
+ \fi \fi
+\fi
+\ifx#2D %down oriented
+ \put(0,0){\line(0,-1){10}}
+ \put(-3,-10){\line(1,0){6}}
+ \put(1,-10){\line(1,-1){9}}
+ \put(-1,-10){\line(-1,-1){9}}
+ \ifx#4N
+ \else
+ \put(0,-11){\circle{10}}
+ \fi
+ \ifx#3R %emitor right
+ \ifx#1N %npn type
+ \put(1,-10){\vector(1,-1){3}}
+ \else \ifx#1P %pnp type
+ \put(4,-13){\vector(-1,1){3}}
+ \fi \fi
+ \else \ifx#3L %emitor left
+ \ifx#1N %npn type
+ \put(-1,-10){\vector(-1,-1){3}}
+ \else \ifx#1P %pnp type
+ \put(-4,-13){\vector(1,1){3}}
+ \fi \fi
+ \fi \fi
+\fi
+}
+%jfet transistor
+\newcommand{\jfet}[4]{
+\ifx#2R %right oriented
+ \ifx#3D %source down
+ \ifx#1N %n channel
+ \put(12,0){\vector(1,0){0}}
+ \fi \ifx#1P %p channel
+ \put(8,0){\vector(-1,0){0}}
+ \fi
+ \ifx#4N
+ \else
+ \put(12,2.5){\circle{10}}
+ \fi
+ \put(12,5){\line(1,0){8}}
+ \put(0,0){\line(1,0){20}}
+ \put(12,6){\line(0,-1){7}}
+ \fi \ifx#3U %source up
+ \ifx#1N %n channel
+ \put(12,0){\vector(1,0){0}}
+ \fi \ifx#1P %p channel
+ \put(8,0){\vector(-1,0){0}}
+ \fi
+ \ifx#4N
+ \else
+ \put(12,-2.5){\circle{10}}
+ \fi
+ \put(12,-5){\line(1,0){8}}
+ \put(0,0){\line(1,0){20}}
+ \put(12,-6){\line(0,1){7}}
+ \fi
+\fi \ifx#2L %left oriented
+ \ifx#3U %source up
+ \ifx#1N %n channel
+ \put(-12,0){\vector(-1,0){0}}
+ \fi \ifx#1P %p channel
+ \put(-8,0){\vector(1,0){0}}
+ \fi
+ \ifx#4N
+ \else
+ \put(-12,-2.5){\circle{10}}
+ \fi
+ \put(-12,-5){\line(-1,0){8}}
+ \put(0,0){\line(-1,0){20}}
+ \put(-12,1){\line(0,-1){7}}
+ \fi \ifx#3D %source down
+ \ifx#1N %n channel
+ \put(-12,0){\vector(-1,0){0}}
+ \fi \ifx#1P %p channel
+ \put(-8,0){\vector(1,0){0}}
+ \fi
+ \ifx#4N
+ \else
+ \put(-12,2.5){\circle{10}}
+ \fi
+ \put(-12,5){\line(-1,0){8}}
+ \put(0,0){\line(-1,0){20}}
+ \put(-12,6){\line(0,-1){7}}
+ \fi \fi
+
+\ifx#2U %up oriented
+ \ifx#3L %source left
+ \ifx#1N %n channel
+ \put(0,12){\vector(0,1){0}}
+ \fi \ifx#1P %p channel
+ \put(0,8){\vector(0,-1){0}}
+ \fi
+ \ifx#4N
+ \else
+ \put(2.5,12){\circle{10}}
+ \fi
+ \put(5,12){\line(0,1){8}}
+ \put(0,0){\line(0,1){20}}
+ \put(6,12){\line(-1,0){7}}
+ \fi \ifx#3R %source right
+ \ifx#1N %n channel
+ \put(0,12){\vector(0,1){0}}
+ \fi \ifx#1P %p channel
+ \put(0,8){\vector(0,-1){0}}
+ \fi
+ \ifx#4N
+ \else
+ \put(-2.5,12){\circle{10}}
+ \fi
+ \put(-5,12){\line(0,1){8}}
+ \put(0,0){\line(0,1){20}}
+ \put(1,12){\line(-1,0){7}}
+ \fi
+
+\fi \ifx#2D %down oriented
+ \ifx#3R %source right
+ \ifx#1N %n channel
+ \put(0,-12){\vector(0,-1){0}}
+ \fi \ifx#1P %p channel
+ \put(0,-8){\vector(0,1){0}}
+ \fi
+ \ifx#4N
+ \else
+ \put(-2.5,-12){\circle{10}}
+ \fi
+ \put(-5,-12){\line(0,-1){8}}
+ \put(0,0){\line(0,-1){20}}
+ \put(1,-12){\line(-1,0){7}}
+ \fi \ifx#3L %source left
+ \ifx#1N %n channel
+ \put(0,0){\vector(0,-1){11}}
+ \fi \ifx#1P %p channel
+ \put(0,-11.5){\vector(0,1){4}}
+ \fi
+ \ifx#4N
+ \else
+ \put(2.5,-12){\circle{10}}
+ \fi
+ \put(5,-12){\line(0,-1){8}}
+ \put(0,0){\line(0,-1){20}}
+ \put(6,-12){\line(-1,0){7}}
+ \fi \fi
+}
+%mos transistor
+\newcommand{\mos}[6]{
+ \ifx#2R %right oriented
+ \ifx#3D %source down
+ \ifnum#5=1 % one gate
+ \put(0,0){\line(1,0){10}}
+ \put(10,5){\line(0,-1){5}}
+ \fi
+ \ifnum#5=2 % two gates
+ \multiput(0,0)(0,3.5){2}{\line(1,0){10}}
+ \multiput(10,1.5)(0,3.5){2}{\line(0,-1){1.5}}
+ \fi
+ \ifx#6N
+ \else
+ \put(12,2.5){\circle{10}}
+ \fi
+ \put(11,5){\line(1,0){9}}
+ \put(11,0){\line(1,0){9}}
+ \ifx#4E %enhancement mode
+ \multiput(11,0.75)(0,2.5){3}{\put(0,0){\line(0,-1){1.5}}}
+ \else \ifx#4D %depletion mode
+ \put(11,6){\line(0,-1){7}}
+ \fi \fi
+ \ifx#1P %p type
+ \put(11,2.5){\vector(1,0){4}}
+ \else \ifx#1N %n type
+ \put(15,2.5){\vector(-1,0){4}}
+ \fi \fi
+
+ \else \ifx#3U %source up
+ \ifnum#5=1 % one gate
+ \put(0,0){\line(1,0){10}}
+ \put(10,0){\line(0,-1){5}}
+ \fi
+ \ifnum#5=2 % two gates
+ \multiput(0,0)(0,-3.5){2}{\line(1,0){10}}
+ \multiput(10,0)(0,-3.5){2}{\line(0,-1){1.5}}
+ \fi
+ \ifx#6N
+ \else
+ \put(12,-2.5){\circle{10}}
+ \fi
+ \put(11,-5){\line(1,0){9}}
+ \put(11,0){\line(1,0){9}}
+ \ifx#4E %enhancement mode
+ \multiput(11,0.75)(0,-2.5){3}{\put(0,0){\line(0,-1){1.5}}}
+ \else \ifx#4D %depletion mode
+ \put(11,-6){\line(0,1){7}}
+ \fi \fi
+ \ifx#1P %p type
+ \put(11,-2.5){\vector(1,0){4}}
+ \else \ifx#1N %n type
+ \put(15,-2.5){\vector(-1,0){4}}
+ \fi \fi
+ \fi \fi
+ \fi
+
+ \ifx#2L %left oriented
+ \ifx#3D %source down
+ \ifnum#5=1 % one gate
+ \put(0,0){\line(-1,0){10}}
+ \put(-10,5){\line(0,-1){5}}
+ \fi
+ \ifnum#5=2 % two gates
+ \multiput(0,0)(0,3.5){2}{\line(-1,0){10}}
+ \multiput(-10,5)(0,-3.5){2}{\line(0,-1){1.5}}
+ \fi
+ \ifx#6N
+ \else
+ \put(-12,2.5){\circle{10}}
+ \fi
+ \put(-11,5){\line(-1,0){9}}
+ \put(-11,0){\line(-1,0){9}}
+ \ifx#4E %enhancement mode
+ \multiput(-11,0.75)(0,2.5){3}{\put(0,0){\line(0,-1){1.5}}}
+ \else \ifx#4D %depletion mode
+ \put(-11,6){\line(0,-1){7}}
+ \fi \fi
+ \ifx#1P %p type
+ \put(-11,2.5){\vector(-1,0){4}}
+ \else \ifx#1N %n type
+ \put(-15,2.5){\vector(1,0){4}}
+ \fi \fi
+
+ \else \ifx#3U %source up
+ \ifnum#5=1
+ \put(0,0){\line(-1,0){10}}
+ \put(-10,0){\line(0,-1){5}}
+ \fi
+ \ifnum#5=2 % two gates
+ \multiput(0,0)(0,-3.5){2}{\line(-1,0){10}}
+ \multiput(-10,0)(0,-3.5){2}{\line(0,-1){1.5}}
+ \fi
+ \ifx#6N
+ \else
+ \put(-12,-2.5){\circle{10}}
+ \fi
+ \put(-11,-5){\line(-1,0){9}}
+ \put(-11,0){\line(-1,0){9}}
+ \ifx#4E %enhancement mode
+ \multiput(-11,0.75)(0,-2.5){3}{\put(0,0){\line(0,-1){1.5}}}
+ \else \ifx#4D %depletion mode
+ \put(-11,-6){\line(0,1){7}}
+ \fi \fi
+ \ifx#1P %p type
+ \put(-11,-2.5){\vector(-1,0){4}}
+ \else \ifx#1N %n type
+ \put(-15,-2.5){\vector(1,0){4}}
+ \fi \fi
+ \fi \fi
+ \fi
+
+ \ifx#2U %up oriented
+ \ifx#3L %source left
+ \ifnum#5=1 % one gate
+ \put(0,0){\line(0,1){10}}
+ \put(5,10){\line(-1,0){5}}
+ \fi
+ \ifnum#5=2 % two gates
+ \multiput(0,0)(3.5,0){2}{\line(0,1){10}}
+ \multiput(5,10)(-3.5,0){2}{\line(-1,0){1.5}}
+ \fi
+ \ifx#6N
+ \else
+ \put(2.5,12){\circle{10}}
+ \fi
+ \put(5,11){\line(0,1){9}}
+ \put(0,11){\line(0,1){9}}
+ \ifx#4E %enhancement mode
+ \multiput(0.75,11)(2.5,0){3}{\put(0,0){\line(-1,0){1.5}}}
+ \else \ifx#4D %depletion mode
+ \put(6,11){\line(-1,0){7}}
+ \fi \fi
+ \ifx#1P %p type
+ \put(2.5,11){\vector(0,1){4}}
+ \else \ifx#1N %n type
+ \put(2.5,15){\vector(0,-1){4}}
+ \fi \fi
+
+ \else \ifx#3R %source right
+ \ifnum#5=1 % one gate
+ \put(0,0){\line(0,1){10}}
+ \put(0,10){\line(-1,0){5}}
+ \fi
+ \ifnum#5=2 % two gates
+ \multiput(0,0)(-3.5,0){2}{\line(0,1){10}}
+ \multiput(0,10)(-3.5,0){2}{\line(-1,0){1.5}}
+ \fi
+ \ifx#6N
+ \else
+ \put(-2.5,12){\circle{10}}
+ \fi
+ \put(-5,11){\line(0,1){9}}
+ \put(0,11){\line(0,1){9}}
+ \ifx#4E %enhancement mode
+ \multiput(0.75,11)(-2.5,0){3}{\put(0,0){\line(-1,0){1.5}}}
+ \else \ifx#4D %depletion mode
+ \put(-6,11){\line(1,0){7}}
+ \fi \fi
+ \ifx#1P %p type
+ \put(-2.5,11){\vector(0,1){4}}
+ \else \ifx#1N %n type
+ \put(-2.5,15){\vector(0,-1){4}}
+ \fi \fi
+ \fi \fi
+ \fi
+
+ \ifx#2D %down oriented
+ \ifx#3L %source left
+ \ifnum#5=1 % one gate
+ \put(0,0){\line(0,-1){10}}
+ \put(5,-10){\line(-1,0){5}}
+ \fi
+ \ifnum#5=2 % two gates
+ \multiput(0,0)(3.5,0){2}{\line(0,-1){10}}
+ \multiput(5,-10)(-3.5,0){2}{\line(-1,0){1.5}}
+ \fi
+ \ifx#6N
+ \else
+ \put(2.5,-12){\circle{10}}
+ \fi
+ \put(5,-11){\line(0,-1){9}}
+ \put(0,-11){\line(0,-1){9}}
+ \ifx#4E %enhancement mode
+ \multiput(0.75,-11)(2.5,0){3}{\put(0,0){\line(-1,0){1.5}}}
+ \else \ifx#4D %depletion mode
+ \put(6,-11){\line(-1,0){7}}
+ \fi \fi
+ \ifx#1P %p type
+ \put(2.5,-11){\vector(0,-1){4}}
+ \else \ifx#1N %n type
+ \put(2.5,-15){\vector(0,1){4}}
+ \fi \fi
+
+ \else \ifx#3R %source right
+ \ifnum#5=1 % one gate
+ \put(0,0){\line(0,-1){10}}
+ \put(0,-10){\line(-1,0){5}}
+ \fi
+ \ifnum#5=2 % two gates
+ \multiput(0,0)(-3.5,0){2}{\line(0,-1){10}}
+ \multiput(0,-10)(-3.5,0){2}{\line(-1,0){1.5}}
+ \fi
+ \ifx#6N
+ \else
+ \put(-2.5,-12){\circle{10}}
+ \fi
+ \put(-5,-11){\line(0,-1){9}}
+ \put(0,-11){\line(0,-1){9}}
+ \ifx#4E %enhancement mode
+ \multiput(0.75,-11)(-2.5,0){3}{\put(0,0){\line(-1,0){1.5}}}
+ \else \ifx#4D %depletion mode
+ \put(1,-11){\line(-1,0){7}}
+ \fi \fi
+ \ifx#1P %p type
+ \put(-2.5,-11){\vector(0,-1){4}}
+ \else \ifx#1N %n type
+ \put(-2.5,-15){\vector(0,1){4}}
+ \fi \fi
+ \fi \fi
+ \fi
+}
+%ujt transistor
+\newcommand{\ujt}[4]{
+\ifx#2R %right oriented
+ \ifx#3U %B1 up
+ \ifx#1P %p type emiter
+ \put(9,2.5){\vector(4,1){0}}
+ \fi \ifx#1N %n type emiter
+ \put(5.5,1.25){\vector(-4,-1){0}}
+ \fi
+ \ifx#4N
+ \else
+ \put(9,2.5){\circle{10}}
+ \fi
+ \multiput(9,5)(0,-5){2}{\line(1,0){8}}
+ \put(0,0){\line(4,1){9}}
+ \put(9,6){\line(0,-1){7}}
+ \fi \ifx#3D %B1 down
+ \ifx#1P %p type emiter
+ \put(9.4,-2.4){\vector(4,-1){0}}
+ \fi \ifx#1N %n type emitor
+ \put(5.5,-1.3){\vector(-4,1){0}}
+ \fi
+ \ifx#4N
+ \else
+ \put(9,-2.5){\circle{10}}
+ \fi
+ \multiput(9,-5)(0,5){2}{\line(1,0){8}}
+ \put(0,0){\line(4,-1){9}}
+ \put(9,-6){\line(0,1){7}}
+ \fi
+\fi \ifx#2L %left oriented
+ \ifx#3D %B1 down
+ \ifx#1P %p type emiter
+ \put(-9.4,-2.4){\vector(-4,-1){0}}
+ \fi \ifx#1N %n type emiter
+ \put(-5.5,-1.3){\vector(4,1){0}}
+ \fi
+ \ifx#4N
+ \else
+ \put(-9,-2.5){\circle{10}}
+ \fi
+ \multiput(-9,-5)(0,5){2}{\line(-1,0){8}}
+ \put(0,0){\line(-4,-1){9}}
+ \put(-9,-6){\line(0,1){7}}
+ \fi \ifx#3U %B1 up
+ \ifx#1P %p type emiter
+ \put(-9.4,2.4){\vector(-4,1){0}}
+ \fi \ifx#1N %n type emiter
+ \put(-5.5,1.3){\vector(4,-1){0}}
+ \fi
+ \ifx#4N
+ \else
+ \put(-9,2.5){\circle{10}}
+ \fi
+ \multiput(-9,5)(0,-5){2}{\line(-1,0){8}}
+ \put(0,0){\line(-4,1){9}}
+ \put(-9,6){\line(0,-1){7}}
+ \fi \fi
+
+\ifx#2U %up oriented
+ \ifx#3R %B1 right
+ \ifx#1P %p type emiter
+ \put(2.5,9.4){\vector(1,4){0}}
+ \fi \ifx#1N %n type emiter
+ \put(1.3,5.5){\vector(-1,-4){0}}
+ \fi
+ \ifx#4N
+ \else
+ \put(2.5,9){\circle{10}}
+ \fi
+ \multiput(0,9)(5,0){2}{\line(0,1){8}}
+ \put(0,0){\line(1,4){2.2}}
+ \put(6,9){\line(-1,0){7}}
+ \fi \ifx#3L %B1 left
+ \ifx#1P %p type emiter
+ \put(-2.5,9.4){\vector(-1,4){0}}
+ \fi \ifx#1N %n type emiter
+ \put(-1.3,5.5){\vector(1,-4){0}}
+ \fi
+ \ifx#4N
+ \else
+ \put(-2.5,9){\circle{10}}
+ \fi
+ \multiput(-5.,9)(5,0){2}{\line(0,1){8}}
+ \put(0,0){\line(-1,4){2.2}}
+ \put(-6,9){\line(1,0){7}}
+ \fi
+
+\fi \ifx#2D %down oriented
+ \ifx#3L %B1 left
+ \ifx#1P %p type emiter
+ \put(-2.5,-9.4){\vector(-1,-4){0}}
+ \fi \ifx#1N %n type emiter
+ \put(-1.3,-5.5){\vector(1,4){0}}
+ \fi
+ \ifx#4N
+ \else
+ \put(-2.5,-9){\circle{10}}
+ \fi
+ \multiput(-5,-9)(5,0){2}{\line(0,-1){8}}
+ \put(0,0){\line(-1,-4){2.2}}
+ \put(-6,-9){\line(1,0){7}}
+ \fi \ifx#3R %B1 right
+ \ifx#1P %p type emiter
+ \put(2.5,-9.4){\vector(1,-4){0}}
+ \fi \ifx#1N %n type emiter
+ \put(1.3,-5.5){\vector(-1,4){0}}
+ \fi
+ \ifx#4N
+ \else
+ \put(2.5,-9){\circle{10}}
+ \fi
+ \multiput(0,-9)(5,0){2}{\line(0,-1){8}}
+ \put(0,0){\line(1,-4){2.2}}
+ \put(6,-9){\line(-1,0){7}}
+ \fi \fi
+}
+%%%%% Hall's generator
+\newcommand{\hall}{
+\put(0,0){\line(1,0){10}}
+\put(10,-2){\framebox(10,4){}\put(0,2){\line(1,0){10}}}
+\multiput(15,-5)(0,7){2}{\line(0,1){3}}
+\put(13.7,-0.8){$\times $}
+}
+%%%%% horizontal magnistor
+\newcommand{\hmag}{
+\put(0,0){\line(1,0){10}}
+\put(10,-2){\framebox(10,4){}\put(0,2){\line(1,0){10}}}
+\put(11,-4){\line(1,1){8}}
+\put(8,-4){\line(1,0){3}}
+\put(15,-5){$\times $}
+}
+%vertical magnistor
+\newcommand{\vmag}{
+\put(0,0){\line(0,1){10}}
+\put(-2,10){\framebox(4,10){}\put(-2,10){\line(0,1){10}}}
+\put(-6,17){\line(3,-1){12}}
+\put(6,10){\line(0,1){3}}
+\put(3,17){$\times $}
+}
+%horizontal thermistor PTC
+\newcommand{\hptc}{
+\put(0,0){\line(1,0){5}}
+\put(5,-2){\framebox(10,4){}\put(0,2){\line(1,0){5}}}
+\put(6,-4){\line(1,1){8}}
+\put(3,-4){\line(1,0){3}}
+\multiput(17,2)(2,0){2}{\vector(0,1){4}}
+\put(16,-4){$\vartheta $}
+}
+%horizontal thermistor NTC
+\newcommand{\hntc}{
+\put(0,0){\line(1,0){5}}
+\put(5,-2){\framebox(10,4){}\put(0,2){\line(1,0){5}}}
+\put(6,-4){\line(1,1){8}}
+\put(3,-4){\line(1,0){3}}
+\put(17,2){\vector(0,1){4}}
+\put(19,6){\vector(0,-1){4}}
+\put(16,-4){$\vartheta $}
+}
+%horizontal varistor
+\newcommand{\hvar}{
+\put(0,0){\line(1,0){5}}
+\put(5,-2){\framebox(10,4){}\put(0,2){\line(1,0){5}}}
+\put(6,-4){\line(1,1){8}}
+\put(3,-4){\line(1,0){3}}
+\put(16,-4){$\rm U $}
+}
+%horizontal photorezistor
+\newcommand{\hprez}{
+\put(0,0){\line(1,0){5}}
+\put(5,-2){\framebox(10,4){}\put(0,2){\line(1,0){5}}}
+\multiput(5,8)(2,0){2}{\vector(1,-1){4}}
+}
+%vertical thermistor PTC
+\newcommand{\vptc}{
+\put(0,0){\line(0,1){5}}
+\put(-2,5){\framebox(4,10){}\put(-2,10){\line(0,1){5}}}
+\put(4,6){\line(-1,1){8}}
+\put(4,3){\line(0,1){3}}
+\multiput(-2,17)(0,2){2}{\vector(-1,0){4}}
+\put(4,16){$\vartheta $}
+}
+%vertical thermistor NTC
+\newcommand{\vntc}{
+\put(0,0){\line(0,1){5}}
+\put(-2,5){\framebox(4,10){}\put(-2,10){\line(0,1){5}}}
+\put(4,6){\line(-1,1){8}}
+\put(4,3){\line(0,1){3}}
+\put(-2,17){\vector(-1,0){4}}
+\put(-6,19){\vector(1,0){4}}
+\put(4,16){$\vartheta $}
+}
+%vertical varistor
+\newcommand{\vvar}{
+\put(0,0){\line(0,1){5}}
+\put(-2,5){\framebox(4,10){}\put(-2,10){\line(0,1){5}}}
+\put(4,6){\line(-1,1){8}}
+\put(4,3){\line(0,1){3}}
+\put(4,16){$\rm U $}
+}
+%vertical photorezistor
+\newcommand{\vprez}{
+\put(0,0){\line(0,1){5}}
+\put(-2,5){\framebox(4,10){}\put(-2,10){\line(0,1){5}}}
+\multiput(-7,5)(0,2){2}{\vector(1,1){4}}
+}
+%horizontal peltier's cell
+\newcommand{\hpelt}{
+\put(0,0){\line(1,0){15}}
+\put(5,-2){\framebox(10,4){}\put(0,2){\line(1,0){5}}}
+\multiput(5.5,-2)(2,0){5}{$\prime $}
+}
+\endinput
+
diff --git a/macros/latex/contrib/eltex/eltex3.tex b/macros/latex/contrib/eltex/eltex3.tex
new file mode 100644
index 0000000000..5f0098a3e4
--- /dev/null
+++ b/macros/latex/contrib/eltex/eltex3.tex
@@ -0,0 +1,383 @@
+%%%%%%%%%%%special symbols%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%
+%%%%%%%%%%%%%%%%%%%%%%%%basic three-phase circuits%%%%%%%%%%%%%%%
+%%%%%%%%delta load, star load, star source%%%%%%%%%%%%%%%%%%%%
+%%%%%%%two ports, closed loop, unistor %%%%%%%%%%%%%%%%%%%
+\newcommand{\deltaload }{
+\put(0,0){
+\multiput(0,0)(10,17.5){2}{\line(3,5){5}}
+\multiput(6.8,7.2)(5.3,9){2}{\line(-5,3){4}}
+\multiput(6.8,7.2)(-4,2.4){2}{\line(3,5){5.3}}
+}
+\put(30,0){
+\multiput(0,0)(-10,17.5){2}{\line(-3,5){5}}
+\multiput(-6.8,7.2)(-5.3,9){2}{\line(5,3){4}}
+\multiput(-6.8,7.2)(4,2.4){2}{\line(-3,5){5.3}}
+}
+\put(0,0){\hrez{0}}
+}
+\newcommand{\starload }{
+\put(0,0){
+\multiput(0,0)(13,9.1){2}{\line(3,2){4}}
+\multiput(5.4,1)(9,6.1){2}{\line(-2,3){2.5}}
+\multiput(5.4,1)(-2.6,3.9){2}{\line(3,2){9}}
+}
+\put(34,0){
+\multiput(0,0)(-13,9.1){2}{\line(-3,2){4}}
+\multiput(-5.4,1)(-9,6.1){2}{\line(2,3){2.5}}
+\multiput(-5.4,1)(2.6,3.9){2}{\line(-3,2){9}}
+}
+\put(17,11.5){\vvrez{0}}
+\put(17,11.5){\node}
+}
+\newcommand{\starsource }{
+\put(0,0){
+\put(0,0){\line(3,2){17}}
+\put(7,4.9){\circle{9}}
+}
+\put(34,0){
+\put(0,0){\line(-3,2){17}}
+\put(-7,4.9){\circle{9}}
+}
+\put(17,11.5){\vwire{20}}
+\put(17,23){\circle{9}}
+\put(17,11.5){\node}
+}
+% network a%%
+\newcommand{\neta}{
+\multiput(0.5,0)(0,20){2}{\pin}
+\multiput(1,0)(0,20){2}{\hhrez{0}}
+\multiput(21.5,0)(0,20){2}{\pin}
+}
+% network b%%
+\newcommand{\netb}{
+\multiput(0.5,0)(0,20){2}{\pin}
+\put(1,20){\hhrez{0}}
+\put(1,0){\hwire{20}}
+\multiput(21.5,0)(0,20){2}{\pin}
+}
+% network c%%
+\newcommand{\netc}{
+\multiput(0.5,0)(0,20){2}{\pin}
+\multiput(1,0)(0,20){2}{\hhrez{0}}
+\put(21,0){\line(1,3){6.4}}
+\put(21,20){\line(1,-3){6.4}}
+\multiput(27.5,0)(0,20){2}{\pin}
+}
+\newcommand{\netd}{
+\multiput(0.5,0)(0,20){2}{\pin}
+\multiput(1,0)(0,20){2}{\hwire{5}}
+\multiput(6,0)(10,0){2}{\vvrez{0}}
+\multiput(16,0)(0,20){2}{\hwire{5}}
+\multiput(21.5,0)(0,20){2}{\pin}
+}
+% network e%%
+\newcommand{\nete}{
+\multiput(0.5,0)(0,20){2}{\pin}
+\put(1,20){\hhrez{0}}
+\put(1,0){\line(1,0){20,0}}
+\put(21,0){\line(1,3){6.4}}
+\put(21,20){\line(1,-3){6.4}}
+\multiput(27.5,0)(0,20){2}{\pin}
+}
+% transformer%%
+\newcommand{\tran}{
+\multiput(0.5,0)(0,20){2}{\pin}
+\multiput(1,0)(0,20){2}{\line(1,0){4}}
+\put(5,0){\vvind{R}{0}}
+\put(10,0){\vvind{L}{0}}
+\multiput(10,0)(0,20){2}{\line(1,0){4}}
+\multiput(14.8,0)(0,20){2}{\pin}
+}
+%I network%%
+\newcommand{\inet}{
+\multiput(0.5,0)(0,20){2}{\pin}
+\put(11.5,0){\vvrez{0}}
+\multiput(11.5,0)(0,20){2}{\node}
+\multiput(1,0)(0,20){2}{\hwire{20}}
+\multiput(21.5,0)(0,20){2}{\pin}
+}
+%Gamma network%%
+\newcommand{\gneta}{
+\multiput(0.5,0)(0,20){2}{\pin}
+\multiput(1,0)(0,20){2}{\hwire{5}}
+\put(6.5,20){\hhrez{0}}
+\put(6.5,0){\vvrez{0}}
+\multiput(6.5,0)(0,20){2}{\node}
+\put(6.5,0){\hwire{20}}
+\multiput(27,0)(0,20){2}{\pin}
+}
+\newcommand{\gnetb}{
+\multiput(0.5,0)(0,20){2}{\pin}
+\put(21,20){\hwire{5.5}}
+\put(1,20){\hhrez{0}}
+\put(21,0){\vvrez{0}}
+\multiput(21,0)(0,20){2}{\node}
+\put(1,0){\hwire{25.5}}
+\multiput(27,0)(0,20){2}{\pin}
+}
+%L network%%
+\newcommand{\lneta}{
+\multiput(0.5,0)(0,20){2}{\pin}
+\multiput(1,0)(0,20){2}{\hwire{5}}
+\put(6.5,0){\hhrez{0}}
+\put(6.5,0){\vvrez{0}}
+\multiput(6.5,0)(0,20){2}{\node}
+\put(6.5,20){\hwire{20}}
+\multiput(27,0)(0,20){2}{\pin}
+}
+\newcommand{\lnetb}{
+\multiput(0.5,0)(0,20){2}{\pin}
+\multiput(21,0)(0,20){2}{\hwire{5}}
+\put(1,0){\hhrez{0}}
+\put(21,0){\vvrez{0}}
+\multiput(21,0)(0,20){2}{\node}
+\put(1,20){\hwire{20}}
+\multiput(27,0)(0,20){2}{\pin}
+}
+%Pi network%%%%
+\newcommand{\pineta}{
+\multiput(0.5,0)(0,20){2}{\pin}
+\put(1,20){\hrez{0}}
+\multiput(6,0)(20,0){2}{\vvrez{0}}
+\multiput(6,0)(0,20){2}{\node}
+\multiput(26,0)(0,20){2}{\node}
+\multiput(31.5,0)(0,20){2}{\pin}
+\put(1,0){\hwire{30}}
+}
+\newcommand{\pinetb}{
+\multiput(0.5,0)(0,20){2}{\pin}
+\put(1,0){\hrez{0}}
+\multiput(6,0)(20,0){2}{\vvrez{0}}
+\multiput(6,0)(0,20){2}{\node}
+\multiput(26,0)(0,20){2}{\node}
+\multiput(31.5,0)(0,20){2}{\pin}
+\put(1,20){\hwire{30}}
+}
+%T network%%%%%
+\newcommand{\tneta}{
+\multiput(0.5,0)(0,20){2}{\pin}
+\multiput(1,20)(20,0){2}{\hhrez{0}}
+\put(21,0){\vvrez{0}}
+\multiput(21,0)(0,20){2}{\node}
+\multiput(41.5,0)(0,20){2}{\pin}
+\put(1,0){\hwire{40}}
+}
+\newcommand{\tnetb}{
+\multiput(0.5,0)(0,20){2}{\pin}
+\multiput(1,0)(20,0){2}{\hhrez{0}}
+\put(21,0){\vvrez{0}}
+\multiput(21,0)(0,20){2}{\node}
+\multiput(41.5,0)(0,20){2}{\pin}
+\put(1,20){\hwire{40}}
+}
+%lattice network%%%%%
+\newcommand{\xnet}[1]{
+\ifnum#1=1
+\multiput(0.5,0)(41.5,0){2}{\pin}
+\multiput(6,0)(0,35){2}{\hrez{0}}
+\put(18.5,15){\drez{U}{0}}
+\put(3.5,0){\dwire{U}{15}}
+\put(3.5,35){\drez{D}{0}}
+\put(23.5,15){\dwire{D}{15}}
+\multiput(0.5,35)(41.5,0){2}{\pin}
+\multiput(3.5,0)(35,0){2}{\node}
+\multiput(3.5,35)(35,0){2}{\node}
+\multiput(1.5,0)(34.5,0){2}{\hwire{5}}
+\multiput(1.5,35)(34.5,0){2}{\hwire{5}}
+\fi
+\ifnum#1=2
+\multiput(0.5,0)(41.5,0){2}{\pin}
+\put(6,35){\hrez{0}}
+\multiput(8,0)(8,0){4}{\hwire{6}}
+\multiput(3.5,0)(5,5){7}{\dwire{U}{4}}
+\put(3.5,35){\drez{D}{0}}
+\put(23.5,15){\dwire{D}{15}}
+\multiput(0.5,35)(41.5,0){2}{\pin}
+\multiput(3.5,0)(35,0){2}{\node}
+\multiput(3.5,35)(35,0){2}{\node}
+\multiput(1.5,0)(34.5,0){2}{\hwire{5}}
+\multiput(1.5,35)(34.5,0){2}{\hwire{5}}
+\fi
+}
+%bridget H network%%%
+\newcommand{\bhnet}{
+\multiput(0.5,0)(0,20){2}{\pin}
+\multiput(1,20)(20,0){2}{\hhrez{0}}
+\put(21,0){\vvrez{0}}
+\multiput(21,0)(0,20){2}{\node}
+\multiput(41.5,0)(0,20){2}{\pin}
+\multiput(1,0)(20,0){2}{\hhrez{0}}
+\multiput(11,-10)(0,40){2}{\hhrez{0}}
+\multiput(3.5,0)(35,0){2}{\node}
+\multiput(3.5,20)(35,0){2}{\node}
+\multiput(3.5,20)(35,0){2}{\vwire{10}}
+\multiput(3.5,-10)(35,0){2}{\vwire{10}}
+\multiput(3.5,30)(27.5,0){2}{\hwire{7.5}}
+\multiput(3.5,-10)(27.5,0){2}{\hwire{7.5}}
+}
+%H network%%%%
+\newcommand{\hnet}{
+\multiput(0.5,0)(0,20){2}{\pin}
+\multiput(1,20)(20,0){2}{\hhrez{0}}
+\put(21,0){\vvrez{0}}
+\multiput(21,0)(0,20){2}{\node}
+\multiput(41.5,0)(0,20){2}{\pin}
+\multiput(1,0)(20,0){2}{\hhrez{0}}
+}
+%bridget T network%%%
+\newcommand{\btnet}{
+\multiput(0.5,0)(0,20){2}{\pin}
+\multiput(1,20)(20,0){2}{\hhrez{0}}
+\put(21,0){\vvrez{0}}
+\multiput(21,0)(0,20){2}{\node}
+\multiput(41.5,0)(0,20){2}{\pin}
+\put(1,0){\hwire{40}}
+\put(11,30){\hhrez{0}}
+\multiput(3.5,20)(35,0){2}{\node}
+\multiput(3.5,20)(35,0){2}{\vwire{10}}
+\multiput(3.5,30)(27.5,0){2}{\hwire{7.5}}
+}
+%twin T network%%%
+\newcommand{\ttnet}{
+\multiput(0.5,0)(0,20){2}{\pin}
+\multiput(6,30)(24,0){2}{\hhrez{0}}
+\multiput(6,20)(24,0){2}{\hhrez{0}}
+\multiput(24,0)(8,0){2}{\vvrez{0}}
+\multiput(24,0)(0,20){2}{\node}
+\multiput(32,0)(0,30){2}{\node}
+\multiput(6,20)(44,0){2}{\node}
+\multiput(55.5,0)(0,20){2}{\pin}
+\put(1,0){\hwire{54}}
+\multiput(1,20)(49,0){2}{\hwire{5}}
+\multiput(26,20)(0,10){2}{\hwire{4}}
+\multiput(6,20)(44,0){2}{\vwire{10}}
+\put(32,20){\vwire{10}}
+}
+%gyrator%%%%
+\newcommand{\gyrator}{
+\multiput(0.5,0)(0,20){2}{\pin}
+\multiput(1,0)(0,20){2}{\hwire{5}}
+\multiput(6,0)(8,0){2}{\vwire{20}}
+\put(6,10){\oval(5,5)[r]}
+\put(14,10){\oval(5,5)[l]}
+\multiput(14,0)(0,20){2}{\hwire{5}}
+\multiput(19.5,0)(0,20){2}{\pin}
+}
+%closed loop in signal flow graph%%%
+\newcommand{\flow}[1]{
+\ifx#1U
+\put(0,0.5){\line(-1,1){4} }
+\put(0,0.5){\line(1,1){4} }
+\multiput(-4.1,4.5)(8.1,0){2}{\line(0,1){6} }
+\put(-4,10.5){\line(1,0){8} }
+\fi
+\ifx#1D
+\put(0,-0.5){\line(-1,-1){4} }
+\put(0,-0.5){\line(1,-1){4} }
+\multiput(-4.1,-4.5)(8.1,0){2}{\line(0,-1){6} }
+\put(-4,-10.5){\line(1,0){8} }
+\fi
+}
+%unistor%%%%%%
+\newcommand{\unistor}[1]{
+\ifx#1R %%right oriented
+\put(0,0){
+\put(0,0){\line(1,0){4.1} }
+\put(4,-0.8){$\triangleright$ }
+\put(5.5,0){\line(1,0){4.5} } }
+\fi
+\ifx#1L %%left oriented
+\put(0,0){
+\put(0,0){\line(1,0){4.1} }
+\put(3.85,-0.8){$\triangleleft$ }
+\put(5.5,0){\line(1,0){4.5} } }
+\fi
+\ifx#1U %%up oriented
+\put(0,0){
+\put(0,0){\line(0,1){4.1} }
+\put(-1.5,4){$\bigtriangleup$ }
+\put(0,6.4){\line(0,1){3.6} } }
+\fi
+\ifx#1D %%down oriented
+\put(0,0){
+\put(0,0){\line(0,1){4.1} }
+\put(-1.5,4.6){$\bigtriangledown$ }
+\put(0,6.4){\line(0,1){3.6} } }
+\fi
+}
+%%%%three phase symbol
+\newcommand{\threephase}[1]{
+ \ifx#1D
+\put(0,0){\line(1,2){2}} %delta
+\put(4,0){\line(-1,2){2}}
+\put(0,0){\line(1,0){4}}
+ \else \ifx#1S
+\put(0,0){\line(-2,1){4}} %starr
+\put(0,0){\line(2,1){4}}
+\put(0,0){\line(0,-1){4.75}}
+ \fi \fi
+}
+%%%%graetz rectifier symbol
+\newcommand{\rgraetz}{
+\put(0,0){\line(1,0){4}}
+\put(4,0){\line(1,1){6}}
+\put(4,0){\line(1,-1){6}}
+\put(16,0){\line(-1,1){6}}
+\put(16,0){\line(-1,-1){6}}
+\put(16,0){\line(1,0){4}}
+\put(10,6){\line(0,1){4}}
+\put(10,-6){\line(0,-1){4}}
+\put(6,0){\line(1,0){8}}
+\put(8,2){\line(0,-1){4}}
+\put(12,0){\line(-2,1){4}}
+\put(12,0){\line(-2,-1){4}}
+\put(12,2){\line(0,-1){4}}
+}
+%%%%single phase transformer symbol
+\newcommand{\trafo}[1]{
+ \ifx#1H
+\put(0,0){\line(1,0){3.5}}
+\put(15,0){\line(-1,0){4}}
+\multiput(6,0)(2.5,0){2}{\circle{5}}
+ \else \ifx#1V
+\put(0,0){\line(0,1){3.5}}
+\put(0,15){\line(0,-1){4}}
+\multiput(0,6)(0,2,5){2}{\circle{5}}
+ \fi \fi
+}
+%%%%engine
+\newcommand{\engine}[1]{
+\put(0,0){\circle{10}}
+\put(-1.5,1){$\rm M$}
+ \ifnum#1=0
+\put(-2,-2){\line(1,0){4}} %DC
+ \else \ifnum#1=1
+\put(0,-3){$\sim$} %AC 1 phase
+\put(-2,-3){$1$}
+ \else \ifnum#1=3
+\put(0,-3){$\sim$} %AC 3 phase
+\put(-2,-3){$3$}
+ \else \ifnum#1=4
+\put(-6,-3){\line(1,0){12}} %linear
+ \else \ifnum#1=5
+\put(-2,-1){\line(1,0){4}} %stepping
+\put(-2,-1){\line(0,-1){2}}
+\put(2,-1){\line(0,1){2}}
+ \fi \fi \fi \fi \fi
+}
+%%%%power generator
+\newcommand{\gener}[1]{
+\put(0,0){\circle{10}}
+\put(-1.5,1){$\rm G$}
+ \ifnum#1=0
+\put(-2,-2){\line(1,0){4}} %DC
+ \else \ifnum#1=1
+\put(0,-3){$\sim$} %AC 1 phase
+\put(-2,-3){$1$}
+ \else \ifnum#1=3
+\put(0,-3){$\sim$} %AC 3 phase
+\put(-2,-3){$3$}
+ \fi \fi \fi
+}
+\endinput
diff --git a/macros/latex/contrib/eltex/eltex4.tex b/macros/latex/contrib/eltex/eltex4.tex
new file mode 100644
index 0000000000..9aae23293a
--- /dev/null
+++ b/macros/latex/contrib/eltex/eltex4.tex
@@ -0,0 +1,142 @@
+%%%%electron tubes(diode, triode, pentode, heptode)%%%
+%cathode
+\newcommand{\cathode}{
+\put(0,0){\oval(6,6)[t]}
+\put(-3,-4){\line(0,1){4}}
+}
+%focus
+\newcommand{\focus}{
+\put(0,0){\oval(3,3)[t]}
+\put(-1.5,0){\line(0,-1){4}}
+\put(1.5,0){\line(0,-1){4}}
+}
+%grids in valve
+\newcommand{\gr}[1]{
+\multiput(0,0)(0,2.5){#1}{\multiput(0,0)(3,0){3}{\line(1,0){2}}}
+}
+%anode
+\newcommand{\anode}{
+\put(0,0){\line(1,0){5}}
+\put(2.5,0){\line(0,1){5}}
+ }
+%connection
+\newcommand{\conn}[1]{
+\ifnum#1=1 %right
+ \put(0,0){\line(1,2){2}}
+ \put(2,4){\line(0,1){6}}
+ \put(2,10){\line(-1,0){1}}
+\fi
+\ifnum#1=2 %right
+ \put(-1.5,0){\line(1,0){1.5}}
+ \put(0,0){\line(1,2){2}}
+ \put(2,4){\line(0,1){6}}
+ \put(2,10){\line(-1,0){1}}
+\fi
+\ifnum#1=3 %right
+ \put(0,0){\line(1,2){2}}
+ \put(2,4){\line(0,1){11}}
+ \put(2,15){\line(-1,0){1}}
+ \multiput(-8,7.5)(0,5){2}{\line(1,0){1}}
+ \put(-8,7.5){\line(0,1){5}}
+\fi
+\ifnum#1=4 %right
+ \put(-1.5,0){\line(1,0){1.5}}
+ \put(0,0){\line(1,2){2}}
+ \put(2,4){\line(0,1){11}}
+ \put(2,15){\line(-1,0){1}}
+ \multiput(-8,7.5)(0,5){2}{\line(1,0){1}}
+ \put(-8,7.5){\line(0,1){5}}
+\fi
+ }
+%tube outline
+\newcommand{\tout}[1]{
+\ifnum#1=1
+ \put(0,5){\oval(12,12)[b]}
+ \put(0,5){\oval(12,15)[t]}
+\fi
+\ifnum#1=2
+ \put(0,5){\oval(12,12)[b]}
+ \put(0,8){\oval(12,15)[t]}
+ \put(-6,5){\line(0,1){6}}
+ \put(6,5){\line(0,1){6}}
+\fi
+\ifnum#1=3
+ \put(0,5){\oval(12,12)[b]}
+ \put(0,13){\oval(12,15)[t]}
+ \put(-6,5){\line(0,1){11}}
+ \put(6,5){\line(0,1){11}}
+\fi
+}
+%%%heptode%%%%%
+\newcommand{\heptode}[3]{
+\ifx#1Y
+ \put(0,2){\focus}
+ \put(0,2){\focus}
+ \ifx#2Y \else \ifx#3Y %connection focus-grid
+ \put(3,2){\conn{4}}
+ \fi \fi
+\fi
+\ifx#2Y
+ \put(0,2){\cathode}
+\fi
+ \put(-4,7){\gr{5}}
+ \put(-2.5,19.5){\anode}
+\ifx#3Y %connection cathode-grid, g2-g4
+ \put(3,2){\conn{3}}
+\fi
+ \put(0,1){\tout{3}}
+}
+%%%tetrode%%%%%%
+\newcommand{\tetrode}[2]{
+\ifx#1Y
+ \put(0,2){\focus}
+\fi
+\ifx#2Y
+ \put(0,2){\cathode}
+\fi
+ \put(-4,7){\gr{2}}
+ \put(-2.5,14.5){\anode}
+ \put(0,1){\tout{2}}
+}
+%%%pentode%%%%%%
+\newcommand{\pentode}[3]{
+\ifx#1Y
+ \put(0,2){\focus}
+ \ifx#2Y \else \ifx#3Y %connection focus-grid
+ \put(3,2){\conn{2}}
+ \fi \fi
+\fi
+\ifx#2Y
+ \put(0,2){\cathode}
+\fi
+ \ifx#3Y %connection cathode-grid
+ \put(3,2){\conn{1}}
+ \fi
+ \put(-4,7){\gr{3}}
+ \put(-2.5,14.5){\anode}
+ \put(0,1){\tout{2}}
+}
+%%%triode%%%%%%
+\newcommand{\triode}[2]{
+\ifx#1Y
+ \put(0,2){\focus}
+\fi
+\ifx#2Y
+ \put(0,2){\cathode}
+\fi
+ \put(-4,7){\gr{1}}
+ \put(-2.5,10){\anode}
+ \put(0,1){\tout{1}}
+}
+%%%diode%%%%%%
+\newcommand{\diode}[2]{
+\ifx#1Y
+ \put(0,2){\focus}
+\fi
+\ifx#2Y
+ \put(0,2){\cathode}
+\fi
+ \put(-2.5,10){\anode}
+ \put(0,1){\tout{1}}
+}
+\endinput
diff --git a/macros/latex/contrib/eltex/eltex5.tex b/macros/latex/contrib/eltex/eltex5.tex
new file mode 100644
index 0000000000..a71b56bbd6
--- /dev/null
+++ b/macros/latex/contrib/eltex/eltex5.tex
@@ -0,0 +1,309 @@
+%%%%%%%%%%%other general purpose devices%%%%%%%%%%%
+%%%%%%%%%%%%%%%%%%%fuse, relay, light source, bell, buzzer, siren%%%%%%%
+%%%%%%%microphone, earphone, loudspeaker, crystal resonator, spark gap %
+%%%antenna, dipole, loop antenna, battery, glow lamp%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%%discharge lamp, fluorescent lamp,
+
+%%body of the sensor or converter
+\newcommand{\bodysen}{
+\multiput(0,0)(0,10){2}{\line(-1,0){20}}
+\put(0,0){\line(0,1){10}}
+\put(-20,0){\line(-1,1){5}}
+\put(-20,10){\line(-1,-1){5}}
+}
+
+%sensor
+\newcommand{\sensor}[1]{
+\put(0,0){\bodysen}
+\put(-12,4){#1}
+}
+
+%head
+\newcommand{\head}[1]{
+\put(0,0){\bodysen}
+ \ifnum#1=1 %%%%mechanical stereo receiving
+\put(-22,5){\vector(1,1){4}}
+\put(-22,5){\vector(1,-1){4}}
+\put(-22.5,2.5){\line(-1,-1){4}}
+ \fi \ifnum#1=2 %%%magnetic mono receiving
+\put(-12,5){\vector(1,0){4}}
+\put(-8,5){\oval(4,4)[r]}
+ \fi \ifnum#1=3 %%%magnetic mono recording
+\put(-12,5){\vector(-1,0){4}}
+\put(-8,5){\oval(4,4)[r]}
+ \fi \ifnum#1=4 %%%magnetic cleaning
+\put(-16,4){$\times $}
+\put(-8,5){\oval(4,4)[r]}
+ \fi \ifnum#1=5 %%%magnetic receiving, recording, cleaning
+\put(-12,5){\vector(-1,0){4}}
+\put(-12,5){\vector(1,0){4}}
+\put(-20,4){$\times $}
+\put(-8,5){\oval(4,4)[r]}
+ \fi \ifnum#1=6 %%%optical receiving
+\put(-12,5){\vector(1,0){4}}
+\multiput(-29,12)(2,2){2}{\vector(1,-1){4}}
+ \fi
+}
+
+
+
+
+%horizontal fuse
+\newcommand{\hfuse}{
+\put(0,0){\line(1,0){20}}
+\put(5,-2){\framebox(10,4){}}
+}
+%vertical fuse
+\newcommand{\vfuse}{
+\put(0,0){\line(0,1){20}}
+\put(-2,5){\framebox(4,10){}}
+}
+%horizontal relay
+\newcommand{\hrelay}{
+\multiput(0,0)(9,0){2}{\line(1,0){5}}
+\put(5,-5){\framebox(4,10){}}
+ }
+%vertical relay
+\newcommand{\vrelay}{
+\multiput(0,0)(0,9){2}{\line(0,1){5}}
+\put(-5,5){\framebox(10,4){}}
+ }
+%light source (general)
+\newcommand{\hlight}{
+\multiput(0,0)(15,0){2}{\line(1,0){5}}
+\put(10,0){\circle{10}}
+\put(6.5,3.5){\line(1,-1){7}}
+\put(13.5,3.5){\line(-1,-1){7}}
+}
+%light source (general)
+\newcommand{\vlight}{
+\multiput(0,0)(0,15){2}{\line(0,1){5}}
+\put(0,10){\circle{10}}
+\put(3.5,6.5){\line(-1,1){7}}
+\put(3.5,13.5){\line(-1,-1){7}}
+}
+% bell
+\newcommand{\bell}{
+\put(0,0){\line(0,1){2}}
+\put(4,0){\line(0,1){2}}
+\put(2,2){\oval(7,7)[t]}
+\put(-1.5,2){\line(1,0){7}}
+}
+% buzzer
+\newcommand{\buzzer}{
+\put(0,0){\line(0,1){2}}
+\put(4,0){\line(0,1){2}}
+\put(2,5){\oval(7,7)[b]}
+\put(-1.5,5){\line(1,0){7}}
+}
+%siren
+\newcommand{\siren}{
+\put(0,0){\line(0,1){2}}
+\put(4,0){\line(0,1){2}}
+\put(-2,2){\line(1,1){4}}
+\put(6,2){\line(-1,1){4}}
+\put(-2,2){\line(1,0){8}}
+}
+\newcommand{\microphone}[1]{
+\put(0,0){\circle{10}}
+ \ifx#1R %right
+\multiput(5,-5)(0.1,0){5}{\line(0,1){10}}
+ \fi \ifx#1L %left
+\multiput(-5,-5)(-0.1,0){5}{\line(0,1){10}}
+ \fi
+}
+%earphone
+\newcommand{\earphone}[1]{
+\put(-2.5,0){\framebox(5,7)}
+ \ifx#1R
+\multiput(2.5,-1)(0.1,0){10}{\line(0,1){9}}
+ \fi \ifx#1L
+\multiput(-2.5,-1)(-0.1,0){10}{\line(0,1){9}}
+ \fi
+}
+%loudspeaker
+\newcommand{\loudspeaker}[1]{
+\put(-2.5,0){\framebox(5,7)}
+ \ifx#1R
+\put(2.5,0){\line(1,-1){4}}
+\put(2.5,7){\line(1,1){4}}
+\put(6.5,-4){\line(0,1){15}}
+ \fi \ifx#1L
+\put(-2.5,0){\line(-1,-1){4}}
+\put(-2.5,7){\line(-1,1){4}}
+\put(-6.5,-4){\line(0,1){15}}
+ \fi
+}
+%vertical crystal rezonator
+\newcommand{\vcrystal}{
+\put(0,0){\line(0,1){5}}
+\put(-3,5){\line(1,0){6}}
+\put(-5,6){\framebox(10,2)}
+\put(-3,9){\line(1,0){6}}
+\put(0,9){\line(0,1){5}}
+}
+%horizontal crystal rezonator
+\newcommand{\hcrystal}{
+\put(0,0){\line(1,0){5}}
+\put(5,-3){\line(0,1){6}}
+\put(6,-5){\framebox(2,10)}
+\put(9,-3){\line(0,1){6}}
+\put(9,0){\line(1,0){5}}
+}
+%horizontal spark gap
+\newcommand{\hgap}{
+\put(0,0){\vector(1,0){3.5}}
+\put(10,0){\vector(-1,0){3.5}}
+}
+%vertical spark gap
+\newcommand{\vgap}{
+\put(0,0){\vector(0,1){3.5}}
+\put(0,10){\vector(0,-1){3.5}}
+}
+%antenna
+\newcommand{\antenna}[1]{
+\put(0,0){\line(0,1){20}}
+\put(0,13){\line(-1,2){3.5}}
+\put(0,13){\line(1,2){3.5}}
+ \ifnum#1=0 %transmiting
+\put(0,10){\vector(0,1){0}}
+ \fi
+ \ifnum#1=1 %receiving
+\put(0,5){\vector(0,-1){0}}
+ \fi
+ \ifnum#1=2 %transmission and receive alternate
+\put(0,10){\vector(0,1){0}}
+\put(0,4){\vector(0,-1){0}}
+ \fi
+ \ifnum#1=3 %transmission and receive simultaneous
+\put(0,7){\vector(0,1){0}}
+\put(0,7){\vector(0,-1){0}}
+ \fi
+}
+\newcommand{\dipole}[1]{
+\multiput(0,0)(5,0){2}{\line(0,1){5}}
+\multiput(-10,5)(15,0){2}{\line(1,0){10}}
+ \ifnum#1=0 %dipole
+ \fi
+ \ifnum#1=1 % folded dipole
+\put(-10,10){\line(1,0){25}}
+\multiput(-10,5)(25,0){2}{\line(0,1){5}}
+ \fi
+}
+\newcommand{\loopant}{
+\multiput(0,0)(5,0){2}{\line(0,1){5}}
+\put(0,5){\line(-1,1){12}}
+\put(5,5){\line(1,1){12}}
+\put(-12,17){\line(1,1){14.5}}
+\put(17,17){\line(-1,1){14.5}}
+}
+%galvanic cell
+\newcommand{\cell}[2]{
+ \ifx#1R %+ right
+ \put(0,0){\line(1,0){4.5}}
+ \put(4.5,-2.5){\line(0,1){5}}
+ \put(5.5,-5){\line(0,1){10}}
+ \put(5.5,0){\line(1,0){4.5}}
+ \put(0,2){$-$}
+ \put(7,2){$+$}
+ \ifx#2Y
+ \multiput(0,10)(0,-2){2}{\vector(1,-1){4}}
+ \fi
+ \fi
+ \ifx#1L %+left
+ \put(0,0){\line(1,0){4.5}}
+ \put(4.5,-5){\line(0,1){10}}
+ \put(5.5,-2.5){\line(0,1){5}}
+ \put(5.5,0){\line(1,0){4.5}}
+ \put(0,2){$+$}
+ \put(7,2){$-$}
+ \ifx#2Y
+ \multiput(10,10)(0,-2){2}{\vector(-1,-1){4}}
+ \fi
+ \fi
+ \ifx#1U %+up
+ \put(0,0){\line(0,1){4.5}}
+ \put(-2.5,4.5){\line(1,0){5}}
+ \put(-5,5.5){\line(1,0){10}}
+ \put(0,5.5){\line(0,1){4.5}}
+ \put(2,1){$-$}
+ \put(2,7.5){$+$}
+ \ifx#2Y
+ \multiput(-10,-2)(0,2){2}{\vector(1,1){4}}
+ \fi
+ \fi
+ \ifx#1D %+down
+ \put(0,0){\line(0,1){4.5}}
+ \put(-5,4.5){\line(1,0){10}}
+ \put(-2.5,5.5){\line(1,0){5}}
+ \put(0,5.5){\line(0,1){4.5}}
+ \put(2,1){$+$}
+ \put(2,7.5){$-$}
+ \ifx#2Y
+ \multiput(-10,12)(0,-2){2}{\vector(1,-1){4}}
+ \fi
+ \fi
+}
+
+%horizontal glow lamp
+\newcommand{\hglow}{
+\multiput(0,0)(13,0){2}{\line(1,0){7}}
+\multiput(7.5,0)(5,0){2}{\circle{1}}
+\multiput(7,-2)(6,0){2}{\line(0,1){4}}
+\put(9,-2.5){\circle*{1}}
+\put(10,0){\circle{10}}
+}
+%vertical glow lamp
+\newcommand{\vglow}{
+\multiput(0,0)(0,13){2}{\line(0,1){7}}
+\multiput(0,7.5)(0,5){2}{\circle{1}}
+\multiput(-2,7)(0,6){2}{\line(1,0){4}}
+\put(2.5,9){\circle*{1}}
+\put(0,10){\circle{10}}
+}
+
+%horizontal discharge lamp
+\newcommand{\hdlamp}{
+\multiput(0,0)(14,0){2}{\line(1,0){6}}
+\multiput(6.5,0)(7,0){2}{\circle{1}}
+\put(9,-1.5){\circle*{1}}
+\put(6,0){\oval(6,6)[l]}
+\put(14,0){\oval(6,6)[r]}
+\multiput(6,-3)(0,6){2}{\line(1,0){8}}
+}
+
+%vertical discharge lamp
+\newcommand{\vdlamp}{
+\multiput(0,0)(0,14){2}{\line(0,1){6}}
+\multiput(0,6.5)(0,7){2}{\circle{1}}
+\put(1.5,9){\circle*{1}}
+\put(0,6){\oval(6,6)[b]}
+\put(0,14){\oval(6,6)[t]}
+\multiput(-3,6)(6,0){2}{\line(0,1){8}}
+}
+
+%horizontal fluorescent lamp
+\newcommand{\hflamp}{
+\put(3,0){\oval(4,4)[r]}
+\multiput(0,-2)(0,4){2}{\line(1,0){3}}
+\put(17,0){\oval(4,4)[l]}
+\multiput(17,-2)(0,4){2}{\line(1,0){3}}
+\put(8,-1.5){\circle*{1}}
+\put(6,0){\oval(6,6)[l]}
+\put(14,0){\oval(6,6)[r]}
+\multiput(6,-3)(0,6){2}{\line(1,0){8}}
+}
+
+%vertical fluorescent lamp
+\newcommand{\vflamp}{
+\put(0,3){\oval(4,4)[t]}
+\multiput(-2,0)(4,0){2}{\line(0,1){3}}
+\put(0,17){\oval(4,4)[b]}
+\multiput(-2,17)(4,0){2}{\line(0,1){3}}
+\put(1.5,8){\circle*{1}}
+\put(0,6){\oval(6,6)[b]}
+\put(0,14){\oval(6,6)[t]}
+\multiput(-3,6)(6,0){2}{\line(0,1){8}}
+}
+
+\endinput
diff --git a/macros/latex/contrib/eltex/eltex6.tex b/macros/latex/contrib/eltex/eltex6.tex
new file mode 100644
index 0000000000..ce13ea3975
--- /dev/null
+++ b/macros/latex/contrib/eltex/eltex6.tex
@@ -0,0 +1,261 @@
+%%%%%%%%%%block diagram symbols%%%%%%
+\newcommand{\ptran}{ % communication transformer
+\put(0,0){\framebox(10,10){}}
+\multiput(2,2)(0,6){2}{\line(1,0){2}}
+\multiput(4,2)(2,0){2}{\line(0,1){6}}
+\multiput(6,2)(0,6){2}{\line(1,0){2}}
+}
+
+\newcommand{\fgen}[1]{ % fequency generator
+\put(0,0){\framebox(10,10){}}
+\put(3.5,6){$\rm G$}
+ \ifnum#1=1 %sine
+ \put(3.5,2){$\sim $}
+ \else \ifnum#1=2 %pulse
+\multiput(1.5,2)(4,0){2}{\line(1,0){2}}
+\multiput(3.5,2)(2,0){2}{\line(0,1){2}}
+\put(3.5,4){\line(1,0){2}}
+ \else \ifnum#1=3 %sine variable fraquency
+ \put(3.5,2){$\sim $}
+ \put(3.5,1.5){\vector(1,1){4}}
+ \fi \fi \fi
+}
+\newcommand{\converter}{ %converter
+\put(0,0){\framebox(10,10){}}
+\put(0,0){\line(1,1){10}}
+}
+\newcommand{\delay}{ % delay line
+\put(0,0){\framebox(10,10){}}
+\put(2,7){\line(1,0){6}}
+\multiput(2,6)(6,0){2}{\line(0,1){2}}
+}
+
+\newcommand{\amplifier}[1]{ %amplifier
+ \ifx#1R %right
+\put(0,0){\line(0,1){6}}
+\put(0,0){\line(3,2){4.5}}
+\put(0,6){\line(3,-2){4.5}}
+ \else \ifx#1L
+\put(0,0){\line(0,1){6}}
+\put(0,0){\line(-3,2){4.5}}
+\put(0,6){\line(-3,-2){4.5}}
+ \fi \fi
+}
+
+\newcommand{\filter}[1]{ %frequency filter
+\put(0,0){\framebox(10,10){}}
+ \ifnum#1=1 %low pass
+ \multiput(3.5,3)(0,3){2}{$\sim $}
+ \put(4.5,6){$\prime $}
+ \else \ifnum#1=2 %high pass
+ \multiput(3.5,3)(0,3){2}{$\sim $}
+ \put(4.5,3){$\prime $}
+ \else \ifnum#1=3 %band pass
+ \multiput(3.5,1)(0,3){3}{$\sim $}
+ \multiput(4.5,1)(0,6){2}{$\prime $}
+ \else \ifnum#1=4 %band stop
+ \multiput(3.5,1)(0,3){3}{$\sim $}
+ \put(4.5,4){$\prime $}
+ \fi \fi \fi \fi
+
+}
+
+\newcommand{\compressor}{ %compressor
+\put(0,0){\framebox(10,10){}}
+\put(6,0){\vector(1,0){0}}
+\put(1,2){\line(1,0){8}}
+\put(1,8){\line(2,-1){8}}
+}
+\newcommand{\expander}{ %expander
+\put(0,0){\framebox(10,10){}}
+\put(6,0){\vector(1,0){0}}
+\put(1,2){\line(1,0){8}}
+\put(1,4){\line(2,1){8}}
+}
+\newcommand{\deemphase}{ %deemphase
+\put(0,0){\framebox(10,10){}}
+\put(6,0){\vector(1,0){0}}
+\put(2,3){\oval(11,10)[rt]}
+}
+\newcommand{\preemphase}{ %preemphase
+\put(0,0){\framebox(10,10){}}
+\put(6,0){\vector(1,0){0}}
+\put(2,8){\oval(11,10)[rb]}
+}
+\newcommand{\artline}{ %artificial line
+\put(0,0){\framebox(10,10){}}
+\multiput(3.75,2.5)(0,5){2}{\line(1,0){2.5}}
+\put(5,2.5){\line(0,1){5}}
+}
+\newcommand{\corrector}[1]{ %corrector
+\put(0,0){\framebox(10,10){}}
+\multiput(1,2)(3,6){2}{\line(1,0){1}}
+\put(2,2){\line(1,3){2}}
+\multiput(7,2)(1,6){2}{\line(1,0){1}}
+\put(8,2){\line(0,1){6}}
+ \ifnum#1=1 %amplitude corrector
+\put(3.5,1){$\rm A$}
+ \else \ifnum#1=2 %phase corrector
+\put(3.5,2){$\varphi $}
+ \else \ifnum#1=3 %group delay corrector
+\put(3.5,1){$\Delta $}
+ \fi \fi \fi
+}
+\newcommand{\limiter}{ %limiter
+\put(0,0){\framebox(10,10){}}
+\multiput(3,2)(3,6){2}{\line(1,0){1}}
+\put(4,2){\line(1,3){2}}
+}
+
+\newcommand{\balance}{ %balance circuit
+\put(0,0){\framebox(10,10){}}
+\put(3,2){\line(1,0){4}}
+\put(5,2){\line(0,1){6}}
+}
+\newcommand{\termin}[1]{ %terminating set
+\put(0,0){\framebox(10,10){}}
+\put(2,5){\line(1,0){5}}
+\put(5,2){\line(0,1){6}}
+\multiput(5,2)(0,6){2}{\line(1,0){3}}
+\multiput(-5,5)(15,0){2}{\line(1,0){5}}
+\multiput(5,-5)(0,15){2}{\line(0,1){5}}
+ \ifnum#1=1
+\put(7,3.5){\line(0,1){3}}
+ \fi
+}
+\newcommand{\hybrid}{ %hybrid transformer
+\put(0,0){\framebox(10,10){}}
+\put(0,5){\line(1,1){5}}
+\put(0,5){\line(1,-1){5}}
+\put(5,0){\line(1,1){5}}
+\put(5,10){\line(1,-1){5}}
+\multiput(-5,5)(15,0){2}{\line(1,0){5}}
+\multiput(5,-5)(0,15){2}{\line(0,1){5}}
+}
+\newcommand{\modulator}{ %modulator
+\put(0,0){\framebox(20,10){}}
+\put(0,0){\line(1,1){10}}
+\put(10,10){\line(1,-1){10}}
+\multiput(-5,5)(25,0){2}{\line(1,0){5}}
+\put(10,-5){\line(0,1){5}}
+}
+\newcommand{\atenuator}{ %atenuator
+\put(0,0){\framebox(10,10){}}
+\put(3,4){$\rm dB$}
+}
+\newcommand{\carrier}[1]{ %carrier frequency
+ \ifnum#1=1
+\put(0,0){\vector(0,1){10}} %carrier
+ \else \ifnum#1=2
+\put(0,0){\vector(0,1){4}} %reduced career
+\multiput(0,5)(0,2){3}{\line(0,1){1}}
+ \else \ifnum#1=3
+\put(0,10){\vector(0,1){0}} %supressed career
+\multiput(0,0)(0,3){3}{\line(0,1){2}}
+ \fi \fi \fi
+}
+\newcommand{\freq}[1]{ %carrier frequency
+ \ifnum#1=1
+\put(0,0){\line(0,1){8}} %group pilot frequency
+\put(-1.5,8){$\triangle $}
+ \else \ifnum#1=2
+\put(0,0){\line(0,1){10}} %signalling frequency
+\put(0.05,8.3){$\triangleright $}
+ \else \ifnum#1=3
+\put(0,0){\line(0,1){8.5}} %measuring frequency
+\put(0,9.25){\circle{1.5} }
+ \fi \fi \fi
+}
+
+\newcommand{\pilot}[1]{ %pilot frequency
+\put(0,0){\line(0,1){13}} % 1 - basic group, 2= supergroup
+\put(-1.5,13){$\triangle $} % 3 - master group, 4 = supermaster group
+\multiput(-2,8)(0,1){#1}{\line(3,-1){4}}
+}
+\newcommand{\band}[1]{ %frequency band
+ \ifnum#1=1
+\put(0,0){\line(1,0){10}} %noninvert band
+\put(10,0){\line(0,1){5}}
+\put(0,0){\line(2,1){10}}
+ \else \ifnum#1=2
+\put(0,0){\line(1,0){10}} %-noninvert band
+\put(10,0){\line(0,-1){5}}
+\put(0,0){\line(2,-1){10}}
+ \else \ifnum#1=3
+\put(0,0){\line(1,0){10}} %inverted band
+\put(0,0){\line(0,1){5}}
+\put(10,0){\line(-2,1){10}}
+ \else \ifnum#1=4
+\put(0,0){\line(1,0){10}} %-inverted band
+\put(0,0){\line(0,-1){5}}
+\put(10,0){\line(-2,-1){10}}
+ \fi \fi \fi \fi
+}
+\newcommand{\ltran}[2]{ %direction light transmitter
+ \ifx#1R
+\put(0,0){\framebox(20,10){}} %right
+\put(3.5,4.5){$\bigtriangledown $}
+\put(3.5,3.6){\line(1,0){3}}
+\multiput(-5,2)(0,6){2}{\line(1,0){10}}
+\put(5,2){\line(0,1){6}}
+\put(15,5){\line(1,0){10}}
+\multiput(8,3)(0,3){2}{\vector(1,0){5}} %optical
+ \ifnum#2=1
+\put(8,1.5){\line(0,1){6}} %coherent
+ \fi
+ \fi \ifx#1L
+\put(0,0){\framebox(20,10){}} %left
+\put(13.5,4.5){$\bigtriangledown $}
+\put(13.5,3.6){\line(1,0){3}}
+\multiput(15,2)(0,6){2}{\line(1,0){10}}
+\put(15,2){\line(0,1){6}}
+\put(-5,5){\line(1,0){10}}
+\multiput(12,3)(0,3){2}{\vector(-1,0){5}} %optical
+ \ifnum#2=1
+\put(12,1.5){\line(0,1){6}} %coherent
+ \fi
+ \fi
+}
+\newcommand{\lrec}[2]{ %direction light receiver
+ \ifx#1R
+\put(0,0){\framebox(20,10){}} %right
+\put(3.5,4.5){$\bigtriangledown $}
+\put(3.5,3.6){\line(1,0){3}}
+\multiput(-5,2)(0,6){2}{\line(1,0){10}}
+\put(5,2){\line(0,1){6}}
+\put(15,5){\line(1,0){10}}
+\multiput(13,3)(0,3){2}{\vector(-1,0){5}} %optical
+ \ifnum#2=1
+\put(13,1.5){\line(0,1){6}} %coherent
+ \fi
+ \fi \ifx#1L
+\put(0,0){\framebox(20,10){}} %left
+\put(13.5,4.5){$\bigtriangledown $}
+\put(13.5,3.6){\line(1,0){3}}
+\multiput(15,2)(0,6){2}{\line(1,0){10}}
+\put(15,2){\line(0,1){6}}
+\put(-5,5){\line(1,0){10}}
+\multiput(7,3)(0,3){2}{\vector(1,0){5}} %optical
+ \ifnum#2=1
+\put(7,1.5){\line(0,1){6}} %coherent
+ \fi
+ \fi
+}
+
+\newcommand{\fibre}[1]{ %optical fibre
+\put(0,0){\line(1,0){20}} %general
+\put(10,0){\circle{10}}
+\multiput(7,-2)(2,0){2}{\vector(1,1){4}}
+ \ifx#1S
+ \put(20,-2.5){\line(1,0){4}} % single mode
+ \put(22,-2.5){\line(0,1){5}}
+ \put(20,0){\line(1,0){10}}
+ \else \ifx#1M
+ \multiput(20,-2.5)(4,0){2}{\line(1,0){2}} % multi mode
+ \multiput(22,-2.5)(2,0){2}{\line(0,1){5}}
+ \put(22,2.5){\line(1,0){2}}
+ \put(20,0){\line(1,0){10}}
+ \fi \fi
+
+}
+\endinput
diff --git a/macros/latex/contrib/eltex/eltex7.tex b/macros/latex/contrib/eltex/eltex7.tex
new file mode 100644
index 0000000000..d311940d5c
--- /dev/null
+++ b/macros/latex/contrib/eltex/eltex7.tex
@@ -0,0 +1,139 @@
+%%%%%%%%%%%%basic logical circuits%%%%%%%%%%
+%%%AND (NAND)
+\newcommand{\andnand}[3]{
+\put(0,0){\framebox(10,15){}}
+ \ifnum#1=2
+\multiput(0,5)(0,5){2}{\line(-1,0){5}} % 2 inputs
+ \else \ifnum#1=3
+\multiput(0,2.5)(0,5){3}{\line(-1,0){5}} % 3 inputs
+ \fi \fi
+ \ifnum#2=0
+\put(4,10){\&} % normal
+\ifx#3I
+\put(10.75,7.5){\circle{1.5}} %inverted output
+\put(11.5,7.5){\line(1,0){3}}
+ \else \ifx#3N
+\put(10,7.5){\line(1,0){5}} %noninverted output
+ \fi \fi
+ \else \ifnum#2=1
+\put(3,10){\&$\triangleright$} % power
+\ifx#3I
+\put(10.75,7.5){\circle{1.5}} %inverted output
+\put(11.5,7.5){\line(1,0){3}}
+ \else \ifx#3N
+\put(10,7.5){\line(1,0){5}} %noninverted output
+ \fi \fi
+ \else \ifnum#2=2
+\put(4,10){\&} %normal open collector
+\put(5,5){$\diamondsuit$}
+\put(5.5,4.5){\line(1,0){2}}
+\ifx#3I
+ \put(10.75,4.5){\circle{1.5}} %inverted output
+ \put(11.5,4.5){\line(1,0){3}}
+ \else \ifx#3N
+ \put(10,4.5){\line(1,0){5}} %noninverted output
+ \fi \fi
+ \else \ifnum#2=3
+\put(3,10){\&$\triangleright$} %power open collector
+\put(5,5){$\diamondsuit$}
+\put(5.5,4.5){\line(1,0){2}}
+\ifx#3I
+ \put(10.75,4.5){\circle{1.5}} %inverted output
+ \put(11.5,4.5){\line(1,0){3}}
+ \else \ifx#3N
+ \put(10,4.5){\line(1,0){5}} %noninverted output
+ \fi \fi
+ \fi \fi \fi \fi
+}
+%%%%%%OR (NOR)
+\newcommand{\ornor}[3]{
+\put(0,0){\framebox(10,15){}}
+ \ifnum#1=2
+\multiput(0,5)(0,5){2}{\line(-1,0){5}} % 2 inputs
+ \else \ifnum#1=3
+\multiput(0,2.5)(0,5){3}{\line(-1,0){5}} % 3 inputs
+ \fi \fi
+ \ifnum#2=0
+\put(4,10){$1$} % normal
+\ifx#3I
+\put(10.75,7.5){\circle{1.5}} %inverted output
+\put(11.5,7.5){\line(1,0){3}}
+ \else \ifx#3N
+\put(10,7.5){\line(1,0){5}} %noninverted output
+ \fi \fi
+ \else \ifnum#2=1
+\put(3,10){$1\triangleright$} % power
+\ifx#3I
+\put(10.75,7.5){\circle{1.5}} %inverted output
+\put(11.5,7.5){\line(1,0){3}}
+ \else \ifx#3N
+\put(10,7.5){\line(1,0){5}} %noninverted output
+ \fi \fi
+ \else \ifnum#2=2
+\put(4,10){$1$} %normal open collector
+\put(5,5){$\diamondsuit$}
+\put(5.5,4.5){\line(1,0){2}}
+\ifx#3I
+ \put(10.75,4.5){\circle{1.5}} %inverted output
+ \put(11.5,4.5){\line(1,0){3}}
+ \else \ifx#3N
+ \put(10,4.5){\line(1,0){5}} %noninverted output
+ \fi \fi
+ \else \ifnum#2=3
+\put(3,10){$1\triangleright$} %power open collector
+\put(5,5){$\diamondsuit$}
+\put(5.5,4.5){\line(1,0){2}}
+\ifx#3I
+ \put(10.75,4.5){\circle{1.5}} %inverted output
+ \put(11.5,4.5){\line(1,0){3}}
+ \else \ifx#3N
+ \put(10,4.5){\line(1,0){5}} %noninverted output
+ \fi \fi
+ \fi \fi \fi \fi
+
+}
+%%%inverter
+\newcommand{\invert}[2]{
+\put(0,0){\framebox(10,15){}}
+\put(0,7.5){\line(-1,0){5}} % 1 input
+ \ifnum#1=0
+\put(4,10){$1$} % normal
+\ifx#2I
+\put(10.75,7.5){\circle{1.5}} %inverted output
+\put(11.5,7.5){\line(1,0){3}}
+ \else \ifx#2N
+\put(10,7.5){\line(1,0){5}} %noninverted output
+ \fi \fi
+ \else \ifnum#1=1
+\put(3,10){$1\triangleright$} % power
+\ifx#2I
+\put(10.75,7.5){\circle{1.5}} %inverted output
+\put(11.5,7.5){\line(1,0){3}}
+ \else \ifx#2N
+\put(10,7.5){\line(1,0){5}} %noninverted output
+ \fi \fi
+ \else \ifnum#1=2
+\put(4,10){$1$} %normal open collector
+\put(5,5){$\diamondsuit$}
+\put(5.5,4.5){\line(1,0){2}}
+\ifx#2I
+ \put(10.75,4.5){\circle{1.5}} %inverted output
+ \put(11.5,4.5){\line(1,0){3}}
+ \else \ifx#2N
+ \put(10,4.5){\line(1,0){5}} %noninverted output
+ \fi \fi
+ \else \ifnum#1=3
+\put(3,10){$1\triangleright$} %power open collector
+\put(5,5){$\diamondsuit$}
+\put(5.5,4.5){\line(1,0){2}}
+\ifx#2I
+ \put(10.75,4.5){\circle{1.5}} %inverted output
+ \put(11.5,4.5){\line(1,0){3}}
+ \else \ifx#2N
+ \put(10,4.5){\line(1,0){5}} %noninverted output
+ \fi \fi
+ \fi \fi \fi \fi
+}
+
+
+\endinput
diff --git a/macros/latex/contrib/eltex/man_en.pdf b/macros/latex/contrib/eltex/man_en.pdf
new file mode 100644
index 0000000000..8d03bc2a1f
--- /dev/null
+++ b/macros/latex/contrib/eltex/man_en.pdf
Binary files differ
diff --git a/macros/latex/contrib/eltex/man_en.tex b/macros/latex/contrib/eltex/man_en.tex
new file mode 100644
index 0000000000..b3892d0071
--- /dev/null
+++ b/macros/latex/contrib/eltex/man_en.tex
@@ -0,0 +1,1052 @@
+\documentstyle[a4,bezier]{article}
+
+\input{eltex1}
+\input{eltex2}
+
+\begin{document}
+\section{The instructions for the using the macro eltex 2.0}
+This is the version 2.0 of the macro \verb?eltex? for the drawing the
+circuit diagrams in \LaTeX . Here is the several differences on the
+comparison with the previous version.
+In the version 2.0 are the circuit symbols accordingly IEC 617-1 to 11.
+Here is the helpful grid for the easier placing of the circuit symbols
+and also the commands for the circuit symbols are different
+then in the previous version.
+Old and new version are not compatible.
+The reason for it is that in the praxis the commands had many
+parameters and the labels with the fixed coordinates mostly had to be
+placed in the different place in the drawing. The new macro
+contains some frequently used symbols "two times"
+with the shorter and longer leads. This is time saving when you draw
+the circuit diagram.
+When you have only small area there is also the symbol with shorter
+lead. The circuit symbols were created on the actual use
+for the making the education materials in the communication technics,
+circuit theory and electronics area. The size of macro is 100kB.
+Not to occupy many RAM during the compilation, the
+circuit symbols are distributed into several files eltex1 ... eltex7
+accordingly the area of interest.
+So you can use only several files and not all files.
+
+This principle of the drawing the circuit diagrams is not comfortable,
+it would be better to create some interactive graphical editor with the
+saving the (eltex) commands to the file.
+
+
+
+
+\section{The description of the commands}
+\subsection{Basic}
+This circuit symbols are contained in macro \verb?\eltex1? \\
+
+\noindent
+\verb?\grid{x}{y}?
+The command creates the grid with the step 10mm.
+x - width of the picture in cm, y - height of the picture in cm,
+only natural number.
+
+\subsubsection{Sources}
+
+\verb?\hsourcev?
+Ideal voltage source horizontally oriented.
+
+\noindent
+\verb?\hhsourcev?
+Ideal voltage source with reduced leads horizontally oriented.
+
+\noindent
+\verb?\vsourcev?
+Ideal voltage source vertically oriented.
+
+\noindent
+\verb?\vvsourcev?
+Ideal voltage source with reduced leads vertically oriented.
+
+\noindent
+\verb?\dsourcev{x}?
+Ideal voltage source diagonally oriented, x - letter U -
+up oriented, D - down oriented.
+
+\noindent
+\verb?\hsourcec?
+Ideal current source horizontally oriented.
+
+\noindent
+\verb?\hhsourcec?
+Ideal current source with reduced leads horizontally oriented.
+
+\noindent
+\verb?\vsourcec?
+Ideal current source vertically oriented.
+
+\noindent
+\verb?\vvsourcec?
+Ideal current source with reduced leads vertically oriented.
+
+\noindent
+\verb?\dsourcec{x}?
+Ideal current source diagonally oriented, x - letter U -
+up oriented, D - down oriented.
+
+\subsubsection{Resistors}
+\verb?\hrez{n}?
+Resistor horizontally oriented. Number n determines the type of
+the resistor.
+0 - basic symbol
+1 to 6 variable value resistor,
+7 - nonlinear dependent resistor,
+
+\noindent
+\verb?\hhrez{n}?
+Resistor with reduced leads horizontally oriented.
+
+\noindent
+\verb?\vrez{n}?
+Resistor vertically oriented.
+
+\noindent
+\verb?\vvrez{n}?
+Resistor with reduced leads vertically oriented.
+
+\noindent
+\verb?\drez{x}{n}?
+Resistor diagonally oriented x - letter U -
+up oriented, D - down oriented, n - number - type of the symbol,
+
+\noindent
+\verb?\ddrez{x}{n}?
+Resistor with reduced leads diagonally oriented.
+
+
+\subsubsection{Capacitors}
+\verb?\hcap{n}?
+Capacitor horizontally oriented. Number n type of the symbol.
+0 - basic symbol
+1, 4 variable capacitor
+
+
+\noindent
+\verb?\hhcap{n}?
+Capacitor with reduced leads horizontally oriented.
+
+\noindent
+\verb?\vcap{n}?
+Capacitor horizontally oriented.
+
+\noindent
+\verb?\vvcap{n}?
+Capacitor with reduced leads vertically oriented.
+
+\noindent
+\verb?\dcap{x}{n}?
+Capacitor diagonally oriented. x letter - U up
+oriented, D down oriented, n number - type of the symbol.
+
+
+
+\subsubsection{Inductors}
+\verb?\hturn{x}{n}?
+Two turns horizontally oriented, x - letter - U position up oriented,
+D down, n = 0 basic symbol, n = 1 variable inductor.
+
+
+\noindent
+\verb?\vturn{x}{n}?
+Two turns vertically oriented, x - letter - L position left oriented,
+R right, n = 0 basic symbol, n = 1 variable inductor.
+
+
+\noindent
+\verb?\hind{x}{n}?
+Inductor horizontally oriented, x - letter - U position up,
+D down, n = 0 basic symbol, n = 1 variable inductor.
+
+\noindent
+\verb?\hhind{x}{n}?
+Inductor with reduced leads horizontally oriented.
+
+\noindent
+\verb?\vind{x}{n}?
+Inductor vertically oriented, x - letter - L left position,
+R right, n = 0 basic symbol, n = 1 variable inductor.
+
+
+\noindent
+\verb?\vvind{x}{n}?
+Inductor with reduced leads vertically oriented.
+
+
+\noindent
+\verb?\dind{x}{y}{n}?
+Inductor diagonally oriented, Bezier macro must be selected,
+x - letter - U symbol up oriented,
+D down, y - letter - L turns left oriented, R right,
+n = 0 basic symbol, n = 1 variable inductor.
+
+
+
+\subsubsection{Cores}
+\verb?\hcore{n}{x}?
+Core horizontally oriented, x - letter - core type I iron F ferrite, n
+- natural number - length of the symbol in mm for (I) case,
+or member of the dashed lines for (F) case.
+
+\noindent
+\verb?\vcore{n}{x}?
+Core vertically oriented.
+
+\noindent
+\verb?\dcore{x}{n}{y}?
+Core diagonally oriented, x - letter - U symbol up,
+D symbol down, n - natural number - length of the symbol for (I) case,
+or number of the dashed lines for (F) case,
+y - core type I iron F ferrite.
+
+
+\noindent
+\verb?\simb{n}?
+Symbols of the mutual orientation of winding,
+n number 1 $\bullet$, 2 = $\Box$, 3 =
+$\triangle $.
+
+
+\subsubsection{Switches}
+\verb?\hswitch{n}?
+Switch horizontally oriented, n=0 switched on, 1 off.
+
+\noindent
+\verb?\vswitch{n}?
+Switch vertically oriented, n=0 switched on, 1 off.
+
+
+\noindent
+\verb?\hoswitch{x}{n}?
+Overswitch horizontally oriented x - letter - R right,
+L left, n=0 switched on, 1 off.
+
+\noindent
+\verb?\voswitch{x}{n}?
+Overswitch vertically oriented , x - letter - symbol U up,
+D down, n=0 switched on, 1 off.
+
+\subsubsection{Basic symbols}
+\verb?\node?
+connection of the leads.
+
+\noindent
+\verb?\pin?
+terminal
+
+\noindent
+\verb?\hwire{n}?
+wire in horizontal position, n length of the symbol in mm.
+
+
+\noindent
+\verb?\vwire{n}?
+wire in vertical position, n length of the symbol in mm.
+
+\noindent
+\verb?\dwire{x}{n}?
+wire in the diagonal position, x letter - position U up , D
+down, n length of the symbol.
+
+\noindent
+\verb?\cloop{x}{y}?
+Symbol for the simple loop (mesh), x letter- R clockwise orientation,
+L anticlockwise, y - text- label of the loop.
+
+\noindent
+\verb?\earth{x}?
+Earth, x - letter - position D down, U up, L left, R right.
+
+
+\noindent
+\verb?\chassis{x}?
+Chassis, x - letter - position D down, U up, L left, R right.
+
+
+\noindent
+\verb?\hmeasure{x}?
+Measuring instrument indicating horizontally oriented,
+x - text - symbol of the measured quantity.
+
+\noindent
+\verb?\hhmeasure{x}?
+Measuring instrument indicating horizontally oriented, reduced leads.
+
+\noindent
+\verb?\vmeasure{x}?
+Measuring instrument indicating vertically oriented,
+
+\noindent
+\verb?\vvmeasure{x}?
+Measuring instrument indicating vertically oriented, reduced leads.
+
+\noindent
+\verb?\osc{x}?
+Oscilloscope, x - letter - I indicating, R recording.
+
+\subsection{Semiconductors}
+
+This circuit symbols are contained in macro \verb?\eltex2? \\
+
+\noindent
+\verb?\graetz{x}?
+Diode bridge rectifier, x - letter - R plus pole right,
+L plus pole left.
+
+\noindent
+\verb?\hdiode{x}{y}?
+Diode horizontally oriented, x - letter - R cathode right, L
+cathode left, y - letter - C varicap, Z Zener diode, E Esaki diode, S
+Shottky diode, D LED, P photodiode, L laser diode,
+blanc letter - basic symbol,
+
+\noindent
+\verb?\vdiode{x}{y}?
+Diode vertically oriented, x - letter - U cathode up, D
+cathode down, y - letter - type of the diode.
+
+\noindent
+\verb?\ddiode{x}{y}?
+Diode diagonally oriented, x - letter - U symbol up,
+D down, y - letter - U cathode up, D down.
+
+
+\noindent
+\verb?\htriac{x}?
+Triac horizontally oriented, x - letter - gate
+A left down, B left up, C right down, D right up.
+
+
+\noindent
+\verb?\vtriac{x}?
+Triac vertically oriented, x - letter - gate
+A left down, B left up, C right down, D right up.
+
+
+\noindent
+\verb?\hthyristor{x}{y}?
+Thyristor horizontally oriented, x - letter - R cathode right, L
+left, y - gate
+A left down, B left up, C right down, D right up.
+
+
+\noindent
+\verb?\vthyristor{x}{y}?
+Thyristor vertically oriented, x - letter - U cathode up, D
+down, y - gate
+A left down, B left up, C right down, D right up.
+
+
+\noindent
+\verb?\dthyristor{x}{y}{z}?
+Thyristor diagonally oriented, x - letter - symbol U up,
+D down, y - U cathode up D down,
+z -gate
+A left down, B left up, C right down, D right up.
+
+
+\noindent
+\verb?\hdiac?
+Diac horizontally oriented.
+
+\noindent
+\verb?\vdiac?
+Diac vertically oriented.
+
+\noindent
+\verb?\opto{x}?
+Optocoupler horizontally oriented, x - letter - R
+transistor right, L left.
+
+\noindent
+\verb?\opamp{x}{y}?
+Operational amplifier, x - letter - output R right, L left,
+U up, D down, y - inverting input U up, D down, R
+right, L left.
+
+\noindent
+\verb?\ota{x}{y}{z}?
+Operational transconductance amplifier,
+x - letter - output R right, L left,
+U up, D down, y - inverting input U up, D down, R
+right, L left, z - letter Y OTA with linearising diodes, blanc -
+without diodes.
+
+\noindent
+\verb?\bota{x}{y}{z}?
+Balanced output transconductance amplifier, (x z y as in OTA)
+
+\noindent
+\verb?\bjt{x}{y}{z}{v}?
+Bipolar junction transistor, x - type of the conductivity
+N npn, P pnp, y -
+collector emitter R right, L left, U up, D down, z - emitter position
+R right, L left, U up, D down, v - symbol in the circle N no, Y yes.
+
+
+\noindent
+\verb?\jfet{x}{y}{z}{v}?
+JFET, x - letter - channel N or P, y - letter
+- position drain source R right, L left , U up, D down, z
+- letter - position source R right, L left, U up, D down, v -
+letter - circle Y yes, N (or blanc) no.
+
+
+\noindent
+\verb?\mos{x}{y}{z}{v}{w}{r}?
+MOS transistor, x - letter - channel N or P, y - letter
+- position drain source R right, L left , U up, D down, z
+- letter - position source R right, L left, U up, D down, v -
+letter - mode E enhancement, D depletion, w - number of the gates
+1 or 2, r - letter - circle Y yes, N (or blanc) no.
+
+\noindent
+\verb?\ujt{x}{y}{z}{v}?
+unijunction transistor (twobase diode),
+x - letter - emitter N or P, y - letter
+- circuit symbol position B1 B2, R right, L left , U up, D down, z
+- letter - position B1 - R right, L left, U up, D down, v -
+letter - circle Y yes, N (or blanc) no.
+
+\noindent
+\verb?\hall?
+Hall's generator
+
+\noindent
+\verb?\hmag?
+Magnistor horizontally.
+
+\noindent
+\verb?\vmag?
+Magnistor vertically.
+
+\noindent
+\verb?\hptc?
+Thermistor PTC horizontally.
+
+\noindent
+\verb?\vptc?
+Thermistor PTC vertically.
+
+\noindent
+\verb?\hntc?
+Thermistor NTC horizontally.
+
+\noindent
+\verb?\vntc?
+Thermistor NTC vertically.
+
+\noindent
+\verb?\hvar?
+Varistor horizontally.
+
+\noindent
+\verb?\var?
+Varistor vertically.
+
+\noindent
+\verb?\hprez?
+Photoresistor horizontally.
+
+\noindent
+\verb?\vprez?
+Photoresistor vertically.
+
+\noindent
+\verb?\hpelt?
+Peltier's cell horizontally.
+
+
+
+\subsection{Special circuits}
+
+This circuit symbols are contained in macro \verb?\eltex3? \\
+
+\noindent
+\verb?\deltaload? Load in the delta configuration.
+
+\noindent
+\verb?\starload? Load in the star configuration.
+
+\noindent
+\verb?\starsource? Sources in the star configuration.
+
+\noindent
+\verb?\neta \netb \netc \netd \nete? Elementary
+twoports configurations.
+
+\noindent
+\verb?\inet?
+I network.
+
+\noindent
+\verb?\gneta \gnetb?
+Gamma network.
+
+\noindent
+\verb?\lneta \lnetb?
+L network.
+
+\noindent
+\verb?\pineta \pinetb?
+$\pi$ network.
+
+\noindent
+\verb?\tneta \tnetb?
+T network.
+
+\noindent
+\verb?\xnet{n}?
+X network, n - number - 1 general impedances, 2
+symmetrical X network.
+
+\noindent
+\verb?\bhnet?
+Bridget H network.
+
+\noindent
+\verb?\hnet?
+H network.
+
+\noindent
+\verb?\btnet?
+Bridget T network.
+
+\noindent
+\verb?\ttnet?
+Double T network.
+
+\noindent
+\verb?\gyrator?
+Gyrator.
+
+\noindent
+\verb?\unistor{x}?
+Unistor, x - letter - orientation R right, L left, U up, D
+down.
+
+\noindent
+\verb?\flow{x}?
+Closed loop in the flowgraphs, x - letter - loop orientation U
+up, D down.
+
+\subsection{Electron tubes}
+
+This circuit symbols are contained in macro \verb?\eltex4? \\
+
+
+\noindent
+\verb?\diode{x}{y}?
+Diode, x - letter - filament Y yes, N (or blanc) no,
+y - letter - equipotential cathode Y yes, N (or blanc) no.
+
+\noindent
+\verb?\triode{x}{y}?
+Triode, x - letter - filament Y yes, N (or blanc) no,
+y - letter - equipotential cathode Y yes, N (or blanc) no.
+
+\noindent
+\verb?\tetrode{x}{y}?
+Tetrode, x - letter - filament Y yes, N (or blanc) no,
+y - letter - equipotential cathode Y yes, N (or blanc) no.
+
+\noindent
+\verb?\pentode{x}{y}{z}?
+Pentode, x - letter - filament Y yes, N (or blanc) no,
+y - letter - equipotential cathode Y yes, N (or blanc) no,
+z - letter - suppressor grid and cathode connection
+Y yes, N (or blanc) no.
+
+
+\noindent
+\verb?\heptode{x}{y}{z}?
+Heptode, x - letter - filament Y yes, N (or blanc) no,
+y - letter - equipotential cathode Y yes, N (or blanc) no,
+z - letter - cathode and
+suppressor grid and screen grids g2 and g4 connection Y yes,
+N (or blanc) no.
+
+
+\subsection{Other basic circuit symbols}
+
+This circuit symbols are contained in macro \verb?\eltex5? \\
+
+\noindent
+\verb?\hfuse?
+Fuse horizontally.
+
+\noindent
+\verb?\vfuse?
+Fuse vertically.
+
+
+\noindent
+\verb?\hrelay?
+Relay horizontally.
+
+
+\noindent
+\verb?\vrelay?
+Relay vertically.
+
+\noindent
+\verb?\hlight?
+Light source general (bulb) horizontally.
+
+\noindent
+\verb?\vlight?
+Light source general (bulb) vertically.
+
+
+\noindent
+\verb?\bell?
+Bell horizontally.
+
+\noindent
+\verb?\buzzer?
+Buzzer horizontally.
+
+
+\noindent
+\verb?\siren?
+Siren horizontally.
+
+
+\noindent
+\verb?\microphone{x}?
+Microphone, x - letter - R right oriented,
+L left.
+
+
+\noindent
+\verb?\earphone{x}?
+Eatrphone, x - letter - R right oriented,
+L left.
+
+\noindent
+\verb?\loudspeaker{x}?
+Loudspeaker, x - letter - R right oriented,
+L left.
+
+\noindent
+\verb?\hcrystal?
+Quartz crystall horizontally.
+
+\noindent
+\verb?\vcrystal?
+Crystall vertically.
+
+
+\noindent
+\verb?\hgap?
+Spark gap horizontally.
+
+\noindent
+\verb?\vgap?
+Spark gap vertically.
+
+
+\noindent
+\verb?\antenna{n}?
+Antenna, n - number - 0 transmitting, 1 receiving, 2 transmission
+and reception alternatively, 3 transmission and reception
+instantaneously.
+
+\noindent
+\verb?\dipole{n}?
+Dipole, n - number - 0 single dipole, 1 folded dipole.
+
+\noindent
+\verb?\loopant?
+Loop antenna.
+
+\noindent
+\verb?\cell{x}{y}?
+Galvanic cell horizontally or vertically,
+x - letter - plus pole R right, L left,
+U up, D down, y - letter - Y photocell, N (or blanc) galvanic cell.
+
+
+\noindent
+\verb?\hglow?
+Glow lamp horizontally.
+
+
+\noindent
+\verb?\vglow?
+Glow lamp vertically.
+
+\noindent
+\verb?\hdlamp?
+Discharge lamp horizontally.
+
+\noindent
+\verb?\vdlamp?
+Discharge lamp vertically.
+
+\noindent
+\verb?\hflamp?
+Fluorescent lamp horizontally.
+
+\noindent
+\verb?\vflamp?
+Fluorescent lamp vertically.
+
+
+\noindent
+\verb?\sensor{x}?
+Sensor of the quantity, output in the left. x - text - symbol of the
+quantity e. g. $\vartheta$ temperature.
+
+\noindent
+\verb?\head{n}?
+converter head, output on the left. n - number -1 mechanical stereo
+receiving,
+2 magnetic mono receiving, 3 magnetic mono recording,
+4 magnetic mono cleaning, 5 magnetic mono combined,
+6 optical receiving.
+
+
+\subsection{Block symbols}
+
+This circuit symbols are contained in macro \verb?\eltex6? \\
+
+\noindent
+\verb?\ptran?
+Transformer
+
+\noindent
+\verb?\fgen{n}?
+Wave generator, n - number - 1 sine-wave, 2 square-wave, 3 sine-wave
+with variable frequency.
+
+\noindent
+\verb?\delay?
+Delay line
+
+\noindent
+\verb?\amplifier{x}?
+Amplifier, x - letter - orientation R right, L left.
+
+\noindent
+\verb?\filter{n}?
+Frequency filter, n - number - 1 low pass, 2 high pass, 3
+band pass, 4 band stop.
+
+\noindent
+\verb?\compressor?
+Compressor.
+
+
+\noindent
+\verb?\expander?
+Expander.
+
+\noindent
+\verb?\deemphase?
+Filter deemphase.
+
+\noindent
+\verb?\preemphase?
+Filter preemphase.
+
+
+\noindent
+\verb?\artline?
+Artificial line.
+
+\noindent
+\verb?\converter?
+Converter.
+
+\noindent
+\verb?\corrector{n}?
+Corrector, n - number - 1 amplitude distortion corrector,
+2 phase corrector, 3 group delay corrector.
+
+\noindent
+\verb?\limiter?
+Limiter.
+
+\noindent
+\verb?\balance?
+Balance.
+
+\noindent
+\verb?\termin{n}?
+Termination set, n - number - 1 with balancing network,
+other number - without balancing network.
+
+\noindent
+\verb?\hybrid?
+Hybrid transformer.
+
+\noindent
+\verb?\modulator?
+Modulator.
+
+
+\noindent
+\verb?\atenuator?
+Attenuator.
+
+
+\noindent
+\verb?\carrier{n}?
+Carrier frequency, n - number - 1 carrier,
+2 partially supressed carrier, 3 supressed carrier.
+
+
+\noindent
+\verb?\freq{n}?
+Frequency, n - number - 1 pilot frequency,
+2 signalling frequency. 3 measuring frequency.
+
+\noindent
+\verb?\pilot{n}?
+Pilot frequency, n - 1 basic group, 2 super group,
+3 master group, 4 super master group.
+
+\noindent
+\verb?\band{n}?
+Frequency band, n - 1 frequency noninverted, 2 band ad 1
+phase inverted, 3 frequency inverted, 4 band ad 3 phase
+inverted.
+
+
+\noindent
+\verb?\ltran{x}{n}?
+Light transmitter, x - letter - light transmission
+R right, L left, n - number - light - 1 coherent,
+other number - uncoherent.
+
+
+\noindent
+\verb?\lrec{x}{n}?
+Light receiver, x - letter - light reception
+R right, L left, n - number - light 1 coherent,
+other number - uncoherent.
+
+
+\noindent
+\verb?\fibre{x}?
+Optical fibre, x - letter - S single mode step refraction index,
+M multi mode step refraction index, blank letter -
+general optical fibre.
+
+\noindent
+\verb?\threephase{x}?
+Three phase source, x - letter - D delta, S star.
+
+\noindent
+\verb?\rgraetz?
+Bridge rectifier.
+
+
+\noindent
+\verb?\trafo{x}?
+Single phase transformer, x - letter - position
+H horizontally, V vertically.
+
+
+\noindent
+\verb?\engine{n}?
+Engine, n - number - 0 direct current, 1 single phase,
+3 three phase ,
+4 linear, 5 stepping.
+
+\noindent
+\verb?\gener{n}?
+Generator, n - number - 0 direct current, 1 single phase,
+3 three phase.
+
+\subsection{Logical circuit}
+
+This circuit symbols are contained in macro \verb?\eltex7? \\
+
+\noindent
+\noindent
+\verb?\andnand{n}{m}{x}?
+Logical gate AND, n - number - number of inputs 2 two inputs, 3 three
+inputs,
+m - number - type of the gate 0 basic, 1 power, 2 basic with open
+collector, 3 power with open collector, x - letter - I
+inverted output, N noninverted output.
+
+
+\noindent
+\verb?\ornor{n}{m}{x}?
+Logical gate OR, n - number - number of inputs 2 two inputs, 3 three
+inputs,
+m - number - type of the gate 0 basic, 1 power, 2 basic with open
+collector, 3 power with open collector, x - letter - I
+inverted output, N noninverted output.
+
+\noindent
+\verb?\invert{m}{x}?
+Inverter,
+m - number - type of the gate 0 basic, 1 power, 2 basic with open
+collector, 3 power with open collector, x - letter - I
+inverted output, N noninverted output.
+
+
+
+\section{Using of the commands}
+It is necessary to select the
+macro \verb?eltex? a \verb?bezier? In the case of "old"
+\LaTeX 2.09 there are the commands:
+
+ \begin{verbatim}
+\documentstyle[a4,bezier]{article}
+\input{eltex1}
+% if you need also \input{eltex2} ..... \input{eltex7}
+\begin{document}
+
+\begin{figure}
+\begin{center}
+\begin{picture}(100,80)(0,0) % picture size 100 x 80 mm
+
+\grid{10}{8} % grid with the step 10 mm
+ % mesh is numbered in mm
+ % to make easy the orientation
+ % After finishing the picture
+ % you can cancel this command
+\put(30,30){\dind{U}{R}{1}}
+
+\end{picture}
+\end{center}
+\caption{\it Circuit diagram.}
+\label{fig:agic1}
+\end{figure}
+
+here is any text
+
+
+\end{document}
+
+\end{verbatim}
+
+In the case of \LaTeX 2e is used only different heading
+of the document.
+
+\section{Example}
+
+\begin{verbatim}
+\begin{figure}
+\begin{center}
+\begin{picture}(100,80)(0,0)
+\grid{10}{8}
+\put(40,40){\mos{N}{R}{D}{D}{2}{Y}}
+\put(10,40){\hcap{0}}
+\put(40,10){\vrez{0}}
+\put(40,40){\vrez{1}}
+\put(30,10){\vrez{0}}
+\put(30,40){\vrez{0}}
+\put(60,10){\vrez{0}}
+\put(70,10){\vcap{0}}
+\put(60,45){\vvind{R}{0}}
+\put(70,50){\vturn{L}{0}}
+\put(65,50){\vcore{3}{F}}
+\put(60,10){\chassis{D}}
+\put(60,65){\vwire{5}}
+\put(60,70){\hwire{30}}
+\put(60,40){\hwire{10}}
+\put(10,10){\hwire{80}}
+\put(70,50){\hwire{10}}
+\put(70,56){\hwire{10}}
+\put(10,70){\hwire{30}}
+\put(30,10){\node}
+\put(40,10){\node}
+\put(60,10){\node}
+\put(70,10){\node}
+\put(30,40){\node}
+\put(40,43.5){\node}
+\put(60,40){\node}
+\put(30,70){\node}
+\put(90.5,10){\pin}
+\put(80.5,50){\pin}
+\put(80.5,56){\pin}
+\put(90.5,70){\pin}
+\put(9,10){\pin}
+\put(9,70){\pin}
+\put(9,40){\pin}
+\put(20,45){$C_{1}$}
+\put(20,55){$R_{1}$}
+\put(20,25){$R_{2}$}
+\put(45,62){$R_{3}$}
+\put(45,25){$R_{4}$}
+\put(53,25){$R_{5}$}
+\put(75,25){$C_{2}$}
+\put(90,75){$+U_{CC}$}
+\put(9,75){$\pm U_{r}$}
+\end{picture}
+\end{center}
+\caption{\it Circuit diagram.}
+\label{fig:agic1}
+\end{figure}
+
+
+\end{verbatim}
+
+\begin{figure}
+\begin{center}
+\begin{picture}(100,80)(0,0)
+\grid{10}{8}
+\put(40,40){\mos{N}{R}{D}{D}{2}{Y}}
+\put(10,40){\hcap{0}}
+\put(40,10){\vrez{0}}
+\put(40,40){\vrez{1}}
+\put(30,10){\vrez{0}}
+\put(30,40){\vrez{0}}
+\put(60,10){\vrez{0}}
+\put(70,10){\vcap{0}}
+\put(60,45){\vvind{R}{0}}
+\put(70,50){\vturn{L}{0}}
+\put(65,50){\vcore{3}{F}}
+\put(60,10){\chassis{D}}
+\put(60,65){\vwire{5}}
+\put(60,70){\hwire{30}}
+\put(60,40){\hwire{10}}
+\put(10,10){\hwire{80}}
+\put(70,50){\hwire{10}}
+\put(70,56){\hwire{10}}
+\put(10,70){\hwire{30}}
+\put(30,10){\node}
+\put(40,10){\node}
+\put(60,10){\node}
+\put(70,10){\node}
+\put(30,40){\node}
+\put(40,43.5){\node}
+\put(60,40){\node}
+\put(30,70){\node}
+\put(90.5,10){\pin}
+\put(80.5,50){\pin}
+\put(80.5,56){\pin}
+\put(90.5,70){\pin}
+\put(9,10){\pin}
+\put(9,70){\pin}
+\put(9,40){\pin}
+\put(20,45){$C_{1}$}
+\put(20,55){$R_{1}$}
+\put(20,25){$R_{2}$}
+\put(45,62){$R_{3}$}
+\put(45,25){$R_{4}$}
+\put(53,25){$R_{5}$}
+\put(75,25){$C_{2}$}
+\put(90,75){$+U_{CC}$}
+\put(9,75){$\pm U_{r}$}
+\end{picture}
+\end{center}
+\caption{\it Circuit diagram.}
+\label{fig:agic1}
+\end{figure}
+
+
+
+
+
+
+\end{document}
diff --git a/macros/latex/contrib/eltex/pri_cz.pdf b/macros/latex/contrib/eltex/pri_cz.pdf
new file mode 100644
index 0000000000..2e59034e4c
--- /dev/null
+++ b/macros/latex/contrib/eltex/pri_cz.pdf
Binary files differ
diff --git a/macros/latex/contrib/eltex/pri_cz.tex b/macros/latex/contrib/eltex/pri_cz.tex
new file mode 100644
index 0000000000..3c7f6a408c
--- /dev/null
+++ b/macros/latex/contrib/eltex/pri_cz.tex
@@ -0,0 +1,1059 @@
+\documentstyle[a4,czech,bezier]{article}
+
+\input{eltex1}
+\input{eltex2}
+
+\begin{document}
+\section{Návod na použití makra eltex 2.0}
+Zde je návod na použití další verze makra \verb?eltex? pro kreslení
+elektrotechnických schémat v \LaTeX u. Od předchozí verze se liší tím,
+že je zde možnost vykreslení pomocného rastru pro snazší orientaci při
+umísťování součástek a také příkazy pro součástky mají trochu jinou
+syntaxi než v
+předchozí verzi. Tedy nová a stará verze jsou neslučitelné. Důvod pro
+změny je to, že se v praxi neosvědčila původní
+syntaxe příkazů - příliš mnoho parametrů (nepřehledné), popisky
+součástek jako parametry příkazů zbytečné - v mnoha případech bylo
+nutno umístit
+popisky do obrázku jinam než kam to umísťovaly parametry. Nové makro
+obsahuje některé hodně frekventované součástky \uv{dvakrát}
+liší se délkou vývodů. Tento
+zdánlivě zbytečný luxus. který zabírá paměť, se osvědčil.
+Většinou se ušetří čas při kreslení obrázku.
+V případě když je málo místa je k dispozici i součástka s
+kratšími vývody. Druhy značek vznikaly
+v makru podle skutečné potřeby při kreslení do skript, návodů na
+laboratorní cvičení a podobných materiálů z
+hlediska sdělovací techniky, teorie obvodů, elektroniky. Takový postup
+jsem volil proto, aby makro nebylo zbytečně velké a obsahovalo především
+to, co je třeba a nezatěžovalo paměť. Ale i tak je makro větší má 100kB.
+Aby zabralo co nejméně RAM paměti při spuštění překladu, tak jsou
+součástky rozděleny do několika souborů eltex1 až eltex7 podle tématu.
+Tak není třeba načítat celé makro, ale vždy jen to co momentálně
+potřebujeme. A tedy někdo
+může postrádat zrovna \uv{ty své} značky. Proti minulé verzi jsou kresleny
+schématické značky s ohledem na normu ČSN IEC 617-1 až 11 (1993 až 1995),
+která bohužel byla zrušena bez náhrady v roce 2005. Není tedy kreslení
+schématických značek určeno státem uznanou normou a stává se tak
+záležitostí firem.
+
+Uvedený princip kreslení neodpovídá příliš době
+grafického uživatelského rozhraní a chtělo by to spíš interaktivní
+\uv{malovátko} které pak do souboru uloží
+odpovídající posloupnost příkazů třeba makra \verb?eltex?.
+
+
+
+
+\section{Popis příkazů}
+\subsection{Základní značky}
+Tyto značky obsahuje makro \verb?\eltex1? \\
+
+\noindent
+\verb?\grid{x}{y}?
+generuje souřadnicovou síť pro obrázek s krokem 10mm.
+x - šířka obrázku v cm, y - výška obrázku v cm, jen celá čísla.
+
+\subsubsection{Zdroje}
+
+\verb?\hsourcev?
+Ideální napěťový zdroj v horizontální poloze.
+
+\noindent
+\verb?\hhsourcev?
+Ideální napěťový zdroj v horizontální poloze se zkrácenými
+vývody.
+
+\noindent
+\verb?\vsourcev?
+Ideální napěťový zdroj ve vertikální poloze.
+
+\noindent
+\verb?\vvsourcev?
+Ideální napěťový zdroj ve vertikální poloze se zkrácenými vývody.
+
+\noindent
+\verb?\dsourcev{x}?
+Ideální napěťový zdroj v diagonální poloze, x - poloha zdroje písmeno U -
+vpravo nahoru, D - vpravo dolů.
+
+\noindent
+\verb?\hsourcec?
+Ideální proudový zdroj v horizontální poloze.
+
+\noindent
+\verb?\hhsourcec?
+Ideální proudový zdroj v horizontální poloze se zkrácenými
+vývody.
+
+\noindent
+\verb?\vsourcec?
+Ideální proudový zdroj ve vertikální poloze.
+
+\noindent
+\verb?\vvsourcec?
+Ideální proudový zdroj ve vertikální poloze se zkrácenými vývody.
+
+\noindent
+\verb?\dsourcec{x}?
+Ideální proudový zdroj v diagonální poloze, x - poloha zdroje písmeno U -
+vpravo nahoru, D - vpravo dolů.
+
+\subsubsection{Rezistory}
+\verb?\hrez{n}?
+Rezistor v horizontální poloze. Číslo n udává typ rezistoru.
+0 - základní značka
+1 - rezistor nastavitelný nástrojem jezdec nahoře,
+2 - rezistor nastavitelný nástrojem jezdec dole,
+3 - rezistor nastavitelný nástrojem jezdec spojen s krajním vývodem,
+4 - rezistor proměnný jezdec nahoře,
+5 - rezistor proměnný jezdec dole,
+6 - rezistor proměnný jezdec spojen s krajním vývodem,
+7 - rezistor závislý na nějaké veličině,
+
+\noindent
+\verb?\hhrez{n}?
+Rezistor v horizontální poloze se zkrácenými vývody.
+
+\noindent
+\verb?\vrez{n}?
+Rezistor ve vertikální poloze.
+
+\noindent
+\verb?\vvrez{n}?
+Rezistor ve vertikální poloze se zkrácenými vývody.
+
+\noindent
+\verb?\drez{x}{n}?
+Rezistor v diagonální poloze. x - písmeno udává polohu rezistoru U -
+vpravo nahoru, D - vpravo dolů, n - číslo - typ rezistoru,
+
+\noindent
+\verb?\ddrez{x}{n}?
+Rezistor v diagonální poloze se zkrácenými vývody.
+
+
+\subsubsection{Kondenzátory}
+\verb?\hcap{n}?
+Kondenzátor v horizontální poloze. Číslo n udává typ kondenzátoru.
+0 - základní značka
+1 - kondenzátor nastavitelný nástrojem,
+4 - kondenzátor proměnný,
+
+\noindent
+\verb?\hhcap{n}?
+Kondenzátor v horizontální poloze se zkrácenými vývody.
+
+\noindent
+\verb?\vcap{n}?
+Kondenzátor ve vertikální poloze.
+
+\noindent
+\verb?\vvcap{n}?
+Kondenzátor ve vertikální poloze se zkrácenými vývody.
+
+\noindent
+\verb?\dcap{x}{n}?
+Kondenzátor v diagonální poloze. x písmeno - orientace značky U vpravo
+nahoru, D vpravo dolů, n číslo - typ.
+
+
+
+\subsubsection{Cívky}
+\verb?\hturn{x}{n}?
+Dva závity v horizontální poloze, x - písmeno - poloha závitů U nahoru,
+D dolů, n = 0 základní značka, n = 1 proměnná indukčnost nastavitelná
+nástrojem.
+
+\noindent
+\verb?\vturn{x}{n}?
+Dva závity ve vertikální poloze, x - písmeno - poloha závitů L vlevo,
+R vpravo, n = 0 základní značka, n = 1 proměnná indukčnost nastavitelná
+nástrojem.
+
+\noindent
+\verb?\hind{x}{n}?
+Cívka v horizontální poloze, x - písmeno - poloha závitů U nahoru,
+D dolů, n = 0 základní značka, n = 1 proměnná indukčnost nastavitelná
+nástrojem.
+
+\noindent
+\verb?\hhind{x}{n}?
+Cívka v horizontální poloze se zkrácenými vývody,
+
+\noindent
+\verb?\vind{x}{n}?
+Cívka ve vertikální poloze, x - písmeno - poloha závitů L vlevo,
+R vpravo, n = 0 základní značka, n = 1 proměnná indukčnost nastavitelná
+nástrojem.
+
+\noindent
+\verb?\vvind{x}{n}?
+Cívka ve vertikální poloze se zkrácenými vývody.
+
+
+\noindent
+\verb?\dind{x}{y}{n}?
+Cívka v diagonální poloze, Musí být zvoleno makro bezier,
+x - písmeno - poloha značky - U vpravo nahoru,
+D vpravo dolů, y - písmeno - poloha závitů L vlevo, R vpravo,
+n = 0 základní značka, n = 1 proměnná indukčnost nastavitelná
+nástrojem.
+
+
+\subsubsection{Jádra cívek a transformátorů}
+\verb?\hcore{n}{x}?
+Jádro v horizontální poloze, x - písmeno - typ jádra I železo F ferit, n
+- celé číslo - délka značky v mm pro (I), nebo počet čar pro (F).
+
+\noindent
+\verb?\vcore{n}{x}?
+Jádro ve vertikální poloze.
+
+\noindent
+\verb?\dcore{x}{n}{y}?
+Jádro v diagonální poloze, x - písmeno - orientace značky U vpravo
+nahoru, D vlevo dolů, n - celé číslo - délka značky v mm pro (I), nebo počet
+čar pro (F),
+y - typ jádra I železo F ferit.
+
+
+\noindent
+\verb?\simb{n}?
+Symboly vzájemné orientace vinutí, n je číslo 1 $\bullet$, 2 = $\Box$, 3 =
+$\triangle $.
+
+
+\subsubsection{Spínače}
+\verb?\hswitch{n}?
+spínač v horizontální poloze, číslo n=0 zapnuto, 1 vypnuto.
+
+\noindent
+\verb?\vswitch{n}?
+spínač ve vertikální poloze, číslo n=0 zapnuto, 1 vypnuto.
+
+
+\noindent
+\verb?\hoswitch{x}{n}?
+přepínač v horizontální poloze, x - písmeno - orientace značky R vpravo,
+L vlevo, číslo n=0 zapnuto, 1 vypnuto.
+
+\noindent
+\verb?\voswitch{x}{n}?
+přepínač ve vertikální poloze, x - písmeno - orientace značky U nahoru,
+D dolů, číslo n=0 zapnuto, 1 vypnuto.
+
+\subsubsection{Další základní značky}
+\verb?\node?
+vodivé spojení vodičů
+
+\noindent
+\verb?\pin?
+svorka
+
+\noindent
+\verb?\hwire{n}?
+vodič v horizontální poloze, n číslo udává délku v mm.
+
+
+\noindent
+\verb?\vwire{n}?
+vodič ve vertikální poloze, n číslo udává délku v mm.
+
+\noindent
+\verb?\dwire{x}{n}?
+vodič v diagonální poloze, x písmeno - poloha vodiče U vpravo nahoru, D
+vpravo dolů, n číslo udává délku v mm.
+
+\noindent
+\verb?\cloop{x}{y}?
+symbol orientace jednoduché smyčky, x písmeno - R orientace pravotočivá
+(ve směru hod. ručiček), L
+levotočivá, y - text- označení smyčky.
+
+\noindent
+\verb?\earth{x}?
+Uzemnění, x - písmeno - orientace značky D dolů, U nahoru, L vlevo, R
+vpravo.
+
+
+\noindent
+\verb?\chassis{x}?
+Spojení na kostru, x - písmeno - orientace značky D dolů, U nahoru, L vlevo, R
+vpravo.
+
+
+\noindent
+\verb?\hmeasure{x}?
+Měřicí přístroj ukazovací v horizontální poloze,
+x - napsat písmeno označující druh měřené veličiny.
+
+\noindent
+\verb?\hhmeasure{x}?
+Měřicí přístroj ukazovací v horizontální poloze se zkrácenými vývody.
+
+\noindent
+\verb?\vmeasure{x}?
+Měřicí přístroj ukazovací ve vertikální poloze.
+
+\noindent
+\verb?\vvmeasure{x}?
+Měřicí přístroj ukazovací ve vertikální poloze se zkrácenými vývody.
+
+\noindent
+\verb?\osc{x}?
+Osciloskop, x - písmeno - druh přístroje I ukazovací, R zapisovací.
+
+\subsection{Polovodiče}
+
+Tyto značky obsahuje makro \verb?\eltex2? \\
+
+\noindent
+\verb?\graetz{x}?
+Můstkový usměrňovač s diodami, x písmeno - orientace + pólu usměrňovače
+R vpravo, L vlevo.
+
+\noindent
+\verb?\hdiode{x}{y}?
+Dioda v horizontální poloze, x - písmeno - orientace katody R vpravo, L
+vlevo, y - písmeno - typ diody C varikap, Z Zenerova, E Esakiho, S
+Shottkyho, D svítivá LED, P fotodioda, L laserová,
+bez písmene - základní značka,
+
+\noindent
+\verb?\vdiode{x}{y}?
+Dioda ve vertikální poloze, x - písmeno - orientace katody U nahoru, D
+dolů, y - písmeno - typ diody.
+
+\noindent
+\verb?\ddiode{x}{y}?
+Dioda v diagonální poloze, x - písmeno - orientace značky U vpravo nahoru,
+D vpravo dolů, y - písmeno - poloha katody U nahoře, D dole.
+
+
+\noindent
+\verb?\htriac{x}?
+Triak v horizontální poloze, x - písmeno - orientace řídicí elektrody
+A vlevo dolů, B vlevo nahoru, C vpravo dolů, D vpravo nahoru.
+
+
+\noindent
+\verb?\vtriac{x}?
+Triak ve vertikální poloze, x - písmeno - orientace řídicí elektrody
+A vlevo dolů, B vlevo nahoru, C vpravo dolů, D vpravo nahoru.
+
+
+\noindent
+\verb?\hthyristor{x}{y}?
+Tyristor v horizontální poloze, x - písmeno - poloha katody R vpravo, L
+vlevo, y - písmeno poloha řídicí elektrody
+A vlevo dolů, B vlevo nahoru, C vpravo dolů, D vpravo nahoru.
+
+
+\noindent
+\verb?\vthyristor{x}{y}?
+Tyristor ve vertikální poloze, x - písmeno - poloha katody U nahoře, D
+dole, y - písmeno poloha řídicí elektrody
+A vlevo dolů, B vlevo nahoru, C vpravo dolů, D vpravo nahoru.
+
+
+\noindent
+\verb?\dthyristor{x}{y}{z}?
+Tyristor v diagonální poloze, x - písmeno - poloha značky U vpravo
+nahoru, D vpravo dolů, y - poloha katody U nahoru D dolů,
+z - písmeno poloha řídicí elektrody
+A vlevo dolů, B vlevo nahoru, C vpravo dolů, D vpravo nahoru.
+
+
+\noindent
+\verb?\hdiac?
+Diak v horizontální poloze
+
+\noindent
+\verb?\vdiac?
+Diak ve vertikální poloze
+
+\noindent
+\verb?\opto{x}?
+Optočlen v horizontální poloze, x - písmeno - poloha tranzistoru R
+vpravo, L vlevo.
+
+\noindent
+\verb?\opamp{x}{y}?
+Operační zesilovač, x - písmeno - poloha výstupu R vpravo, L vlevo,
+U nahoru, D dolů, y - poloha invertujícího vstupu U nahoře, D dole, R
+vpravo, L vlevo.
+
+\noindent
+\verb?\ota{x}{y}{z}?
+Operační transkonduktanční zesilovač,
+x - písmeno - poloha výstupu R vpravo, L vlevo,
+U nahoru, D dolů, y - poloha invertujícího vstupu U nahoře, D dole, R
+vpravo, L vlevo, z - písmeno Y s linearizačními diodami.
+
+\noindent
+\verb?\bota{x}{y}{z}?
+Operační transkonduktanční zesilovač se dvěma výstupy, (jako u OTA)
+
+\noindent
+\verb?\bjt{x}{y}{z}{v}?
+Bipolární tranzistor, x - vodivost N npn, P pnp, y - poloha značky
+kolektor emitor R vpravo, L vlevo, U nahoru, D dolů, z - poloha emitoru
+R vpravo, L vlevo, U nahoře, D dole, v - značka v kruhu N ne, Y ano.
+
+
+\noindent
+\verb?\jfet{x}{y}{z}{v}?
+Polem řízený tranzistor JFET, x - písmeno - kanál N nebo P, y - písmeno
+- poloha značky kolektor emitor R vpravo, L vlevo , U nahoru, D dolů, z
+- písmeno - poloha emitoru R vpravo, L vlevo, U nahoru, D dolů, v -
+písmeno - značka v kruhu Y ano, N ne.
+
+
+\noindent
+\verb?\mos{x}{y}{z}{v}{w}{r}?
+Polem řízený tranzistor MOSFET, x - písmeno - kanál N nebo P, y - písmeno
+- poloha značky kolektor emitor R vpravo, L vlevo , U nahoru, D dolů, z
+- písmeno - poloha emitoru R vpravo, L vlevo, U nahoru, D dolů, v -
+písmeno - typ režimu E obohacený, D ochuzený, w - číslo počet řídících
+elektrod 1 nebo 2, r - písmeno - značka v kruhu Y ano, N ne.
+
+\noindent
+\verb?\ujt{x}{y}{z}{v}?
+Jednopřechodový tranzistor UJT (dvoubázová dioda),
+x - písmeno - emitor N nebo P, y - písmeno
+- poloha značky B1 B2, R vpravo, L vlevo , U nahoru, D dolů, z
+- písmeno - poloha B1 R vpravo, L vlevo, U nahoru, D dolů, v -
+písmeno - značka v kruhu Y ano, N ne.
+
+\noindent
+\verb?\hall?
+Hallův generátor
+
+\noindent
+\verb?\hmag?
+Magnetorezistor horizontálně.
+
+\noindent
+\verb?\vmag?
+Magnetorezistor vertikálně.
+
+\noindent
+\verb?\hptc?
+Termistor PTC horizontálně.
+
+\noindent
+\verb?\vptc?
+Termistor PTC vertikálně.
+
+\noindent
+\verb?\hntc?
+Termistor NTC horizontálně.
+
+\noindent
+\verb?\vntc?
+Termistor NTC vertikálně.
+
+\noindent
+\verb?\hvar?
+Varistor horizontálně.
+
+\noindent
+\verb?\var?
+Varistor vertikálně.
+
+\noindent
+\verb?\hprez?
+Fotorezistor horizontálně.
+
+\noindent
+\verb?\vprez?
+Fotorezistor vertikálně.
+
+\noindent
+\verb?\hpelt?
+Peltierův článek horizontálně.
+
+
+
+\subsection{Speciální obvodové značky a útvary}
+
+Tyto značky obsahuje makro \verb?\eltex3? \\
+
+\noindent
+\verb?\deltaload? Zátěž zapojená do trojúhelníka.
+
+\noindent
+\verb?\starload? Zátěž zapojená do hvězdy.
+
+\noindent
+\verb?\starsource? Zdroje zapojené do hvězdy.
+
+\noindent
+\verb?\neta \netb \netc \netd \nete? Základní dvojbrany z obecných
+impedancí.
+
+\noindent
+\verb?\inet?
+Dvojbran I.
+
+\noindent
+\verb?\gneta \gnetb?
+Dvojbran gama.
+
+\noindent
+\verb?\lneta \lnetb?
+Dvojbran L.
+
+\noindent
+\verb?\pineta \pinetb?
+Dvojbran $\pi$.
+
+\noindent
+\verb?\tneta \tnetb?
+Dvojbran T.
+
+\noindent
+\verb?\xnet{n}?
+Můstkový dvojbran, n - číslo - 1 obecné impedance, 2 zkrácený symbol pro
+souměrný dvojbran.
+
+\noindent
+\verb?\bhnet?
+Přemostěný dvojbran H.
+
+\noindent
+\verb?\hnet?
+Dvojbran H.
+
+\noindent
+\verb?\btnet?
+Přemostěný dvojbran T.
+
+\noindent
+\verb?\ttnet?
+Dvojbran dvojité T.
+
+\noindent
+\verb?\gyrator?
+Gyrátor.
+
+\noindent
+\verb?\unistor{x}?
+Unistor, x - písmeno - orientace unistoru R vpravo, L vlevo, U nahoru, D
+dolů.
+
+\noindent
+\verb?\flow{x}?
+Uzavřená smyčka pro orientované grafy, x - písmeno - poloha smyčky U
+nahoru, D dolů.
+
+\subsection{Elektronky}
+
+Tyto značky obsahuje makro \verb?\eltex4? \\
+
+\noindent
+\verb?\diode{x}{y}?
+Dioda, x - písmeno - žhavení Y ano, N ne, y - písmeno - nepřímo žhavená
+katoda Y ano, N ne.
+
+\noindent
+\verb?\triode{x}{y}?
+Trioda, x - písmeno - žhavení Y ano, N ne,y - písmeno - nepřímo žhavená
+katoda Y ano, N ne.
+
+\noindent
+\verb?\tetrode{x}{y}?
+Tetroda, x - písmeno - žhavení Y ano, N ne,y - písmeno - nepřímo žhavená
+katoda Y ano, N ne.
+
+\noindent
+\verb?\pentode{x}{y}{z}?
+Pentoda, x - písmeno - žhavení Y ano, N ne, y - písmeno - nepřímo žhavená
+katoda Y ano, N ne, z - písmeno - spojení katody
+s brzdicí mřížkou Y ano, N ne.
+
+
+\noindent
+\verb?\heptode{x}{y}{z}?
+Heptoda, x - písmeno - žhavení Y ano, N ne, y - písmeno - nepřímo žhavená
+katoda Y ano, N ne, z - písmeno - spojení katody
+s brzdicí mřížkou a spojení stínicích mřížek g2 a g4, Y ano, N ne.
+
+
+\subsection{Další všeobecné značky}
+
+Tyto značky obsahuje makro \verb?\eltex5? \\
+
+\noindent
+\verb?\hfuse?
+Pojistka v horizontální poloze.
+
+\noindent
+\verb?\vfuse?
+Pojistka ve vertikální poloze.
+
+
+\noindent
+\verb?\hrelay?
+Relé v horizontální poloze.
+
+
+\noindent
+\verb?\vrelay?
+Relé ve vertikální poloze.
+
+\noindent
+\verb?\hlight?
+Světelný zdroj obecně (žárovka) horizontálně.
+
+\noindent
+\verb?\vlight?
+Světelný zdroj obecně (žárovka) vertikálně.
+
+
+\noindent
+\verb?\bell?
+Zvonek v horizontální poloze.
+
+\noindent
+\verb?\buzzer?
+Bzučák v horizontální poloze.
+
+
+\noindent
+\verb?\siren?
+Siréna v horizontální poloze.
+
+
+\noindent
+\verb?\microphone{x}?
+Mikrofon ve vertikální poloze, x - písmeno - R orientace značky vpravo,
+L vlevo.
+
+
+\noindent
+\verb?\earphone{x}?
+Sluchátko ve vertikální poloze, x - písmeno - R orientace značky vpravo,
+L vlevo.
+
+\noindent
+\verb?\loudspeaker{x}?
+Reproduktor ve vertikální poloze, x - písmeno - R orientace značky vpravo,
+L vlevo.
+
+\noindent
+\verb?\hcrystal?
+Krystal v horizontální poloze
+
+\noindent
+\verb?\vcrystal?
+Krystal ve vertikální poloze
+
+
+\noindent
+\verb?\hgap?
+Jiskřiště v horizontální poloze
+
+\noindent
+\verb?\vgap?
+Jiskřiště ve vertikální poloze
+
+
+\noindent
+\verb?\antenna{n}?
+Anténa, n - číslo - typ antény 0 vysílací, 1 přijímací, 2 vysílání a
+příjem střídavě, 3 vysílání a příjem současně,
+
+\noindent
+\verb?\dipole{n}?
+Anténa dipól, n - číslo - 0 jednoduchý dipól, 1 skládaný dipól.
+
+\noindent
+\verb?\loopant?
+Rámová anténa.
+
+\noindent
+\verb?\cell{x}{y}?
+Galvanický článek horizontálně nebo vertikálně,
+x - písmeno - R plus pól vpravo, L plus
+pól vlevo, U plus pól nahoře, D plus pól dole, y - písmeno - Y
+fotočlánek.
+
+
+\noindent
+\verb?\hglow?
+Doutnavka horizontálně.
+
+
+\noindent
+\verb?\vglow?
+Doutnavka vertikálně.
+
+\noindent
+\verb?\hdlamp?
+Výbojka horizontálně.
+
+\noindent
+\verb?\vdlamp?
+Výbojka vertikálně.
+
+\noindent
+\verb?\hflamp?
+Zářivka horizontálně.
+
+\noindent
+\verb?\vflamp?
+Zářivka vertikálně.
+
+\noindent
+\verb?\sensor{x}?
+Čidlo veličiny, výstup je vlevo. x - text - symbol příslušné veličiny
+např. $\vartheta$ teplota.
+
+\noindent
+\verb?\head{n}?
+hlava snímače, výstup je vlevo. n - číslo -1 mechanická stereo snímací,
+2 magnetická mono snímací, 3 magnetická mono zapisovací,
+4 magnetická mono mazací, 5 magnetická mono kombinovaná,
+6 optická snímací.
+
+
+
+
+
+\subsection{Blokové značky}
+
+Tyto značky obsahuje makro \verb?\eltex6? \\
+
+\noindent
+\verb?\ptran?
+Přenosový transformátor
+
+\noindent
+\verb?\fgen{n}?
+Generátor kmitů, n - číslo - 1 sinusový, 2 impulsní, 3 sinusový s
+proměnným kmitočtem.
+
+\noindent
+\verb?\delay?
+Zpožďovací linka
+
+\noindent
+\verb?\amplifier{x}?
+Zesilovač signálu, x - písmeno - směr zesílení R vpravo, L vlevo.
+
+\noindent
+\verb?\filter{n}?
+Kmitočtový filtr, n - číslo - 1 dolní propust, 2 horní propust, 3
+pásmová propust, 4 pásmová zádrž.
+
+\noindent
+\verb?\compressor?
+Kompresor dynamiky.
+
+
+\noindent
+\verb?\expander?
+Expandor dynamiky.
+
+\noindent
+\verb?\deemphase?
+Kmitočtový filtr deemfáze.
+
+\noindent
+\verb?\preemphase?
+Kmitočtový filtr preemphase.
+
+
+\noindent
+\verb?\artline?
+Umělé vedení.
+
+\noindent
+\verb?\converter?
+Měnič obecně.
+
+\noindent
+\verb?\corrector{n}?
+Korektor, n - číslo - 1 korektor amplitudového zkreslení, 2 korektor fáze, 3
+korektor skupinového zpoždění.
+
+\noindent
+\verb?\limiter?
+Omezovač.
+
+\noindent
+\verb?\balance?
+Vyvažovač.
+
+\noindent
+\verb?\termin{n}?
+Zakončovací sada (vidlice), n - číslo - 1 s vyvažovačem, jiné číslo -
+bez vyvažovače.
+
+\noindent
+\verb?\hybrid?
+Vidlicový transformátor (vidlice).
+
+\noindent
+\verb?\modulator?
+Modulátor.
+
+
+\noindent
+\verb?\atenuator?
+Útlumový článek.
+
+
+\noindent
+\verb?\carrier{n}?
+Nosný kmitočet, n - číslo - 1 plná nosná, 2 částečně potlačená, 3 úplně
+potlačená.
+
+
+\noindent
+\verb?\freq{n}?
+Kmitočet, n - číslo - 1 pilotní, 2 signalizační. 3 měřicí.
+
+\noindent
+\verb?\pilot{n}?
+Pilotní kmitočet, 1 primární skupina, 2 sekundární skupina, 3 terciální
+skupina, 4 kvartální skupina.
+
+\noindent
+\verb?\band{n}?
+Kmitočtové pásmo, n - číslo - 1 kmitočtově neinvertované, 2 pásmo ad 1
+fázově invertované, 3 kmitočtově invertované, 4 pásmo ad 3 fázově
+invertované.
+
+
+\noindent
+\verb?\ltran{x}{n}?
+Směrový vysílač světla, x - písmeno - orientace značky
+R vysílá světlo vpravo, L vlevo, n - číslo - druh světla 1 koherentní,
+jiné čislo - nekoherentní.
+
+
+\noindent
+\verb?\lrec{x}{n}?
+Směrový přijímač světla, x - písmeno - orientace značky
+R vysílá světlo vpravo, L vlevo, n - číslo - druh světla 1 koherentní,
+jiné číslo - nekoherentní.
+
+
+\noindent
+\verb?\fibre{x}?
+Optické vlákno, x - písmeno - druh vlákna S jednovidové s nespojitým
+indexem lomu, M mnohovidové s nespojitým indexem lomu, jiné písmeno -
+optické vlákno obecně.
+
+\noindent
+\verb?\threephase{x}?
+Značka zapojení třífázového zdroje, x - písmeno - D trojúhelník, S
+hvězda.
+
+\noindent
+\verb?\rgraetz?
+Můstkový usměrňovač.
+
+
+\noindent
+\verb?\trafo{x}?
+Jednofázový transformátor, x - písmeno - poloha značky
+H horizontální V vertikální.
+
+
+\noindent
+\verb?\engine{n}?
+Motor, n - číslo - 0 stejnosměrný, 1 jednofázový, 3 třífázový,
+4 lineární, 5 krokový.
+
+\noindent
+\verb?\gener{n}?
+Generátor, n - číslo - 0 stejnosměrný, 1 jednofázový, 3 třífázový.
+
+\subsection{Logické obvody}
+
+Tyto značky obsahuje makro \verb?\eltex7? \\
+
+\noindent
+\verb?\andnand{n}{m}{x}?
+Logické hradlo AND, n - číslo - počet vstupů 2 dva vstupy, 3 tři vstupy,
+m - číslo - typ hradla 0 základní, 1 výkonové, 2 základní s otevřeným
+kolektorem, 3 výkonové s otevřeným kolektorem, x - písmeno - I
+invertovaný výstup, N neinvertovaný výstup.
+
+
+\noindent
+\verb?\ornor{n}{m}{x}?
+Logické hradlo OR, n - číslo - počet vstupů 2 dva vstupy, 3 tři vstupy,
+m - číslo - typ hradla 0 základní, 1 výkonové, 2 základní s otevřeným
+kolektorem, 3 výkonové s otevřeným kolektorem, x - písmeno - I
+invertovaný výstup, N neinvertovaný výstup.
+
+\noindent
+\verb?\invert{m}{x}?
+Invertor,
+m - číslo - typ hradla 0 základní, 1 výkonové, 2 základní s otevřeným
+kolektorem, 3 výkonové s otevřeným kolektorem, x - písmeno - I
+invertovaný výstup, N neinvertovaný výstup.
+
+\section{Použití příkazů.}
+Je třeba načíst makro \verb?eltex? a \verb?bezier? Pro \uv{starý}
+\LaTeX 2.09 je pak struktura příkazů:
+
+ \begin{verbatim}
+\documentstyle[a4,bezier]{article}
+\input{eltex1}
+% podle potreby dale \input{eltex2} ..... \input{eltex8}
+\begin{document}
+
+\begin{figure}
+\begin{center}
+\begin{picture}(100,80)(0,0) % bude obrázek 100 x 80 mm
+
+\grid{10}{8} % nakreslí rastr s krokem 10 mm
+ % na plochu pro obrázek s čísly v mm
+ % pro usnadnění orientace při umístění
+ % součástek. Po dokončení obrázku lze
+ % příkaz smazat
+\put(30,30){\dind{U}{R}{1}}
+
+\end{picture}
+\end{center}
+\caption{\it Schéma zapojení.}
+\label{fig:agic1}
+\end{figure}
+
+tady nějaký text
+
+
+\end{document}
+
+\end{verbatim}
+
+Pro \uv{nový} \LaTeX 2e příkazy fungují stejně, akorát je jiná hlavička
+dokumentu.
+
+
+
+\section{Příklad.}
+
+
+\begin{verbatim}
+\begin{figure}
+\begin{center}
+\begin{picture}(100,80)(0,0)
+\grid{10}{8}
+\put(40,40){\mos{N}{R}{D}{D}{2}{Y}}
+\put(10,40){\hcap{0}}
+\put(40,10){\vrez{0}}
+\put(40,40){\vrez{1}}
+\put(30,10){\vrez{0}}
+\put(30,40){\vrez{0}}
+\put(60,10){\vrez{0}}
+\put(70,10){\vcap{0}}
+\put(60,45){\vvind{R}{0}}
+\put(70,50){\vturn{L}{0}}
+\put(65,50){\vcore{3}{F}}
+\put(60,10){\chassis{D}}
+\put(60,65){\vwire{5}}
+\put(60,70){\hwire{30}}
+\put(60,40){\hwire{10}}
+\put(10,10){\hwire{80}}
+\put(70,50){\hwire{10}}
+\put(70,56){\hwire{10}}
+\put(10,70){\hwire{30}}
+\put(30,10){\node}
+\put(40,10){\node}
+\put(60,10){\node}
+\put(70,10){\node}
+\put(30,40){\node}
+\put(40,43.5){\node}
+\put(60,40){\node}
+\put(30,70){\node}
+\put(90.5,10){\pin}
+\put(80.5,50){\pin}
+\put(80.5,56){\pin}
+\put(90.5,70){\pin}
+\put(9,10){\pin}
+\put(9,70){\pin}
+\put(9,40){\pin}
+\put(20,45){$C_{1}$}
+\put(20,55){$R_{1}$}
+\put(20,25){$R_{2}$}
+\put(45,62){$R_{3}$}
+\put(45,25){$R_{4}$}
+\put(53,25){$R_{5}$}
+\put(75,25){$C_{2}$}
+\put(90,75){$+U_{CC}$}
+\put(9,75){$\pm U_{r}$}
+\end{picture}
+\end{center}
+\caption{\it Schéma zapojení.}
+\label{fig:agic1}
+\end{figure}
+\end{verbatim}
+
+\begin{figure}
+\begin{center}
+\begin{picture}(100,80)(0,0)
+\grid{10}{8}
+\put(40,40){\mos{N}{R}{D}{D}{2}{Y}}
+\put(10,40){\hcap{0}}
+\put(40,10){\vrez{0}}
+\put(40,40){\vrez{1}}
+\put(30,10){\vrez{0}}
+\put(30,40){\vrez{0}}
+\put(60,10){\vrez{0}}
+\put(70,10){\vcap{0}}
+\put(60,45){\vvind{R}{0}}
+\put(70,50){\vturn{L}{0}}
+\put(65,50){\vcore{3}{F}}
+\put(60,10){\chassis{D}}
+\put(60,65){\vwire{5}}
+\put(60,70){\hwire{30}}
+\put(60,40){\hwire{10}}
+\put(10,10){\hwire{80}}
+\put(70,50){\hwire{10}}
+\put(70,56){\hwire{10}}
+\put(10,70){\hwire{30}}
+\put(30,10){\node}
+\put(40,10){\node}
+\put(60,10){\node}
+\put(70,10){\node}
+\put(30,40){\node}
+\put(40,43.5){\node}
+\put(60,40){\node}
+\put(30,70){\node}
+\put(90.5,10){\pin}
+\put(80.5,50){\pin}
+\put(80.5,56){\pin}
+\put(90.5,70){\pin}
+\put(9,10){\pin}
+\put(9,70){\pin}
+\put(9,40){\pin}
+\put(20,45){$C_{1}$}
+\put(20,55){$R_{1}$}
+\put(20,25){$R_{2}$}
+\put(45,62){$R_{3}$}
+\put(45,25){$R_{4}$}
+\put(53,25){$R_{5}$}
+\put(75,25){$C_{2}$}
+\put(90,75){$+U_{CC}$}
+\put(9,75){$\pm U_{r}$}
+\end{picture}
+\end{center}
+\caption{\it Schéma zapojení.}
+\label{fig:agic1}
+\end{figure}
+
+
+
+
+
+
+
+\end{document}
+