From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.comp.tex.context/27498 Path: news.gmane.org!not-for-mail From: "luigi scarso" Newsgroups: gmane.comp.tex.context Subject: Re: Register with numeric values Date: Wed, 26 Apr 2006 17:47:12 +0200 Message-ID: References: <444E9E08.6010108@wxs.nl> Reply-To: mailing list for ConTeXt users NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset="us-ascii" Content-Transfer-Encoding: 7bit X-Trace: sea.gmane.org 1146066539 28362 80.91.229.2 (26 Apr 2006 15:48:59 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Wed, 26 Apr 2006 15:48:59 +0000 (UTC) Original-X-From: ntg-context-bounces@ntg.nl Wed Apr 26 17:48:53 2006 Return-path: Envelope-to: gctc-ntg-context-518@m.gmane.org Original-Received: from ronja.vet.uu.nl ([131.211.172.88] helo=ronja.ntg.nl) by ciao.gmane.org with esmtp (Exim 4.43) id 1FYmEc-0000xU-9U for gctc-ntg-context-518@m.gmane.org; Wed, 26 Apr 2006 17:47:22 +0200 Original-Received: from localhost (localhost [127.0.0.1]) by ronja.ntg.nl (Postfix) with ESMTP id 957BD127B6; Wed, 26 Apr 2006 17:47:21 +0200 (CEST) Original-Received: from ronja.ntg.nl ([127.0.0.1]) by localhost (smtp.ntg.nl [127.0.0.1]) (amavisd-new, port 10024) with LMTP id 02592-05; Wed, 26 Apr 2006 17:47:17 +0200 (CEST) Original-Received: from ronja.vet.uu.nl (localhost [127.0.0.1]) by ronja.ntg.nl (Postfix) with ESMTP id EFA15127A5; Wed, 26 Apr 2006 17:47:16 +0200 (CEST) Original-Received: from localhost (localhost [127.0.0.1]) by ronja.ntg.nl (Postfix) with ESMTP id 4238D127A5 for ; Wed, 26 Apr 2006 17:47:15 +0200 (CEST) Original-Received: from ronja.ntg.nl ([127.0.0.1]) by localhost (smtp.ntg.nl [127.0.0.1]) (amavisd-new, port 10024) with LMTP id 04142-03-2 for ; Wed, 26 Apr 2006 17:47:14 +0200 (CEST) Original-Received: from pproxy.gmail.com (pproxy.gmail.com [64.233.166.177]) by ronja.ntg.nl (Postfix) with SMTP id BEF361276C for ; Wed, 26 Apr 2006 17:47:13 +0200 (CEST) Original-Received: by pproxy.gmail.com with SMTP id o67so1345963pye for ; Wed, 26 Apr 2006 08:47:12 -0700 (PDT) Original-Received: by 10.35.111.7 with SMTP id o7mr514114pym; Wed, 26 Apr 2006 08:47:12 -0700 (PDT) Original-Received: by 10.35.130.17 with HTTP; Wed, 26 Apr 2006 08:47:12 -0700 (PDT) Original-To: "mailing list for ConTeXt users" In-Reply-To: <444E9E08.6010108@wxs.nl> Content-Disposition: inline X-Virus-Scanned: amavisd-new at ntg.nl X-BeenThere: ntg-context@ntg.nl X-Mailman-Version: 2.1.7 Precedence: list List-Id: mailing list for ConTeXt users List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: ntg-context-bounces@ntg.nl Errors-To: ntg-context-bounces@ntg.nl X-Virus-Scanned: amavisd-new at ntg.nl Xref: news.gmane.org gmane.comp.tex.context:27498 Archived-At: I make an example here: %% BEGIN %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% \setupinteraction[state=start] \setupcolors[state=start] \definecolor[BackBrand][black] \definecolor[Brand][white] \newcount\ICfdigit \newif\ifDoZero \DoZerotrue \newif\ifDoOne \DoOnetrue \newif\ifDoTwo \DoTwotrue \newif\ifDoThree \DoThreetrue \newif\ifDoFour \DoFourtrue \newif\ifDoFive \DoFivetrue \newif\ifDoSix \DoSixtrue \newif\ifDoSeven \DoSeventrue \newif\ifDoEight \DoEighttrue \newif\ifDoNine \DoNinetrue \newif\ifDoOtherDig \DoOtherDigtrue \defineregister[IndexCode][IndexCodes] \def\ICTextCommand#1{% \getfirstcharacter{#1}\ICfdigit=\firstcharacter% \ifcase\firstcharacter %%\ICfdigit %% 0 \ifDoZero\global\DoZerofalse\ICHeadLetterCommand{0}\fi \or%% 1 \ifDoOne\global\DoOnefalse\ICHeadLetterCommand{1}\fi \or%% 2 \ifDoTwo\global\DoTwofalse\ICHeadLetterCommand{2}\fi \or%% 3 \ifDoThree\global\DoThreefalse\ICHeadLetterCommand{3}\fi \or%% 4 \ifDoFour\global\DoFourfalse\ICHeadLetterCommand{4}\fi \or%% 5 \ifDoFive\global\DoFivefalse\ICHeadLetterCommand{5}\fi \or%% 6 \ifDoSix\global\DoSixfalse\ICHeadLetterCommand{6}\fi \or%% 7 \ifDoSeven\global\DoSevenfalse\ICHeadLetterCommand{7}\fi \or%% 8 \ifDoEight\global\DoEightfalse\ICHeadLetterCommand{8}\fi \or%% 9 \ifDoNine\global\DoNinefalse\ICHeadLetterCommand{9}\fi \else \ifDoOtherDig\global\DoOtherDigfalse\ICHeadLetterCommandSym{$\bigstar$}{*}\fi \fi% \hskip1sp#1% }%% \def\ICPageCommand#1{\relax} % \def\ICHeadLetterCommand#1{% \blank \framed[strut=no,width=2em,height=2em,background=color,backgroundcolor=BackBrand,foregroundcolor=Brand]{\bfb #1\pagereference[IndexCode:NR#1]}\par\nobreak} % \def\ICHeadLetterCommandSym#1#2{% \blank \framed[strut=no,width=2em,height=2em,background=color,backgroundcolor=BackBrand,foregroundcolor=Brand]{\bfb #1\pagereference[IndexCode:NR#2]}\par\nobreak} \def\ICHeadLetterOtherCommand#1{\relax} %%%%% \setupregister[IndexCode][n=2, align=yes, balance=no, symbol=1, %distance=0pt, %expand=no, %distance=0bp, %partnumber=no, %indicator=yes, %% interaction=text, textstyle={\tfa}, textcommand={\ICTextCommand}, %% pagecommand={\ICPageCommand}, command={\ICHeadLetterOtherCommand},% ] \def\ICLetterEntry#1{% \bTD \doifreferencepermittedelse{IndexCode:NR#1}{% \goto{\framed[strut=no,width=2em,height=2em,background=color,backgroundcolor=BackBrand,foregroundcolor=Brand]{\bfb #1}}[IndexCode:NR#1]} {\framed[strut=no,width=2em,height=2em,background=color,backgroundcolor=BackBrand,foregroundcolor=Brand]{\bfb}} \eTD% } \def\ICLetterEntrySymbol#1#2{% \bTD \doifreferencepermittedelse{IndexCode:NR#2}{% \goto{\framed[strut=no,width=2em,height=2em,background=color,backgroundcolor=BackBrand,foregroundcolor=Brand]{\bfb #1}}[IndexCode:NR#2]} {\framed[strut=no,width=2em,height=2em,background=color,backgroundcolor=BackBrand,foregroundcolor=Brand]{}} \eTD% } \def\PutICLetterEntry{% \setupTABLE[frame=off] \bTABLE \bTR \ICLetterEntry{0}\ICLetterEntry{1}\ICLetterEntry{2}\ICLetterEntry{3}% \ICLetterEntry{4}\ICLetterEntry{5}\ICLetterEntry{6}\ICLetterEntry{7} \eTR \bTR \ICLetterEntry{8}\ICLetterEntry{9}\ICLetterEntrySymbol{$\bigstar$}{*}% \eTR\eTABLE } \starttext \IndexCode{00328273} {00328273} \par \IndexCode{12328273} {12328273} \par \IndexCode{2328273} {2328273} \par \IndexCode{3328273} {3328273} \par \IndexCode{3334328273} {3334328273} \par \IndexCode{4} {4} \par \IndexCode{5553} {5553} \par \IndexCode{644328273} {644328273} \page \IndexCode{844328273} {844328273} \par \IndexCode{944328273} {944328273} \par \IndexCode{944328273} {944328273} \par \IndexCode{944328273} {944328273} \par \page {\tfd TEST }\par \PutICLetterEntry\par \page \placeIndexCode \stoptext %% END %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% > > you can file a feature request to treat numbers 'as characters' > > Hans Sorry, I don't understand that.