diff options
Diffstat (limited to 'tex/context/base/page-set.tex')
| -rw-r--r-- | tex/context/base/page-set.tex | 350 |
1 files changed, 179 insertions, 171 deletions
diff --git a/tex/context/base/page-set.tex b/tex/context/base/page-set.tex index 1aeb05a96..e72892a51 100644 --- a/tex/context/base/page-set.tex +++ b/tex/context/base/page-set.tex @@ -382,7 +382,7 @@ \long\def\OTRSETrecurseRL#1% {\dostepwiserecurse\nofcolumns\plusone\minusone - {#1\hskip\OTRSETgetparameter\c!distance\recurselevel}} + {#1\hskip\OTRSETgetparameter\c!afstand\recurselevel}} \def\OTRSETmakegridbox {\ifcase\columndirection @@ -395,28 +395,28 @@ {\hbox\bgroup \dontcomplain \forgetall % can go once in \flush - \!!heighta \textheight + \!!heighta \teksthoogte % test first ! - \hbox to \makeupwidth + \hbox to \zetbreedte {\dostepwiserecurse{#1}{#2}{#3} {\mofcolumns\recurselevel \localcolumnwidth\OTRSETlocalwidth\mofcolumns \setbox\scratchbox\hbox\localframed [\??mc\OTRSETidentifier\number\mofcolumns]% - [\c!width=\localcolumnwidth,\c!height=\!!heighta,\c!lines=]% + [\c!breedte=\localcolumnwidth,\c!hoogte=\!!heighta,\c!regels=]% {}% \wd\scratchbox\localcolumnwidth \ht\scratchbox\!!heighta \ifcase\columndirection - \hskip\OTRSETgetparameter\c!distance\recurselevel + \hskip\OTRSETgetparameter\c!afstand\recurselevel \box\scratchbox \else \box\scratchbox - \hskip\OTRSETgetparameter\c!distance\recurselevel + \hskip\OTRSETgetparameter\c!afstand\recurselevel \fi}}% - \hskip-\makeupwidth + \hskip-\zetbreedte % main text - \hbox to \makeupwidth + \hbox to \zetbreedte {\dostepwiserecurse{#1}{#2}{#3} {\mofcolumns\recurselevel \localcolumnwidth\OTRSETlocalwidth\mofcolumns @@ -436,10 +436,6 @@ \fi \dorecurse\columnmaxcells {\setbox\scratchbox\hbox{\OTRSETgetgridcell\mofcolumns\recurselevel}% -% {\setbox\scratchbox\hbox -% {\localstarttextcolor -% \OTRSETgetgridcell\mofcolumns\recurselevel -% \localstoptextcolor}% \ht\scratchbox\strutht \dp\scratchbox\strutdp \ifcase\columndirection @@ -461,11 +457,11 @@ \kern\zeropoint \vss \fi}% - \wd\scratchbox\localcolumnwidth % \textwidth + \wd\scratchbox\localcolumnwidth % \tekstbreedte \ifcase\columndirection - \hskip\OTRSETgetparameter\c!distance\recurselevel\box\scratchbox + \hskip\OTRSETgetparameter\c!afstand\recurselevel\box\scratchbox \else - \box\scratchbox\hskip\OTRSETgetparameter\c!distance\recurselevel + \box\scratchbox\hskip\OTRSETgetparameter\c!afstand\recurselevel \fi}}% \egroup} @@ -560,7 +556,7 @@ % \fi} \def\OTRSETdofinaloutput - {\ifdim\ht\OTRfinalpagebox=\textheight + {\ifdim\ht\OTRfinalpagebox=\teksthoogte \bgroup % \let\OTRSETsetvsize\relax % prevents useless search for gap \ifcase\OTRSETbalancemethod \finaloutput\box\OTRfinalpagebox @@ -568,7 +564,7 @@ % catch a bordercase \scratchdimen\OTRSETbalht \advance\scratchdimen\lineheight\relax - \ifdim\scratchdimen>\textheight + \ifdim\scratchdimen>\teksthoogte % full page \finaloutput\box\OTRfinalpagebox \else @@ -617,14 +613,18 @@ \def\OTRSETsethsize % of course this does not migrate outside the otr {\localcolumnwidth\OTRSETlocalwidth\mofcolumns - \textwidth\localcolumnwidth + \tekstbreedte\localcolumnwidth \hsize\localcolumnwidth} +%\def\OTRSETsynchronizehsize +% {\doifnotvalue{\??mc\OTRSETidentifier\the\mofcolumns\c!breedte}\v!passend +% \OTRSETsethsize} + \def\OTRSETsynchronizehsize - {\ifcase0\getvalue{\??mc\??mc\c!width}\else % some width set + {\ifcase0\getvalue{\??mc\??mc\c!breedte}\else % some width set \bgroup \scratchdimen\OTRSETlocalwidth\mofcolumns - \ifdim\scratchdimen=\textwidth + \ifdim\scratchdimen=\tekstbreedte \egroup \else % only if change in width and \column/\break @@ -681,7 +681,7 @@ \egroup \fi} -\installcolumnbreakhandler {SET} \v!local +\installcolumnbreakhandler {SET} \v!lokaal {\OTRSETcolumnhbreak \ejectinsert \ejectpage % brrr @@ -695,7 +695,7 @@ % stay there (basically such a gap is a small empty page % then). -\installcolumnbreakhandler {SET} \v!yes +\installcolumnbreakhandler {SET} \v!ja {\OTRSETcolumnhbreak \edef\savedmofcolumns{\the\mofcolumns}% \edef\savedrealpageno{\the\realpageno}% @@ -716,7 +716,7 @@ \installcolumnbreakhandler {SET} \s!unknown {\expanded{\OTRSETgotocolumn[\@@columnspecification]}} -\installcolumnbreakhandler {SET} \v!page +\installcolumnbreakhandler {SET} \v!pagina {\vfill\eject % \doejectpage\eject \OTRSETgotonextpage} @@ -840,7 +840,7 @@ \def\OTRSEThandleflushedtext#1% {\getnoflines{\ht\scratchbox}% - %\wd\scratchbox\textwidth % geen \hsize kan < zijn in bv split tabulate + %\wd\scratchbox\tekstbreedte % geen \hsize kan < zijn in bv split tabulate \wd\scratchbox\OTRSETlocalwidth\mofcolumns \doOTRSETsetgridcells {\copy\placeholderboxf} @@ -1040,7 +1040,7 @@ \else \advance\columnhcells \plusone \advance\scratchcounter \plusone - \advance\totalcolumnspace \OTRSETgetparameter\c!distance\scratchcounter + \advance\totalcolumnspace \OTRSETgetparameter\c!afstand\scratchcounter \fi \else \exitloop @@ -1204,7 +1204,7 @@ \def\OTRSETstoreincolumnslotFIXD#1% fixed column {\OTRSETflushtextsofar - \ifdim\wd#1>\textwidth + \ifdim\wd#1>\tekstbreedte \OTRSETstoreincolumnslotSOMEWHERE2{#1}% \else % crappy test / needed for o-pbu-f / will be replaced @@ -1215,9 +1215,9 @@ \ifdim\scratchdimen<\pagegoal %OTRSETprepareforcolumnslot3{#1}% %ruledvskip\columnslotspacing\lineheight - \blank[\columnslotspacing*\v!line]% + \blanko[\columnslotspacing*\v!regel]% \snaptogrid\hbox to \hsize{\hss\box#1\hss}% strange, why the centering - \blank[\columnslotspacing*\v!line]% + \blanko[\columnslotspacing*\v!regel]% \else \OTRSETstoreincolumnslotSOMEWHERE2{#1}% \fi @@ -1448,7 +1448,7 @@ \totalcolumnspace\OTRSETlocalwidth\currenthcell \dostepwiserecurse\!!countc\!!countb\plusone {\advance\totalcolumnspace \OTRSETlocalwidth\recurselevel - \advance\totalcolumnspace \OTRSETgetparameter\c!distance\recurselevel}% + \advance\totalcolumnspace \OTRSETgetparameter\c!afstand\recurselevel}% \ifdim\totalcolumnspace>\wd\scratchbox \setbox\scratchbox\hbox to \totalcolumnspace{\hss\box\scratchbox\hss}% \fi @@ -1461,8 +1461,8 @@ \def\OTRSETinitializecolumns% once per page {\columnspreadtrue % todo \ifcolumnspread - \global\rofcolumns\getvalue{\??mc\OTRSETidentifier\c!nright}% - \global\lofcolumns\getvalue{\??mc\OTRSETidentifier\c!nleft}% + \global\rofcolumns\getvalue{\??mc\OTRSETidentifier\c!nrechts}% + \global\lofcolumns\getvalue{\??mc\OTRSETidentifier\c!nlinks}% \global\tofcolumns\rofcolumns \relax \ifodd\realpageno\relax \global\nofcolumns\rofcolumns @@ -1487,21 +1487,21 @@ \def\dodefinecolumnset[#1][#2]% {\getparameters[\??mc#1] - [\c!direction=\v!right, - \c!balance=\v!no, - \c!distance=1.5\bodyfontsize, % controleren + [\c!richting=\v!rechts, + \c!balanceren=\v!nee, + \c!afstand=1.5\bodyfontsize, % controleren \c!n=2, - \c!nleft=\getvalue{\??mc#1\c!n}, - \c!nright=\getvalue{\??mc#1\c!n}, - \c!width=\v!fit, - \c!lines=0, + \c!nlinks=\getvalue{\??mc#1\c!n}, + \c!nrechts=\getvalue{\??mc#1\c!n}, + \c!breedte=\v!passend, + \c!regels=0, #2]% - \dorecurse{\getvalue{\??mc#1\c!nleft}} % todo + \dorecurse{\getvalue{\??mc#1\c!nlinks}} % todo {\dododefinecolumnset[#1][\recurselevel]}% - \dorecurse{\getvalue{\??mc#1\c!nright}} % todo + \dorecurse{\getvalue{\??mc#1\c!nrechts}} % todo {\dododefinecolumnset[#1][\recurselevel]}% % redo framed settings - \setupcolumnset[#1][1][\c!distance=\!!zeropoint]} + \setupcolumnset[#1][1][\c!afstand=\!!zeropoint]} \def\dododefinecolumnset[#1][#2]% {\presetlocalframed @@ -1509,11 +1509,11 @@ \setupcolumnset [#1][#2] [\c!offset=\v!overlay, - \c!frame=\v!off, - \c!align=, - \c!lines=0,% really needed since c!regels is now part of framed - \c!width=\getvalue{\??mc#1\c!width}, - \c!distance=\getvalue{\??mc#1\c!distance}]} + \c!kader=\v!uit, + \c!uitlijnen=, + \c!regels=0,% really needed since c!regels is now part of framed + \c!breedte=\getvalue{\??mc#1\c!breedte}, + \c!afstand=\getvalue{\??mc#1\c!afstand}]} \def\setupcolumnset {\dotripleargument\dosetupcolumnset} @@ -1521,7 +1521,7 @@ \def\dosetupcolumnset[#1][#2][#3]% {\ifthirdargument \def\docommando##1% - {\doifelse{##1}\v!each + {\doifelse{##1}\v!elk {\dorecurse{\getvalue{\??mc#1\c!n}}{\docommando\recurselevel}} {\getparameters[\??mc#1##1][#3]}}% \processcommalist[#2]\docommando @@ -1534,9 +1534,9 @@ \def\OTRSETgotonextpage {\vfill\eject \relax\ifnum\mofcolumns>\plusone - \OTRSETgotocolumn[\v!last]% + \OTRSETgotocolumn[\v!laatste]% \ifnum\mofcolumns>\plusone - \OTRSETgotocolumn[\v!force]% + \OTRSETgotocolumn[\v!forceer]% \fi \fi} @@ -1618,11 +1618,11 @@ \def\doOTRSETgotocolumn[#1]% yes|force|first|last|<number>|<number>*<number> {\processallactionsinset [#1] - [ \v!yes=>\OTRSETdummycolumn, - \v!no=>,% not supported - \v!force=>\OTRSETdummycolumn, - \v!first=>\expanded{\doOTRSETgotoCOLUMN{1}}, - \v!last=>\expanded{\doOTRSETgotoCOLUMN{\the\nofcolumns}}, + [ \v!ja=>\OTRSETdummycolumn, + \v!nee=>,% not supported + \v!forceer=>\OTRSETdummycolumn, + \v!eerste=>\expanded{\doOTRSETgotoCOLUMN{1}}, + \v!laatste=>\expanded{\doOTRSETgotoCOLUMN{\the\nofcolumns}}, \s!default=>\OTRSETdummycolumn, \s!unknown=>\expanded{\doOTRSETgotoCOLROW{\commalistelement}}]} @@ -1689,7 +1689,7 @@ \bgroup \globallet\columnsetpage\!!plusone \def\currentcolumnset{#2}% - \insidecolumnstrue % will be different flag + \binnenkolommentrue % will be different flag \activateotr{SET}{ONE}% andere naam, activate or so \doifelsenothing{#1} {\globallet\OTRSETlist\s!default} @@ -1714,8 +1714,8 @@ \sethsize \ifvoid\OTRfinalpagebox\else % probably balanced - \ifdim\ht\OTRfinalpagebox<\textheight - \snaptogrid[\v!page]\hbox{\box\OTRfinalpagebox}% + \ifdim\ht\OTRfinalpagebox<\teksthoogte + \snaptogrid[\v!pagina]\hbox{\box\OTRfinalpagebox}% \else \box\OTRfinalpagebox \fi @@ -1899,18 +1899,18 @@ \def\OTRSETinitializefeatures {% number of lines % new: raw - \getrawnoflines\textheight\xdef\columnmaxcells{\the\noflines}% + \getrawnoflines\teksthoogte\xdef\columnmaxcells{\the\noflines}% % direction - \doifelsevalue{\??mc\OTRSETidentifier\c!direction}\v!right + \doifelsevalue{\??mc\OTRSETidentifier\c!richting}\v!rechts {\chardef\columndirection\zerocount} {\chardef\columndirection\plusone}% % balancing \chardef\OTRSETbalancemethod\zerocount \processaction - [\getvalue{\??mc\OTRSETidentifier\c!balance}] - [ \v!yes=>\chardef\OTRSETbalancemethod\plusone, - \v!top=>\chardef\OTRSETbalancemethod\plustwo, - \v!bottom=>\chardef\OTRSETbalancemethod\plusthree]} + [\getvalue{\??mc\OTRSETidentifier\c!balanceren}] + [ \v!ja=>\chardef\OTRSETbalancemethod\plusone, + \v!boven=>\chardef\OTRSETbalancemethod\plustwo, + \v!onder=>\chardef\OTRSETbalancemethod\plusthree]} % keep 'm for a while % @@ -2079,28 +2079,28 @@ % interface to footnotes \def\OTRSETassignwidths - {%\scratchdimen\makeupwidth - \freezetextwidth \scratchdimen\textwidth + {%\scratchdimen\zetbreedte + \freezetextwidth \scratchdimen\tekstbreedte % \scratchcounter\zerocount \dorecurse\nofcolumns - {\doifelsevalue{\??mc\OTRSETidentifier\recurselevel\c!width}\v!fit + {\doifelsevalue{\??mc\OTRSETidentifier\recurselevel\c!breedte}\v!passend {\advance\scratchcounter \plusone } - {\advance\scratchdimen -\getvalue{\??mc\OTRSETidentifier\recurselevel\c!width}}% - \advance\scratchdimen -\getvalue{\??mc\OTRSETidentifier\recurselevel\c!distance}}% + {\advance\scratchdimen -\getvalue{\??mc\OTRSETidentifier\recurselevel\c!breedte}}% + \advance\scratchdimen -\getvalue{\??mc\OTRSETidentifier\recurselevel\c!afstand}}% \ifcase\scratchcounter\else \divide\scratchdimen \scratchcounter \fi - \setgvalue{\??mc\??mc\c!width}{0}% + \setgvalue{\??mc\??mc\c!breedte}{0}% \dorecurse\nofcolumns - {\doifelsevalue{\??mc\OTRSETidentifier\recurselevel\c!width}\v!fit + {\doifelsevalue{\??mc\OTRSETidentifier\recurselevel\c!breedte}\v!passend {\dimen0=\scratchdimen} - {\setgvalue{\??mc\??mc\c!width}{1}% - \dimen0=\getvalue{\??mc\OTRSETidentifier\recurselevel\c!width}}% - \setxvalue{\??mc\recurselevel\??mc\c!width}{\the\dimen0}}} + {\setgvalue{\??mc\??mc\c!breedte}{1}% + \dimen0=\getvalue{\??mc\OTRSETidentifier\recurselevel\c!breedte}}% + \setxvalue{\??mc\recurselevel\??mc\c!breedte}{\the\dimen0}}} \def\OTRSETlocalwidth#1% - {\getvalue{\??mc\number#1\??mc\c!width}} + {\getvalue{\??mc\number#1\??mc\c!breedte}} \newbox\placeholderboxa \newbox\placeholderboxb @@ -2149,12 +2149,12 @@ \def\OTRSETshowstatus {\iftracecolumnset \doOTRSETshowstatus \fi} -% \appendtoks \OTRSETshowstatus \to \everypar +\appendtoks \OTRSETshowstatus \to \everypar % page contents \def\OTRSETdopagecontents#1#2% takes two args: \box<n> \unvbox<n> - {\vbox to \textheight{\forgetall#1#2\pushproperties}} + {\vbox to \teksthoogte{\forgetall#1#2\pushproperties}} \def\OTRSETsomepagefloat {\def\floatmethod{PAGE}\OTRSETsomeslotfloat} % check \def\OTRSETsomeherefloat {\def\floatmethod{HERE}\OTRSETsomeslotfloat} % check @@ -2181,14 +2181,14 @@ \noffloatinserts\zerocount \let\totaltopinserted\!!zeropoint \OTRSETdodosettopinserts - \ifnum\@@bknbottom=\zerocount - \ifnum\@@bknlines>\zerocount + \ifnum\@@bknonder=\zerocount + \ifnum\@@bknregels>\zerocount \ifdim\totaltopinserted>\zeropoint\relax \dimen0\lineheight - \dimen0=\@@bknlines\dimen0 + \dimen0=\@@bknregels\dimen0 \advance\dimen0 \totaltopinserted\relax - \ifdim\dimen0>\textheight % \vsize %%%%%%%%% \textheight - \showmessage\m!floatblocks8{\@@bknlines}% + \ifdim\dimen0>\teksthoogte % \vsize %%%%%%%%% \teksthoogte + \showmessage\m!floatblocks8{\@@bknregels}% \vfilll\eject \fi \fi @@ -2209,15 +2209,15 @@ {\forgetall \iftopofinsert \ifdim\OTRSETtopoffset=\zeropoint - \moveongrid[\v!top] + \verplaatsopgrid[\v!boven] \fi \else \betweenfloatblanko % inserts can't look back \fi \flushfloatbox - \blank[\@@bkspaceafter]}% + \blanko[\@@bknawit]}% \global\advance\topinserted \ht\scratchbox\relax - \ifdim\topinserted>\vsize % was \textheight\relax + \ifdim\topinserted>\vsize % was \teksthoogte\relax \OTRSETresavebox\floatbox \noffloatinserts\noftopfloats\relax \global\advance\topinserted -\ht\scratchbox @@ -2257,7 +2257,7 @@ \ifdim\botinserted<\pagegoal\relax \insert\botins {\forgetall - \blank[\@@bkspacebefore]% + \blanko[\@@bkvoorwit]% \flushfloatbox}% \ifsomefloatwaiting \advance\noffloatinserts \plusone @@ -2320,24 +2320,24 @@ \def\dodefinecolumntextarea[#1][#2][#3]% y=0 is mogelijke en handig ! {\ifthirdargument - \doifinsetelse{#2}{\v!both,\v!fixed} - {\definecolumntextarea[#1][\v!left ][\c!type=#2,#3]% - \definecolumntextarea[#1][\v!right][\c!type=#2,#3]} - {\doifelse{#2}\v!next + \doifinsetelse{#2}{\v!beide,\v!vast} + {\definecolumntextarea[#1][\v!links ][\c!type=#2,#3]% + \definecolumntextarea[#1][\v!rechts][\c!type=#2,#3]} + {\doifelse{#2}\v!volgende {\doifoddpageelse - {\definecolumntextarea[#1][\v!right][\c!type=#2,#3]} - {\definecolumntextarea[#1][\v!left ][\c!type=#2,#3]}} + {\definecolumntextarea[#1][\v!rechts][\c!type=#2,#3]} + {\definecolumntextarea[#1][\v!links ][\c!type=#2,#3]}} {\presetlocalframed [\??mt#1#2]% \processaction[#2] % \doglobal voorkomt stack build up - [ \v!left=>\doglobal\addtocommalist{#1}\columnleftareas, - \v!right=>\doglobal\addtocommalist{#1}\columnrightareas]% + [ \v!links=>\doglobal\addtocommalist{#1}\columnleftareas, + \v!rechts=>\doglobal\addtocommalist{#1}\columnrightareas]% \getparameters[\??mt#1#2] [\c!x=1,\c!y=1,\c!nx=1,\c!ny=1,\c!clipoffset=2\lineheight, - \c!offset=\v!overlay,\c!strut=\v!no,\c!frame=\v!off, - \c!type=#2,\c!page=1,\c!state=\v!stop,#3]}}% + \c!offset=\v!overlay,\c!strut=\v!nee,\c!kader=\v!uit, + \c!type=#2,\c!pagina=1,\c!status=\v!stop,#3]}}% \else - \definecolumntextarea[#1][\v!next][#2]% + \definecolumntextarea[#1][\v!volgende][#2]% \fi} \def\setupcolumntextarea @@ -2345,25 +2345,25 @@ \def\dosetupcolumntextarea[#1][#2][#3]% {\ifthirdargument - \doifelse{#2}\v!both - {\setupcolumntextarea[#1][\v!left ][#3]% - \setupcolumntextarea[#1][\v!right][#3]} - {\doifelse{#2}\v!next + \doifelse{#2}\v!beide + {\setupcolumntextarea[#1][\v!links ][#3]% + \setupcolumntextarea[#1][\v!rechts][#3]} + {\doifelse{#2}\v!volgende {\doifoddpageelse - {\setupcolumntextarea[#1][\v!right][#3]} - {\setupcolumntextarea[#1][\v!left][#3]}} + {\setupcolumntextarea[#1][\v!rechts][#3]} + {\setupcolumntextarea[#1][\v!links][#3]}} {\getparameters[\??mt#1#2][#3]}}% \else - \setupcolumntextarea[#1][\v!next][#2]% + \setupcolumntextarea[#1][\v!volgende][#2]% \fi} \def\docheckcolumnsetareapage#1#2% - {\ifnum\getvalue{\??mt#1\c!page}>\plusone - \doifelsevalue{\??mt#1\c!type}\v!fixed - {\ifnum\columnsetpage=\getvalue{\??mt#1\c!page}\relax + {\ifnum\getvalue{\??mt#1\c!pagina}>\plusone + \doifelsevalue{\??mt#1\c!type}\v!vast + {\ifnum\columnsetpage=\getvalue{\??mt#1\c!pagina}\relax \donetrue\else\donefalse \fi} - {\ifnum\columnsetpage<\getvalue{\??mt#1\c!page}\relax + {\ifnum\columnsetpage<\getvalue{\??mt#1\c!pagina}\relax \donefalse\else\donetrue \fi}% \else @@ -2372,20 +2372,28 @@ \def\initializecolumntextareas {\ifodd\realpageno - \doinitializecolumntextareas\columnrightareas\v!right + \doinitializecolumntextareas\columnrightareas\v!rechts \else - \doinitializecolumntextareas\columnleftareas\v!left + \doinitializecolumntextareas\columnleftareas\v!links \fi} +%\def\doinitializecolumntextareas#1#2% +% {\def\docommando##1% +% {\doifelsevalue{\??mt##1#2\c!status}\v!start +% {\dodoinitializecolumntextareas{##1}{#2}} +% {\doifvalue{\??mt##1#2\c!status}\v!herhaal +% {\dodoinitializecolumntextareas{##1}{#2}}}}% +% \processcommacommand[#1]\docommando} + \def\doinitializecolumntextareas#1#2% {\def\docommando##1% {\docheckcolumnsetareapage{##1#2}\plusone \ifdone \donefalse \processaction - [\getvalue{\??mt##1#2\c!state}] + [\getvalue{\??mt##1#2\c!status}] [ \v!start=>\donetrue, - \v!repeat=>\donetrue, + \v!herhaal=>\donetrue, \s!unknown=>\doperformtest\commalistelement\donetrue\donefalse]% \ifdone\dodoinitializecolumntextareas{##1}{#2}\fi \fi}% @@ -2400,9 +2408,9 @@ \def\placecolumntextareas {\ifodd\realpageno - \doplacecolumntextareas\columnrightareas\v!right + \doplacecolumntextareas\columnrightareas\v!rechts \else - \doplacecolumntextareas\columnleftareas\v!left + \doplacecolumntextareas\columnleftareas\v!links \fi} \def\doplacecolumntextareas#1#2% global ? @@ -2413,9 +2421,9 @@ \ifdone \donefalse \processaction - [\getvalue{\??mt##1#2\c!state}] + [\getvalue{\??mt##1#2\c!status}] [ \v!start=>\donetrue\doglobal\removefromcommalist{##1}#1, - \v!repeat=>\donetrue, + \v!herhaal=>\donetrue, \s!unknown=>\doperformtest\commalistelement\donetrue\donefalse]% \ifdone \dodoplacecolumntextareas{##1}{#2} @@ -2426,7 +2434,7 @@ \processcommacommand[#1]\docommando \egroup} -\def\columntextlastbackspace{\backspace} +\def\columntextlastbackspace{\rugwit} % beware, we have clipping offsets of 2\lineheight by default @@ -2453,15 +2461,15 @@ \setbox\scratchbox\vbox {\donetrue\localframed [\??mt\currentcolumntestarea] - [\c!location=,% new (*) - \c!width=\!!widtha,\c!height=\!!heighta,\c!lines=] + [\c!plaats=,% new (*) + \c!breedte=\!!widtha,\c!hoogte=\!!heighta,\c!regels=] {\columntextareaparameter\empty}}% \!!counta\columntextareaparameter\c!x \!!countb\columntextareaparameter\c!y \advance\!!countb \columntextareaparameter\c!ny \advance\!!countb \minusone % new (*) - \doif{\columntextareaparameter\c!location}\v!depth + \doif{\columntextareaparameter\c!plaats}\v!diepte {\setbox\scratchbox\hbox{\lower\strutdepth\box\scratchbox}% \dp\scratchbox\zeropoint \ht\scratchbox\!!heighta}% @@ -2471,13 +2479,13 @@ \copy\scratchbox % \box \else \clip - [%\c!topoffset=\columntextareaparameter\c!clipoffset,% - %\c!bottomoffset=\columntextareaparameter\c!clipoffset,% - %\c!leftoffset=\columntextareaparameter\c!clipoffset,% + [%\c!bovenoffset=\columntextareaparameter\c!clipoffset,% + %\c!onderoffset=\columntextareaparameter\c!clipoffset,% + %\c!linkeroffset=\columntextareaparameter\c!clipoffset,% \c!offset=\columntextareaparameter\c!clipoffset,% - \c!rightoffset=\zeropoint,% - \c!width=\!!widthb,% - \c!height=\!!heighta]% + \c!rechteroffset=\zeropoint,% + \c!breedte=\!!widthb,% + \c!hoogte=\!!heighta]% {\copy\scratchbox}% \fi}% \OTRSETsetgridcell\!!counta\!!countb\box0 @@ -2486,15 +2494,15 @@ \advance\!!counta -\!!countc \advance\!!widtha -\!!widthb \setbox0\hbox - {\hskip-\namedlayoutparameter\v!odd\c!backspace + {\hskip-\namedlayoutparameter\v!oneven\c!rugwit \clip - [%\c!topoffset=\columntextareaparameter\c!clipoffset,% - %\c!bottomoffset=\columntextareaparameter\c!clipoffset,% - %\c!rightoffset=\columntextareaparameter\c!clipoffset,% + [%\c!bovenoffset=\columntextareaparameter\c!clipoffset,% + %\c!onderoffset=\columntextareaparameter\c!clipoffset,% + %\c!rechteroffset=\columntextareaparameter\c!clipoffset,% \c!offset=\columntextareaparameter\c!clipoffset,% - \c!leftoffset=\zeropoint,% - \c!width=\!!widtha,% - \c!height=\!!heighta,% + \c!linkeroffset=\zeropoint,% + \c!breedte=\!!widtha,% + \c!hoogte=\!!heighta,% \c!hoffset=\!!widthb]% {\copy\scratchbox}}% \OTRSETsetgridcell\!!counta\!!countb\box0% @@ -2505,16 +2513,16 @@ \long\def\dosetupcolumntextareatext[#1][#2][#3]% {\ifthirdargument - \doifelse{#2}\v!both - {\setvalue{\??mt#1\v!left }{#3}% - \setvalue{\??mt#1\v!right}{#3}} - {\doifelse{#2}\v!next + \doifelse{#2}\v!beide + {\setvalue{\??mt#1\v!links }{#3}% + \setvalue{\??mt#1\v!rechts}{#3}} + {\doifelse{#2}\v!volgende {\doifoddpageelse - {\setvalue{\??mt#1\v!right}{#3}}% - {\setvalue{\??mt#1\v!left }{#3}}}% + {\setvalue{\??mt#1\v!rechts}{#3}}% + {\setvalue{\??mt#1\v!links }{#3}}}% {\setvalue{\??mt#1#2}{#3}}}% \else - \setupcolumntextareatext[#1][\v!next][{#2}]% + \setupcolumntextareatext[#1][\v!volgende][{#2}]% \fi} \def\docalculatecolumnsetspan @@ -2523,7 +2531,7 @@ % \!!widtha => total width % \!!widthb => left width % \!!countc => left cols - \!!widtha\!!countb\textwidth % we assume equal widths + \!!widtha\!!countb\tekstbreedte % we assume equal widths \advance\!!countb \!!counta \advance\!!countb \minusone \ifnum\!!countb>\nofcolumns @@ -2535,21 +2543,21 @@ \fi \advance\!!counta \plusone \dostepwiserecurse\!!counta\!!countb\plusone - {\advance\!!widtha\OTRSETgetparameter\c!distance\recurselevel}% + {\advance\!!widtha\OTRSETgetparameter\c!afstand\recurselevel}% \!!widthb\!!widtha - \advance\!!widthb -\!!countc\textwidth + \advance\!!widthb -\!!countc\tekstbreedte \ifodd\realpageno \else % tricky, assumes that we keep there \ifcase\!!countc\else % nog niet ok voor enkel/dubbelzijdig - \advance\!!widtha \namedlayoutparameter\v!even \c!backspace - \advance\!!widtha \namedlayoutparameter\v!odd\c!backspace - \advance\!!widthb \namedlayoutparameter\v!even \c!backspace + \advance\!!widtha \namedlayoutparameter\v!even \c!rugwit + \advance\!!widtha \namedlayoutparameter\v!oneven\c!rugwit + \advance\!!widthb \namedlayoutparameter\v!even \c!rugwit \dorecurse\!!countc - {\advance\!!widtha\OTRSETgetparameter\c!distance\recurselevel}% + {\advance\!!widtha\OTRSETgetparameter\c!afstand\recurselevel}% \fi \fi} -\def\columnsetspanhsize{\textwidth} +\def\columnsetspanhsize{\tekstbreedte} \def\setcolumnsetspanhsize#1#2% x nx / uses counta/b {\!!counta#1\!!countb#2\docalculatecolumnsetspan @@ -2562,18 +2570,18 @@ {%\ifsecondargument \defineframedtext [cs:#1] - [\c!frame=\v!off, - \c!before=, - \c!after=, + [\c!kader=\v!uit, + \c!voor=, + \c!na=, \c!offset=\v!overlay, - \c!location=\v!left, - \c!linecorrection=\v!off, - \c!depthcorrection=\v!off, + \c!plaats=\v!links, + \c!regelcorrectie=\v!uit, + \c!dieptecorrectie=\v!uit, \c!n=2, - \c!nlines=0, - \c!indentnext=\v!yes, + \c!nregels=0, + \c!springvolgendein=\v!ja, \c!default=HERE, - \c!alternative=\v!a, + \c!variant=\v!a, #2]% %\else % \definecolumnspan[][#1]% @@ -2608,9 +2616,9 @@ \mofcolumns\plusone \fi \setupframedtexts[cs:#1] - [\c!width=\columnsetspanhsize, - \c!linecorrection=\v!off, - \c!depthcorrection=\v!off, + [\c!breedte=\columnsetspanhsize, + \c!regelcorrectie=\v!uit, + \c!dieptecorrectie=\v!uit, #2]% % determine widths \!!countc\framedtextparameter{cs:#1}\c!n @@ -2621,16 +2629,16 @@ \advance\!!countd -\mofcolumns \advance\!!countd \plusone % n <= n of available columns (alternative a) - \doif{\framedtextparameter{cs:#1}\c!alternative}\v!a + \doif{\framedtextparameter{cs:#1}\c!variant}\v!a {\ifnum\!!countc>\!!countd \!!countc\!!countd \fi}% % here it all starts \setcolumnsetspanhsize\mofcolumns\!!countc % a/b used \hsize\columnsetspanhsize \setbox\scratchbox\vbox\bgroup - \dostartframedtext[cs:#1][\v!none]% geen nils placement + \dostartframedtext[cs:#1][\v!geen]% geen nils placement % spoils spacing : \vskip-\struttotal\par\verticalstrut\par \ifnum\columnsetlevel>\zerocount - \framedtextparameter{cs:#1}\c!before + \framedtextparameter{cs:#1}\c!voor \fi \def\stopcolumnsetspan{\dostopcolumnsetspan{#1}}} @@ -2640,8 +2648,8 @@ \kern-2\struttotal \verticalstrut \ifnum\columnsetlevel>\zerocount - \doifsomething{\framedtextparameter{cs:#1}\c!after} - {\framedtextparameter{cs:#1}\c!after + \doifsomething{\framedtextparameter{cs:#1}\c!na} + {\framedtextparameter{cs:#1}\c!na \kern\zeropoint}% otherwise blanks disappear, better be a switch \else \endgraf @@ -2651,7 +2659,7 @@ % frozen keeps grid snapping okay \setbox\scratchbox\frozenhbox to \hsize {\dontcomplain - \alignedline{\framedtextparameter{cs:#1}\c!location}\v!middle + \alignedline{\framedtextparameter{cs:#1}\c!plaats}\v!midden {\lower\strutdepth\box\scratchbox}}% \dp\scratchbox\zeropoint % else wrong snap insidefloat % @@ -2668,24 +2676,24 @@ \else\ifnum\columnsetlevel>\zerocount % we only set \columnsetspacing when asked for, else bottom problems % don't change this any more (test naw) - \chardef\columnslotspacing\framedtextparameter{cs:#1}\c!nlines\relax + \chardef\columnslotspacing\framedtextparameter{cs:#1}\c!nregels\relax % todo: nboven/onder & \chardef\columnslotlocation2 %\OTRSETstoreincolumnslotHERE\scratchbox \edef\floatmethod{\framedtextparameter{cs:#1}\c!default}% \@EA\uppercasestring\floatmethod\to\floatmethod - % todo : \v!here -> here enzovoorts + % todo : \v!hier -> here enzovoorts \OTRSETstoreincolumnslot\floatmethod\scratchbox % watch out: no \dochecknextindentation{tag} - \checknextindentation[\framedtextparameter{cs:#1}\c!indentnext] + \checknextindentation[\framedtextparameter{cs:#1}\c!springvolgendein] \else % of course we needed a one-column fall back for tm; brrr, the box has now too % much height (try \ruledvbox); don't change this without testing techniek \scratchdimen\ht\scratchbox \advance\scratchdimen-\strutdp \ht\scratchbox\scratchdimen - \framedtextparameter{cs:#1}\c!before + \framedtextparameter{cs:#1}\c!voor \snaptogrid\vbox{\box\scratchbox}% - \framedtextparameter{cs:#1}\c!after + \framedtextparameter{cs:#1}\c!na \fi\fi \egroup \endgraf} @@ -2700,4 +2708,4 @@ % \startcolumnsetspan[two] \input tufte \stopcolumnsetspan % \stopcolumnset -\protect \endinput +\protect \endinput
\ No newline at end of file |