Mercurial > hg > Members > atton > texts

annotate bachelor_middle_draft/eclbkbox.sty @ 10:17eed7d8faa8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add generated pdf that bachelor middle draft (with emblem)
author Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
date Sun, 26 Oct 2014 23:39:34 +0900
parents de0aa29cc3d5
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
7
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
1 % eclbkbox.sty by Hideki Isozaki, 1992
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
2 % Date: May 28, 1993
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
3
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
4 \newbox\bk@bxb
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
5 \newbox\bk@bxa
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
6 \newif\if@bkcont
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
7 \newif\ifbkcount
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
8 \newcount\bk@lcnt
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
9
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
10 \def\breakboxskip{2pt}
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
11 \def\breakboxparindent{1.8em}
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
12
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
13 \def\breakbox{\vskip\breakboxskip\relax
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
14 \setbox\bk@bxb\vbox\bgroup
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
15 \advance\linewidth -2\fboxrule
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
16 \advance\linewidth -2\fboxsep
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
17 \hsize\linewidth\@parboxrestore
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
18 \parindent\breakboxparindent\relax}
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
19
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
20 % \@tempdimb: amount of vertical skip
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
21 % between the first line (\bk@bxa) and the rest (\bk@bxb)
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
22 \def\bk@split{%
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
23 \@tempdimb\ht\bk@bxb % height of original box
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
24 \advance\@tempdimb\dp\bk@bxb
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
25 \setbox\bk@bxa\vsplit\bk@bxb to\z@ % split it
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
26 \setbox\bk@bxa\vbox{\unvbox\bk@bxa}% recover height & depth of \bk@bxa
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
27 \setbox\@tempboxa\vbox{\copy\bk@bxa\copy\bk@bxb}% naive concatenation
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
28 \advance\@tempdimb-\ht\@tempboxa
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
29 \advance\@tempdimb-\dp\@tempboxa}% gap between two boxes
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
30
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
31
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
32 % \@tempdima: height of the first line (\bk@bxa) + fboxsep
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
33 \def\bk@addfsepht{%
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
34 \setbox\bk@bxa\vbox{\vskip\fboxsep\box\bk@bxa}}
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
35
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
36 \def\bk@addskipht{%
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
37 \setbox\bk@bxa\vbox{\vskip\@tempdimb\box\bk@bxa}}
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
38
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
39 % \@tempdima: depth of the first line (\bk@bxa) + fboxsep
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
40 \def\bk@addfsepdp{%
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
41 \@tempdima\dp\bk@bxa
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
42 \advance\@tempdima\fboxsep
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
43 \dp\bk@bxa\@tempdima}
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
44
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
45 % \@tempdima: depth of the first line (\bk@bxa) + vertical skip
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
46 \def\bk@addskipdp{%
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
47 \@tempdima\dp\bk@bxa
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
48 \advance\@tempdima\@tempdimb
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
49 \dp\bk@bxa\@tempdima}
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
50
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
51 \def\bk@line{%
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
52 \hbox to \linewidth{\ifbkcount\smash{\llap{\the\bk@lcnt\ }}\fi
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
53 \vrule \@width\fboxrule\hskip\fboxsep
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
54 \box\bk@bxa\hfil
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
55 \hskip\fboxsep\vrule \@width\fboxrule}}
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
56
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
57 \def\endbreakbox{\egroup
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
58 \ifhmode\par\fi{\noindent\bk@lcnt\@ne
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
59 \@bkconttrue\baselineskip\z@\lineskiplimit\z@
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
60 \lineskip\z@\vfuzz\maxdimen
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
61 \bk@split\bk@addfsepht\bk@addskipdp
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
62 \ifvoid\bk@bxb % Only one line
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
63 \def\bk@fstln{\bk@addfsepdp
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
64 \vbox{\hrule\@height\fboxrule\bk@line\hrule\@height\fboxrule}}%
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
65 \else % More than one line
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
66 \def\bk@fstln{\vbox{\hrule\@height\fboxrule\bk@line}\hfil
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
67 \advance\bk@lcnt\@ne
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
68 \loop
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
69 \bk@split\bk@addskipdp\leavevmode
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
70 \ifvoid\bk@bxb % The last line
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
71 \@bkcontfalse\bk@addfsepdp
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
72 \vtop{\bk@line\hrule\@height\fboxrule}%
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
73 \else % 2,...,(n-1)
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
74 \bk@line
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
75 \fi
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
76 \hfil\advance\bk@lcnt\@ne
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
77 \if@bkcont\repeat}%
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
78 \fi
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
79 \leavevmode\bk@fstln\par}\vskip\breakboxskip\relax}
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
80
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
81 \bkcountfalse
de0aa29cc3d5 update bachelor middle draft
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
82