Re: [ConTeXt] Re: pictures for numbers

Re: [ConTeXt] Re: pictures for numbers

[Patrick Gundlach]

Hi!

[...]
> \def\Sleutels#1%
>   {\hbox{\expandafter\DoSleutels\romannumeral #1\relax}\relax}

[...]

> %(1)% \setuphead[chapter][numbercommand=\Sleutels]

> (1):
> ! Missing number, treated as zero.
> <to be read again> 
>                    \edef 
> \setstrutdimen ...strutdimen =#3\strutdimen \edef 
>                                                   #1{\the \strutdimen }

maybe this is the same problem I had a short time ago. 
In the new core-con.tex there is:
\def\Romannumerals#1%
  {\expandafter\doRomannumerals\number#1\relax}

\def\doRomannumerals#1#2\relax
  {\ifnum#1#2<10
     \ifcase0#1#2\or I\or II\or III\or IV\or V\or VI\or VII\or VIII\or IX\fi
   \else\ifnum#1#2<100
     \ifcase  0#1\or X\or XX\or XXX\or XL\or L\or LX\or LXX\or LXXX\or XC\fi 
     \doRomannumerals#2\relax 
   \else\ifnum#1#2<1000
     \ifcase  0#1\or C\or CC\or CCC\or CD\or D\or DC\or DCC\or DCCC\or CM\fi 
     \doRomannumerals#2\relax 
   \else\ifnum#1#2<4000
     \ifcase  0#1\or M\or MM\or MMM\fi
     \doRomannumerals#2\relax 
   \else
     \uppercase\expandafter{\romannumeral#1#2}%
   \fi\fi\fi\fi}

[this should go in core-con.tex]

Viele Grüße,

  Patrick Gundlach

Re: [ConTeXt] Re: pictures for numbers

[Hans Hagen]

At 04:47 PM 11/16/2001 +0100, Patrick Gundlach wrote

>[this should go in core-con.tex]

it is already; watch out for the patch in the previous mail

[to avoid tex's auto inserted \relax's]

Hans
-------------------------------------------------------------------------
                                   Hans Hagen | PRAGMA ADE | pragma@wxs.nl
                       Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
  tel: +31 (0)38 477 53 69 | fax: +31 (0)38 477 53 74 | www.pragma-ade.com
-------------------------------------------------------------------------

Re: [ConTeXt] Re: pictures for numbers

[Hans Hagen]

At 04:06 PM 11/16/2001 +0100, Andres Loeh wrote:
> > Date: Fri, 16 Nov 2001 12:53:14 +0100
> > From: Hans Hagen <pragma@wxs.nl>
> > Subject: [ConTeXt] Re: pictures for numbers
>
>Hello again,
>
>thanks for your help so far. I tried to construct a solution out of
>Taco's and your remarks, and I got that far:
>
>%--BEGIN
>\useexternalfigure [sleutelI] [sleutelsI_new] [height=3ex]
>\useexternalfigure [sleutelV] [sleutelsV_new] [height=3ex]
>\useexternalfigure [sleutelX] [sleutelsX_new] [height=3ex]
>
>\def\Sleutels#1%
>   {\hbox{\expandafter\DoSleutels\romannumeral #1\relax}\relax}
>
>\def\DoSleutels#1%
>   {\if #1\relax
>      \let\next\relax
>    \else
>      \if #1i%
>        \externalfigure[sleutelI]
>      \else
>        \if #1v%
>          \externalfigure[sleutelV]
>        \else
>          \if #1x%
>            \externalfigure[sleutelX]
>          \else
>            \relax
>          \fi
>        \fi
>      \fi
>      \let\next\DoSleutels
>    \fi
>    \next}
>

>The generation of the pictures works perfectly as
>a standalone function. However, I want them to appear
>as chapter numbers. If I uncomment either the line marked
>%(1)% or the lines marked %(2)%, I get errors:
>
>(1):

As said, the #1 is not really a number but a whole bunch of info, liek font 
switches; try \showargument{#1} in your macro and you will see what i mean.

This is why you need the alternative that i send you. That one uses the raw 
number. If you want an uppercase rommannumeral, use

\def\MyNiceNumber#1%
   {\edef\TheRomanNumber{\Romannumerals\currentheadnumber}%
    \expandafter\handletokens\TheRomanNumber\with\MyRomanPicture}

\def\MyRomanPicture#1%
   {\hbox{\externalfigure[RomanDigit#1][widyh=1cm]}}

\setuphead[chapter][numbercommand=\MyNiceNumber]

\dorecurse{25}{\chapter{It Works}}

For this to work you need the following macro (which i made for patrick 
some weeks ago, in core-con, but that one generates a \relax:

\def\doRomannumerals#1#2\relax % spaces after ifcase prevent \relax
   {\ifnum#1#2<10
      \ifcase0#1#2 \or I\or II\or III\or IV\or V\or VI\or VII\or VIII\or IX\fi
    \else\ifnum#1#2<100
      \ifcase0#1   \or X\or XX\or XXX\or XL\or L\or LX\or LXX\or LXXX\or XC\fi
      \doRomannumerals#2\relax
    \else\ifnum#1#2<1000
      \ifcase0#1   \or C\or CC\or CCC\or CD\or D\or DC\or DCC\or DCCC\or CM\fi
      \doRomannumerals#2\relax
    \else\ifnum#1#2<4000
      \ifcase0#1   \or M\or MM\or MMM\fi
      \doRomannumerals#2\relax
    \else
      \uppercase\expandafter{\romannumeral#1#2}%
    \fi\fi\fi\fi}
-------------------------------------------------------------------------
                                   Hans Hagen | PRAGMA ADE | pragma@wxs.nl
                       Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
  tel: +31 (0)38 477 53 69 | fax: +31 (0)38 477 53 74 | www.pragma-ade.com
-------------------------------------------------------------------------

Re: [ConTeXt] Re: pictures for numbers

[Andres Loeh]

> Date: Fri, 16 Nov 2001 12:53:14 +0100
> From: Hans Hagen <pragma@wxs.nl>
> Subject: [ConTeXt] Re: pictures for numbers

Hello again,

thanks for your help so far. I tried to construct a solution out of
Taco's and your remarks, and I got that far:

%--BEGIN
\useexternalfigure [sleutelI] [sleutelsI_new] [height=3ex]
\useexternalfigure [sleutelV] [sleutelsV_new] [height=3ex]
\useexternalfigure [sleutelX] [sleutelsX_new] [height=3ex]

\def\Sleutels#1%
  {\hbox{\expandafter\DoSleutels\romannumeral #1\relax}\relax}

\def\DoSleutels#1%
  {\if #1\relax
     \let\next\relax
   \else
     \if #1i%
       \externalfigure[sleutelI]
     \else
       \if #1v%
         \externalfigure[sleutelV]
       \else
         \if #1x%
           \externalfigure[sleutelX]
         \else
           \relax
         \fi
       \fi
     \fi
     \let\next\DoSleutels
   \fi
   \next}

%(1)% \setuphead[chapter][numbercommand=\Sleutels]

%(2)% \defineconversion[sleutels][\Sleutels]
%(2)% \setupsection  [section-2] [conversion=sleutels]

\starttext

\Sleutels{34}

\chapter {Test}

\stoptext
%--END

The generation of the pictures works perfectly as
a standalone function. However, I want them to appear
as chapter numbers. If I uncomment either the line marked
%(1)% or the lines marked %(2)%, I get errors:

(1):
! Missing number, treated as zero.
<to be read again> 
                   \edef 
\setstrutdimen ...strutdimen =#3\strutdimen \edef 
                                                  #1{\the \strutdimen }
\setstrut ...ht \strutheightfactor \spacingfactor 
                                                  \setstrutdimen \strutdepth...
<argument> \setstrut 
                     \begstrut \sectiebloklabel {\v!hoofdstuk }{\finalsectio...

\Sleutels ...andafter \DoSleutels \romannumeral #1
                                                  \relax }\relax 
<argument> ...k }{\finalsectionnumber }\endstrut }
                                                  \else \getvalue {\??ko \v!...
..
l.39 \chapter {Test}

(2):
! Extra \else.
\DoSleutels ...f #1\relax \let \next \relax \else 
                                                  \if #1i\externalfigure [sl...

\DoSleutels ...\fi \fi \let \next \DoSleutels \fi 
                                                  \next 
<to be read again> 
                   \relax 
\Sleutels ...r \DoSleutels \romannumeral #1\relax 
                                                  }\relax 
\@@sectionconversion ...??se #1\c!conversie }}{#2}
                                                  \fi \else \getvalue {\??cv...

\@@shortsectionnumber ...#1}{\@@sectionvalue {#1}}
                                                  \fi \else \@@sectionconver...
..
l.39 \chapter {Test}

What am I doing wrong? [I am using the ConTeXt version from the
newest TeXLive CD.]

Groeten,
  Andres

-- 

Andres Loeh, Universiteit Utrecht

mailto:andres@cs.uu.nl     mailto:mail@andres-loeh.de
http://www.andres-loeh.de