summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/source/latex/wargame/natoapp6c/frames/friendly.dtx
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/source/latex/wargame/natoapp6c/frames/friendly.dtx')
-rw-r--r--Master/texmf-dist/source/latex/wargame/natoapp6c/frames/friendly.dtx63
1 files changed, 61 insertions, 2 deletions
diff --git a/Master/texmf-dist/source/latex/wargame/natoapp6c/frames/friendly.dtx b/Master/texmf-dist/source/latex/wargame/natoapp6c/frames/friendly.dtx
index 22cb99cc974..7f44298a04e 100644
--- a/Master/texmf-dist/source/latex/wargame/natoapp6c/frames/friendly.dtx
+++ b/Master/texmf-dist/source/latex/wargame/natoapp6c/frames/friendly.dtx
@@ -200,8 +200,8 @@
\pgfdeclareshape{natoapp6c friendly equipment}{%
\inheritsavedanchors[from=natoapp6c base]
\savedanchor\northeast{%
- \pgf@x=\n@to@pp@r%
- \pgf@y=\n@to@pp@r}
+ \pgf@x=1.2\n@to@pp@r%
+ \pgf@y=1.2\n@to@pp@r}
\anchor{north east}{\northeast}
\anchor{north west}{\northeast\pgf@x=-\pgf@x}
\anchor{south east}{\northeast\pgf@y=-\pgf@y}
@@ -446,6 +446,65 @@
% \end{NatoAppFrame}
%
% \iffalse
+% ....................................................................
+% \fi
+% \begin{NatoAppFrame}{natoapp6c friendly dismounted}
+%
+% Macro for friendly dismounted command
+%
+% \begin{macrocode}
+\def\n@to@friendly@l@nd{%
+ \northeast \wg@tmpa=\pgf@x\wg@tmpb=\pgf@y%
+ \pgfpathmoveto{\pgfqpoint{ \wg@tmpa}{ \wg@tmpb}}%
+ \pgfpathlineto{\pgfqpoint{-\wg@tmpa}{ \wg@tmpb}}%
+ \pgfpathlineto{\pgfqpoint{-\wg@tmpa}{-\wg@tmpb}}%
+ \pgfpathlineto{\pgfqpoint{ \wg@tmpa}{-\wg@tmpb}}%
+ \pgfclosepath}
+% \end{macrocode}
+%
+% The friendly dismounted command. The most used command frame.
+%
+% \begin{macrocode}
+\def\n@to@pp@friendl@dismounted{%
+ \northeast\wg@tmpa=\pgf@x\wg@tmpb\pgf@y%
+ \pgfpathmoveto{\pgfpoint{-\wg@tmpa}{-.5\wg@tmpb}}%
+ \pgfpathlineto{\pgfpoint{-\wg@tmpa}{ .5\wg@tmpb}}%
+ \pgfpathlineto{\pgfpoint{0cm} { \wg@tmpb}}%
+ \pgfpathlineto{\pgfpoint{ \wg@tmpa}{ .5\wg@tmpb}}%
+ \pgfpathlineto{\pgfpoint{ \wg@tmpa}{-.5\wg@tmpb}}%
+ \pgfpathlineto{\pgfpoint{0cm} { -\wg@tmpb}}%
+ \pgfclosepath%
+}%
+\pgfdeclareshape{natoapp6c friendly dismounted}{%
+ \inheritsavedanchors[from=natoapp6c base]
+ \savedanchor\northeast{%
+ \pgf@x=1.1\n@to@pp@r%
+ \pgf@y=1.1\n@to@pp@r}
+ \anchor{north east}{\northeast}
+ \anchor{north west}{\northeast\pgf@x=-\pgf@x}
+ \anchor{south east}{\northeast\pgf@y=-\pgf@y}
+ \anchor{south west}{\northeast\pgf@x=-\pgf@x\pgf@y=-\pgf@y}
+ \anchor{north}{\northeast\pgf@x=0cm}
+ \anchor{south}{\northeast\pgf@x=0cm\pgf@y=-\pgf@y}
+ \anchor{east}{\northeast\pgf@y=0cm}
+ \anchor{west}{\northeast\pgf@x=-\pgf@x\pgf@y=0cm}
+ \inheritanchor[from=natoapp6c base]{upper}
+ \inheritanchor[from=natoapp6c base]{lower}
+ \inheritanchor[from=natoapp6c base]{left}
+ \inheritanchor[from=natoapp6c base]{right}
+ \inheritanchor[from=natoapp6c base]{center}
+ \backgroundpath{%
+ \n@to@pp@friendl@dismounted%
+ }
+ \behindforegroundpath{%
+ \n@to@pp@friendl@dismounted%
+ \pgfusepath{stroke}%
+ }
+}
+% \end{macrocode}
+% \end{NatoAppFrame}
+%
+% \iffalse
%</natoapp6c>
% --------------------------------------------------------------------
% \fi