summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/eltex
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2009-06-24 16:47:56 +0000
committerKarl Berry <karl@freefriends.org>2009-06-24 16:47:56 +0000
commit16219cfd92706d277d2e3363716e656d66bd7d75 (patch)
tree667d1cae291b1384d80e04c3beb3c6ae602f9f28 /Master/texmf-dist/tex/latex/eltex
parentc68f9012130bdc604769e59229abefc28ac1cf04 (diff)
new latex package eltex (23jun09)
git-svn-id: svn://tug.org/texlive/trunk@13945 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/eltex')
-rw-r--r--Master/texmf-dist/tex/latex/eltex/eltex1.tex829
-rw-r--r--Master/texmf-dist/tex/latex/eltex/eltex2.tex1261
-rw-r--r--Master/texmf-dist/tex/latex/eltex/eltex3.tex383
-rw-r--r--Master/texmf-dist/tex/latex/eltex/eltex4.tex142
-rw-r--r--Master/texmf-dist/tex/latex/eltex/eltex5.tex309
-rw-r--r--Master/texmf-dist/tex/latex/eltex/eltex6.tex261
-rw-r--r--Master/texmf-dist/tex/latex/eltex/eltex7.tex139
7 files changed, 3324 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/eltex/eltex1.tex b/Master/texmf-dist/tex/latex/eltex/eltex1.tex
new file mode 100644
index 00000000000..d2a9f82220f
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/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/Master/texmf-dist/tex/latex/eltex/eltex2.tex b/Master/texmf-dist/tex/latex/eltex/eltex2.tex
new file mode 100644
index 00000000000..24cc9ed0e57
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/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/Master/texmf-dist/tex/latex/eltex/eltex3.tex b/Master/texmf-dist/tex/latex/eltex/eltex3.tex
new file mode 100644
index 00000000000..5f0098a3e44
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/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/Master/texmf-dist/tex/latex/eltex/eltex4.tex b/Master/texmf-dist/tex/latex/eltex/eltex4.tex
new file mode 100644
index 00000000000..9aae23293a3
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/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/Master/texmf-dist/tex/latex/eltex/eltex5.tex b/Master/texmf-dist/tex/latex/eltex/eltex5.tex
new file mode 100644
index 00000000000..a71b56bbd6c
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/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/Master/texmf-dist/tex/latex/eltex/eltex6.tex b/Master/texmf-dist/tex/latex/eltex/eltex6.tex
new file mode 100644
index 00000000000..ce13ea3975a
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/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/Master/texmf-dist/tex/latex/eltex/eltex7.tex b/Master/texmf-dist/tex/latex/eltex/eltex7.tex
new file mode 100644
index 00000000000..d311940d5cc
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/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