16 files changed, 5455 insertions, 1 deletions
diff --git a/Master/texmf-dist/doc/latex/eltex/README b/Master/texmf-dist/doc/latex/eltex/README
new file mode 100644
index 00000000000..105a81b98d4
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/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/Master/texmf-dist/doc/latex/eltex/man_en.pdf b/Master/texmf-dist/doc/latex/eltex/man_en.pdf
new file mode 100644
index 00000000000..8d03bc2a1ff
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/eltex/man_en.pdf
diff --git a/Master/texmf-dist/doc/latex/eltex/man_en.tex b/Master/texmf-dist/doc/latex/eltex/man_en.tex
new file mode 100644
index 00000000000..68b12ed85a6
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/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/Master/texmf-dist/doc/latex/eltex/pri_cz.pdf b/Master/texmf-dist/doc/latex/eltex/pri_cz.pdf
new file mode 100644
index 00000000000..2e59034e4cd
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/eltex/pri_cz.pdf
diff --git a/Master/texmf-dist/doc/latex/eltex/pri_cz.tex b/Master/texmf-dist/doc/latex/eltex/pri_cz.tex
new file mode 100644
index 00000000000..2349b2faa08
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/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}
+
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
diff --git a/Master/tlpkg/bin/tlpkg-ctan-check b/Master/tlpkg/bin/tlpkg-ctan-check
index f3c77b07151..2d801d6d51c 100755
--- a/Master/tlpkg/bin/tlpkg-ctan-check
+++ b/Master/tlpkg/bin/tlpkg-ctan-check
@@ -84,7 +84,7 @@ my @WorkingTLP = qw(
           ebong ebsthesis eCards ecc ecclesiastic economic
           ecv ed edmac edmargin ednotes eemeir egameps
           egplot eiad eiad-ltx eijkhout
-          ellipsis elpres elsarticle elsevier elsevier-bib elvish
+          ellipsis elpres elsarticle elsevier elsevier-bib eltex elvish
           emptypage emulateapj emp encxvlna endfloat endheads
           engpron engrec enumitem envbig environ envlab
           epigrafica epigraph epiolmec eplain
diff --git a/Master/tlpkg/libexec/ctan2tds b/Master/tlpkg/libexec/ctan2tds
index 6d8a89a432f..fefa6f6a908 100755
--- a/Master/tlpkg/libexec/ctan2tds
+++ b/Master/tlpkg/libexec/ctan2tds
@@ -829,6 +829,7 @@ $standardtex='\.(cfg|sty|clo|ldf|cls|def|fd|cmap|4ht)$';
  'ecv',		'\.sty|\.cls|\.ldf',	# no docstrip.cfg, else system-wide
  'edmac',	'edmac.tex|edstanza.tex|\.sty',
  'eijkhout',	'\.tex',
+ 'eltex',	'eltex.*tex',
  'epsf',	'epsf.(tex|sty)',
  'epslatex-fr',	'NULL',
  'esint-type1',	'esint.tex',
diff --git a/Master/tlpkg/tlpsrc/collection-science.tlpsrc b/Master/tlpkg/tlpsrc/collection-science.tlpsrc
index 51345bb390b..e5188a4fda7 100644
--- a/Master/tlpkg/tlpsrc/collection-science.tlpsrc
+++ b/Master/tlpkg/tlpsrc/collection-science.tlpsrc
@@ -19,6 +19,7 @@ depend complexity
 depend computational-complexity
 depend digiconfigs
 depend dyntree
+depend eltex
 depend formula
 depend fouridx
 depend functan
diff --git a/Master/tlpkg/tlpsrc/eltex.tlpsrc b/Master/tlpkg/tlpsrc/eltex.tlpsrc
new file mode 100644
index 00000000000..e69de29bb2d
--- /dev/null
+++ b/Master/tlpkg/tlpsrc/eltex.tlpsrc