summaryrefslogtreecommitdiff
path: root/tex/context/base/page-one.tex
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/base/page-one.tex')
-rw-r--r--tex/context/base/page-one.tex83
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