blob: 87242fd4d005fbedb877427f2f7b0374ec38cfc5 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
|
%%
%% This is file `settobox-example.tex',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% settobox.dtx (with options: `example')
%%
%% This is a generated file.
%%
%% Copyright (C) 2000, 2006-2008 by
%% Heiko Oberdiek <heiko.oberdiek at googlemail.com>
%%
%% This work may be distributed and/or modified under the
%% conditions of the LaTeX Project Public License, either
%% version 1.3c of this license or (at your option) any later
%% version. This version of this license is in
%% http://www.latex-project.org/lppl/lppl-1-3c.txt
%% and the latest version of this license is in
%% http://www.latex-project.org/lppl.txt
%% and version 1.3 or later is part of all distributions of
%% LaTeX version 2005/12/01 or later.
%%
%% This work has the LPPL maintenance status "maintained".
%%
%% This Current Maintainer of this work is Heiko Oberdiek.
%%
%% This work consists of the main source file settobox.dtx
%% and the derived files
%% settobox.sty, settobox.pdf, settobox.ins, settobox.drv,
%% settobox-example.tex.
%%
\documentclass{article}
\usepackage{settobox}
\usepackage{calc}
\newsavebox{\mybox}
\setlength{\fboxsep}{0pt}
\setlength{\parindent}{20pt}
\setlength{\parskip}{10pt}
\pagestyle{empty}
% \test{#1}
% The macro is called with commands in #1 that manipulates
% the box \mybox. These commands along with the result of
% the manipulation is shown. Thus the essence of the
% macro is:
%
% a) \sbox{\mybox}{The cracy fox.}
% b) #1 % manipulates \mybox
% c) Print #1 commands.
% d) Print box with frame
%
% The implemenation looks more weird:
\makeatletter
\newcommand*{\test}[1]{%
\par
\begingroup
\raggedright
\edef\x{\detokenize{#1}}%
\let\do\@makeother
\dospecials
\catcode`\~\active
\catcode`\ =10\relax
\def~{\\}%
\noindent
\texttt{\scantokens\expandafter{\x}}%
\par
\endgroup
\begingroup
\let~\relax
\sbox{\mybox}{The cracy fox.}%
#1%
A---\fbox{\usebox\mybox}---B%
\endgroup
\par
}
\makeatother
\begin{document}
\test{\setboxwidth{\mybox}{1.25\width}}
\test{\setboxheight{\mybox}{0pt}}
\test{\setboxheight{\mybox}{2\height}}
\test{\setboxdepth{\mybox}{\height}}
\test{\setboxmoveleft{\mybox}{5pt}}
\test{%
\setboxmoveleft{\mybox}{5pt}~%
\setboxwidth{\mybox}{\width + 5pt}%
}
\test{\setboxmoveright{\mybox}{0.5\width}}
\test{\setboxlower{\mybox}{\height}}
\test{\setboxraise{\mybox}{\depth}}
\test{%
\setboxmoveright{\mybox}{5pt}~%
\setboxwidth{\mybox}{\width + 5pt}~%
\setboxheight{\mybox}{\height + 5pt}~%
\setboxdepth{\mybox}{\depth + 5pt}%
}
\end{document}
\endinput
%%
%% End of file `settobox-example.tex'.
|
