这以下代码@cis 做了一些奇妙的事情,它测量图片上两点之间的距离,然后在图片周围创建一个标尺。
\documentclass[a4paper, landscape]{article}
\usepackage[margin=2cm, showframe=false]{geometry}
\usepackage{mwe} % Dummy images
\usepackage{tikz}
\usetikzlibrary{calc}
\pgfkeys{/tikz/savevalue/.code 2 args={\global\edef#1{#2}}}
\def\ShowHelps{1} % 1 'yes' 0 'no'
\begin{document}
\centering\begin{tikzpicture}[font=\sffamily,
Help/.style={font=\Huge, red}
]
\node[anchor=south west,inner sep=0pt] (myimage) at (0,0) {
\IfFileExists{cmHgI.jpg}
{\includegraphics[scale=0.15]{cmHgI.jpg}}
{\includegraphics[width=0.75\textwidth]{example-image.jpg}}
};
\begin{scope}[x={(myimage.south east)},y={(myimage.north west)}]
% Restrict the draw area
\clip (0,0) rectangle (1,1);
% Frame around image - optional
\draw[] (0,0) rectangle (1,1); % optional
% CoSy inside node
\newcommand\ShowHelpCoSy{
\draw[help lines,xstep=.1,ystep=.1] (0,0) grid (1,1);
\foreach \x in {0,1,...,9} { \node[anchor=north] at (\x/10,0) {0.\x}; }
\foreach \y in {0,1,...,9} { \node[anchor=east] at (0,\y/10) {0.\y}; }
}
\ifnum\ShowHelps=1 \ShowHelpCoSy \fi%
\ifnum\ShowHelps=1\fill[Help] (0.5,0.75) circle(3pt) node[above]{(0.5,0.75)};\fi% <-- Position Test
% Now the stuff:
\path[] (0.705,0.4) coordinate(U1) -- (0.705,0.519) coordinate(U2);
\ifnum\ShowHelps=1 \draw[Help] (U1) circle(2pt) node[label=left:U1]{} -- (U2) circle(2pt) node[label=left:U2]{};\fi % show unitlength line
\path let \p1=($(U2)-(U1)$) in
\pgfextra{ \pgfmathsetlengthmacro{\unitlength}{veclen(\x1,\y1)} }
[savevalue={\u}{\unitlength}];
\ifnum\ShowHelps=1 \node[Help] at (0.725,0.25) {unitlength U1U2 = \u}; \fi%<--- show unitlength
\ifnum\ShowHelps=1 \draw[blue, transform canvas={xshift=2mm}] (U1) -- +(0,\u);\fi % Test
% Small Ruler
\draw[very thick] (0.3,0.35) coordinate(A) -- +(0,3*\u);
\foreach \n in {0,1,...,3}{%%
\draw[very thick] ([yshift=\n*\u]A) -- +(-3mm,0) node[left]{\n}
\ifnum\n=0 node[anchor=west, right=3mm]{cm}\fi;
}%%
\foreach \n in {0.1,0.2,...,3}{%%
\draw[] ([yshift=\n*\u]A) -- +(-1.5mm,0);
}%%
% Image Ruler y
\draw[very thick] (0,0) coordinate(B) -- +(0,10*\u);
\foreach \n in {0,1,...,10}{%%
\draw[very thick] ([yshift=\n*\u]B) -- +(3mm,0) node[right]{
\ifnum\n=0 \else \ifnum\n=1 \n\,cm \else \n \fi\fi};
}%%
\foreach \n in {0.1,0.2,...,10}{%%
\draw[] ([yshift=\n*\u]B) -- +(1.5mm,0);
}%%
% Image Ruler x
\draw[very thick] (0,1) coordinate(C) -- (15*\u,1);
\foreach \n in {0,1,...,15}{%%
\pgfmathsetmacro\Color{\n<9 ? "black" : "white"}
\draw[very thick, \Color] ([xshift=\n*\u]C) -- +(0,-3mm) node[below, text=\Color, inner sep=1pt]{
\ifnum\n=0 \else \ifnum\n=1 \n\,cm \else \n \fi\fi};
}%%
\foreach \n in {0.1,0.2,...,15}{%%
\pgfmathsetmacro\Color{\n<9 ? "black" : "white"}
\draw[\Color] ([xshift=\n*\u]C) -- +(0,-1.5mm);
}%%
\end{scope}
\end{tikzpicture}
\end{document}
我的问题是:我们如何将其转换为宏,或者简化此代码片段,以便可以反复使用。
即,存在:
- 每页 1 张图片(页面上没有其他内容,页面紧紧围绕图片“裁剪”);
- 仅在第一张图片上测量距离(仅 1 次,用户将确定 U1 和 U2,以及它们之间的距离);
- 因此应该保存虚拟标尺的尺寸,并在每个后续图片上显示该尺寸(这很好,因为所有图片的尺寸都是均匀的)。
答案1
我不确定我是否理解,但要将代码应用于多幅图像,您可以使用循环foreach
:
\foreach \image/\rulerpos in {
{example-image-a}/{0.3,0.25},%
{example-image-b}/{0.8,0.25},%
{example-image-c}/{0.3,0.4},%
{AnotherPicture}/{0.1,0.1}%
}{
..........
..........
..........
}
第一个答案:
\documentclass[a4paper, landscape]{article}
\usepackage[margin=2cm, showframe=false]{geometry}
\usepackage{mwe} % Dummy images
\usepackage{tikz}
\usetikzlibrary{calc}
\pgfkeys{/tikz/savevalue/.code 2 args={\global\edef#1{#2}}}
\def\ShowHelps{0} % 1 'yes' 0 'no'
\begin{document}
\foreach \image/\rulerpos in {
{example-image-a}/{0.3,0.25},%
{example-image-b}/{0.8,0.25},%
{example-image-c}/{0.3,0.4},%
{AnotherPicture}/{0.1,0.1}%
}{%%%%%%%%%%%%%%%
\begin{center}
\begin{tikzpicture}[font=\sffamily,
Help/.style={font=\Huge, red}
]
\node[anchor=south west,inner sep=0pt] (myimage) at (0,0) {
\IfFileExists{\image.jpg}
{\includegraphics[width=0.75\textwidth]{\image.jpg}}
{\includegraphics[width=0.75\textwidth]{example-image.jpg}}
};
\begin{scope}[x={(myimage.south east)},y={(myimage.north west)}]
% Restrict the draw area
\clip (0,0) rectangle (1,1);
% Frame around image - optional
\draw[] (0,0) rectangle (1,1); % optional
% CoSy inside node
\newcommand\ShowHelpCoSy{
\draw[help lines,xstep=.1,ystep=.1] (0,0) grid (1,1);
\foreach \x in {0,1,...,9} { \node[anchor=north] at (\x/10,0) {0.\x}; }
\foreach \y in {0,1,...,9} { \node[anchor=east] at (0,\y/10) {0.\y}; }
}
\ifnum\ShowHelps=1 \ShowHelpCoSy \fi%
\ifnum\ShowHelps=1\fill[Help] (0.5,0.75) circle(3pt) node[above]{(0.5,0.75)};\fi% <-- Position Test
% Now the stuff:
\path[] (0.705,0.4) coordinate(U1) -- (0.705,0.519) coordinate(U2);
\ifnum\ShowHelps=1 \draw[Help] (U1) circle(2pt) node[label=left:U1]{} -- (U2) circle(2pt) node[label=left:U2]{};\fi % show unitlength line
\path let \p1=($(U2)-(U1)$) in
\pgfextra{ \pgfmathsetlengthmacro{\unitlength}{veclen(\x1,\y1)} }
[savevalue={\u}{\unitlength}];
\ifnum\ShowHelps=1 \node[Help] at (0.725,0.25) {unitlength U1U2 = \u}; \fi%<--- show unitlength
\ifnum\ShowHelps=1 \draw[blue, transform canvas={xshift=2mm}] (U1) -- +(0,\u);\fi % Test
% Small Ruler
\draw[very thick] (\rulerpos) coordinate(A) -- +(0,3*\u);
\foreach \n in {0,1,...,3}{%%
\draw[very thick] ([yshift=\n*\u]A) -- +(-3mm,0) node[left]{\n}
\ifnum\n=0 node[anchor=west, right=3mm]{cm}\fi;
}%%
\foreach \n in {0.1,0.2,...,3}{%%
\draw[] ([yshift=\n*\u]A) -- +(-1.5mm,0);
}%%
% Image Ruler x
\draw[very thick] (0,0) coordinate(B) -- +(0,10*\u);
\foreach \n in {0,1,...,10}{%%
\draw[very thick] ([yshift=\n*\u]B) -- +(3mm,0) node[right]{
\ifnum\n=0 \else \ifnum\n=1 \n\,cm \else \n \fi\fi};
}%%
\foreach \n in {0.1,0.2,...,10}{%%
\draw[] ([yshift=\n*\u]B) -- +(1.5mm,0);
}%%
% Image Ruler y
\draw[very thick] (0,1) coordinate(C) -- (15*\u,1);
\foreach \n in {0,1,...,15}{%%
\pgfmathsetmacro\Color{\n==\n ? "black" : "white"}
\draw[very thick, \Color] ([xshift=\n*\u]C) -- +(0,-3mm) node[below, text=\Color, inner sep=1pt]{
\ifnum\n=0 \else \ifnum\n=1 \n\,cm \else \n \fi\fi};
}%%
\foreach \n in {0.1,0.2,...,15}{%%
\pgfmathsetmacro\Color{\n==\n ? "black" : "white"}
\draw[\Color] ([xshift=\n*\u]C) -- +(0,-1.5mm);
}%%
\end{scope}
\end{tikzpicture}
\end{center}
\newpage
}%%%%%%%%%%%%%%%%%%%%%%%%
\end{document}
第二个答案:在此版本中,图像移至页面中心。
\documentclass[a4paper, landscape]{article}
\usepackage[margin=2cm, showframe=false]{geometry}
\usepackage{mwe} % Dummy images
\usepackage{tikz}
\usepackage{tikzpagenodes} % current page text area.center
\usetikzlibrary{calc}
\pgfkeys{/tikz/savevalue/.code 2 args={\global\edef#1{#2}}}
\def\ShowHelps{1} % 1 'yes' 0 'no'
\begin{document}
\foreach \image/\rulerpos/\captiontext in {
{example-image-a}/{0.3,0.25},%
%{example-image-b}/{0.8,0.25},%
%{example-image-c}/{0.3,0.4},%
%{cmHgI}/{0.1,0.1},%
{AnotherPicture}/{0.2,0.1}%
}{%%%%%%%%%%%%%%%
%\centering
\begin{tikzpicture}[
remember picture, overlay, % page center 1/3
shift={(current page.center)}, % page center 2/3
font=\sffamily,
Help/.style={font=\Huge, red}
]
\node[anchor=center, %south west,
inner sep=0pt] (myimage) at (0,0) {
\IfFileExists{\image.jpg}
{\includegraphics[width=0.75\textwidth]{\image.jpg}}
{\includegraphics[width=0.75\textwidth]{example-image.jpg}}
};
\begin{scope}[x={($2*(myimage.east)$)},y={($2*(myimage.north)$)},
shift={(myimage.south west)} % page center 3/3
]
% Restrict the draw area
\clip (0,0) rectangle (1,1);
% Frame around image - optional
\draw[] (0,0) rectangle (1,1); % optional
% CoSy inside node
\newcommand\ShowHelpCoSy{
\draw[help lines,xstep=.1,ystep=.1] (0,0) grid (1,1);
\foreach \x in {0,1,...,9} { \node[anchor=north] at (\x/10,0) {0.\x}; }
\foreach \y in {0,1,...,9} { \node[anchor=east] at (0,\y/10) {0.\y}; }
}
\ifnum\ShowHelps=1 \ShowHelpCoSy \fi%
\ifnum\ShowHelps=1\fill[Help] (0.5,0.75) circle(3pt) node[above]{(0.5,0.75)};\fi% <-- Position Test
% Now the stuff:
\path[] (0.705,0.4) coordinate(U1) -- (0.705,0.519) coordinate(U2);
\ifnum\ShowHelps=1 \draw[Help] (U1) circle(2pt) node[label=left:U1]{} -- (U2) circle(2pt) node[label=left:U2]{};\fi % show unitlength line
\path let \p1=($(U2)-(U1)$) in
\pgfextra{ \pgfmathsetlengthmacro{\unitlength}{veclen(\x1,\y1)} }
[savevalue={\u}{\unitlength}];
\ifnum\ShowHelps=1 \node[Help] at (0.725,0.25) {unitlength U1U2 = \u}; \fi%<--- show unitlength
\ifnum\ShowHelps=1 \draw[blue, transform canvas={xshift=2mm}] (U1) -- +(0,\u);\fi % Test
% Small Ruler
\draw[very thick] (\rulerpos) coordinate(A) -- +(0,3*\u);
\foreach \n in {0,1,...,3}{%%
\draw[very thick] ([yshift=\n*\u]A) -- +(-3mm,0) node[left]{\n}
\ifnum\n=0 node[anchor=west, right=3mm]{cm}\fi;
}%%
\foreach \n in {0.1,0.2,...,3}{%%
\draw[] ([yshift=\n*\u]A) -- +(-1.5mm,0);
}%%
% Image Ruler x
\draw[very thick] (0,0) coordinate(B) -- +(0,10*\u);
\foreach \n in {0,1,...,10}{%%
\draw[very thick] ([yshift=\n*\u]B) -- +(3mm,0) node[right]{
\ifnum\n=0 \else \ifnum\n=1 \n\,cm \else \n \fi\fi};
}%%
\foreach \n in {0.1,0.2,...,10}{%%
\draw[] ([yshift=\n*\u]B) -- +(1.5mm,0);
}%%
% Image Ruler y
\draw[very thick] (0,1) coordinate(C) -- (15*\u,1);
\foreach \n in {0,1,...,15}{%%
\pgfmathsetmacro\Color{\n==\n ? "black" : "white"}
\draw[very thick, \Color] ([xshift=\n*\u]C) -- +(0,-3mm) node[below, text=\Color, inner sep=1pt]{
\ifnum\n=0 \else \ifnum\n=1 \n\,cm \else \n \fi\fi};
}%%
\foreach \n in {0.1,0.2,...,15}{%%
\pgfmathsetmacro\Color{\n==\n ? "black" : "white"}
\draw[\Color] ([xshift=\n*\u]C) -- +(0,-1.5mm);
}%%
\end{scope}
\end{tikzpicture}
%\vspace*{\fill}
\newpage
}%%%%%%%%%%%%%%%%%%%%%%%%
\end{document}