summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/wargame/source/natoapp6c/echelon.dtx
diff options
context:
space:
mode:
Diffstat (limited to 'macros/latex/contrib/wargame/source/natoapp6c/echelon.dtx')
-rw-r--r--macros/latex/contrib/wargame/source/natoapp6c/echelon.dtx82
1 files changed, 82 insertions, 0 deletions
diff --git a/macros/latex/contrib/wargame/source/natoapp6c/echelon.dtx b/macros/latex/contrib/wargame/source/natoapp6c/echelon.dtx
new file mode 100644
index 0000000000..a63be2ae47
--- /dev/null
+++ b/macros/latex/contrib/wargame/source/natoapp6c/echelon.dtx
@@ -0,0 +1,82 @@
+% \iffalse
+% --------------------------------------------------------------------
+%<*natoapp6c>
+% \fi
+% \subsubsection{Echelons}
+%
+%
+% Dimensions
+%
+% \begin{macrocode}
+\def\n@to@pp@e@y{.12}
+\def\n@to@pp@e@yy{.24}
+% \end{macrocode}
+%
+% Paths as macros
+%
+% \begin{macrocode}
+\def\n@to@pp@e@d#1{($(#1*\n@to@pp@e@y,0)$) circle(0.09)}
+\def\n@to@pp@e@b#1{%
+ ($(#1*\n@to@pp@e@y,-\n@to@pp@e@y)$) -- ($(#1*\n@to@pp@e@y,\n@to@pp@e@y)$)}
+\def\n@to@pp@e@x#1{%
+ ($(-\n@to@pp@e@y,-\n@to@pp@e@y)+(#1*\n@to@pp@e@y,0)$)--
+ ++(\n@to@pp@e@yy,\n@to@pp@e@yy)
+ ($(-\n@to@pp@e@y, \n@to@pp@e@y)+(#1*\n@to@pp@e@y,0)$)--
+ ++(\n@to@pp@e@yy,-\n@to@pp@e@yy)}
+% \end{macrocode}
+%
+% Pictures
+%
+% \begin{macrocode}
+\tikzset{
+ pics/natoapp6c/s/echelon/.is choice,
+ pics/natoapp6c/s/echelon/squad/.style={code={
+ \path[draw,fill=pgfstrokecolor,pic actions]
+ \foreach \o in {0}{\n@to@pp@e@d{\o}};}},
+ pics/natoapp6c/s/echelon/section/.style={code={
+ \path[draw,fill=pgfstrokecolor,pic actions]
+ \foreach \o in {-1,1}{\n@to@pp@e@d{\o}};}},
+ pics/natoapp6c/s/echelon/platoon/.style={code={
+ \path[draw,fill=pgfstrokecolor,pic actions]
+ \foreach \o in {-2,0,2}{\n@to@pp@e@d{\o}};}},
+ pics/natoapp6c/s/echelon/company/.style={code={
+ \path[draw,pic actions]
+ \foreach \o in {0}{\n@to@pp@e@b{\o}};}},
+ pics/natoapp6c/s/echelon/battalion/.style={code={
+ \path[draw,pic actions]
+ \foreach \o in {-1,1}{\n@to@pp@e@b{\o}};}},
+ pics/natoapp6c/s/echelon/regiment/.style={code={
+ \path[draw,pic actions]
+ \foreach \o in {-2,0,2}{\n@to@pp@e@b{\o}};}},
+ pics/natoapp6c/s/echelon/brigade/.style={code={
+ \path[draw,pic actions]
+ \foreach \o in {0}{\n@to@pp@e@x{\o}};}},
+ pics/natoapp6c/s/echelon/division/.style={code={
+ \path[draw,pic actions]
+ \foreach \o in {-1,1}{\n@to@pp@e@x{\o}};}},
+ pics/natoapp6c/s/echelon/corps/.style={code={
+ \path[draw,pic actions]
+ \foreach \o in {-2,0,2}{\n@to@pp@e@x{\o}};}},
+ pics/natoapp6c/s/echelon/army/.style={code={
+ \path[draw,pic actions]
+ \foreach \o in {-3,-1,1,3}{\n@to@pp@e@x{\o}};}},
+ pics/natoapp6c/s/echelon/army group/.style={code={
+ \path[draw,pic actions]
+ \foreach \o in {-4,-2,0,2,4}{\n@to@pp@e@x{\o}};}},
+ pics/natoapp6c/s/echelon/theatre/.style={code={
+ \path[draw,pic actions]
+ \foreach \o in {-5,-3,-1,1,3,5}{\n@to@pp@e@x{\o}};}},
+ pics/natoapp6c/s/echelon/command/.style={code={
+ \path[draw,pic actions]
+ (-.3,-.1) -- (-.3,.1) (-.4, 0) -- (-.2, 0)
+ ( .3,-.1) -- ( .3,.1) ( .4, 0) -- ( .2, 0);}},
+ pics/natoapp6c/s/echelon/dummy/.style={code={%
+ \path[draw,pic actions] (M.north west) rectangle
+ ($(M.north east)+(0,.1)$);}},
+}
+% \end{macrocode}
+%
+% \iffalse
+% </natoapp6c>
+% --------------------------------------------------------------------
+% \fi