summaryrefslogtreecommitdiff
path: root/info/examples/tip/ts-gnot.tip
blob: 811c82287bdbee6172fb9c03a4728e56bb19be14 (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
% This macro source file is from the four volume series
% "TeX in Practice" by Stephan von Bechtolsheim, published
% 1993 by Springer-Verlag, New York.
% Copyright 1993 Stephan von Bechtolsheim.
% No warranty or liability is assumed.
% This macro may be copied freely if no fees other than
% media cost or shipping charges are charged and as long
% as this copyright and the following source code itself
% is not changed. Please see the series for further information.
%
% Version: 1.0
% Date: May 1, 1993
%
%
% This source code is documented in 31.2.8, p. III-602.
% Original source in file "pp2.TEX", starting line 846.
\wlog{L: "ts-gnot.tip" ["pp2.TEX," l. 846, p. III-602]}%
% This file DOES NOT belong to format "texip."
\catcode`\@ = 11
\def\GeneralNotes #1#2{%
    \NewPageRightHand
    \SetPageLayout{4}
    \ReassignCounter{PageNo}{\roman}%
        {\TheCounter{PageNo}}{\TheCounter{PageNo}}
    \ReassignCounter{SectionNo}{\arabic}% 
        {\TheCounter{SectionNo}}% 
        {\TheCounter{SectionNo}}%
    \SetCounter{SectionNo}{0}%
    \def\@LeftRunningHead{#1}
    \def\@RightRunningHead{\@LeftRunningHead}
    \WriteToAuxSpecial{toc}{0}% 
        {}{#1 #2}% 
        {\PrintCounter{PageNo}}%
    \ChapterHeadingTeXIP{#1}%
        {#2}
}
\def\GSection{\DblArg{\@GSection}}%
\def\@GSection [#1]#2{% 
    \StepCounter{SectionNo}%
    \def\Label ##1{\@Label{##1}{\RefCounter{SectionNo}}{1}}%
    \GenericHeading{2}{36pt plus 10pt minus 2pt}
        {1}{1}{1}{24pt}{0}%
        {\Large\baselineskip = 15pt}{-13pt}% 
        {\PrintCounter{SectionNo}}{#2}{#1}% 
    \gdef\EveryParB{%
        {%
            \@MakeRobustMacros
            \wlog{MARK: "#2"}%
            \mark{#2}%
        }%
    }%
}
\def\EndGeneralNotes{%
    \wlog{\string\EndGeneralNotes: called}%
    \NewPageRightHandSpecial
    \SetCounter{PageNo}{1}
    \@PageNumbersToCounterRegs
    \ReassignCounter{PageNo}{\arabic}%
        {\TheCounter{PageNo}}% 
        {\TheCounter{VolumeNo}-\TheCounter{PageNo}}
    \wlog{\string\EndGeneralNotes: \noexpand\count0
        has value \the\count0}%
    \count1 = 0
    \ReassignCounter{SectionNo}{\arabic}% 
        {\TheCounter{ChapterNo}.\TheCounter{SectionNo}}% 
        {\TheCounter{ChapterNo}.\TheCounter{SectionNo}}
}
\catcode`\@ = 12