diff options
Diffstat (limited to 'tex/context/base/page-one.tex')
-rw-r--r-- | tex/context/base/page-one.tex | 83 |
1 files changed, 43 insertions, 40 deletions
diff --git a/tex/context/base/page-one.tex b/tex/context/base/page-one.tex index 68c919e8c..b85932621 100644 --- a/tex/context/base/page-one.tex +++ b/tex/context/base/page-one.tex @@ -1,5 +1,5 @@ %D \module -%D [ file=page-one, +%D [ filefile=page-one, %D version=2000.10.20, %D title=\CONTEXT\ OTR Macros, %D subtitle=Default Routine, @@ -31,7 +31,7 @@ {\superejectpage} \def\OTRONEsethsize - {\global\hsize\tekstbreedte} + {\global\hsize\textwidth} % keep (original one) % @@ -93,13 +93,13 @@ \def\OTRONEsetvsize {\ifgridsnapping \ifcase\layoutlines - \getrawnoflines\teksthoogte + \getrawnoflines\textheight \else \noflines\layoutlines \fi \global\vsize\noflines\openlineheight \else - \global\vsize\teksthoogte + \global\vsize\textheight \fi \ifdim\pagegoal<\maxdimen \ifdim\oldvsize=\vsize @@ -178,7 +178,7 @@ \def\OTRONEregisteredtextarea#1% {\ifregistertextareas \setbox0\vbox{#1}% - \wd0\zetbreedte % somehow a space creeps in + \wd0\makeupwidth % somehow a space creeps in \vbox{\registeredtextarea000}% \else #1% @@ -195,7 +195,7 @@ \or % whole page \let\OTRONEregisteredtextareaB\OTRONEregisteredtextarea \fi - \setbox0\vbox \ifbottomnotes to \teksthoogte \fi + \setbox0\vbox \ifbottomnotes to \textheight \fi {\edef\currentpagedepth{\the\dp#2}% still to be derived from #1 \dotopinsertions \ifgridsnapping @@ -225,7 +225,7 @@ \fakenotes}% \ifbottomnotes \ifgridsnapping - \getnoflines\teksthoogte + \getnoflines\textheight \advance\noflines \minusone \scratchdimen\noflines\lineheight \advance\scratchdimen \topskip @@ -243,7 +243,7 @@ \ht0\zeropoint \fi \OTRONEregisteredtextareaB - {\vbox to \teksthoogte + {\vbox to \textheight {\box0\box2\ifbottomnotes\else\vfill\fi}}% \egroup} @@ -263,14 +263,14 @@ \noffloatinserts\zerocount \let\totaltopinserted\!!zeropoint \OTRONEdodosettopinserts - \ifnum\@@bknonder=\zerocount - \ifnum\@@bknregels>\zerocount + \ifnum\@@bknbottom=\zerocount + \ifnum\@@bknlines>\zerocount \ifdim\totaltopinserted>\zeropoint\relax \dimen0=\lineheight - \dimen0=\@@bknregels\dimen0 + \dimen0=\@@bknlines\dimen0 \advance\dimen0 \totaltopinserted\relax - \ifdim\dimen0>\teksthoogte - \showmessage\m!floatblocks8\@@bknregels + \ifdim\dimen0>\textheight + \showmessage\m!floatblocks8\@@bknlines \vfilll\eject \fi \fi @@ -332,7 +332,7 @@ \global\advance\topinserted \ht\floatbox \global\advance\topinserted \dp\floatbox \global\advance\topinserted \floatbottomskip\relax - \ifdim\topinserted<\teksthoogte\relax + \ifdim\topinserted<\textheight\relax \xdef\totaltopinserted{\the\topinserted}% \insert\topins {\forgetall @@ -341,11 +341,11 @@ \kern-\lineskip\par \prevdepth\maxdimen \else - %\blanko[-\@@bknawit,\@@bkvoorwit]% inserts can't look back + %\blank[-\@@bkspaceafter,\@@bkspacebefore]% inserts can't look back \betweenfloatblanko \fi \flushfloatbox - \blanko[\@@bknawit]}% + \blank[\@@bkspaceafter]}% \ifsomefloatwaiting \advance\noffloatinserts \plusone \else @@ -381,7 +381,7 @@ \ifdim\botinserted<\pagegoal\relax \insert\botins {\forgetall - \blanko[\@@bkvoorwit]% + \blank[\@@bkspacebefore]% \flushfloatbox}% \ifsomefloatwaiting \advance\noffloatinserts \plusone @@ -486,8 +486,8 @@ \ifpackflushedfloats \centerfloatboxfalse \dogetfloat - \ifdim\wd\floatbox>\zetbreedte - \global\setbox\floatbox\hbox to \zetbreedte{\hss\box\floatbox\hss}% + \ifdim\wd\floatbox>\makeupwidth + \global\setbox\floatbox\hbox to \makeupwidth{\hss\box\floatbox\hss}% \fi \OTRONEsetvsize \!!widtha\wd\floatbox @@ -641,8 +641,8 @@ \someherefloat} % [#1] \def\OTRONEsomesidefloat[#1]% links, rechts NOG TESTEN EN AANPASSEN - {\ifbinnenkolommen - \someelsefloat[\v!hier]% + {\ifinsidecolumns + \someelsefloat[\v!here]% \else %\checkwaitingfloats{#1}% \def\logsidefloat @@ -651,29 +651,29 @@ \wd\floatbox\floatwidth \processfirstactioninset [#1] - [ \v!links=>\leftfloat {\box\floatbox}, - \v!rechts=>\rightfloat {\box\floatbox}, - \v!inlinker=>\leftmarginfloat {\box\floatbox}, - \v!inrechter=>\rightmarginfloat{\box\floatbox}, - \v!linkermarge=>\leftmarginfloat {\box\floatbox}, - \v!rechtermarge=>\rightmarginfloat{\box\floatbox}, - \v!linkerrand=>\leftedgefloat {\box\floatbox}, - \v!rechterrand=>\rightedgefloat {\box\floatbox}, - \v!rugwit=>\backspacefloat {\box\floatbox}, - \v!snijwit=>\cutspacefloat {\box\floatbox}, - \v!inmarge=>{\doinmargenormal\leftmarginfloat + [ \v!left=>\leftfloat {\box\floatbox}, + \v!right=>\rightfloat {\box\floatbox}, + \v!inleft=>\leftmarginfloat {\box\floatbox}, + \v!inright=>\rightmarginfloat{\box\floatbox}, + \v!leftmargin=>\leftmarginfloat {\box\floatbox}, + \v!rightmargin=>\rightmarginfloat{\box\floatbox}, + \v!leftedge=>\leftedgefloat {\box\floatbox}, + \v!rightedge=>\rightedgefloat {\box\floatbox}, + \v!backspace=>\backspacefloat {\box\floatbox}, + \v!cutspace=>\cutspacefloat {\box\floatbox}, + \v!inmargin=>{\doinmargenormal\leftmarginfloat \rightmarginfloat{\box\floatbox}}]% - \doifinset\v!lang{#1}\flushsidefloatsafterpar + \doifinset\v!tall{#1}\flushsidefloatsafterpar \fi} \def\OTRONEsomepagefloat[#1]% {%\checkwaitingfloats{#1}% \global\setbox\collectedpagefloats\vbox {\unvbox\collectedpagefloats - \vbox to \teksthoogte - {\doifnotinset\v!hoog{#1}\vfill + \vbox to \textheight + {\doifnotinset\v!high{#1}\vfill \box\floatbox - \doifnotinset\v!laag{#1}\vfill}% + \doifnotinset\v!low{#1}\vfill}% \goodbreak}% \doinsertfloatinfo} @@ -713,11 +713,11 @@ \topskipcorrection % [xx] new: see icare topbleed \kern-\lineskip\par\prevdepth\maxdimen \else - %\blanko[-\@@bknawit,\@@bkvoorwit]% inserts can't look back + %\blank[-\@@bkspaceafter,\@@bkspacebefore]% inserts can't look back \betweenfloatblanko \fi \flushfloatbox - \blanko[\@@bknawit]}% + \blank[\@@bkspaceafter]}% \doinsertfloatinfo} \def\OTRONEsomebotsfloat[#1]% @@ -726,12 +726,15 @@ \global\advance\botinserted \floattopskip \insert\botins {\forgetall - \blanko[\@@bkvoorwit]% + \blank[\@@bkspacebefore]% \flushfloatbox}% %\global\nofloatpermittedtrue \doinsertfloatinfo} +\def\OTRONEsomefacefloat[#1]% untested + {\startopposite\flushfloatbox\stopopposite} + \def\OTRONEnextcolumn[#1]% {} -\protect \endinput
\ No newline at end of file +\protect \endinput |