diff options
Diffstat (limited to 'info/examples/tex-in-practice/ts-gnot.tip')
-rw-r--r-- | info/examples/tex-in-practice/ts-gnot.tip | 68 |
1 files changed, 68 insertions, 0 deletions
diff --git a/info/examples/tex-in-practice/ts-gnot.tip b/info/examples/tex-in-practice/ts-gnot.tip new file mode 100644 index 0000000000..811c82287b --- /dev/null +++ b/info/examples/tex-in-practice/ts-gnot.tip @@ -0,0 +1,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 |