diff options
Diffstat (limited to 'tex/context/base/core-itm.tex')
-rw-r--r-- | tex/context/base/core-itm.tex | 542 |
1 files changed, 370 insertions, 172 deletions
diff --git a/tex/context/base/core-itm.tex b/tex/context/base/core-itm.tex index a248b1077..69fe63dec 100644 --- a/tex/context/base/core-itm.tex +++ b/tex/context/base/core-itm.tex @@ -80,9 +80,9 @@ \def\doitemattributes #1{\doattributes{\??op\currentitemgroup#1}} -\def\@@globalitemsymbol #1{\??op\currentitemgroup\c!symbol\s!global#1} -\def\@@localitemsymbol #1{\??op\currentitemgroup\c!symbol\s!local #1} -\def\@@currentitemsymbol#1{\??op\currentitemgroup\c!symbol #1} +\def\@@globalitemsymbol #1{\??op\currentitemgroup\c!symbool\s!global#1} +\def\@@localitemsymbol #1{\??op\currentitemgroup\c!symbool\s!local #1} +\def\@@currentitemsymbol#1{\??op\currentitemgroup\c!symbool #1} \def\@@itemcounter{\s!itemcount\currentitemgroup} @@ -103,30 +103,29 @@ \fi} \def\initializeitemgrouplevel#1% safeguard - {\ifundefined{\??op\currentitemgroup#1\c!width}% + {\ifundefined{\??op\currentitemgroup#1\c!breedte}% \doinitializeitemgrouplevel{#1}% \fi} \def\doinitializeitemgrouplevel#1% {\copyparameters [\??op\currentitemgroup#1][\??oo] - [\c!width,\c!factor,\c!distance,\c!align,\c!option, - \c!style,\c!marstyle,\c!symstyle,\c!headstyle, - \c!color,\c!marcolor,\c!symcolor,\c!headcolor, - \c!beforehead,\c!afterhead,\c!before,\c!inbetween,\c!after, - \c!stopper,\c!placestopper,\c!indenting, - \c!n,\c!inner,\c!symbol,\c!margin,\c!items, - \c!leftmargin,\c!rightmargin, - \c!start,\c!lefttext,\c!righttext]} + [\c!breedte,\c!factor,\c!afstand,\c!uitlijnen,\c!optie, + \c!letter,\c!marletter,\c!symletter,\c!kopletter, + \c!kleur,\c!markleur,\c!symkleur,\c!kopkleur, + \c!kopvoor,\c!kopna,\c!voor,\c!tussen,\c!na, + \c!afsluiter,\c!plaatsafsluiter,\c!inspringen, + \c!n,\c!binnen,\c!symbool,\c!marge,\c!items, + \c!start,\c!linkertekst,\c!rechtertekst]} \def\setupitemgroups {\dosingleargument\dosetupitemgroups} \def\dosetupitemgroups[#1]% still undocumented - {\getparameters[\??oo][\c!levels=4,#1]% + {\getparameters[\??oo][\c!niveaus=4,#1]% % will change (remove) - \ifnum\@@oolevels>\maxitemlevel - \edef\maxitemlevel{\@@oolevels}% + \ifnum\@@ooniveaus>\maxitemlevel + \edef\maxitemlevel{\@@ooniveaus}% \dorecurse\maxitemlevel{\initializeitemgroupslevel\recurselevel}% \fi} @@ -153,52 +152,52 @@ \def\dododosetupitemgroupconstant[#1][#2#3#4]% * permits [2] {\processaction [#2#3#4] - [ \v!packed*=>\packitems, + [ \v!opelkaar*=>\packitems, \v!intro*=>\itemintrotrue, \v!autointro*=>\autoitemintrotrue, - \v!broad*=>\setitemparameter{#1}\c!factor{1}, - #2#3*\v!broad*=>\setitemparameter{#1}\c!factor{#2#3}, - #2*\v!broad*=>\setitemparameter{#1}\c!factor{#2}, - \v!text*=>\textitemstrue + \v!ruim*=>\setitemparameter{#1}\c!factor{1}, + #2#3*\v!ruim*=>\setitemparameter{#1}\c!factor{#2#3}, + #2*\v!ruim*=>\setitemparameter{#1}\c!factor{#2}, + \v!tekst*=>\textitemstrue \settrue\inlinelistitem \dosetuppackeditemgroup{#1}% \packitems, - \v!columns*=>\packitems, - \v!margin*=>\setitemparameter{#1}\c!width{-2em}, % signal - \v!inmargin*=>\setitemparameter{#1}\c!width{-2em}, % signal - \v!atmargin*=>\doifnot{#1}{1}{\setitemparameter{#1}\c!width{0em}}, % signal - \v!intext*=>\settrue\inlinelistitem, % new - \v!loose*=>\optimizeitemsfalse, - \v!paragraph*=>\paragraphitemstrue + \v!kolommen*=>\packitems, + \v!marge*=>\setitemparameter{#1}\c!breedte{-2em}, % signal + \v!inmarge*=>\setitemparameter{#1}\c!breedte{-2em}, % signal + \v!opmarge*=>\doifnot{#1}{1}{\setitemparameter{#1}\c!breedte{0em}}, % signal + \v!intekst*=>\settrue\inlinelistitem, % new + \v!los*=>\optimizeitemsfalse, + \v!alinea*=>\paragraphitemstrue \packitems, - \v!joinedup*=>\dosetuppackeditemgroup{#1}% + \v!aansluitend*=>\dosetuppackeditemgroup{#1}% \packitems, - \v!serried*=>\setitemparameter{#1}\c!factor{-1}, - #2#3*\v!serried*=>\setitemparameter{#1}\c!factor{-#2#3}, - #2*\v!serried*=>\setitemparameter{#1}\c!factor{-#2}, - \v!stopper*=>\setitemparameter{#1}\c!placestopper\v!yes, - \v!unpacked*=>\packeditemsfalse, - \v!standard*=>\dosetupstandarditemgroup{#1}]} + \v!aanelkaar*=>\setitemparameter{#1}\c!factor{-1}, + #2#3*\v!aanelkaar*=>\setitemparameter{#1}\c!factor{-#2#3}, + #2*\v!aanelkaar*=>\setitemparameter{#1}\c!factor{-#2}, + \v!afsluiter*=>\setitemparameter{#1}\c!plaatsafsluiter\v!ja, + \v!vanelkaar*=>\packeditemsfalse, + \v!standaard*=>\dosetupstandarditemgroup{#1}]} \def\dosetupstandarditemgroup#1% {\getparameters [\??op\currentitemgroup#1] - [\c!width=1.5em, + [\c!breedte=1.5em, \c!factor=0, - \c!distance=.5em, - \c!beforehead=, - \c!afterhead=\blank, - \c!before=\blank, - \c!inbetween=\blank, - \c!after=\blank, - \c!inner=]} + \c!afstand=.5em, + \c!kopvoor=, + \c!kopna=\blanko, + \c!voor=\blanko, + \c!tussen=\blanko, + \c!na=\blanko, + \c!binnen=]} \def\dosetuppackeditemgroup#1% - {\letitemparameter{#1}\c!beforehead\empty - \letitemparameter{#1}\c!afterhead \empty - \letitemparameter{#1}\c!before \empty - \letitemparameter{#1}\c!after \empty - \letitemparameter{#1}\c!inbetween \empty} + {\letitemparameter{#1}\c!kopvoor\empty + \letitemparameter{#1}\c!kopna \empty + \letitemparameter{#1}\c!voor \empty + \letitemparameter{#1}\c!na \empty + \letitemparameter{#1}\c!tussen \empty} \def\dosetupitemgroupconstant[#1][#2]% {\def\dodosetupitemgroupconstant##1% @@ -213,18 +212,18 @@ \def\dododododosetupitemgroup[#1][#2]% {\doifassignmentelse{#2}% {\dosetupitemgroupvariable[#1][#2]}% - {\setitemparameter{#1}\c!option{#2}}}% + {\setitemparameter{#1}\c!optie{#2}}}% \def\dodododosetupitemgroup[#1][#2]% {\ConvertToConstant\doifnot{#2}{} - {\doifelse{#1}\v!each + {\doifelse{#1}\v!elk {\dorecurse\maxitemlevel{\ExpandFirstAfter\dododododosetupitemgroup[\recurselevel][#2]}} {\ExpandFirstAfter\dododododosetupitemgroup[#1][#2]}}} \def\dododosetupitemgroup[#1][#2]% {\ConvertToConstant\doifelse{#2}{} {\ifcase\itemlevel\relax - \dodododosetupitemgroup[\v!each][#1]% + \dodododosetupitemgroup[\v!elk][#1]% \else \dodododosetupitemgroup[\itemlevel][#1]% \fi} @@ -267,7 +266,7 @@ \def\setitemlevel#1% {\ifnum\itemlevel>\zerocount \firstlisttrue - \doifnotinset\v!continue{#1} + \doifnotinset\v!verder{#1} {\doifinset{0}{#1}{\setitemparameter\itemlevel\c!start{0}}% \doifsomething{\getitemparameter\itemlevel\c!start} {\setcounter{\@@itemcounter\itemlevel}{\getitemparameter\itemlevel\c!start}% @@ -275,8 +274,8 @@ \letitemparameter\itemlevel\c!start\empty}}% \def\tempnumber {\countervalue{\@@itemcounter\itemlevel}}% - \doifelse{\getitemparameter\itemlevel\c!placestopper}\v!yes - {\def\tempsymbol{\getitemparameter\itemlevel\c!stopper}} + \doifelse{\getitemparameter\itemlevel\c!plaatsafsluiter}\v!ja + {\def\tempsymbol{\getitemparameter\itemlevel\c!afsluiter}} {\let\tempsymbol\empty}% \fi} @@ -316,32 +315,32 @@ \setxvalue{\@@globalitemsymbol\itemlevel}{\currentitemsymbol}% \setgvalue{\@@localitemsymbol \itemlevel}{\unknownitemsymbol}% \def\listitem{\symbol[\currentitemsymbol]}% - \let\@@opsymbol\empty}% \let\docommando\gobbleoneargument} + \let\@@opsymbool\empty}% \let\docommando\gobbleoneargument} {\doifconversiondefinedelse{#1} {\edef\currentitemsymbol{#1}% \setxvalue{\@@globalitemsymbol\itemlevel}{\currentitemsymbol}% \setgvalue{\@@localitemsymbol \itemlevel}% {\convertnumber{\currentitemsymbol}{\countervalue{\@@itemcounter\itemlevel}}}% \iftextitems - \doifsomething{\getitemparameter\itemlevel\c!lefttext} + \doifsomething{\getitemparameter\itemlevel\c!linkertekst} {\let\tempsymbol\empty}% \fi \def\listitem {\getitemparameter\itemlevel - {\iftextitems\c!lefttext\else\c!left\fi}% + {\iftextitems\c!linkertekst\else\c!links\fi}% \getvalue{\@@localitemsymbol\itemlevel}\tempsymbol \getitemparameter\itemlevel - {\iftextitems\c!righttext\else\c!right\fi}}% - \let\@@opsymbol\empty}%\let\docommando\gobbleoneargument} + {\iftextitems\c!rechtertekst\else\c!rechts\fi}}% + \let\@@opsymbool\empty}%\let\docommando\gobbleoneargument} {}}} \def\calculatelistwidth#1#2% distance deals with 'broad' - {#2=\getitemparameter{#1}\c!distance\relax + {#2=\getitemparameter{#1}\c!afstand\relax \ifnum\getitemparameter{#1}\c!factor>\zerocount \ifdim#2=\zeropoint #2=.5em\fi \fi \multiply#2 \getitemparameter{#1}\c!factor - \advance #2 \getitemparameter{#1}\c!width\relax} + \advance #2 \getitemparameter{#1}\c!breedte\relax} % The next conditionals deal with \item \startitemgroup. It % looks like a hack to skip back, but that way we preserve @@ -366,6 +365,112 @@ {\dodostartitemgroup[#2][]}% \fi} +% \def\dodostartitemgroup[#1][#2]% +% {\setfalse\inlinelistitem % new, no indent (leftskip) +% \setfalse\concatnextitem % new, concat +% \ifhmode +% \ifconditional\autoconcatnextitem % new, concat +% \ifdim\lastskip=\itemsignal % new, concat +% \settrue\concatnextitem % new, concat +% \fi % new, concat +% \fi % new, concat +% \iftextitems\else\doifnotinset\v!tekst{#1}\par\fi % suboptimal +% \fi +% \ifnum\itemlevel=\maxitemlevel\relax +% \showmessage\m!layouts9\maxitemlevel +% \def\itemincrement{0}% +% \else +% \def\itemincrement{1}% +% \fi +% \doglobal\increment(\itemlevel,\itemincrement)% +% \initializeitemgrouplevel\itemlevel % safeguard +% \begingroup +% \ifnum\itemlevel=\plusone % NIEUW +% \doadaptleftskip{\getitemparameter1\c!marge}% +% \fi +% \dosetraggedcommand{\getitemparameter\itemlevel\c!uitlijnen}\raggedcommand +% \doifsomething{\getitemparameter\itemlevel\c!inspringen} +% {\expanded{\setupindenting[\getitemparameter\itemlevel\c!inspringen]}}% +% \doifinset\v!kolommen{#1}% +% {\ifbinnenkolommen\else\ifnum\itemcolumndepth=\zerocount +% \globallet\itemcolumndepth\itemlevel +% \getitemparameter\itemlevel\c!voor +% \processfirstactioninset +% [#1] +% [ \v!een=>\!!counta1\relax, +% \v!twee=>\!!counta2\relax, +% \v!drie=>\!!counta3\relax, +% \v!vier=>\!!counta4\relax, +% \v!vijf=>\!!counta5\relax, +% \s!unknown=>\@EA\!!counta\getitemparameter\itemlevel\c!n]% +% % new +% \edef\columneditemleftskip{\the\leftskip}% +% \def\postprocesscolumnbox##1% +% {\scratchdimen\columneditemleftskip +% \divide\scratchdimen \nofcolumns +% \hbox{\hskip\columneditemleftskip\hbox{\box##1}}}% +% \scratchdimen-\columneditemleftskip +% \multiply\scratchdimen \nofcolumns +% \advance\scratchdimen \columneditemleftskip +% \advance\scratchdimen \hsize +% \edef\columntextwidth{\the\scratchdimen}% +% \leftskip\zeropoint +% % so far +% \startkolommen +% [\c!n=\!!counta, % netter \??op\itemlevel\c!n +% \c!hoogte=, +% \c!lijn=\v!uit, +% \c!balanceren=\v!ja, +% \c!uitlijnen=\v!nee]% +% \fi\fi}% +% \doifinsetelse\v!intro{#1}\itemintrotrue\itemintrofalse +% \doglobal\increment\noflists +% \let\currentlist\noflists +% \newcounter\noflistelements +% \headitemfalse +% \subitemfalse +% \symbolitemfalse +% \let\marsymbol\relax +% \globallet\somdestination\empty +% \let\symsymbol\empty +% \the\itemgroupcommands +% \setitemlevel{#1}% +% \getitemparameter\itemlevel\empty +% \doifelsenothing{#1} % iffirstargument +% {\edef\@@opsymbool{\getitemparameter\itemlevel\c!symbool}% +% \letgvalueempty{\@@globalitemsymbol\itemlevel}% +% \global\letitemparameter\itemlevel\v!verder\empty +% \setitemmark\@@opsymbool +% \dosetupitemgroupvariable[\itemlevel][#2]} +% {\dosetupitemgroupconstant[\itemlevel][#1]% +% \dosetupitemgroupvariable[\itemlevel][#2]% +% \doifinsetelse\v!verder{#1}% \noexpand, else problems in non-etex with chinese +% {\edef\@@opsymbool{\noexpand\getvalue{\@@globalitemsymbol\itemlevel}}% +% \getitemparameter\itemlevel\v!verder} +% {\edef\@@opsymbool{\noexpand\getitemparameter{\itemlevel}{\c!symbool}}% +% \global\setitemparameter\itemlevel\v!verder +% {\dosetupitemgroupconstant[\itemlevel][#1]% +% \dosetupitemgroupvariable[\itemlevel][#2]}}% +% \def\docommando##1% \setitemmark resets \docommando +% {\doifnot{##1}{0}{\setitemmark{##1}}}% +% \processcommalist[#1,\@@opsymbool]\docommando}% +% \ifautoitemintro\ifnum\prevgraf<3 +% \itemintrotrue +% \fi\fi +% \ifparagraphitems +% \ifnum\itemlevel>\plusone +% \letitemparameter\itemlevel\c!tussen\empty +% \fi +% \else\ifpackeditems +% \letitemparameter\itemlevel\c!tussen\empty +% \fi\fi +% \calculatelistwidth\itemlevel{\dimen0}% +% \ifdim\dimen0>\zeropoint\relax +% \ifconditional\inlinelistitem\else +% \advance\leftskip \dimen0\relax +% \fi +% \fi} + \def\dodostartitemgroup[#1]% [#2]% {\relax % prevents lookahead \ifnum\itemlevel=\maxitemlevel\relax @@ -376,7 +481,7 @@ \fi \doglobal\increment(\itemlevel,\itemincrement)% \initializeitemgrouplevel\itemlevel % safeguard - \edef\itemgroupoptions{\getitemparameter\itemlevel\c!option}% + \edef\itemgroupoptions{\getitemparameter\itemlevel\c!optie}% \ifx\itemgroupoptions\empty \edef\itemgroupoptions{#1}% \else @@ -384,6 +489,105 @@ \fi \expanded{\redostartitemgroup[\itemgroupoptions]}}% [#2] +% \def\redostartitemgroup[#1][#2]% +% {\setfalse\inlinelistitem % new, no indent (leftskip) +% \setfalse\concatnextitem % new, concat +% \ifhmode +% \ifconditional\autoconcatnextitem % new, concat +% \ifdim\lastskip=\itemsignal % new, concat +% \settrue\concatnextitem % new, concat +% \fi % new, concat +% \fi % new, concat +% \iftextitems\else\doifnotinset\v!tekst{#1}\par\fi % suboptimal +% \fi +% \begingroup +% \ifnum\itemlevel=\plusone % NIEUW +% \doadaptleftskip{\getitemparameter1\c!marge}% +% \fi +% \dosetraggedcommand{\getitemparameter\itemlevel\c!uitlijnen}\raggedcommand +% \doifsomething{\getitemparameter\itemlevel\c!inspringen} +% {% is \expanded needed? +% \expanded{\setupindenting[\getitemparameter\itemlevel\c!inspringen]}}% +% \doifinset\v!kolommen{#1}% +% {\ifbinnenkolommen\else\ifnum\itemcolumndepth=\zerocount +% \globallet\itemcolumndepth\itemlevel +% \getitemparameter\itemlevel\c!voor +% \processfirstactioninset +% [#1] +% [ \v!een=>\!!counta1\relax, +% \v!twee=>\!!counta2\relax, +% \v!drie=>\!!counta3\relax, +% \v!vier=>\!!counta4\relax, +% \v!vijf=>\!!counta5\relax, +% \s!unknown=>\@EA\!!counta\getitemparameter\itemlevel\c!n]% +% % new +% \edef\columneditemleftskip{\the\leftskip}% +% \def\postprocesscolumnbox##1% +% {\scratchdimen\columneditemleftskip +% \divide\scratchdimen \nofcolumns +% \hbox{\hskip\columneditemleftskip\hbox{\box##1}}}% +% \scratchdimen-\columneditemleftskip +% \multiply\scratchdimen \nofcolumns +% \advance\scratchdimen \columneditemleftskip +% \advance\scratchdimen \hsize +% \edef\columntextwidth{\the\scratchdimen}% +% \leftskip\zeropoint +% % so far +% \startkolommen +% [\c!n=\!!counta, % netter \??op\itemlevel\c!n +% \c!hoogte=, +% \c!lijn=\v!uit, +% \c!balanceren=\v!ja, +% \c!uitlijnen=\v!nee]% +% \fi\fi}% +% \doifinsetelse\v!intro{#1}\itemintrotrue\itemintrofalse +% \doglobal\increment\noflists +% \let\currentlist\noflists +% \newcounter\noflistelements +% \headitemfalse +% \subitemfalse +% \symbolitemfalse +% \let\marsymbol\relax +% \globallet\somdestination\empty +% \let\symsymbol\empty +% \the\itemgroupcommands +% \setitemlevel{#1}% +% %\getitemparameter\itemlevel\empty +% \doifelsenothing{#1} % iffirstargument +% {\edef\@@opsymbool{\getitemparameter\itemlevel\c!symbool}% +% \letgvalueempty{\@@globalitemsymbol\itemlevel}% +% \global\letitemparameter\itemlevel\v!verder\empty +% \setitemmark\@@opsymbool +% \dosetupitemgroupvariable[\itemlevel][#2]} +% {\dosetupitemgroupconstant[\itemlevel][#1]% +% \dosetupitemgroupvariable[\itemlevel][#2]% +% \doifinsetelse\v!verder{#1}% \noexpand, else problems in non-etex with chinese +% {\edef\@@opsymbool{\noexpand\getvalue{\@@globalitemsymbol\itemlevel}}% +% \getitemparameter\itemlevel\v!verder} +% {\edef\@@opsymbool{\noexpand\getitemparameter{\itemlevel}{\c!symbool}}% +% \global\setitemparameter\itemlevel\v!verder +% {\dosetupitemgroupconstant[\itemlevel][#1]% +% \dosetupitemgroupvariable[\itemlevel][#2]}}% +% \def\docommando##1% \setitemmark resets \docommando +% {\doifnot{##1}{0}{\setitemmark{##1}}}% +% \processcommalist[#1,\@@opsymbool]\docommando}% +% \ifautoitemintro\ifnum\prevgraf<3 +% \itemintrotrue +% \fi\fi +% \ifparagraphitems +% \ifnum\itemlevel>\plusone +% \letitemparameter\itemlevel\c!tussen\empty +% \fi +% \else\ifpackeditems +% \letitemparameter\itemlevel\c!tussen\empty +% \fi\fi +% \calculatelistwidth\itemlevel{\dimen0}% +% \ifdim\dimen0>\zeropoint\relax +% \ifconditional\inlinelistitem\else +% \advance\leftskip \dimen0\relax +% \fi +% \fi} + \def\redostartitemgroup[#1][#2]% {\setfalse\inlinelistitem % new, no indent (leftskip) \setfalse\concatnextitem % new, concat @@ -393,29 +597,27 @@ \settrue\concatnextitem % new, concat \fi % new, concat \fi % new, concat - \iftextitems\else\doifnotinset\v!text{#1}\par\fi % suboptimal + \iftextitems\else\doifnotinset\v!tekst{#1}\par\fi % suboptimal \fi \begingroup \ifnum\itemlevel=\plusone % NIEUW - \doadaptleftskip {\getitemparameter1\c!margin}% - \doadaptleftskip {\getitemparameter1\c!leftmargin}% - \doadaptrightskip{\getitemparameter1\c!rightmargin}% + \doadaptleftskip{\getitemparameter1\c!marge}% \fi - \dosetraggedcommand{\getitemparameter\itemlevel\c!align}\raggedcommand - \doifsomething{\getitemparameter\itemlevel\c!indenting} + \dosetraggedcommand{\getitemparameter\itemlevel\c!uitlijnen}\raggedcommand + \doifsomething{\getitemparameter\itemlevel\c!inspringen} {% is \expanded needed? - \expanded{\setupindenting[\getitemparameter\itemlevel\c!indenting]}}% - \doifinset\v!columns{#1}% - {\ifinsidecolumns\else\ifnum\itemcolumndepth=\zerocount + \expanded{\setupindenting[\getitemparameter\itemlevel\c!inspringen]}}% + \doifinset\v!kolommen{#1}% + {\ifbinnenkolommen\else\ifnum\itemcolumndepth=\zerocount \globallet\itemcolumndepth\itemlevel - \getitemparameter\itemlevel\c!before + \getitemparameter\itemlevel\c!voor \processfirstactioninset [#1] - [ \v!one=>\!!counta1\relax, - \v!two=>\!!counta2\relax, - \v!three=>\!!counta3\relax, - \v!four=>\!!counta4\relax, - \v!five=>\!!counta5\relax, + [ \v!een=>\!!counta1\relax, + \v!twee=>\!!counta2\relax, + \v!drie=>\!!counta3\relax, + \v!vier=>\!!counta4\relax, + \v!vijf=>\!!counta5\relax, \s!unknown=>\@EA\!!counta\getitemparameter\itemlevel\c!n]% % new \edef\columneditemleftskip{\the\leftskip}% @@ -430,12 +632,12 @@ \edef\columntextwidth{\the\scratchdimen}% \leftskip\zeropoint % so far - \startcolumns + \startkolommen [\c!n=\!!counta, % netter \??op\itemlevel\c!n - \c!height=, - \c!rule=\v!off, - \c!balance=\v!yes, - \c!align=\v!no]% + \c!hoogte=, + \c!lijn=\v!uit, + \c!balanceren=\v!ja, + \c!uitlijnen=\v!nee]% \fi\fi}% \doifinsetelse\v!intro{#1}\itemintrotrue\itemintrofalse \doglobal\increment\noflists @@ -452,26 +654,26 @@ %\getitemparameter\itemlevel\empty \let\listitem\empty % ** start value \doifelsenothing{#1} % iffirstargument - {\edef\@@opsymbol{\getitemparameter\itemlevel\c!symbol}% + {\edef\@@opsymbool{\getitemparameter\itemlevel\c!symbool}% \letgvalueempty{\@@globalitemsymbol\itemlevel}% - \global\letitemparameter\itemlevel\v!continue\empty - % \setitemmark\@@opsymbol % ** default value + \global\letitemparameter\itemlevel\v!verder\empty + % \setitemmark\@@opsymbool % ** default value \dosetupitemgroupvariable[\itemlevel][#2]} {\dosetupitemgroupconstant[\itemlevel][#1]% \dosetupitemgroupvariable[\itemlevel][#2]% - \doifinsetelse\v!continue{#1}% \noexpand, else problems in non-etex with chinese - {\edef\@@opsymbol{\noexpand\getvalue{\@@globalitemsymbol\itemlevel}}% - \getitemparameter\itemlevel\v!continue} - {\edef\@@opsymbol{\noexpand\getitemparameter{\itemlevel}{\c!symbol}}% - \global\setitemparameter\itemlevel\v!continue + \doifinsetelse\v!verder{#1}% \noexpand, else problems in non-etex with chinese + {\edef\@@opsymbool{\noexpand\getvalue{\@@globalitemsymbol\itemlevel}}% + \getitemparameter\itemlevel\v!verder} + {\edef\@@opsymbool{\noexpand\getitemparameter{\itemlevel}{\c!symbool}}% + \global\setitemparameter\itemlevel\v!verder {\dosetupitemgroupconstant[\itemlevel][#1]% \dosetupitemgroupvariable[\itemlevel][#2]}}% \def\docommando##1% \setitemmark resets \docommando {\doifnot{##1}{0}{\setitemmark{##1}}}% - % \processcommalist[#1,\@@opsymbol]\docommando + % \processcommalist[#1,\@@opsymbool]\docommando \processcommalist[#1]\docommando}% ** preset sequence or provided sequence \ifx\listitem\empty - \setitemmark\@@opsymbol % ** default value + \setitemmark\@@opsymbool % ** default value \ifx\listitem\empty \edef\currentitemsymbol{\itemlevel}% ** fall back \fi @@ -481,10 +683,10 @@ \fi\fi \ifparagraphitems \ifnum\itemlevel>\plusone - \letitemparameter\itemlevel\c!inbetween\empty + \letitemparameter\itemlevel\c!tussen\empty \fi \else\ifpackeditems - \letitemparameter\itemlevel\c!inbetween\empty + \letitemparameter\itemlevel\c!tussen\empty \fi\fi \calculatelistwidth\itemlevel{\dimen0}% \ifdim\dimen0>\zeropoint\relax @@ -502,28 +704,26 @@ \ifnum\itemcolumndepth=\zerocount \dolistreference \fi % beware ! \iffirstlist \else \endgroup \fi % toegevoegd, eerste \som opent groep \ifnum\itemcolumndepth=\itemlevel\relax - \stopcolumns + \stopkolommen \doglobal\newcounter\itemcolumndepth - \getitemparameter\itemlevel\c!after + \getitemparameter\itemlevel\c!na \else \ifnum\itemlevel=\plusone \doitembreak\allowbreak % toegevoegd - \getitemparameter1\c!after + \getitemparameter1\c!na \dochecknextindentation\??oo \else % nieuw, not yet nobreak handling \ifcase\autoitemgroupspacing - \getitemparameter\itemlevel\c!after + \getitemparameter\itemlevel\c!na \or - \getitemparameter\itemlevel\c!after + \getitemparameter\itemlevel\c!na \fi \fi \fi \endgroup \doglobal\decrement(\itemlevel,\itemincrement)% - \egroup - % new needed in sidefloats (surfaced in volker's proceedings) - \iftextitems\else\par\fi} + \egroup} \newtoks\itemgroupcommands @@ -541,7 +741,7 @@ {\subitemtrue\itemgroupitem} \def\itemgroupsymbol#1% - {\def\symsymbol{\doitemattributes\itemlevel\c!symstyle\c!symcolor{#1}}% + {\def\symsymbol{\doitemattributes\itemlevel\c!symletter\c!symkleur{#1}}% \symbolitemtrue \itemgroupitem} @@ -549,7 +749,7 @@ {\itemgroupsymbol {\calculatelistwidth\itemlevel{\dimen0}% \hbox to \dimen0 - {#1\hskip\getitemparameter\itemlevel\c!distance}}} + {#1\hskip\getitemparameter\itemlevel\c!afstand}}} \def\itemgrouphead {\headitemtrue\doitemgrouphead} @@ -565,20 +765,20 @@ \def\itemgroupmargin#1% {\def\marsymbol {\llap - {\doitemattributes\itemlevel\c!marstyle\c!marcolor{#1}% - \hskip\leftskip\hskip\leftmargindistance}}% + {\doitemattributes\itemlevel\c!marletter\c!markleur{#1}% + \hskip\leftskip\hskip\linkermargeafstand}}% \itemgroupitem} -\appendtoks \let\item \itemgroupitem \to \itemgroupcommands -\appendtoks \let\itm \itemgroupitem \to \itemgroupcommands -\appendtoks \let\but \itemgroupbutton \to \itemgroupcommands -\appendtoks \let\nop \itemgroupdummy \to \itemgroupcommands -\appendtoks \letvalue\v!sub \itemgroupsubitem \to \itemgroupcommands -\appendtoks \letvalue\v!sym \itemgroupsymbol \to \itemgroupcommands -\appendtoks \letvalue\v!ran \itemgroupedge \to \itemgroupcommands -\appendtoks \letvalue\v!head \itemgrouphead \to \itemgroupcommands -\appendtoks \letvalue\v!its \itemgroupitems \to \itemgroupcommands -\appendtoks \letvalue\v!mar \itemgroupmargin \to \itemgroupcommands +\appendtoks \let\item \itemgroupitem \to \itemgroupcommands +\appendtoks \let\itm \itemgroupitem \to \itemgroupcommands +\appendtoks \let\but \itemgroupbutton \to \itemgroupcommands +\appendtoks \let\nop \itemgroupdummy \to \itemgroupcommands +\appendtoks \letvalue\v!sub \itemgroupsubitem \to \itemgroupcommands +\appendtoks \letvalue\v!sym \itemgroupsymbol \to \itemgroupcommands +\appendtoks \letvalue\v!ran \itemgroupedge \to \itemgroupcommands +\appendtoks \letvalue\v!kop \itemgrouphead \to \itemgroupcommands +\appendtoks \letvalue\v!its \itemgroupitems \to \itemgroupcommands +\appendtoks \letvalue\v!mar \itemgroupmargin \to \itemgroupcommands % Sometimes the user demands get pretty weird: % @@ -589,7 +789,7 @@ % \stopitemize \def\itemgroupheadsym#1% - {\def\symsymbol{\doitemattributes\itemlevel\c!symstyle\c!symcolor{#1}}% + {\def\symsymbol{\doitemattributes\itemlevel\c!symletter\c!symkleur{#1}}% \symbolitemtrue \headitemtrue \doitemgrouphead} @@ -600,7 +800,7 @@ {\flushnotes\penalty-5\relax} \def\itemnobreak % +5 - {\flushnotes\penalty+5\ifinsidecolumns\else00\fi\relax} + {\flushnotes\penalty+5\ifbinnenkolommen\else00\fi\relax} \def\dolistitem % evt aantal items opslaan per niveau, scheelt zoeken {\iftextitems @@ -642,22 +842,22 @@ \noindent \setbox8\hbox {\ifheaditem - \doitemattributes\itemlevel\c!headstyle\c!headcolor{\listitem}% + \doitemattributes\itemlevel\c!kopletter\c!kopkleur{\listitem}% \else\ifsymbolitem \symsymbol \else - \doitemattributes\itemlevel\c!style\c!color{\listitem}% + \doitemattributes\itemlevel\c!letter\c!kleur{\listitem}% \fi\fi}% \doifsomething\somdestination - {\setbox8\hbox{\goto{\box8}[\somdestination]}}% + {\setbox8\hbox{\naar{\box8}[\somdestination]}}% \globallet\somdestination\empty - \dimen2=\getitemparameter\itemlevel\c!width\relax + \dimen2=\getitemparameter\itemlevel\c!breedte\relax % new, prevents loops when symbol is (not yet found) graphic \ht8=\strutheight \dp8=\strutdepth % so that content differs per run (esp mp graphics afterwards) \ifdim\dimen2<\zeropoint\relax - \llap{\ifsubitem\llap{+}\fi\box8\hskip\leftmargindistance}% + \llap{\ifsubitem\llap{+}\fi\box8\hskip\linkermargeafstand}% \else \ifdim\dimen2=\zeropoint\relax \calculatelistwidth1{\dimen0}% @@ -709,7 +909,7 @@ \or % 1 \ifnum\itemcolumndepth=0\relax \ifitemintro\doitembreak\nobreak\fi - \getitemparameter1\c!before + \getitemparameter1\c!voor \ifitemintro\doitembreak\nobreak\fi \fi \else % 2 en hoger @@ -717,18 +917,18 @@ \let\previtemlevel\itemlevel \decrement\previtemlevel \ifcase\autoitemgroupspacing\relax % nieuw - \getitemparameter\itemlevel\c!before + \getitemparameter\itemlevel\c!voor \or - \doifelsenothing{\getitemparameter\itemlevel\c!before} - {\getitemparameter\itemlevel\c!before} - {\getitemparameter\previtemlevel\c!inbetween}% + \doifelsenothing{\getitemparameter\itemlevel\c!voor} + {\getitemparameter\itemlevel\c!voor} + {\getitemparameter\previtemlevel\c!tussen}% \else - \getitemparameter\previtemlevel\c!inbetween % == itemlevel-1 + \getitemparameter\previtemlevel\c!tussen % == itemlevel-1 \fi \fi \fi \else - \getitemparameter\itemlevel\c!inbetween + \getitemparameter\itemlevel\c!tussen \fi \ifconditional\concatnextitem % new, concat \vskip-\lastskip % new, concat @@ -738,9 +938,9 @@ \ignorespaces \dolistitem \ifpackeditems - \setupwhitespace[\v!none]% + \setupwhitespace[\v!geen]% \fi - \getitemparameter\itemlevel\c!inner + \getitemparameter\itemlevel\c!binnen \marsymbol \let\marsymbol\relax \doifsomething{#1} @@ -764,11 +964,11 @@ \def\complexdoitemgrouphead[#1]#2\par% % beter in \complexdosom hangen met een if {\iffirstlist\else\doitembreak\allowbreak\fi - \ifpackeditems\else\getitemparameter\itemlevel\c!beforehead\fi + \ifpackeditems\else\getitemparameter\itemlevel\c!kopvoor\fi \iffirstlist\ifitemintro\else\ifcase\itemlevel % incr in \complexdosom \doitembreak\allowbreak \fi\fi\fi - \complexdoitemgroupitem[#1]{\doitemattributes\itemlevel\c!headstyle\c!headcolor + \complexdoitemgroupitem[#1]{\doitemattributes\itemlevel\c!kopletter\c!kopkleur {\ignorespaces#2}}% \iftextitems \removeunwantedspaces\space\ignorespaces @@ -776,7 +976,7 @@ \par \fi \doitembreak\nobreak - \ifpackeditems\else\getitemparameter\itemlevel\c!afterhead\fi + \ifpackeditems\else\getitemparameter\itemlevel\c!kopna\fi \doitembreak\nobreak \noindentation} @@ -809,41 +1009,39 @@ \ignorespaces} \setupitemgroups % undocumented - [\c!levels=6, - \c!margin=\zeropoint, - \c!leftmargin=\zeropoint, - \c!rightmargin=\zeropoint, - \c!indentnext=\v!yes, - \c!width=1.5em, + [\c!niveaus=6, + \c!marge=\!!zeropoint, + \c!springvolgendein=\v!ja, + \c!breedte=1.5em, \c!factor=0, - \c!distance=.5em, - %\c!align=\v!normal, % definitely not \v!normal, see mails and - \c!align=, % debug reports of David A & Patrick G on context list - \c!color=, - \c!indenting=, % untouched if empty - \c!color=, - \c!style=, % kan tzt weg - \c!marstyle=\c!type, % \c! ??? - \c!symstyle=, - \c!headstyle=, - \c!marcolor=, - \c!symcolor=, - \c!headcolor=, - \c!beforehead=, - \c!afterhead=\blank, - \c!before=\blank, - \c!inbetween=\blank, - \c!after=\blank, - \c!stopper=., - \c!placestopper=\v!yes, - \c!inner=, + \c!afstand=.5em, + %\c!uitlijnen=\v!normaal, % definitely not \v!normaal, see mails and + \c!uitlijnen=, % debug reports of David A & Patrick G on context list + \c!kleur=, + \c!inspringen=, % untouched if empty + \c!kleur=, + \c!letter=, % kan tzt weg + \c!marletter=\c!type, % \c! ??? + \c!symletter=, + \c!kopletter=, + \c!markleur=, + \c!symkleur=, + \c!kopkleur=, + \c!kopvoor=, + \c!kopna=\blanko, + \c!voor=\blanko, + \c!tussen=\blanko, + \c!na=\blanko, + \c!afsluiter=., + \c!plaatsafsluiter=\v!ja, + \c!binnen=, \c!n=2, \c!items=4, - \c!lefttext=(, - \c!righttext=), + \c!linkertekst=(, + \c!rechtertekst=), \c!start=1, - \c!option=, - \c!symbol=\itemlevel] % \v!niveau + \c!optie=, + \c!symbool=\itemlevel] % \v!niveau \def\defineitemgroup {\dodoubleempty\dodefineitemgroup} @@ -854,18 +1052,18 @@ \def\currentitemgroup{#1}% \setvalue{\e!start#1}{\startitemgroup[#1]}% \setvalue{\e!stop#1}{\stopitemgroup}% - \setvalue{\e!setup#1\e!endsetup}{\setupitemgroup[#1]}% - \getparameters[\??ig#1][\c!levels=3,#2]% - \ifnum\getvalue{\??ig#1\c!levels}<\maxitemlevel\relax - \letvalue{\??ig#1\c!levels}\maxitemlevel + \setvalue{\e!stel#1\e!in}{\setupitemgroup[#1]}% + \getparameters[\??ig#1][\c!niveaus=3,#2]% + \ifnum\getvalue{\??ig#1\c!niveaus}<\maxitemlevel\relax + \letvalue{\??ig#1\c!niveaus}\maxitemlevel \fi - \dorecurse{\getvalue{\??ig#1\c!levels}}{\initializeitemgrouplevel\recurselevel}% + \dorecurse{\getvalue{\??ig#1\c!niveaus}}{\initializeitemgrouplevel\recurselevel}% \popmacro\currentitemgroup}} % efficient default itemize as well as upward compatible % definition: -\defineitemgroup [\v!itemize] [\c!levels=6] +\defineitemgroup [\v!itemize] [\c!niveaus=6] % keep these, needed for styles: @@ -873,4 +1071,4 @@ % \def\stopitemize {\stopitemgroup} % \def\setupitemize {\setupitemgroup[\v!itemize]} -\protect \endinput +\protect \endinput
\ No newline at end of file |